J E S 2 J O B L O G 10.03.33 JOB 3 IEF677I WARNING MESSAGE(S) FOR JOB HEWO#COB ISSUED 10.03.33 JOB 3 $HASP373 HEWO#COB STARTED - INIT 6 - CLASS C - SYS TK4- 10.03.33 JOB 3 IEF403I HEWO#COB - STARTED - TIME=10.03.33 10.03.33 JOB 3 IEC130I SYSPUNCH DD STATEMENT MISSING 10.03.33 JOB 3 IEC130I SYSLIB DD STATEMENT MISSING 10.03.33 JOB 3 IEC130I SYSPUNCH DD STATEMENT MISSING 10.03.33 JOB 3 IEFACTRT - Stepname Procstep Program Retcode 10.03.33 JOB 3 HEWO#COB CLG COB IKFCBL00 RC= 0000 10.03.33 JOB 3 HEWO#COB CLG LKED IEWL RC= 0000 10.03.33 JOB 3 HEWO#COB CLG GO PGM=*.DD RC= 0000 10.03.33 JOB 3 IEF404I HEWO#COB - ENDED - TIME=10.03.33 10.03.33 JOB 3 $HASP395 HEWO#COB ENDED ------ JES2 JOB STATISTICS ------ 06 JAN 19 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 170 ALLOCATED TO SYSUT2 IEF237I 180 ALLOCATED TO SYSUT3 IEF237I 140 ALLOCATED TO SYSUT4 IEF237I 180 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 SYS19006.T100333.RA000.HEWO#COB.R0000001 DELETED *--------6 IEF285I VOL SER NOS= WORK03. IEF285I SYS19006.T100333.RA000.HEWO#COB.R0000002 DELETED *--------6 IEF285I VOL SER NOS= WORK01. IEF285I SYS19006.T100333.RA000.HEWO#COB.R0000003 DELETED *--------9 IEF285I VOL SER NOS= WORK02. IEF285I SYS19006.T100333.RA000.HEWO#COB.R0000004 DELETED *--------3 IEF285I VOL SER NOS= WORK00. IEF285I SYS19006.T100333.RA000.HEWO#COB.LOADSET PASSED *-------19 IEF285I VOL SER NOS= WORK02. IEF285I JES2.JOB00003.SI0101 SYSIN IEF373I STEP /COB / START 19006.1003 IEF374I STEP /COB / STOP 19006.1003 CPU 0MIN 00.05SEC SRB 0MIN 00.02SEC VIRT 2076K SYS 216K ************************************************************************************************************************************ * 1. Jobstep of job: HEWO#COB Stepname: COB Program name: IKFCBL00 Executed on 06.01.19 from 10.03.33 to 10.03.33 * * elapsed time 00:00:00,13 CPU-Identifier: TK4- Page-in: 0 * * CPU time 00:00:00,07 Virtual Storage used: 2076K Page-out: 0 * * corr. CPU: 00:00:00,07 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 170.......6 180.......9 140.......3 180......19 DMY.......0 * * * * Charge for step (w/o SYSOUT): 0,11 * ************************************************************************************************************************************ IEF236I ALLOC. FOR HEWO#COB LKED CLG IEF237I 180 ALLOCATED TO SYSLIN IEF237I DMY ALLOCATED TO IEF237I 190 ALLOCATED TO SYSLMOD IEF237I 148 ALLOCATED TO SYSLIB IEF237I 140 ALLOCATED TO SYSUT1 IEF237I JES2 ALLOCATED TO SYSPRINT IEF142I HEWO#COB LKED CLG - STEP WAS EXECUTED - COND CODE 0000 IEF285I SYS19006.T100333.RA000.HEWO#COB.LOADSET DELETED *-------20 IEF285I VOL SER NOS= WORK02. IEF285I SYS19006.T100333.RA000.HEWO#COB.GODATA PASSED *-------10 IEF285I VOL SER NOS= WORK03. IEF285I SYS1.COBLIB KEPT *-------17 IEF285I VOL SER NOS= MVSRES. IEF285I SYS19006.T100333.RA000.HEWO#COB.R0000005 DELETED *--------0 IEF285I VOL SER NOS= WORK00. IEF285I JES2.JOB00003.SO0104 SYSOUT IEF373I STEP /LKED / START 19006.1003 IEF374I STEP /LKED / STOP 19006.1003 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 06.01.19 from 10.03.33 to 10.03.33 * * elapsed time 00:00:00,04 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 * * 180......20 DMY.......0 190......10 148......17 140.......0 DMY.......0 * * * * Charge for step (w/o SYSOUT): 0,03 * ************************************************************************************************************************************ IEF236I ALLOC. FOR HEWO#COB GO CLG IEF237I 190 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 SYS19006.T100333.RA000.HEWO#COB.GODATA KEPT *--------0 IEF285I VOL SER NOS= WORK03. IEF285I JES2.JOB00003.SI0102 SYSIN IEF285I JES2.JOB00003.SO0105 SYSOUT IEF373I STEP /GO / START 19006.1003 IEF374I STEP /GO / STOP 19006.1003 CPU 0MIN 00.00SEC SRB 0MIN 00.00SEC VIRT 8K SYS 204K IEF237I 190 ALLOCATED TO SYS00001 IEF285I SYS19006.T100333.RA000.HEWO#COB.R0000001 KEPT *--------0 IEF285I VOL SER NOS= WORK03. IEF285I SYS19006.T100333.RA000.HEWO#COB.GODATA DELETED IEF285I VOL SER NOS= WORK03. IEF375I JOB /HEWO#COB/ START 19006.1003 IEF376I JOB /HEWO#COB/ STOP 19006.1003 CPU 0MIN 00.07SEC SRB 0MIN 00.02SEC CB545 V2 LVL78 01MAY72 IBM OS AMERICAN NATIONAL STANDARD COBOL DATE JAN 6,2019 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 !