home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / viscobv7.zip / vac22os2 / ibmcobol / macros / penter.lx < prev    next >
Text File  |  1998-02-24  |  209b  |  9 lines
  1. /* this macro provides the enter key behaviour for the SEU, XEDIT, and ISPF profiles */
  2. 'PREFIXPROCESS'
  3. 'EXTRACT POSITION'
  4. if POSITION = 1 then do
  5.    'SET CURSORCOL 1'
  6.    'PRIMITIVE PREVIOUSTAB'
  7. end
  8.  
  9.