home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / viscobv7.zip / vac22os2 / ibmcobol / macros / center.lx < prev    next >
Text File  |  1998-02-24  |  177b  |  5 lines
  1. /* center.lx - centre the text on the current line inside TEXTLIMIT. */
  2. 'EXTRACT CONTENT TEXTLIMIT'
  3. centred_string = centre(content,textlimit)
  4. 'SET CONTENT' centred_string
  5.