IBM COBOL RUN JCL |
| File Edit Confirm Menu Utilities Compilers Test Help EDIT IBMMFS.MAC.SOURCE(RUN) - 01.05 Columns 00001 - 00072 ****** ***************************** Top of Data ************************************** 000001 //RUNJCL JOB 'IBMMFS','MAC',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID 000002 //STEP1 EXEC PGM=COBOL <= OBJ PRM NAME 000003 //STEPLIB DD DISP=SHR,DSN=IBMMFS.MAC.LOAD <= LOAD MODULE PDS 000004 //JCLFILE DD DISP=SHR,DSN=IBMMFS.MAC.PSFILE <=COBOL QSAM FILE-ID 000005 //SYSPRINT DD SYSOUT=* <= OUTPUT STREAM ( * = X ) 000006 //SYSUDUMP DD SYSOUT=* 000007 //CEEDUMP DD SYSOUT=* 000008 //SYSIN DD * <= INPUT STREAM 000009 25 000010 /* 000011 // ****** **************************** Bottom of Data ************************************ Command ===> SUB Scroll ===> PAGE |
|
|