J E S 2 J O B L O G 12.13.26 JOB 3 IEF677I WARNING MESSAGE(S) FOR JOB HEWO#COB ISSUED 12.13.26 JOB 3 $HASP373 HEWO#COB STARTED - INIT 6 - CLASS C - SYS TK4- 12.13.26 JOB 3 IEF403I HEWO#COB - STARTED - TIME=12.13.26 12.13.26 JOB 3 IEC130I SYSPUNCH DD STATEMENT MISSING 12.13.26 JOB 3 IEC130I SYSLIB DD STATEMENT MISSING 12.13.26 JOB 3 IEC130I SYSPUNCH DD STATEMENT MISSING 12.13.26 JOB 3 IEFACTRT - Stepname Procstep Program Retcode 12.13.26 JOB 3 HEWO#COB CLG COB IKFCBL00 RC= 0000 12.13.26 JOB 3 HEWO#COB CLG LKED IEWL RC= 0000 12.13.26 JOB 3 HEWO#COB CLG GO PGM=*.DD RC= 0000 12.13.26 JOB 3 IEF404I HEWO#COB - ENDED - TIME=12.13.26 12.13.26 JOB 3 $HASP395 HEWO#COB ENDED ------ JES2 JOB STATISTICS ------ 21 OCT 18 JOB EXECUTION DATE 19 CARDS READ 171 SYSOUT PRINT RECORDS 0 SYSOUT PUNCH RECORDS 0.00 MINUTES EXECUTION TIME 1 //HEWO#COB JOB 'S322-0C4','WFJM', JOB 3 // CLASS=C,MSGCLASS=A,MSGLEVEL=(1,1), // REGION=2048K,TIME=(1,0),PRTY=8 2 //CLG EXEC COBUCLG, // PARM.LKED='MAP,LIST,LET' 3 XXCOBUCLG PROC SOUT='*' 00000100 4 XXCOB EXEC PGM=IKFCBL00, 00000200 XX PARM='LOAD,SUPMAP,SIZE=2048K,BUF=1024K' 00000300 5 XXSYSPRINT DD SYSOUT=&SOUT 00000400 6 XXSYSUT1 DD UNIT=SYSDA,SPACE=(460,(700,100)) 00000500 7 XXSYSUT2 DD UNIT=SYSDA,SPACE=(460,(700,100)) 00000600 8 XXSYSUT3 DD UNIT=SYSDA,SPACE=(460,(700,100)) 00000700 9 XXSYSUT4 DD UNIT=SYSDA,SPACE=(460,(700,100)) 00000800 10 XXSYSLIN DD DSNAME=&LOADSET,DISP=(MOD,PASS),UNIT=SYSDA, 00000900 XX SPACE=(80,(500,100)) 00001000 11 //COB.SYSIN DD * 12 XXLKED EXEC PGM=IEWL,PARM='LIST,XREF,LET',COND=(5,LT,COB) 00001100 13 XXSYSLIN DD DSNAME=&LOADSET,DISP=(OLD,DELETE) 00001200 14 XX DD DDNAME=SYSIN 00001300 15 XXSYSLMOD DD DSNAME=&GODATA(RUN),DISP=(NEW,PASS),UNIT=SYSDA, 00001400 XX SPACE=(1024,(50,20,1)) 00001500 16 XXSYSLIB DD DSNAME=SYS1.COBLIB,DISP=SHR 00001600 17 XXSYSUT1 DD UNIT=(SYSDA,SEP=(SYSLIN,SYSLMOD)),SPACE=(1024,(50,20)) 00001700 18 XXSYSPRINT DD SYSOUT=&SOUT 00001800 19 XXGO EXEC PGM=*.LKED.SYSLMOD,COND=((5,LT,COB),(5,LT,LKED)) 00001900 20 //GO.SYSIN DD * 21 //GO.SYSOUT DD SYSOUT=* // STMT NO. MESSAGE - 5 IEF653I SUBSTITUTION JCL - SYSOUT=* 18 IEF653I SUBSTITUTION JCL - SYSOUT=* 19 IEF686I DDNAME REFERRED TO ON DDNAME KEYWORD IN PRIOR STEP WAS NOT RESOLVED IEF236I ALLOC. FOR HEWO#COB COB CLG IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I 190 ALLOCATED TO SYSUT1 IEF237I 180 ALLOCATED TO SYSUT2 IEF237I 140 ALLOCATED TO SYSUT3 IEF237I 170 ALLOCATED TO SYSUT4 IEF237I 170 ALLOCATED TO SYSLIN IEF237I JES2 ALLOCATED TO SYSIN IEC130I SYSPUNCH DD STATEMENT MISSING IEC130I SYSLIB DD STATEMENT MISSING IEC130I SYSPUNCH DD STATEMENT MISSING IEF142I HEWO#COB COB CLG - STEP WAS EXECUTED - COND CODE 0000 IEF285I JES2.JOB00003.SO0103 SYSOUT IEF285I SYS18294.T121326.RA000.HEWO#COB.R0000001 DELETED *--------6 IEF285I VOL SER NOS= WORK03. IEF285I SYS18294.T121326.RA000.HEWO#COB.R0000002 DELETED *--------6 IEF285I VOL SER NOS= WORK02. IEF285I SYS18294.T121326.RA000.HEWO#COB.R0000003 DELETED *--------9 IEF285I VOL SER NOS= WORK00. IEF285I SYS18294.T121326.RA000.HEWO#COB.R0000004 DELETED *--------3 IEF285I VOL SER NOS= WORK01. IEF285I SYS18294.T121326.RA000.HEWO#COB.LOADSET PASSED *-------19 IEF285I VOL SER NOS= WORK01. IEF285I JES2.JOB00003.SI0101 SYSIN IEF373I STEP /COB / START 18294.1213 IEF374I STEP /COB / STOP 18294.1213 CPU 0MIN 00.04SEC SRB 0MIN 00.02SEC VIRT 2076K SYS 216K ************************************************************************************************************************************ * 1. Jobstep of job: HEWO#COB Stepname: COB Program name: IKFCBL00 Executed on 21.10.18 from 12.13.26 to 12.13.26 * * elapsed time 00:00:00,11 CPU-Identifier: TK4- Page-in: 0 * * CPU time 00:00:00,06 Virtual Storage used: 2076K Page-out: 0 * * corr. CPU: 00:00:00,06 CPU time has been corrected by 1 / 1,0 multiplier * * * * I/O Operation * * Number of records read via DD * or DD DATA: 8 * * DMY.......0 190.......6 180.......6 140.......9 170.......3 170......19 DMY.......0 * * * * Charge for step (w/o SYSOUT): 0,10 * ************************************************************************************************************************************ IEF236I ALLOC. FOR HEWO#COB LKED CLG IEF237I 170 ALLOCATED TO SYSLIN IEF237I DMY ALLOCATED TO IEF237I 180 ALLOCATED TO SYSLMOD IEF237I 148 ALLOCATED TO SYSLIB IEF237I 190 ALLOCATED TO SYSUT1 IEF237I JES2 ALLOCATED TO SYSPRINT IEF142I HEWO#COB LKED CLG - STEP WAS EXECUTED - COND CODE 0000 IEF285I SYS18294.T121326.RA000.HEWO#COB.LOADSET DELETED *-------20 IEF285I VOL SER NOS= WORK01. IEF285I SYS18294.T121326.RA000.HEWO#COB.GODATA PASSED *-------10 IEF285I VOL SER NOS= WORK02. IEF285I SYS1.COBLIB KEPT *-------17 IEF285I VOL SER NOS= MVSRES. IEF285I SYS18294.T121326.RA000.HEWO#COB.R0000005 DELETED *--------0 IEF285I VOL SER NOS= WORK03. IEF285I JES2.JOB00003.SO0104 SYSOUT IEF373I STEP /LKED / START 18294.1213 IEF374I STEP /LKED / STOP 18294.1213 CPU 0MIN 00.02SEC SRB 0MIN 00.00SEC VIRT 264K SYS 204K ************************************************************************************************************************************ * 2. Jobstep of job: HEWO#COB Stepname: LKED Program name: IEWL Executed on 21.10.18 from 12.13.26 to 12.13.26 * * elapsed time 00:00:00,03 CPU-Identifier: TK4- Page-in: 0 * * CPU time 00:00:00,02 Virtual Storage used: 264K Page-out: 0 * * corr. CPU: 00:00:00,02 CPU time has been corrected by 1 / 1,0 multiplier * * * * I/O Operation * * Number of records read via DD * or DD DATA: 0 * * 170......20 DMY.......0 180......10 148......17 190.......0 DMY.......0 * * * * Charge for step (w/o SYSOUT): 0,03 * ************************************************************************************************************************************ IEF236I ALLOC. FOR HEWO#COB GO CLG IEF237I 180 ALLOCATED TO PGM=*.DD IEF237I JES2 ALLOCATED TO SYSIN IEF237I JES2 ALLOCATED TO SYSOUT IEF142I HEWO#COB GO CLG - STEP WAS EXECUTED - COND CODE 0000 IEF285I SYS18294.T121326.RA000.HEWO#COB.GODATA KEPT *--------0 IEF285I VOL SER NOS= WORK02. IEF285I JES2.JOB00003.SI0102 SYSIN IEF285I JES2.JOB00003.SO0105 SYSOUT IEF373I STEP /GO / START 18294.1213 IEF374I STEP /GO / STOP 18294.1213 CPU 0MIN 00.00SEC SRB 0MIN 00.00SEC VIRT 8K SYS 204K IEF237I 180 ALLOCATED TO SYS00001 IEF285I SYS18294.T121326.RA000.HEWO#COB.R0000001 KEPT *--------0 IEF285I VOL SER NOS= WORK02. IEF285I SYS18294.T121326.RA000.HEWO#COB.GODATA DELETED IEF285I VOL SER NOS= WORK02. IEF375I JOB /HEWO#COB/ START 18294.1213 IEF376I JOB /HEWO#COB/ STOP 18294.1213 CPU 0MIN 00.06SEC SRB 0MIN 00.02SEC CB545 V2 LVL78 01MAY72 IBM OS AMERICAN NATIONAL STANDARD COBOL DATE OCT 21,2018 1 00001 000100 IDENTIFICATION DIVISION. 00002 000200 PROGRAM-ID. 'HEWO'. 00003 000300 ENVIRONMENT DIVISION. 00004 001000 DATA DIVISION. 00005 100000 PROCEDURE DIVISION. 00006 100100 00-MAIN. 00007 100500 DISPLAY 'Hello World !'. 00008 100600 STOP RUN. 2 *STATISTICS* SOURCE RECORDS = 8 DATA DIVISION STATEMENTS = PROCEDURE DIVISION STATEMENTS = 2 *OPTIONS IN EFFECT* SIZE = 2097152 BUF = 1048576 LINECNT = 57 SPACE1, FLAGW, SEQ, SOURCE *OPTIONS IN EFFECT* NODMAP, NOPMAP, NOCLIST, SUPMAP, NOXREF, LOAD, NODECK, APOST, NOTRUNC, NOLIB, NOVERB *OPTIONS IN EFFECT* ZWB F64-LEVEL LINKAGE EDITOR OPTIONS SPECIFIED MAP,LIST,LET DEFAULT OPTION(S) USED - SIZE=(231424,55296) MODULE MAP CONTROL SECTION ENTRY NAME ORIGIN LENGTH NAME LOCATION NAME LOCATION NAME LOCATION NAME LOCATION HEWO 00 2EA ILBODSP0* 2F0 700 ILBOSTP0* 9F0 35 ILBOSTP1 A06 ENTRY ADDRESS 00 TOTAL LENGTH A28 ****RUN DOES NOT EXIST BUT HAS BEEN ADDED TO DATA SET AUTHORIZATION CODE IS 0. Hello World !