REXX INTERPRETER JCL  //EXEC is enough
 File           Edit              Confirm               Menu                  Utilities                Compilers              Test                Help
 

EDIT IBMMFS.MAC.REXX(INTERPRT) - 01.05                                           Columns 00001 -  00072
****** ***************************** Top of Data **************************************
000001 //REXXEXEC JOB 'IBMMFS','MAC',CLASS=A,MSGCLASS=X                                                               000002 //STEP1 EXEC PGM=PGM001,DYNAMNBR=200
000003 //SYSEXEC DD DSN=IBMMFS.MAC.REXX,DISP=SHR
000004 //SYSPRINT DD SYSOUT=*
000005 //SYSTSPRT DD SYSOUT=*
000006 //INFILE DD DSN=IBMMFS.MAC.INPUT,DISP=SHR <= IP FILE
000007 //OUTFILE DD SYSOUT=*                                 <= OP FILE
000008 //SYSTSIN DD *
000010      PROFILE PREFIX(IBMMFS)                     <= USER ID
000011      %MYREXX
000012 //

****** **************************** Bottom of Data ************************************

Command ===>  SUB                                                                                                     Scroll ===> PAGE


F1=Help                          F3=Exit                           F5=Rfind                          F6=Rchange                       F12=Cancel

 ® IBMMAINFRAMES.com Training Division                                                         © www.ibmmainframes.com