home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / viscobv7.zip / vac22os2 / ibmcobol / macros / mnucheck.lx < prev    next >
Text File  |  1998-02-24  |  166b  |  6 lines
  1. /* A macro to check all the passed menu items. */
  2. parse arg item rest
  3. 'extract actionbarid.' || item 'into item_id'
  4. 'set menucheck.' || item_id 'on' ;
  5. return ;
  6.