File  Edit  Edit_Settings  Menu  Utilities  Compilers  Test  Help
 -------------------------------------------------------------------------------
 EDIT       GAMA03.SOURCE.JCLLIB(ACVRPTN) - 01.01           Columns 00001 00072
 Command ===>                                                  Scroll ===> CSR
 ****** ***************************** Top of Data ******************************
 000100 //GAMA03AN JOB NOTIFY=&SYSUID
 000200 //JOBLIB DD DSN=GAMA03.LOADLIB.COBOL,DISP=SHR
 000201 //STEP10 EXEC PGM=SORT
 000202 //SORTIN DD DSN=GAMA03.ADDRESS.CHANGE.VALID,DISP=SHR
 000203 //SORTOUT  DD DSN=GAMA03.ADDRESS.CHANGE.VALID.SORT,DISP=SHR
 000204 //SYSIN DD *
 000205    SORT FIELDS=(1,10,ZD,A)
 000206 /*
 000207 //SYSOUT DD SYSOUT=*
 000208 //SYSPRINT DD SYSOUT=*
 000209 //SYSABEND DD DUMMY
 000290 //*
 000300 //STEP20 EXEC PGM=ACVRPTN
 000312 //VRPTDD DD DSN=GAMA03.ADDCHG.VALID.RPT,DISP=SHR
 000318 //VALDD DD DSN=GAMA03.ADDRESS.CHANGE.VALID.SORT,DISP=SHR
 000400 //SYSIN DD DUMMY
 000500 //SYSOUT DD SYSOUT=*
 000600 //SYSPRINT DD SYSOUT=*
 000700 //SYSABEND DD DUMMY
 000800 //CEEDUMP DD DUMMY
 ****** **************************** Bottom of Data ****************************