J E S 2 J O B L O G 15.59.24 JOB 317 IEF677I WARNING MESSAGE(S) FOR JOB PL1LFCLG ISSUED 15.59.24 JOB 317 $HASP373 PL1LFCLG STARTED - INIT 1 - CLASS A - SYS HMVS 15.59.24 JOB 317 IEF403I PL1LFCLG - STARTED - TIME=15.59.24 15.59.24 JOB 317 IEFACTRT PL1L /IEMAA /00:00:00.04/00:00:00.07/00004/PL1LFCLG 15.59.24 JOB 317 IEFACTRT LKED /IEWL /00:00:00.02/00:00:00.05/00000/PL1LFCLG 15.59.24 JOB 317 IEFACTRT GO /PGM=*.DD/00:00:00.00/00:00:00.01/00000/PL1LFCLG 15.59.24 JOB 317 IEF404I PL1LFCLG - ENDED - TIME=15.59.24 15.59.24 JOB 317 $HASP395 PL1LFCLG ENDED ------ JES2 JOB STATISTICS ------ 06 JUN 24 JOB EXECUTION DATE 10 CARDS READ 388 SYSOUT PRINT RECORDS 0 SYSOUT PUNCH RECORDS 0.00 MINUTES EXECUTION TIME
1 //PL1LFCLG JOB (001),'PL1 HELLO WORLD', JOB 317 // CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),REGION=256K 00000200 2 //HELOWRLD EXEC PL1LFCLG 00000300 3 XXPL1LFCLG PROC LKEDPGM='IEWL' 00000090 4 XXPL1L EXEC PGM=IEMAA,PARM='LOAD,NODECK',REGION=52K 00000100 5 XXSTEPLIB DD DSN=SYSC.LINKLIB,DISP=SHR 00000200 6 XXSYSPRINT DD SYSOUT=* 00000303 7 //PL1L.SYSLIN DD UNIT=SYSDA 00000400 X/SYSLIN DD DSNAME=&&LOADSET,DISP=(MOD,PASS),UNIT=SYSSQ, *00000400 XX SPACE=(80,(250,100)) 00000500 8 XXSYSUT3 DD DSNAME=&&SYSUT3,UNIT=SYSDA,SPACE=(80,(250,250)), *00000600 XX DCB=BLKSIZE=80 00000700 9 XXSYSUT1 DD DSNAME=&&SYSUT1,UNIT=SYSDA,SPACE=(1024,(60,60),,CONTIG),*00000800 XX SEP=(SYSUT3,SYSLIN),DCB=BLKSIZE=1024 00000900 10 //PL1L.SYSIN DD * 00000500 11 XXLKED EXEC PGM=&LKEDPGM,REGION=96K, 00001000 XX PARM='XREF,LIST',COND=(9,LT,PL1L) 00001100 12 //LKED.SYSLIB DD DSN=SYSC.PL1LIB,DISP=SHR 00000900 X/SYSLIB DD DSNAME=SYSC.PL1LIB,DISP=SHR 00001201 13 XXSYSLMOD DD DSNAME=&&GOSET(GO),DISP=(MOD,PASS), *00001300 XX UNIT=SYSDA,SPACE=(1024,(50,20,1),RLSE) 00001400 14 XXSYSUT1 DD DSNAME=&&SYSUT1,UNIT=SYSDA,SPACE=(1024,(200,20)), *00001500 XX SEP=(SYSLMOD,SYSLIB),DCB=BLKSIZE=1024 00001600 15 XXSYSPRINT DD SYSOUT=* 00001703 16 XXSYSLIN DD DSNAME=&&LOADSET,DISP=(OLD,DELETE) 00001800 17 XX DD DDNAME=SYSIN 00001900 18 XXGO EXEC PGM=*.LKED.SYSLMOD,COND=((9,LT,LKED),(9,LT,PL1L)) 00002000 19 //GO.STEPLIB DD DSN=SYSC.PL1LIB,DISP=SHR 00001000 X/STEPLIB DD DSN=SYSC.LINKLIB,DISP=SHR 00002102 20 XX DD DSN=SYSC.PL1LIB,DISP=SHR 00002202 21 XXSYSPRINT DD SYSOUT=* 00002303
STMT NO. MESSAGE - 11 IEF653I SUBSTITUTION JCL - PGM=IEWL,REGION=96K, 18 IEF686I DDNAME REFERRED TO ON DDNAME KEYWORD IN PRIOR STEP WAS NOT RESOLVED IEF236I ALLOC. FOR PL1LFCLG PL1L HELOWRLD IEF237I 253 ALLOCATED TO STEPLIB IEF237I 253 ALLOCATED TO SYS00026 IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I 390 ALLOCATED TO SYSLIN IEF237I 281 ALLOCATED TO SYSUT3 IEF237I 251 ALLOCATED TO SYSUT1 IEF237I JES2 ALLOCATED TO SYSIN IEF142I PL1LFCLG PL1L HELOWRLD - STEP WAS EXECUTED - COND CODE 0004 IEF285I SYSC.LINKLIB KEPT *--------0 IEF285I VOL SER NOS= SYSCPK. IEF285I UCSYSCPK KEPT *--------0 IEF285I VOL SER NOS= SYSCPK. IEF285I JES2.JOB00317.SO0102 SYSOUT IEF285I SYS24158.T155924.RA000.PL1LFCLG.LOADSET PASSED *-------22 IEF285I VOL SER NOS= WORK03. IEF285I SYS24158.T155924.RA000.PL1LFCLG.SYSUT3 DELETED *--------0 IEF285I VOL SER NOS= MVS381. IEF285I SYS24158.T155924.RA000.PL1LFCLG.SYSUT1 DELETED *--------0 IEF285I VOL SER NOS= WORK00. IEF285I JES2.JOB00317.SI0101 SYSIN IEF373I STEP /PL1L / START 24158.1559 IEF374I STEP /PL1L / STOP 24158.1559 CPU 0MIN 00.03SEC SRB 0MIN 00.01SEC VIRT 272K SYS 208K **** JOB NAME: PL1LFCLG JOBCARD READ 2024/158 15:59:24 370/148 VS2 R03.8 HMVS ****************************************************** * * * STEP NUMBER: 1 USER CORE: 272K START TIME: 15:59:24 CPU TIME: 00:00:00.04 ACTIVE TIME: 00:00:00.05 * * STEP NAME: PL1L SYSTEM CORE: 208K STOP TIME: 15:59:24 SRB TIME: 00:00:00.01 ALLOC TIME: 15:59:24 * * PROGRAM NAME: IEMAA REGION SIZE: 256K ELAPSED TIME: 00:00:00.07 TCB TIME: 00:00:00.03 PROGRAM LOAD: 15:59:24 * * CONDITION CODE: 00004 PERFORMANCE GROUP: 004 * * JES2 CARDS: 0 SERVICE UNITS PAGES IN/OUT # SWAPS PAGES SWAP IN/OUT VIO PAGES IN/OUT * * 151 0 / 0 0 0 / 0 0 / 0 * * * * ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT * * 253/D3350 0 253/D3350 0 390/D3390 22 281/D3380 0 251/D3350 0 * ************************************************************************************************************************************ IEF236I ALLOC. FOR PL1LFCLG LKED HELOWRLD IEF237I 253 ALLOCATED TO SYSLIB IEF237I 253 ALLOCATED TO SYS00028 IEF237I 252 ALLOCATED TO SYSLMOD IEF237I 281 ALLOCATED TO SYSUT1 IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I 390 ALLOCATED TO SYSLIN IEF237I DMY ALLOCATED TO IEF142I PL1LFCLG LKED HELOWRLD - STEP WAS EXECUTED - COND CODE 0000 IEF285I SYSC.PL1LIB KEPT *-------75 IEF285I VOL SER NOS= SYSCPK. IEF285I UCSYSCPK KEPT *--------0 IEF285I VOL SER NOS= SYSCPK. IEF285I SYS24158.T155924.RA000.PL1LFCLG.GOSET PASSED *-------42 IEF285I VOL SER NOS= WORK01. IEF285I SYS24158.T155924.RA000.PL1LFCLG.SYSUT1 DELETED *--------0 IEF285I VOL SER NOS= MVS381. IEF285I JES2.JOB00317.SO0103 SYSOUT IEF285I SYS24158.T155924.RA000.PL1LFCLG.LOADSET DELETED *-------23 IEF285I VOL SER NOS= WORK03. IEF373I STEP /LKED / START 24158.1559 IEF374I STEP /LKED / STOP 24158.1559 CPU 0MIN 00.02SEC SRB 0MIN 00.00SEC VIRT 256K SYS 212K
************************************************************************************************************************************ * * * STEP NUMBER: 2 USER CORE: 256K START TIME: 15:59:24 CPU TIME: 00:00:00.02 ACTIVE TIME: 00:00:00.04 * * STEP NAME: LKED SYSTEM CORE: 212K STOP TIME: 15:59:24 SRB TIME: 00:00:00.00 ALLOC TIME: 15:59:24 * * PROGRAM NAME: IEWL REGION SIZE: 256K ELAPSED TIME: 00:00:00.05 TCB TIME: 00:00:00.02 PROGRAM LOAD: 15:59:24 * * CONDITION CODE: 00000 PERFORMANCE GROUP: 004 * * JES2 CARDS: 0 SERVICE UNITS PAGES IN/OUT # SWAPS PAGES SWAP IN/OUT VIO PAGES IN/OUT * * 737 0 / 0 0 0 / 0 0 / 0 * * * * ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT * * 253/D3350 75 253/D3350 0 252/D3350 42 281/D3380 0 390/D3390 23 * ************************************************************************************************************************************ IEF236I ALLOC. FOR PL1LFCLG GO HELOWRLD IEF237I 252 ALLOCATED TO PGM=*.DD IEF237I 253 ALLOCATED TO STEPLIB IEF237I 253 ALLOCATED TO IEF237I 253 ALLOCATED TO SYS00030 IEF237I JES2 ALLOCATED TO SYSPRINT IEF142I PL1LFCLG GO HELOWRLD - STEP WAS EXECUTED - COND CODE 0000 IEF285I SYS24158.T155924.RA000.PL1LFCLG.GOSET KEPT *--------0 IEF285I VOL SER NOS= WORK01. IEF285I SYSC.PL1LIB KEPT *--------0 IEF285I VOL SER NOS= SYSCPK. IEF285I SYSC.PL1LIB KEPT *--------0 IEF285I VOL SER NOS= SYSCPK. IEF285I UCSYSCPK KEPT *--------0 IEF285I VOL SER NOS= SYSCPK. IEF285I JES2.JOB00317.SO0104 SYSOUT IEF373I STEP /GO / START 24158.1559 IEF374I STEP /GO / STOP 24158.1559 CPU 0MIN 00.00SEC SRB 0MIN 00.00SEC VIRT 40K SYS 204K ************************************************************************************************************************************ * * * STEP NUMBER: 3 USER CORE: 40K START TIME: 15:59:24 CPU TIME: 00:00:00.00 ACTIVE TIME: 00:00:00.00 * * STEP NAME: GO SYSTEM CORE: 204K STOP TIME: 15:59:24 SRB TIME: 00:00:00.00 ALLOC TIME: 15:59:24 * * PROGRAM NAME: PGM=*.DD REGION SIZE: 256K ELAPSED TIME: 00:00:00.01 TCB TIME: 00:00:00.00 PROGRAM LOAD: 15:59:24 * * CONDITION CODE: 00000 PERFORMANCE GROUP: 004 * * JES2 CARDS: 0 SERVICE UNITS PAGES IN/OUT # SWAPS PAGES SWAP IN/OUT VIO PAGES IN/OUT * * 16 0 / 0 0 0 / 0 0 / 0 * * * * ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT ADDR/UNIT I/O COUNT * * 252/D3350 0 253/D3350 0 253/D3350 0 253/D3350 0 * ************************************************************************************************************************************ IEF237I 252 ALLOCATED TO SYS00001 IEF285I SYS24158.T155924.RA000.PL1LFCLG.R0000001 KEPT *--------0 IEF285I VOL SER NOS= WORK01. IEF285I SYS24158.T155924.RA000.PL1LFCLG.GOSET DELETED IEF285I VOL SER NOS= WORK01. IEF375I JOB /PL1LFCLG/ START 24158.1559 IEF376I JOB /PL1LFCLG/ STOP 24158.1559 CPU 0MIN 00.05SEC SRB 0MIN 00.01SEC
PAGE 1 VERSION 5.5 OS/360 PL/I COMPILER (F) DATE 24.158 PL/I F COMPILER OPTIONS SPECIFIED ARE AS FOLLOWS-- LOAD,NODECK THE COMPLETE LIST OF OPTIONS USED DURING THIS COMPILATION IS-- EBCDIC CHAR60 NOMACRO SOURCE2 NOMACDCK COMP SOURCE NOATR NOXREF NOEXTREF NOLIST LOAD NODECK FLAGW NOSTMT SIZE=0267904 LINECNT=050 OPT=01 SORMGIN=(002,072) NOEXTDIC NONEST OPLIST SYNCHKT *OPTIONS IN EFFECT* EBCDIC,CHAR60,NOMACRO,SOURCE2,NOMACDCK,COMP,SOURCE,NOATR,NOXREF,NOEXTREF,NOLIST,LOAD, *OPTIONS IN EFFECT* NODECK,FLAGW,NOSTMT,SIZE=0267904,LINECNT=050,OPT=01,SORMGIN=(002,072),NOEXTDIC, *OPTIONS IN EFFECT* NONEST,OPLIST,SYNCHKT
HELLO: PROC OPTIONS(MAIN); 00000600 PAGE 2 1 HELLO: PROC OPTIONS(MAIN); 00000600 2 PUT SKIP LIST('HELLO WORLD'); 00000700 3 END HELLO; 00000800
HELLO: PROC OPTIONS(MAIN); 00000600 PAGE 3z STORAGE REQUIREMENTS. ---------------------- THE STORAGE AREA FOR THE PROCEDURE LABELLED HELLO IS 168 BYTES LONG. THE PROGRAM CSECT IS NAMED HELLO AND IS 92 BYTES LONG. THE STATIC CSECT IS NAMED **HELLOA AND IS 120 BYTES LONG. *STATISTICS* SOURCE RECORDS = 3,PROG TEXT STMNTS = 3,OBJECT BYTES = 92
HELLO: PROC OPTIONS(MAIN); 00000600 PAGE 4 TABLE OF OFFSETS AND STATEMENT NUMBERS WITHIN PROCEDURE HELLO OFFSET (HEX) 0000 0038 0056 STATEMENT NO 1 2 3
HELLO: PROC OPTIONS(MAIN); 00000600 PAGE 5 COMPILER DIAGNOSTICS. WARNINGS. IEM0227I NO FILE/STRING OPTION SPECIFIED IN ONE OR MORE GET/PUT STATEMENTS. SYSIN/SYSPRINT HAS BEEN ASSUMED IN EACH CASE. END OF DIAGNOSTICS. AUXILIARY STORAGE WILL NOT BE USED FOR DICTIONARY WHEN SIZE = 120K COMPILE TIME .00 MINS ELAPSED TIME .00 MINS
F64-LEVEL LINKAGE EDITOR OPTIONS SPECIFIED XREF,LIST DEFAULT OPTION(S) USED - SIZE=(229376,55296) CROSS REFERENCE TABLE CONTROL SECTION ENTRY NAME ORIGIN LENGTH NAME LOCATION NAME LOCATION NAME LOCATION NAME LOCATION HELLO 00 5C **HELLOA 60 78 IHEMAIN D8 4 IHENTRY E0 C IHESPRT F0 38 IHEIOB * 128 1E0 IHEIOBA 128 IHEIOBB 130 IHEIOBC 138 IHEIOBD 140 IHEIOBE 148 IHEIOBT 230 IHEERR * 308 745 IHEERRD 308 IHEERRC 312 IHEERRB 31C IHEERRA 326 IHEERRE 9B6 IHEIOP * A50 1F7 IHEIOPA A50 IHEIOPB A52 IHEIOPC A56 IHEOCL * C48 580 IHEOCLA C48 IHEOCLB C4A IHEOCLC C4C IHEOCLD C4E IHEABN * 11C8 C IHEABND 11C8 IHEM91 * 11D8 178 IHEM91B 11D8 IHEM91A 11E0 IHEM91C 12F2 IHETER * 1350 110 IHETERA 1350 IHEIOF * 1460 2DC IHEIOFB 1460 IHEIOFA 1462 IHEITAZ 16FE IHEITAX 170A IHEITAA 171E IHELDO * 1740 418 IHELDOA 1740 IHELDOB 1742 IHELDOC 1746 IHEDNC * 1B58 2B2 IHEDNCA 1B58 IHEVSB * 1E10 CE IHEVSBA 1E10 IHEVSC * 1EE0 AC IHEVSCA 1EE0 IHEDMA * 1F90 F8 IHEDMAA 1F90 IHEUPA * 2088 E8 IHEUPAA 2088 IHEUPAB 20F2 IHEVQC * 2170 268 IHEVQCA 2170 IHEVSE * 23D8 15D IHEVSEA 23D8 IHEVSEB 23DA IHEVSF * 2538 EC IHEVSFA 2538 IHEVFA * 2628 16C IHEVFAA 2628
NAME ORIGIN LENGTH NAME LOCATION NAME LOCATION NAME LOCATION NAME LOCATION IHEVFB * 2798 F0 IHEVFBA 2798 IHEVFC * 2888 26 IHEVFCA 2888 IHEVFD * 28B0 66 IHEVFDA 28B0 IHEVFE * 2918 20 IHEVFEA 2918 IHEVKB * 2938 30A IHEVKBA 2938 IHEVKC * 2C48 2D0 IHEVKCA 2C48 IHEVKF * 2F18 67C IHEVKFA 2F18 IHEVKG * 3598 4DE IHEVKGA 3598 IHEVPA * 3A78 1E0 IHEVPAA 3A78 IHEVPB * 3C58 1A2 IHEVPBA 3C58 IHEVPC * 3E00 1F0 IHEVPCA 3E00 IHEVPD * 3FF0 105 IHEVPDA 3FF0 IHEVPE * 40F8 278 IHEVPEA 40F8 IHEVPF * 4370 50 IHEVPFA 4370 IHEVPG * 43C0 229 IHEVPGA 43C0 IHEVPH * 45F0 B4 IHEVPHA 45F0 IHESAP * 46A8 B1C IHESADA 46A8 IHESAPC 46C2 IHESAPD 46CA IHESAPA 46D2 IHESAPB 46DA IHESADF 46E2 IHESADB 46EA IHESADE 46F2 IHESAFC 46FA IHESAFA 4702 IHESAFB 470A IHESAFD 4712 IHESARA 471A IHESAFQ 4722 IHESARC 4F14 IHESADD 5028 IHESAFF 5062 IHEBEG * 51C8 80 IHEBEGN 51C8 IHEBEGA 5208 IHEDDO * 5248 288 IHEDDOA 5248 IHEDDOB 524A IHEDDOC 524C IHEDDOD 524E IHEDDOE 5250 IHEPRT * 54D0 308 IHEPRTA 54D0 IHEPRTB 54D2 IHESIZ * 57D8 C IHESIZE 57D8 IHETAB * 57E8 C IHETABS 57E8 IHEDDP * 57F8 28C IHEDDPA 57F8 IHEDDPB 57FA IHEDDPC 57FC IHEDDPD 57FE
LOCATION REFERS TO SYMBOL IN CONTROL SECTION LOCATION REFERS TO SYMBOL IN CONTROL SECTION 10 **HELLOA **HELLOA 80 IHESADA IHESAP 84 IHESADB IHESAP 88 HELLO HELLO 8C HELLO HELLO 98 HELLO HELLO 9C IHELDOB IHELDO A0 IHEIOBT IHEIOB A4 IHEIOBC IHEIOB 90 IHESAFA IHESAP A8 IHESPRT IHESPRT C8 IHESPRT IHESPRT CC HELLO HELLO D8 HELLO HELLO E8 IHESAPC IHESAP 2DC IHEIOPA IHEIOP 2E0 IHEIOPB IHEIOP 2E4 IHEIOPC IHEIOP 2E8 IHEIOPA IHEIOP 2EC IHEOCLC IHEOCL 300 IHEERRB IHEERR 304 IHEERRC IHEERR 9FC IHEM91A IHEM91 A00 IHEM91B IHEM91 A04 IHEM91C IHEM91 A08 IHEABND IHEABN A2C IHETERA IHETER C2C IHEIOFA IHEIOF C30 IHEERRB IHEERR C34 IHEERRC IHEERR 11A8 IHEIOFA IHEIOF 11B0 IHEERRB IHEERR 11B4 IHEERRC IHEERR 1338 IHEERRC IHEERR 172C IHEERRB IHEERR 1730 IHEERRC IHEERR 1B44 IHEERRC IHEERR 1B48 IHEIOFA IHEIOF 1B4C IHEVSBA IHEVSB 1B50 IHEVSCA IHEVSC 1B54 IHEDNCA IHEDNC 1DEC IHEDMAA IHEDMA 1DF0 IHEUPAB IHEUPA 1DF4 IHEVSCA IHEVSC 1DF8 IHEVSEB IHEVSE 1DFC IHEVQCA IHEVQC 1FFC IHEVFBA IHEVFB 2000 IHEVFCA IHEVFC 2008 IHEVFAA IHEVFA 200C IHEVPAA IHEVPA 2010 IHEVKGA IHEVKG 2014 IHEVPDA IHEVPD 2018 IHEVKFA IHEVKF 201C IHEVPBA IHEVPB 2020 IHEVPCA IHEVPC 204C IHEVFDA IHEVFD 2050 IHEVFEA IHEVFE 2058 IHEVPHA IHEVPH 205C IHEVPGA IHEVPG 2060 IHEVKCA IHEVKC 2064 IHEVPFA IHEVPF 2068 IHEVKBA IHEVKB 206C IHEVPEA IHEVPE 22C0 IHEVSEB IHEVSE 2344 IHEERRC IHEERR 2360 IHEERRB IHEERR 23B4 IHEVSCA IHEVSC 2528 IHEERRB IHEERR 252C IHEERRC IHEERR 261C IHEERRC IHEERR 2870 IHEERRB IHEERR 358C IHEERRB IHEERR 3A64 IHEERRB IHEERR 3C54 IHEERRB IHEERR 3DD8 IHEERRC IHEERR 3DE8 IHEERRB IHEERR 3FD8 IHEERRC IHEERR 3FDC IHEERRB IHEERR 40E8 IHEERRB IHEERR 4358 IHEERRB IHEERR 45DC IHEERRB IHEERR 46A0 IHEERRB IHEERR 50C4 IHEMAIN IHEMAIN 50E4 IHEOCLD IHEOCL 50E8 IHESIZE IHESIZ 50EC IHEBEGA IHEBEG 5170 IHEITAX IHEIOF 5174 IHEERRB IHEERR 5178 IHEERRC IHEERR 517C IHETABS IHETAB 5180 IHEITAZ IHEIOF 4915 IHEERRA IHEERR 51B4 IHEPRTA IHEPRT 51B8 IHEPRTB IHEPRT 51BC IHEDDOD IHEDDO 51C0 IHEOCLC IHEOCL 54B0 IHEIOFA IHEIOF 54B4 IHELDOC IHELDO 54B8 IHEPRTB IHEPRT 54BC IHEDDPA IHEDDP 54C0 IHEDDPB IHEDDP 54C4 IHEDDPC IHEDDP 54C8 IHEDDPD IHEDDP 57A4 IHEOCLA IHEOCL
LOCATION REFERS TO SYMBOL IN CONTROL SECTION LOCATION REFERS TO SYMBOL IN CONTROL SECTION 57A8 IHEIOFA IHEIOF 57AC IHESPRT IHESPRT LOCATION 1334 REQUESTS CUMULATIVE PSEUDO REGISTER LENGTH PSEUDO REGISTERS NAME ORIGIN LENGTH NAME ORIGIN LENGTH NAME ORIGIN LENGTH NAME ORIGIN LENGTH IHEQINV 00 4 IHEQERR 4 4 IHEQTIC 8 4 **HELLOB C 4 IHEQSPR 10 4 IHEQLSA 14 4 IHEQLW0 18 4 IHEQLW1 1C 4 IHEQLW2 20 4 IHEQLW3 24 4 IHEQLW4 28 4 IHEQLWE 2C 4 IHEQLCA 30 4 IHEQVDA 34 4 IHEQFVD 38 4 IHEQFOP 3C 4 IHEQCFL 40 8 IHEQADC 48 4 IHEQLPR 4C 4 IHEQXLV 50 8 IHEQEVT 58 8 IHEQSLA 60 4 IHEQSAR 64 4 IHEQLWF 68 4 IHEQRTC 6C 4 IHEQSFC 70 4 TOTAL LENGTH OF PSEUDO REGISTERS 74 ENTRY ADDRESS E0 TOTAL LENGTH 5A88 ****GO DOES NOT EXIST BUT HAS BEEN ADDED TO DATA SET AUTHORIZATION CODE IS 0.
HELLO WORLD