Published 2024-04-11.
Time to read: 1 minutes.
mainframe
collection.
ASMDASM
is IBM’s very capable disassembler, part of the HLASM Toolkit.
Only one module can be disassembled at a time. If a CSECT (which must by definition reside within a module) is specified, only that CSECT is disassembled; otherwise, only the first CSECT is disassembled.
JCL
Here is JCL for disassembling MIKES01.CICSADP.LOADLIB
.
This load library was provided by the book entitled
Designing & Programming with CICS Applications,
discussed in Receiving files on an IBM mainframe.
Note that ASMDASM
is invoked many times, once for each load module:
//MIKES01X JOB (54321),'Mike Slinn',NOTIFY=&SYSUID,REGION=0M, // CLASS=A,MSGLEVEL=(1,1),MSGCLASS=H //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * NACTSET //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * NACT01 NACT01 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * NACT02 NACT02 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * NACT03 NACT03 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * NACT04 NACT04 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DUMMY //SYSIN DD * NACT05 NACT05 //*
The following output was generated by a similar job, but the job did not specify the CSECTs to disassemble, so the first CSECT in each module was disassembled instead:
1 J E S 2 J O B L O G -- S Y S T E M M V S 1 -- N O D E N 1 0 15.30.01 JOB02170 ---- THURSDAY, 11 APR 2024 ---- 15.30.01 JOB02170 IRR010I USERID MIKES01 IS ASSIGNED TO THIS JOB. 15.30.01 JOB02170 ICH70001I MIKES01 LAST ACCESS AT 15:30:00 ON THURSDAY, APRIL 11, 2024 15.30.01 JOB02170 $HASP373 MIKES01X STARTED - INIT 1 - CLASS A - SYS MVS1 15.30.01 JOB02170 IEF403I MIKES01X - STARTED - TIME=15.30.01 15.30.01 JOB02170 - ----TIMINGS (MINUTES)----- -----PAGING COUNTS---- 15.30.01 JOB02170 -STEPNAME PROCSTEP RC EXCP CONN TCB SRB CLOCK SERV WORKLOAD PAGE SWAP VIO SWAPS 15.30.01 JOB02170 -DISASM 00 94 14 0. 000581 0.000035 0.0 233 PRDBAT 0 0 0 0 15.30.01 JOB02170 -DISASM 00 59 9 0.000356 0.000021 0.0 143 PRDBAT 0 0 0 0 15.30.01 JOB02170 -DISASM 00 60 9 0.000353 0.000019 0.0 141 PRDBAT 0 0 0 0 15.30.02 JOB02170 -DISASM 00 60 10 0.000348 0.000021 0.0 140 PRDBAT 0 0 0 0 15.30.02 JOB02170 -DISASM 00 58 9 0.000334 0.000019 0.0 134 PRDBAT 0 0 0 0 15.30.02 JOB02170 -DISASM 00 59 10 0.000342 0.000021 0.0 138 PRDBAT 0 0 0 0 15.30.02 JOB02170 IEF404I MIKES01X - ENDED - TIME=15.30.02 15.30.02 JOB02170 -MIKES01X ENDED. NAME-Mike Slinn TOTAL TCB CPU TIME= 0.002316 TOTAL ELAPSED TIME= 0.0 SUBSYS=JES2 15.30.02 JOB02170 $HASP395 MIKES01X ENDED - RC=0000 0------ JES2 JOB STATISTICS ------ - 11 APR 2024 JOB EXECUTION DATE - 51 CARDS READ - 1,924 SYSOUT PRINT RECORDS - 0 SYSOUT PUNCH RECORDS - 186 SYSOUT SPOOL KBYTES - 0.00 MINUTES EXECUTION TIME !! END OF JES SPOOL FILE !! 1 //MIKES01X JOB (54321),'Mike Slinn',NOTIFY=&SYSUID,REGION=0M, JOB02170 // CLASS=A,MSGLEVEL=(1,1),MSGCLASS=H IEFC653I SUBSTITUTION JCL - (54321),'Mike Slinn',NOTIFY=MIKES01,REGION=0M,CLASS=A,MSGLEVEL=(1,1),MSGCLASS=H 2 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' 3 //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 4 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB 5 //SYSPRINT DD SYSOUT=* 6 //SYSPUNCH DD DUMMY 7 //SYSIN DD * 8 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' 9 //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 10 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB 11 //SYSPRINT DD SYSOUT=* 12 //SYSPUNCH DD DUMMY 13 //SYSIN DD * 14 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' 15 //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 16 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB 17 //SYSPRINT DD SYSOUT=* 18 //SYSPUNCH DD DUMMY 19 //SYSIN DD * 20 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' 21 //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 22 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB 23 //SYSPRINT DD SYSOUT=* 24 //SYSPUNCH DD DUMMY 25 //SYSIN DD * 26 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' 27 //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 28 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB 29 //SYSPRINT DD SYSOUT=* 30 //SYSPUNCH DD DUMMY 31 //SYSIN DD * 32 //DISASM EXEC PGM=ASMDASM, // PARM='COPYRIGHTOK' 33 //STEPLIB DD DISP=SHR,DSN=ASM.SASMMOD2 34 //SYSLIB DD DISP=SHR,DSN=MIKES01.CICSADP.LOADLIB 35 //SYSPRINT DD SYSOUT=* 36 //SYSPUNCH DD DUMMY 37 //SYSIN DD * //* !! END OF JES SPOOL FILE !! ICH70001I MIKES01 LAST ACCESS AT 15:30:00 ON THURSDAY, APRIL 11, 2024 IEFA111I MIKES01X IS USING THE FOLLOWING JOB RELATED SETTINGS: SWA=BELOW,TIOT SIZE=32K,DSENQSHR=DISALLOW,GDGBIAS=JOB IEF236I ALLOC. FOR MIKES01X DISASM IEF237I 30C0 ALLOCATED TO STEPLIB IEF237I 306C ALLOCATED TO SYSLIB IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I DMY ALLOCATED TO SYSPUNCH IEF237I JES2 ALLOCATED TO SYSIN IEF142I MIKES01X DISASM - STEP WAS EXECUTED - COND CODE 0000 IEF285I ASM.SASMMOD2 KEPT IEF285I VOL SER NOS= RES240. IEF285I MIKES01.CICSADP.LOADLIB KEPT IEF285I VOL SER NOS= USER10. IEF285I MIKES01.MIKES01X.JOB02170.D0000107.? SYSOUT IEF285I MIKES01.MIKES01X.JOB02170.D0000101.? SYSIN IEF373I STEP/DISASM /START 2024102.1530 IEF032I STEP/DISASM /STOP 2024102.1530 CPU: 0 HR 00 MIN 00.03 SEC SRB: 0 HR 00 MIN 00.00 SEC VIRT: 216K SYS: 280K EXT: 1380K SYS: 12264K ATB- REAL: 1068K SLOTS: 0K VIRT- ALLOC: 15M SHRD: 0M IEF236I ALLOC. FOR MIKES01X DISASM IEF237I 30C0 ALLOCATED TO STEPLIB IEF237I 306C ALLOCATED TO SYSLIB IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I DMY ALLOCATED TO SYSPUNCH IEF237I JES2 ALLOCATED TO SYSIN IEF142I MIKES01X DISASM - STEP WAS EXECUTED - COND CODE 0000 IEF285I ASM.SASMMOD2 KEPT IEF285I VOL SER NOS= RES240. IEF285I MIKES01.CICSADP.LOADLIB KEPT IEF285I VOL SER NOS= USER10. IEF285I MIKES01.MIKES01X.JOB02170.D0000108.? SYSOUT IEF285I MIKES01.MIKES01X.JOB02170.D0000102.? SYSIN IEF373I STEP/DISASM /START 2024102.1530 IEF032I STEP/DISASM /STOP 2024102.1530 CPU: 0 HR 00 MIN 00.02 SEC SRB: 0 HR 00 MIN 00.00 SEC VIRT: 216K SYS: 280K EXT: 1380K SYS: 12264K ATB- REAL: 1068K SLOTS: 0K VIRT- ALLOC: 15M SHRD: 0M IEF236I ALLOC. FOR MIKES01X DISASM IEF237I 30C0 ALLOCATED TO STEPLIB IEF237I 306C ALLOCATED TO SYSLIB IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I DMY ALLOCATED TO SYSPUNCH IEF237I JES2 ALLOCATED TO SYSIN IEF142I MIKES01X DISASM - STEP WAS EXECUTED - COND CODE 0000 IEF285I ASM.SASMMOD2 KEPT IEF285I VOL SER NOS= RES240. IEF285I MIKES01.CICSADP.LOADLIB KEPT IEF285I VOL SER NOS= USER10. IEF285I MIKES01.MIKES01X.JOB02170.D0000109.? SYSOUT IEF285I MIKES01.MIKES01X.JOB02170.D0000103.? SYSIN IEF373I STEP/DISASM /START 2024102.1530 IEF032I STEP/DISASM /STOP 2024102.1530 CPU: 0 HR 00 MIN 00.02 SEC SRB: 0 HR 00 MIN 00.00 SEC VIRT: 216K SYS: 280K EXT: 1380K SYS: 12268K ATB- REAL: 1068K SLOTS: 0K VIRT- ALLOC: 15M SHRD: 0M IEF236I ALLOC. FOR MIKES01X DISASM IEF237I 30C0 ALLOCATED TO STEPLIB IEF237I 306C ALLOCATED TO SYSLIB IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I DMY ALLOCATED TO SYSPUNCH IEF237I JES2 ALLOCATED TO SYSIN IEF142I MIKES01X DISASM - STEP WAS EXECUTED - COND CODE 0000 IEF285I ASM.SASMMOD2 KEPT IEF285I VOL SER NOS= RES240. IEF285I MIKES01.CICSADP.LOADLIB KEPT IEF285I VOL SER NOS= USER10. IEF285I MIKES01.MIKES01X.JOB02170.D0000110.? SYSOUT IEF285I MIKES01.MIKES01X.JOB02170.D0000104.? SYSIN IEF373I STEP/DISASM /START 2024102.1530 IEF032I STEP/DISASM /STOP 2024102.1530 CPU: 0 HR 00 MIN 00.02 SEC SRB: 0 HR 00 MIN 00.00 SEC VIRT: 216K SYS: 280K EXT: 1380K SYS: 12264K ATB- REAL: 1068K SLOTS: 0K VIRT- ALLOC: 15M SHRD: 0M IEF236I ALLOC. FOR MIKES01X DISASM IEF237I 30C0 ALLOCATED TO STEPLIB IEF237I 306C ALLOCATED TO SYSLIB IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I DMY ALLOCATED TO SYSPUNCH IEF237I JES2 ALLOCATED TO SYSIN IEF142I MIKES01X DISASM - STEP WAS EXECUTED - COND CODE 0000 IEF285I ASM.SASMMOD2 KEPT IEF285I VOL SER NOS= RES240. IEF285I MIKES01.CICSADP.LOADLIB KEPT IEF285I VOL SER NOS= USER10. IEF285I MIKES01.MIKES01X.JOB02170.D0000111.? SYSOUT IEF285I MIKES01.MIKES01X.JOB02170.D0000105.? SYSIN IEF373I STEP/DISASM /START 2024102.1530 IEF032I STEP/DISASM /STOP 2024102.1530 CPU: 0 HR 00 MIN 00.02 SEC SRB: 0 HR 00 MIN 00.00 SEC VIRT: 216K SYS: 280K EXT: 1380K SYS: 12264K ATB- REAL: 1068K SLOTS: 0K VIRT- ALLOC: 15M SHRD: 0M IEF236I ALLOC. FOR MIKES01X DISASM IEF237I 30C0 ALLOCATED TO STEPLIB IEF237I 306C ALLOCATED TO SYSLIB IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I DMY ALLOCATED TO SYSPUNCH IEF237I JES2 ALLOCATED TO SYSIN IEF142I MIKES01X DISASM - STEP WAS EXECUTED - COND CODE 0000 IEF285I ASM.SASMMOD2 KEPT IEF285I VOL SER NOS= RES240. IEF285I MIKES01.CICSADP.LOADLIB KEPT IEF285I VOL SER NOS= USER10. IEF285I MIKES01.MIKES01X.JOB02170.D0000112.? SYSOUT IEF285I MIKES01.MIKES01X.JOB02170.D0000106.? SYSIN IEF373I STEP/DISASM /START 2024102.1530 IEF032I STEP/DISASM /STOP 2024102.1530 CPU: 0 HR 00 MIN 00.02 SEC SRB: 0 HR 00 MIN 00.00 SEC VIRT: 216K SYS: 280K EXT: 1380K SYS: 12264K ATB- REAL: 1068K SLOTS: 0K VIRT- ALLOC: 15M SHRD: 0M IEF375I JOB/MIKES01X/START 2024102.1530 IEF033I JOB/MIKES01X/STOP 2024102.1530 CPU: 0 HR 00 MIN 00.13 SEC SRB: 0 HR 00 MIN 00.00 SEC !! END OF JES SPOOL FILE !! 1ASMD008 The user of the COPYRIGHTOK option ensures that this use will not violate any copyright restrictions or other rights pertaining to the code being disassembled DIRECTORY INFO FOR MODULE NACTSET TTR OF MODULE=000008 CONCATENATION NBR=00 ALIAS INDIC=2C TTR, 1ST TXT RECD=00000D TTR OF NOTE/SCATTER LIST=000000 NBR NOTE ENTRIES=00 ATTRIBUTES 1=03F2 EXEC TOTAL LENGTH=0012D8 LENGTH OF 1ST TXT RECD=12D8 E. P. ADDR=000000 ATTRIBUTES 2=88 AUTH CODE=00 - *** EXTERNAL SYMBOL TABLE *** 0 SYMBOL TYPE IND ADDR SEG LRID LENG ESDID ** $PRIV000010 SD 01 B_TEXT ED 000000 0012D2 $PRIV000010 LD 000000 - ***** RLD INFO ***** 0 RELPTR POSPTR TYPE LEN DIR ADDR 1$PRIV000 *** User Control Statements *** 0NACTSET 1***** Label Table ***** 0 ADDR TYPE LEN SYMBOL 1 ***** T E X T ***** 0000000 D5C1C3E3 E2C5E340 00324040 004F0000 00000000 C1C3C3E3 D4D5E440 05B50190 NACTSET .. ........ACCTMNU .... 000020 02FF05A3 C04A0155 001850FF FE100000 00000343 000C0000 00000000 00000000 ...t......&..................... 000040 00000000 00000000 00000000 00000000 00000000 00000040 40404000 00000D02 ....................... ..... 000060 F80000C1 C3C3D6E4 D5E3E240 D4C5D5E4 00000001 00F0000E 0000003C 02F000A3 8..ACCOUNTS MENU.....0.......0.t 000080 E3D640E2 C5C1D9C3 C840C2E8 40D5C1D4 C56B40C5 D5E3C5D9 40E2E4D9 D5C1D4C5 TO SEARCH BY NAME, ENTER SURNAME 0000A0 40C1D5C4 40C9C640 D9C5D8E4 C9D9C5C4 6B40C6C9 D9E2E340 D5C1D4C5 00000007 AND IF REQUIRED, FIRST NAME.... 0000C0 02F80146 E2E4D9D5 C1D4C500 00000102 F801527A 00000012 01400154 00000001 .8..SURNAME.....8..:..... ...... 0000E0 00F00167 00000019 02F0016C 4DF140E3 D640F1F8 40C1D3D7 C8C1C2C5 E3C9C340 .0.......0.%(1 TO 18 ALPHABETIC 000100 C3C8D9E2 5D000000 0D02F801 96C6C9D9 E2E340D5 C1D4C540 407A0000 000C0140 CHRS).....8.oFIRST NAME :..... 000120 01A40000 000100F0 01B10000 002202F0 01BC4DF1 40E3D640 F1F240C1 D3D7C8C1 .u.....0.......0..(1 TO 12 ALPHA 000140 C2C5E3C9 C340C3C8 D9E240D6 D7E3C9D6 D5C1D35D 0000003C 02F00233 E3D640D7 BETIC CHRS OPTIONAL).....0..TO P 000160 D9D6C3C5 E2E240C1 D540C1C3 C3D6E4D5 E36B40C5 D5E3C5D9 40D9C5D8 E4C5E2E3 ROCESS AN ACCOUNT, ENTER REQUEST 000180 40E3E8D7 C540C1D5 C440C1C3 C3D6E4D5 E340D5E4 D4C2C5D9 0000000D 02F802D6 TYPE AND ACCOUNT NUMBER.....8.O 0001A0 D9C5D8E4 C5E2E340 E3E8D7C5 7A000000 01014002 E4000000 0100F002 E6000000 REQUEST TYPE:..... .U.....0.W... 0001C0 2F02F002 EF4DC460 C4C9E2D7 D3C1E86B 40C160C1 C4C46B40 D460D4D6 C4C9C6E8 ..0..(D-DISPLAY, A-ADD, M-MODIFY 0001E0 6B40E760 C4C5D3C5 E3C56B40 D760D7D9 C9D5E35D 00000007 02F80326 C1C3C3D6 , X-DELETE, P-PRINT).....8..ACCO 000200 E4D5E300 00000102 F803327A 00000005 0D500334 00000001 00F0033A 00000010 UNT.....8..:.....&.......0...... 000220 02F0033F 4DF1F0F0 F0F040E3 D640F7F9 F9F9F95D 0000000D 02F80376 D7D9C9D5 .0..(10000 TO 79999).....8..PRIN 000240 E3C5D940 C9C44040 7A000000 04014003 84000000 0100F003 89000000 3002F003 TER ID :..... .d.....0.i.....0. 000260 8F4DF140 E3D640F4 40C3C8C1 D9C1C3E3 C5D9E240 4DD9C5D8 E4C9D9C5 C440C6D6 .(1 TO 4 CHARACTERS (REQUIRED FO 000280 D940D7D9 C9D5E340 D9C5D8E4 C5E2E35D 5D000000 4F01F804 10000000 4F01F004 R PRINT REQUEST)).....8.......0. 0002A0 60000000 4F01F004 B0000000 4F01F005 00000000 4F01F005 50000000 4F01F005 -.....0.......0.......0.&.....0. 0002C0 A0000000 4F01F005 F0000000 4101F006 40000000 3C01F806 90000000 0100F006 ......0.0.....0. .....8.......0. 0002E0 CD000000 0E02F007 30C5D5E3 C5D940C4 C1E3C140 C1D5C400 00002902 F8073FD7 ......0..ENTER DATA AND.....8..P 000300 D9C5E2E2 40C5D5E3 C5D940C6 D6D940E2 C5C1D9C3 C840D6D9 40C1C3C3 D6E4D5E3 RESS ENTER FOR SEARCH OR ACCOUNT 000320 40D9C5D8 E4C5E2E3 00000002 02F00769 D6D90000 001302F8 076CD7D9 C5E2E240 REQUEST.....0..OR.....8.%PRESS 000340 C3D3C5C1 D940E3D6 40C5E7C9 E3FFFF02 72C1C4E2 C4000100 0E030400 00404040 CLEAR TO EXIT....ADSD........ 000360 40404040 40404040 40D34000 FF00FE00 1800504A 00E2D5C1 D4C5D440 40404040 L .......&..SNAMEM 000380 40404040 40404040 40404040 40404040 40404040 40000600 00000C00 12D340C6 ........L F 0003A0 D5C1D4C5 D4404040 40404040 40404040 40404040 40404040 40404040 40404000 NAMEM . 0003C0 06000000 21000CD3 40D9C5D8 D4404040 40404040 40404040 40404040 40404040 .......L REQM 0003E0 40404040 40404040 40000400 00003000 01D340C1 C3C3E3D4 40404040 40404040 ........L ACCTM 000400 40404040 40404040 40404040 40404040 40404000 05000000 340005D9 F0D7D9E3 ........R0PRT 000420 D9D44040 40404040 40404040 40404040 40404040 40404040 40404040 40000500 RM ... 000440 00003C00 04D340E2 E4D4E3E3 D3D44040 40404040 40404040 40404040 40404040 .....L SUMTTLM 000460 40404040 40404000 07000000 43004FD3 40E2E4D4 D3D5D440 40404040 40404040 ........L SUMLNM 000480 40404040 40404040 40404040 40404040 40000600 01009500 4FD340E2 E4D4D3D5 .....n..L SUMLN 0004A0 D4404040 40404040 40404040 40404040 40404040 40404040 40404000 06000200 M ..... 0004C0 E7004FD3 40E2E4D4 D3D5D440 40404040 40404040 40404040 40404040 40404040 X..L SUMLNM 0004E0 40404040 40000600 03013900 4FD340E2 E4D4D3D5 D4404040 40404040 40404040 ........L SUMLNM 000500 40404040 40404040 40404040 40404000 06000401 8B004FD3 40E2E4D4 D3D5D440 ........L SUMLNM 000520 40404040 40404040 40404040 40404040 40404040 40404040 40000600 0501DD00 ....... 000540 4FD340E2 E4D4D3D5 D4404040 40404040 40404040 40404040 40404040 40404040 .L SUMLNM 000560 40404000 06000602 2F004FD3 40D4E2C7 C9D5E5D4 40404040 40404040 40404040 ........L MSGINVM 000580 40404040 40404040 40404040 40000700 00028100 41D340D4 E2C7D440 40404040 .....a..L MSGM 0005A0 40404040 40404040 40404040 40404040 40404040 40404000 04000002 C5003CD3 .....E..L 0005C0 40004F00 00000000 00C1C3C3 E3C4E3D3 400AA603 7A020E06 13C04A00 B0001850 ........ACCTDTL .w.:..........& 0005E0 FFFE1000 00000005 40000C00 00000000 00000000 00000000 00000000 00000000 ........ ....................... 000600 00000000 00000000 00000000 40404040 00000008 02F80000 C1C3C3D6 E4D5E3E2 ............ .....8..ACCOUNTS 000620 0000000A 03F00012 C4C5E3C1 C9D3E240 D6C60000 000E02F0 001DC1C3 C3D6E4D5 .....0..DETAILS OF.....0..ACCOUN 000640 E340D5E4 D4C2C5D9 00000005 01F8002C 00000001 00F00032 00000007 02F800A0 T NUMBER.....8.......0.......8.. 000660 E2E4D9D5 C1D4C500 00000102 F800AD7A 00000012 014000AF 00000009 02F000C2 SURNAME.....8..:..... .......0.B 000680 4DF1F840 C3C8D9E2 5D000000 0502F800 CCE3C9E3 D3C50000 000102F8 00D77A00 (18 CHRS).....8..TITLE.....8.P:. 0006A0 00000401 4000D900 00001102 F000DE4D F440C3C8 D9E240D6 D7E3C9D6 D5C1D35D .... .R.....0..(4 CHRS OPTIONAL) 0006C0 0000000A 02F800F0 C6C9D9E2 E340D5C1 D4C50000 000102F8 00FD7A00 00000C01 .....8.0FIRST NAME.....8..:..... 0006E0 4000FF00 00000100 F0010C00 00000902 F001124D F1F240C3 C8D9E25D 0000000C .......0.......0..(12 CHRS).... 000700 02F8011C D4C9C4C4 D3C540C9 D5C9E37A 00000001 01400129 00000001 00F0012B .8..MIDDLE INIT:..... .......0.. 000720 00000011 02F0012E 4DF140C3 C8D94040 D6D7E3C9 D6D5C1D3 5D000000 0902F801 .....0..(1 CHR OPTIONAL).....8. 1000740 40E3C5D3 C5D7C8D6 D5C50000 000102F8 014D7A00 00000A0D 50014F00 00000100 TELEPHONE.....8.(:.....&....... 000760 F0015A00 00000902 F001624D F1F040C4 C9C7E25D 0000000E 02F80190 C1C4C4D9 0.!.....0..(10 DIGS).....8..ADDR 000780 C5E2E240 D3C9D5C5 F17A0000 00180140 019F0000 000902F0 01B84DF2 F440C3C8 ESS LINE1:..... .......0..(24 CH 0007A0 D9E25D00 00000602 F801E8D3 C9D5C5F2 7A000000 18014001 EF000000 0902F002 RS).....8.YLINE2:..... .......0. 0007C0 084DF2F4 40C3C8D9 E25D0000 000602F8 0238D3C9 D5C5F37A 00000018 0140023F .(24 CHRS).....8..LINE3:..... .. 0007E0 00000012 02F00258 4DF2F440 C3C8D9E2 40D6D7E3 C9D6D5C1 D35D0000 000E02F8 .....0..(24 CHRS OPTIONAL).....8 000800 02D0C3C1 D9C4E240 C9E2E2E4 C5C4407A 00000001 0D5002DF 00000001 00F002E1 ..CARDS ISSUED :.....&.......0.. 000820 00000008 02F002E9 4DF140E3 D640F95D 0000000C 02F802FC C3C1D9C4 40C3D6C4 .....0.Z(1 TO 9).....8..CARD COD 000840 C540407A 00000001 01400309 00000001 00F0030B 00000007 02F0030E 4DF140C3 E :..... .......0.......0..(1 C 000860 C8D95D00 00000E02 F80320C4 C1E3C540 C9E2E2E4 C5C44040 7A000000 020D5003 HR).....8..DATE ISSUED :.....&. 000880 2F000000 020D5003 32000000 020D5003 35000000 0B02F003 38404DD4 D440C4C4 ......&.......&.......0.. (MM DD 0008A0 40E8E85D 0000000C 02F8034C D9C5C1E2 D6D540C3 D6C4C57A 00000001 01400359 YY).....8.<REASON CODE:..... .. 0008C0 00000001 00F0035B 00000009 02F0035E 4DD56BD3 6BE26BD9 5D000000 0E02F803 .....0.$.....0.;(N,L,S,R).....8. 0008E0 70C1D7D7 D9D6E5C5 C440C2E8 40407A00 00000301 40037F00 00000100 F0038300 .APPROVED BY :..... .".....0.c. 000900 00000802 F003894D F340C3C8 D9E25D00 00003402 F00410E4 D7E3D640 F440D6E3 ....0.i(3 CHRS).....0..UPTO 4 OT 000920 C8C5D9E2 40E6C8D6 40D4C1E8 40C3C8C1 D9C7C540 4DC5C1C3 C840F3F2 40C3C8D9 HERS WHO MAY CHARGE (EACH 32 CHR 000940 E240D6D7 E3C9D6D5 C1D35D00 00000302 F80464D6 F17A0000 00200140 04680000 S OPTIONAL).....8..O1:..... .... 000960 000302F8 0489D6F2 7A000000 20014004 8D000000 0100F004 AE000000 0302F804 ...8.iO2:..... .......0.......8. 000980 B4D6F37A 00000020 014004B8 00000003 02F804D9 D6F47A00 00002001 4004DD00 .O3:..... .......8.RO4:..... ... 0009A0 00000100 F004FE00 00000E02 F80500E2 D7C5C3C9 C1D340C3 D6C4C5F1 7A000000 ....0.......8..SPECIAL CODE1:... 0009C0 01014005 0F000000 0602F805 11C3D6C4 C5F27A00 00000101 40051800 00000602 .. .......8..CODE2:..... ....... 0009E0 F8051AC3 D6C4C5F3 7A000000 01014005 21000000 1502F005 234DC5C1 C3C840F1 8..CODE3:..... .......0..(EACH 1 000A00 40C3C8D9 40D6D7E3 C9D6D5C1 D35D0000 002103F0 0550D5D6 40C8C9E2 E3D6D9E8 CHR OPTIONAL).....0.&NO HISTORY 000A20 40C1E5C1 C9D3C1C2 D3C540C1 E340E3C8 C9E240E3 C9D4C500 00000100 F0057200 AVAILABLE AT THIS TIME.....0... 000A40 00000C03 F00578C3 C8C1D9C7 C540D3C9 D4C9E300 00000801 F0058500 00000100 ....0..CHARGE LIMIT.....0.e..... 000A60 F0058E00 00000603 F00594E2 E3C1E3E4 E2000000 0201F005 9B000000 0100F005 0.......0.mSTATUS.....0.......0. 000A80 9E000000 1A01F805 F0000000 0101F006 0B000000 0100F006 0D000000 4E02F006 ......8.0.....0.......0.....+.0. 000AA0 90D5D6E3 C57A6040 C4C5E3C1 C9D3E240 C9D540C2 D9C1C3D2 C5E3E240 E2C8D6E6 .NOTE:- DETAILS IN BRACKETS SHOW 000AC0 40D4C1E7 C9D4E4D4 40D5D64B 40C3C8C1 D9C1C3E3 C5D9E240 C1D3D3D6 E6C5C440 MAXIMUM NO. CHARACTERS ALLOWED 000AE0 C1D5C440 C9C640D6 D7E3C9D6 D5C1D300 00003C01 F8073000 00000100 F0076DFF AND IF OPTIONAL.....8.......0._. 000B00 FF0566C1 C4E2C400 02002002 13000040 40404040 40404040 404040D3 4000FF00 ...ADSD........ L ... 000B20 FE001800 504A00E3 C9E3D3C5 C4404040 40404040 40404040 40404040 40404040 ....&..TITLED 000B40 40404040 40404000 06000000 0C000AD3 40C1C3C3 E3C44040 40404040 40404040 ........L ACCTD 000B60 40404040 40404040 40404040 40404040 40000500 00001900 05D340E2 D5C1D4C5 ........L SNAME 000B80 C4404040 40404040 40404040 40404040 40404040 40404040 40404000 06000000 D ..... 000BA0 210012D3 40E3E3D3 C4404040 40404040 40404040 40404040 40404040 40404040 ...L TTLD 000BC0 40404040 40000400 00003600 04D340C6 D5C1D4C5 C4404040 40404040 40404040 ........L FNAMED 000BE0 40404040 40404040 40404040 40404000 06000000 3D000CD3 40D4C9C4 40404040 ........L MID 000C00 40404040 40404040 40404040 40404040 40404040 40404040 40000300 00004C00 .....<. 000C20 01D340E3 C5D3C440 40404040 40404040 40404040 40404040 40404040 40404040 .L TELD 000C40 40404000 04000000 50000AD9 F0C1C4C4 D9F1C440 40404040 40404040 40404040 .....&..R0ADDR1D 000C60 40404040 40404040 40404040 40000600 00005D00 18D340C1 C4C4D9F2 C4404040 .....)..L ADDR2D 000C80 40404040 40404040 40404040 40404040 40404040 40404000 06000000 780018D3 ........L 000CA0 40C1C4C4 D9F3C440 40404040 40404040 40404040 40404040 40404040 40404040 ADDR3D 000CC0 40000600 00009300 18D340C3 C1D9C4E2 C4404040 40404040 40404040 40404040 .....l..L CARDSD 000CE0 40404040 40404040 40404000 06000000 AE0001D9 F0C3C3D6 C4C5C440 40404040 ........R0CCODED 000D00 40404040 40404040 40404040 40404040 40404040 40000600 0000B200 01D340C9 ........L I 000D20 D4D6C440 40404040 40404040 40404040 40404040 40404040 40404040 40404000 MOD . 000D40 04000000 B60002D9 F0C9C4C1 E8C44040 40404040 40404040 40404040 40404040 .......R0IDAYD 000D60 40404040 40404040 40000500 0000BB00 02D9F0C9 E8D9C440 40404040 40404040 ........R0IYRD 000D80 40404040 40404040 40404040 40404040 40404000 04000000 C00002D9 F0D9E2D5 ........R0RSN 000DA0 C4404040 40404040 40404040 40404040 40404040 40404040 40404040 40000400 D ... 000DC0 0000C500 01D340C1 D7D7D9C4 40404040 40404040 40404040 40404040 40404040 ..E..L APPRD 000DE0 40404040 40404000 05000000 C90003D3 40C1E4E3 C8F1C440 40404040 40404040 .....I..L AUTH1D 000E00 40404040 40404040 40404040 40404040 40000600 0000CF00 20D340C1 E4E3C8F2 ........L AUTH2 000E20 C4404040 40404040 40404040 40404040 40404040 40404040 40404000 06000000 D ..... 000E40 F20020D3 40C1E4E3 C8F3C440 40404040 40404040 40404040 40404040 40404040 2..L AUTH3D 000E60 40404040 40000600 00011500 20D340C1 E4E3C8F4 C4404040 40404040 40404040 ........L AUTH4D 000E80 40404040 40404040 40404040 40404000 06000001 380020D3 40E2C3D6 C4C5F1C4 ........L SCODE1D 000EA0 40404040 40404040 40404040 40404040 40404040 40404040 40000700 00015B00 .....$. 1000EC0 01D340E2 C3D6C4C5 F2C44040 40404040 40404040 40404040 40404040 40404040 .L SCODE2D 000EE0 40404000 07000001 5F0001D3 40E2C3D6 C4C5F3C4 40404040 40404040 40404040 .....^..L SCODE3D 000F00 40404040 40404040 40404040 40000700 00016300 01D340C8 C9E2E3E3 D3C44040 ........L HISTTLD 000F20 40404040 40404040 40404040 40404040 40404040 40404000 07000001 670021D3 ........L 000F40 40D3C9D4 E3E3D3C4 40404040 40404040 40404040 40404040 40404040 40404040 LIMTTLD 000F60 40000700 00018B00 0CD340D3 C9D4C9E3 C4404040 40404040 40404040 40404040 ........L LIMITD 000F80 40404040 40404040 40404000 06000001 9A0008D3 40E2E3C1 E3E3D3C4 40404040 ........L STATTLD 000FA0 40404040 40404040 40404040 40404040 40404040 40000700 0001A500 06D340E2 .....v..L S 000FC0 E3C1E3C4 40404040 40404040 40404040 40404040 40404040 40404040 40404000 TATD . 000FE0 05000001 AE0002D3 40E5C6E8 E3D3C440 40404040 40404040 40404040 40404040 .......L VFYTLD 001000 40404040 40404040 40000600 0001B300 1AD340E5 C6E8C440 40404040 40404040 ........L VFYD 001020 40404040 40404040 40404040 40404040 40404000 04000001 D00001D3 40D4E2C7 ........L MSG 001040 C4404040 40404040 40404040 40404040 40404040 40404040 40404040 40000400 D ... 001060 0001D400 3CD34000 4F000000 000000C1 C3C3E3C5 D9D94002 67006E01 150216C0 ..M..L ........ACCTERR ...>..... 001080 4A000000 1850FFFE 10000000 00016F00 0C000000 00000000 00000000 00000000 .....&........?................. 0010A0 00000000 00000000 00000000 00000000 00004040 40400000 001A02F0 00F0C1C3 .................. .....0.0AC 0010C0 C3D6E4D5 E340C6C9 D3C57A40 C5D9D9D6 D940D9C5 D7D6D9E3 00000008 02F00190 COUNT FILE: ERROR REPORT.....0.. 0010E0 C5D9D9D6 D940C1E3 0000000A 01F80199 00000008 01F801A4 0000004F 01F80230 ERROR AT.....8.r.....8.u.....8.. 001100 0000004F 01F80280 0000004F 01F802D0 0000003C 02F00370 D7D3C5C1 E2C540C1 .....8.......8.......0..PLEASE A 001120 E2D240E8 D6E4D940 E2E4D7C5 D9E5C9E2 D6D940E3 D640C3D6 D5E5C5E8 40E3C8C9 SK YOUR SUPERVISOR TO CONVEY THI 001140 E240C9D5 C6D6D9D4 C1E3C9D6 D540E3D6 40E3C8C5 00000011 02F003C0 D6D7C5D9 S INFORMATION TO THE.....0..OPER 001160 C1E3C9D6 D5E240E2 E3C1C6C6 4B000000 4002F004 60E3C8C5 D540D7D9 C5E2E240 ATIONS STAFF.... .0.-THEN PRESS 001180 7FC3D3C5 C1D97F4B 4040E3C8 C9E240E3 C5D9D4C9 D5C1D340 C9E240D5 D640D3D6 "CLEAR". THIS TERMINAL IS NO LO 0011A0 D5C7C5D9 40E4D5C4 C5D940C3 D6D5E3D9 D6D340D6 C6000000 1702F004 B0E3C8C5 NGER UNDER CONTROL OF.....0..THE 0011C0 407FD5C1 C3E37F40 C1D7D7D3 C9C3C1E3 C9D6D54B FFFF00F8 C1C4E2C4 00030005 "NACT" APPLICATION....8ADSD.... 0011E0 011A0000 40404040 40404040 40404040 D34000FF 00FE0018 00504A00 C4C1E3C5 .... L .......&..DATE 001200 C5404040 40404040 40404040 40404040 40404040 40404040 40404040 00050000 E .... 001220 000C000A D340E3C9 D4C5C540 40404040 40404040 40404040 40404040 40404040 ....L TIMEE 001240 40404040 40400005 00000019 0008D340 D4E2C7C5 40404040 40404040 40404040 ........L MSGE 001260 40404040 40404040 40404040 40404040 00040001 0024004F D340D4E2 C7C54040 ........L MSGE 001280 40404040 40404040 40404040 40404040 40404040 40404040 40400004 00020076 ...... 0012A0 004FD340 D4E2C7C5 40404040 40404040 40404040 40404040 40404040 40404040 ..L MSGE 0012C0 40404040 00040003 00C8004F D340FFFF FFFF0000 00000000 00000000 00000000 .....H..L .................. 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0 $PRIV000 TITLE 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 00000010 * Produced by ASMDASM on 2024.102 at 15:30:01 00000020 $PRIV000010 CSECT 00000030 00000000 D5C1 C3E3 E2C5 E340 DC CL8'NACTSET ' 00000040 00000008 0032 DC H'0050' 00000050 0000000A 4040 004F STH R4,79 PSA reference 00000060 0000000E 0000 DC H'0' 00000070 00000010 0000 0000 DC F'0' 00000080 00000014 C1C3 C3E3 D4D5 E440 DC CL8'ACCTMNU ' 00000090 0000001C 05B5 BALR R11,R5 Nonstd linkage 00000100 0000001E 0190 DC H'0400' 00000110 00000020 02FF DC H'0767' 00000120 00000022 05A3 BALR R10,R3 Nonstd linkage 00000130 00000024 C04A 0155 0018 NIHF R4,X'01550018' 00000140 0000002A 50FF FE10 ST R15,3600(R15,R15) 00000150 0000002E 0000 DC H'0' 00000160 00000030 0000 0343 DC F'00835' 00000170 00000034 000C 0000 DC XL4'000C0000' 00000180 00000038 0000 0000 DC F'0' 00000190 0000003C 0000 0000 DC F'0' 00000200 00000040 0000 0000 DC F'0' 00000210 00000044 0000 0000 DC F'0' 00000220 00000048 0000 0000 DC F'0' 00000230 0000004C 0000 0000 DC F'0' 00000240 00000050 0000 0000 DC F'0' 00000250 00000054 0000 00 DC XL3'000000' 00000260 00000057 4040 4040 DC CL4' ' 00000270 0000005B 00 DC XL1'00' 00000280 0000005C 0000 DC H'0' 00000290 0000005E 0D02 BASR R0,R2 Nonstd linkage 00000300 00000060 F800 00C1 C3C3 ZAP 193(1),963(1,R12) PSA reference 00000310 00000066 D6E4 D5E3 E240 D4C5 DC CL10'OUNTS MENU' 00000320 D5E4 00000070 0000 0001 DC F'00001' 00000330 00000074 00 DC XL1'00' 00000340 00000075 F0 DC CL1'0' 00000350 00000076 000E DC H'0014' 00000360 00000078 0000 003C DC F'00060' 00000370 0000007C 02 DC XL1'02' 00000380 0000007D F0 DC CL1'0' 00000390 0000007E 00 DC XL1'00' 00000400 0000007F A3E3 D640 E2C5 C1D9 DC CL32'tTO SEARCH BY NAME, ENTER SURNAM' 00000410 C3C8 40C2 E840 D5C1 D4C5 6B40 C5D5 E3C5 D940 E2E4 D9D5 C1D4 0000009F C540 C1D5 C440 C9C6 DC CL29'E AND IF REQUIRED, FIRST NAME' 00000420 40D9 C5D8 E4C9 D9C5 C46B 40C6 C9D9 E2E3 40D5 C1D4 C5 000000BC 0000 0007 DC F'00007' 00000430 000000C0 02 DC XL1'02' 00000440 000000C1 F8 DC CL1'8' 00000450 000000C2 0146 DC H'0326' 00000460 000000C4 E2E4 D9D5 C1D4 C5 DC CL7'SURNAME' 00000470 000000CB 00 DC XL1'00' 00000480 000000CC 0000 DC H'0' 00000490 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0000000CE 0102 UPT 00000500 000000D0 F801 527A 0000 ZAP 634(1,R5),0(2) PSA reference 00000510 000000D6 0012 DC H'0018' 00000520 000000D8 01 DC XL1'01' 00000530 000000D9 40 DC CL1' ' 00000540 000000DA 0154 DC H'0340' 00000550 000000DC 0000 0001 DC F'00001' 00000560 000000E0 00 DC XL1'00' 00000570 000000E1 F0 DC CL1'0' 00000580 000000E2 0167 DC H'0359' 00000590 000000E4 0000 0019 DC F'00025' 00000600 000000E8 02 DC XL1'02' 00000610 000000E9 F0 DC CL1'0' 00000620 000000EA 01 DC XL1'01' 00000630 000000EB 6C4D F140 E3D6 40F1 DC CL26'%(1 TO 18 ALPHABETIC CHRS)' 00000640 F840 C1D3 D7C8 C1C2 C5E3 C9C3 40C3 C8D9 E25D 00000105 00 DC XL1'00' 00000650 00000106 0000 DC H'0' 00000660 00000108 0D02 BASR R0,R2 Nonstd linkage 00000670 0000010A F801 96C6 C9D9 ZAP 1734(1,R9),2521(2,R12) 00000680 00000110 E2E3 40D5 C1D4 C540 DC CL10'ST NAME :' 00000690 407A 0000011A 0000 DC H'0' 00000700 0000011C 000C 01 DC XL3'000C01' 00000710 0000011F 40 DC CL1' ' 00000720 00000120 01 DC XL1'01' 00000730 00000121 A4 DC CL1'u' 00000740 00000122 0000 DC H'0' 00000750 00000124 0001 00 DC XL3'000100' 00000760 00000127 F0 DC CL1'0' 00000770 00000128 01B1 0000 DC XL4'01B10000' 00000780 0000012C 0022 02 DC XL3'002202' 00000790 0000012F F0 DC CL1'0' 00000800 00000130 01BC DC H'0444' 00000810 00000132 4DF1 40E3 D640 F1F2 DC CL32'(1 TO 12 ALPHABETIC CHRS OPTIONA' 00000820 40C1 D3D7 C8C1 C2C5 E3C9 C340 C3C8 D9E2 40D6 D7E3 C9D6 D5C1 00000152 D35D 0000 003C MVZ 0(94),60 PSA reference 00000830 00000158 02 DC XL1'02' 00000840 00000159 F0 DC CL1'0' 00000850 0000015A 0233 DC H'0563' 00000860 0000015C E3D6 40D7 D9D6 C3C5 DC CL32'TO PROCESS AN ACCOUNT, ENTER REQ' 00000870 E2E2 40C1 D540 C1C3 C3D6 E4D5 E36B 40C5 D5E3 C5D9 40D9 C5D8 0000017C E4C5 E2E3 40E3 E8D7 DC CL28'UEST TYPE AND ACCOUNT NUMBER' 00000880 C540 C1D5 C440 C1C3 C3D6 E4D5 E340 D5E4 D4C2 C5D9 00000198 0000 000D DC F'00013' 00000890 0000019C 02 DC XL1'02' 00000900 0000019D F8 DC CL1'8' 00000910 0000019E 02 DC XL1'02' 00000920 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 00000019F D6D9 C5D8 E4C5 E2E3 DC CL14'OREQUEST TYPE:' 00000930 40E3 E8D7 C57A 000001AD 00 DC XL1'00' 00000940 000001AE 0000 DC H'0' 00000950 000001B0 0101 PR 00000960 000001B2 4002 E400 STH R0,1024(R2,R14) 00000970 000001B6 0000 DC H'0' 00000980 000001B8 0100 DC H'0256' 00000990 000001BA F002 E600 0000 SRP 1536(1,R14),0,2 PSA reference 00001000 000001C0 2F02 SWR FR0,FR2 00001010 000001C2 F002 EF4D C460 SRP 3917(1,R14),1120(R12),2 00001020 000001C8 C4C9 E2D7 D3C1 E86B DC CL32'DISPLAY, A-ADD, M-MODIFY, X-DELE' 00001030 40C1 60C1 C4C4 6B40 D460 D4D6 C4C9 C6E8 6B40 E760 C4C5 D3C5 000001E8 E3C5 6B40 D760 D7D9 DC CL12'TE, P-PRINT)' 00001040 C9D5 E35D 000001F4 0000 0007 DC F'00007' 00001050 000001F8 02 DC XL1'02' 00001060 000001F9 F8 DC CL1'8' 00001070 000001FA 0326 DC H'0806' 00001080 000001FC C1C3 C3D6 E4D5 E3 DC CL7'ACCOUNT' 00001090 00000203 00 DC XL1'00' 00001100 00000204 0000 DC H'0' 00001110 00000206 0102 UPT 00001120 00000208 F803 327A 0000 ZAP 634(1,R3),0(4) PSA reference 00001130 0000020E 0005 DC H'0005' 00001140 00000210 0D50 BASR R5,0 Address set 00001150 00000212 0334 DC H'0820' 00001160 00000214 0000 0001 DC F'00001' 00001170 00000218 00 DC XL1'00' 00001180 00000219 F0 DC CL1'0' 00001190 0000021A 033A DC H'0826' 00001200 0000021C 0000 0010 DC F'00016' 00001210 00000220 02 DC XL1'02' 00001220 00000221 F0 DC CL1'0' 00001230 00000222 033F DC H'0831' 00001240 00000224 4DF1 F0F0 F0F0 40E3 DC CL16'(10000 TO 79999)' 00001250 D640 F7F9 F9F9 F95D 00000234 0000 000D DC F'00013' 00001260 00000238 02 DC XL1'02' 00001270 00000239 F8 DC CL1'8' 00001280 0000023A 0376 DC H'0886' 00001290 0000023C D7D9 C9D5 E3C5 D940 DC CL13'PRINTER ID :' 00001300 C9C4 4040 7A 00000249 00 DC XL1'00' 00001310 0000024A 0000 DC H'0' 00001320 0000024C 0401 SPM R0 00001330 0000024E 4003 8400 STH R0,1024(R3,R8) 00001340 00000252 0000 DC H'0' 00001350 00000254 0100 DC H'0256' 00001360 00000256 F003 8900 0000 SRP 2304(1,R8),0,3 PSA reference 00001370 0000025C 3002 LPER FR0,FR2 00001380 0000025E F003 8F4D F140 SRP 3917(1,R8),320(R15),3 00001390 00000264 E3D6 40F4 40C3 C8C1 DC CL32'TO 4 CHARACTERS (REQUIRED FOR PR' 00001400 D9C1 C3E3 C5D9 E240 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0 4DD9 C5D8 E4C9 D9C5 C440 C6D6 D940 D7D9 00000284 C9D5 E340 D9C5 D8E4 DC CL13'INT REQUEST))' 00001410 C5E2 E35D 5D 00000291 00 DC XL1'00' 00001420 00000292 0000 DC H'0' 00001430 00000294 4F01 F804 CVB R0,2052(R1,R15) 00001440 00000298 1000 LPR R0,R0 00001450 0000029A 0000 DC H'0' 00001460 0000029C 4F01 F004 CVB R0,4(R1,R15) 00001470 000002A0 6000 0000 STD FR0,0 PSA reference 00001480 000002A4 4F01 F004 CVB R0,4(R1,R15) 00001490 000002A8 B000 0000 DC XL4'B0000000' 00001500 000002AC 4F01 F005 CVB R0,5(R1,R15) 00001510 000002B0 0000 0000 DC F'0' 00001520 000002B4 4F01 F005 CVB R0,5(R1,R15) 00001530 000002B8 5000 0000 ST R0,0 PSA reference 00001540 000002BC 4F01 F005 CVB R0,5(R1,R15) 00001550 000002C0 A000 0000 DC XL4'A0000000' 00001560 000002C4 4F01 F005 CVB R0,5(R1,R15) 00001570 000002C8 F000 0000 4101 SRP 0(1),257(R4),0 PSA reference 00001580 000002CE F006 4000 0000 SRP 0(1,R4),0,6 PSA reference 00001590 000002D4 3C01 MDER FR0,FR1 00001600 000002D6 F806 9000 0000 ZAP 0(1,R9),0(7) PSA reference 00001610 000002DC 0100 DC H'0256' 00001620 000002DE F006 CD00 0000 SRP 3328(1,R12),0,6 PSA reference 00001630 000002E4 0E02 MVCL R0,R2 00001640 000002E6 F007 30C5 D5E3 SRP 197(1,R3),1507(R13),7 00001650 000002EC C5D9 40C4 C1E3 C140 DC CL11'ER DATA AND' 00001660 C1D5 C4 000002F7 00 DC XL1'00' 00001670 000002F8 0000 DC H'0' 00001680 000002FA 2902 CDR FR0,FR2 00001690 000002FC F807 3FD7 D9C5 ZAP 4055(1,R3),2501(8,R13) 00001700 00000302 E2E2 40C5 D5E3 C5D9 DC CL32'SS ENTER FOR SEARCH OR ACCOUNT R' 00001710 40C6 D6D9 40E2 C5C1 D9C3 C840 D6D9 40C1 C3C3 D6E4 D5E3 40D9 00000322 C5D8 E4C5 E2E3 DC CL6'EQUEST' 00001720 00000328 0000 0002 DC F'00002' 00001730 0000032C 02 DC XL1'02' 00001740 0000032D F0 DC CL1'0' 00001750 0000032E 0769 BCR 6,R9 00001760 00000330 D6D9 0000 0013 OC 0(218),19 PSA reference 00001770 00000336 02 DC XL1'02' 00001780 00000337 F8 DC CL1'8' 00001790 00000338 076C BCR 6,R12 00001800 0000033A D7D9 C5E2 E240 C3D3 DC CL19'PRESS CLEAR TO EXIT' 00001810 C5C1 D940 E3D6 40C5 E7C9 E3 0000034D FF DC XL1'FF' 00001820 0000034E FF02 DC XL2'FF02' 00001830 00000350 72 DC XL1'72' 00001840 00000351 C1C4 E2C4 DC CL4'ADSD' 00001850 00000355 00 DC XL1'00' 00001860 00000356 0100 DC H'0256' 00001870 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000358 0E03 MVCL R0,R3 00001880 0000035A 0400 SPM R0 00001890 0000035C 00 DC XL1'00' 00001900 0000035D 4040 4040 4040 4040 DC CL14' L ' 00001910 4040 4040 D340 0000036B 00 DC XL1'00' 00001920 0000036C FF00 FE00 DC XL4'FF00FE00' 00001930 00000370 1800 LR R0,R0 00001940 00000372 504A 00E2 ST R4,226(R10) 00001950 00000376 D5C1 D4C5 D440 4040 DC CL31'NAMEM ' 00001960 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 00000395 00 DC XL1'00' 00001970 00000396 0600 BCTR R0,0 00001980 00000398 0000 DC H'0' 00001990 0000039A 0C00 BASSM R0,0 Address set 00002000 0000039C 12D3 LTR R13,R3 00002010 0000039E 40C6 D5C1 D4C5 D440 DC CL32' FNAMEM ' 00002020 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 000003BE 4000 0600 STH R0,1536 PSA reference 00002030 000003C2 0000 DC H'0' 00002040 000003C4 2100 LNDR FR0,FR0 00002050 000003C6 0CD3 BASSM R13,R3 Nonstd linkage 00002060 000003C8 40D9 C5D8 D440 4040 DC CL32' REQM ' 00002070 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 000003E8 4000 0400 STH R0,1024 PSA reference 00002080 000003EC 0000 DC H'0' 00002090 000003EE 3000 LPER FR0,FR0 00002100 000003F0 01 DC XL1'01' 00002110 000003F1 D340 C1C3 C3E3 D440 DC CL32'L ACCTM ' 00002120 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000411 4040 DC CL2' ' 00002130 00000413 00 DC XL1'00' 00002140 00000414 0500 BALR R0,0 Address set 00002150 00000416 0000 DC H'0' 00002160 00000418 3400 HER FR0,FR0 00002170 0000041A 05D9 BALR R13,R9 Nonstd linkage 00002180 0000041C F0D7 D9E3 D9D4 4040 DC CL32'0PRTRM ' 00002190 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 0000043C 4000 0500 STH R0,1280 PSA reference 00002200 00000440 0000 DC H'0' 00002210 00000442 3C00 MDER FR0,FR0 00002220 00000444 04D3 SPM R13 00002230 00000446 40E2 E4D4 E3E3 D3D4 DC CL32' SUMTTLM ' 00002240 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000466 4000 0700 STH R0,1792 PSA reference 00002250 0000046A 0000 DC H'0' 00002260 0000046C 4300 4FD3 IC R0,4051(,R4) 00002270 00000470 40E2 E4D4 D3D5 D440 DC CL32' SUMLNM ' 00002280 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000490 4000 0600 STH R0,1536 PSA reference 00002290 00000494 0100 DC H'0256' 00002300 00000496 9500 4FD3 CLI 4051(R4),0 00002310 0000049A 40E2 E4D4 D3D5 D440 DC CL32' SUMLNM ' 00002320 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 000004BA 4000 0600 STH R0,1536 PSA reference 00002330 000004BE 0200 DC H'0512' 00002340 000004C0 E700 4FD3 40E2 VFS VR0,VR0,VR4,4,3,13 00002350 000004C6 E4D4 D3D5 D440 4040 DC CL31'UMLNM ' 00002360 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 000004E5 00 DC XL1'00' 00002370 000004E6 0600 BCTR R0,0 00002380 000004E8 0301 DC H'0769' 00002390 000004EA 3900 CER FR0,FR0 00002400 000004EC 4FD3 40E2 CVB R13,226(R3,R4) 00002410 000004F0 E4D4 D3D5 D440 4040 DC CL31'UMLNM ' 00002420 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 0000050F 00 DC XL1'00' 00002430 00000510 0600 BCTR R0,0 00002440 00000512 0401 SPM R0 00002450 00000514 8B00 4FD3 SLA R0,4051(R4) 00002460 00000518 40E2 E4D4 D3D5 D440 DC CL32' SUMLNM ' 00002470 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000538 4000 0600 STH R0,1536 PSA reference 00002480 0000053C 0501 BALR R0,R1 Nonstd linkage 00002490 0000053E DD00 4FD3 40E2 TRT 4051(1,R4),226(R4) 00002500 00000544 E4D4 D3D5 D440 4040 DC CL31'UMLNM ' 00002510 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 00000563 00 DC XL1'00' 00002520 00000564 0600 BCTR R0,0 00002530 00000566 0602 BCTR R0,R2 00002540 00000568 2F00 SWR FR0,FR0 00002550 0000056A 4FD3 40D4 CVB R13,212(R3,R4) 00002560 0000056E E2C7 C9D5 E5D4 4040 DC CL31'SGINVM ' 00002570 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 0000058D 00 DC XL1'00' 00002580 0000058E 0700 NOPR 0 00002590 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000590 0002 DC H'0002' 00002600 00000592 81 DC CL1'a' 00002610 00000593 00 DC XL1'00' 00002620 00000594 41D3 40D4 LA R13,212(R3,R4) 00002630 00000598 E2C7 D440 4040 4040 DC CL31'SGM ' 00002640 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 000005B7 00 DC XL1'00' 00002650 000005B8 0400 SPM R0 00002660 000005BA 0002 DC H'0002' 00002670 000005BC C500 3CD3 4000 BPRP 0,*+120,*-5865472 00002680 000005C2 4F00 0000 CVB R0,0 PSA reference 00002690 000005C6 0000 DC H'0' 00002700 000005C8 00 DC XL1'00' 00002710 000005C9 C1C3 C3E3 C4E3 D340 DC CL8'ACCTDTL ' 00002720 000005D1 0A DC XL1'0A' 00002730 000005D2 A6 DC CL1'w' 00002740 000005D3 03 DC XL1'03' 00002750 000005D4 7A02 0E06 AE FR0,3590(R2) 00002760 000005D8 13C0 LCR R12,R0 00002770 000005DA 4A00 B000 AH R0,0(,R11) 00002780 000005DE 1850 LR R5,R0 00002790 000005E0 FFFE DC XL2'FFFE' 00002800 000005E2 1000 LPR R0,R0 00002810 000005E4 0000 0005 DC F'00005' 00002820 000005E8 4000 0C00 STH R0,3072 PSA reference 00002830 000005EC 0000 0000 DC F'0' 00002840 000005F0 0000 0000 DC F'0' 00002850 000005F4 0000 0000 DC F'0' 00002860 000005F8 0000 0000 DC F'0' 00002870 000005FC 0000 0000 DC F'0' 00002880 00000600 0000 0000 DC F'0' 00002890 00000604 0000 0000 DC F'0' 00002900 00000608 0000 0000 DC F'0' 00002910 0000060C 4040 4040 DC CL4' ' 00002920 00000610 0000 0008 DC F'00008' 00002930 00000614 02 DC XL1'02' 00002940 00000615 F8 DC CL1'8' 00002950 00000616 0000 DC H'0' 00002960 00000618 C1C3 C3D6 E4D5 E3E2 DC CL8'ACCOUNTS' 00002970 00000620 0000 000A DC F'00010' 00002980 00000624 03 DC XL1'03' 00002990 00000625 F0 DC CL1'0' 00003000 00000626 0012 DC H'0018' 00003010 00000628 C4C5 E3C1 C9D3 E240 DC CL10'DETAILS OF' 00003020 D6C6 00000632 0000 DC H'0' 00003030 00000634 000E 02 DC XL3'000E02' 00003040 00000637 F0 DC CL1'0' 00003050 00000638 001D DC H'0029' 00003060 0000063A C1C3 C3D6 E4D5 E340 DC CL14'ACCOUNT NUMBER' 00003070 D5E4 D4C2 C5D9 00000648 0000 0005 DC F'00005' 00003080 0000064C 01 DC XL1'01' 00003090 0000064D F8 DC CL1'8' 00003100 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 00000064E 002C DC H'0044' 00003110 00000650 0000 0001 DC F'00001' 00003120 00000654 00 DC XL1'00' 00003130 00000655 F0 DC CL1'0' 00003140 00000656 0032 DC H'0050' 00003150 00000658 0000 0007 DC F'00007' 00003160 0000065C 02 DC XL1'02' 00003170 0000065D F8 DC CL1'8' 00003180 0000065E 00A0 DC H'0160' 00003190 00000660 E2E4 D9D5 C1D4 C5 DC CL7'SURNAME' 00003200 00000667 00 DC XL1'00' 00003210 00000668 0000 DC H'0' 00003220 0000066A 0102 UPT 00003230 0000066C F800 AD7A 0000 ZAP 3450(1,R10),0(1) PSA reference 00003240 00000672 0012 DC H'0018' 00003250 00000674 01 DC XL1'01' 00003260 00000675 40 DC CL1' ' 00003270 00000676 00AF DC H'0175' 00003280 00000678 0000 0009 DC F'00009' 00003290 0000067C 02 DC XL1'02' 00003300 0000067D F0 DC CL1'0' 00003310 0000067E 00 DC XL1'00' 00003320 0000067F C24D F1F8 40C3 C8D9 DC CL10'B(18 CHRS)' 00003330 E25D 00000689 00 DC XL1'00' 00003340 0000068A 0000 DC H'0' 00003350 0000068C 0502 BALR R0,R2 Nonstd linkage 00003360 0000068E F800 CCE3 C9E3 ZAP 3299(1,R12),2531(1,R12) 00003370 00000694 D3C5 0000 0001 MVZ 0(198),1 PSA reference 00003380 0000069A 02 DC XL1'02' 00003390 0000069B F8 DC CL1'8' 00003400 0000069C 00 DC XL1'00' 00003410 0000069D D77A DC CL2'P:' 00003420 0000069F 00 DC XL1'00' 00003430 000006A0 0000 DC H'0' 00003440 000006A2 0401 SPM R0 00003450 000006A4 4000 D900 STH R0,2304(,R13) 00003460 000006A8 0000 DC H'0' 00003470 000006AA 1102 LNR R0,R2 00003480 000006AC F000 DE4D F440 SRP 3661(1,R13),1088(R15),0 00003490 000006B2 C3C8 D9E2 40D6 D7E3 DC CL14'CHRS OPTIONAL)' 00003500 C9D6 D5C1 D35D 000006C0 0000 000A DC F'00010' 00003510 000006C4 02 DC XL1'02' 00003520 000006C5 F8 DC CL1'8' 00003530 000006C6 00 DC XL1'00' 00003540 000006C7 F0C6 C9D9 E2E3 40D5 DC CL11'0FIRST NAME' 00003550 C1D4 C5 000006D2 0000 DC H'0' 00003560 000006D4 0001 02 DC XL3'000102' 00003570 000006D7 F8 DC CL1'8' 00003580 000006D8 00FD DC H'0253' 00003590 000006DA 7A00 0000 AE FR0,0 PSA reference 00003600 000006DE 0C01 BASSM R0,R1 Nonstd linkage 00003610 000006E0 4000 FF00 STH R0,3840(,R15) 00003620 000006E4 0000 0100 DC F'00256' 00003630 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0000006E8 F001 0C00 0000 SRP 3072(1),0,1 PSA reference 00003640 000006EE 0902 ISK R0,R2 00003650 000006F0 F001 124D F1F2 SRP 589(1,R1),498(R15),1 00003660 000006F6 40C3 C8D9 E25D DC CL6' CHRS)' 00003670 000006FC 0000 000C DC F'00012' 00003680 00000700 02 DC XL1'02' 00003690 00000701 F8 DC CL1'8' 00003700 00000702 011C DC H'0284' 00003710 00000704 D4C9 C4C4 D3C5 40C9 DC CL12'MIDDLE INIT:' 00003720 D5C9 E37A 00000710 0000 0001 DC F'00001' 00003730 00000714 01 DC XL1'01' 00003740 00000715 40 DC CL1' ' 00003750 00000716 0129 DC H'0297' 00003760 00000718 0000 0001 DC F'00001' 00003770 0000071C 00 DC XL1'00' 00003780 0000071D F0 DC CL1'0' 00003790 0000071E 012B DC H'0299' 00003800 00000720 0000 0011 DC F'00017' 00003810 00000724 02 DC XL1'02' 00003820 00000725 F0 DC CL1'0' 00003830 00000726 012E DC H'0302' 00003840 00000728 4DF1 40C3 C8D9 4040 DC CL17'(1 CHR OPTIONAL)' 00003850 D6D7 E3C9 D6D5 C1D3 5D 00000739 00 DC XL1'00' 00003860 0000073A 0000 DC H'0' 00003870 0000073C 0902 ISK R0,R2 00003880 0000073E F801 40E3 C5D3 ZAP 227(1,R4),1491(2,R12) 00003890 00000744 C5D7 C8D6 D5C5 DC CL6'EPHONE' 00003900 0000074A 0000 DC H'0' 00003910 0000074C 0001 02 DC XL3'000102' 00003920 0000074F F8 DC CL1'8' 00003930 00000750 01 DC XL1'01' 00003940 00000751 4D7A DC CL2'(:' 00003950 00000753 00 DC XL1'00' 00003960 00000754 0000 DC H'0' 00003970 00000756 0A0D SVC 13 ABEND 00003980 00000758 5001 4F00 ST R0,3840(R1,R4) 00003990 0000075C 0000 0100 DC F'00256' 00004000 00000760 F001 5A00 0000 SRP 2560(1,R5),0,1 PSA reference 00004010 00000766 0902 ISK R0,R2 00004020 00000768 F001 624D F1F0 SRP 589(1,R6),496(R15),1 00004030 0000076E 40C4 C9C7 E25D DC CL6' DIGS)' 00004040 00000774 0000 000E DC F'00014' 00004050 00000778 02 DC XL1'02' 00004060 00000779 F8 DC CL1'8' 00004070 0000077A 0190 DC H'0400' 00004080 0000077C C1C4 C4D9 C5E2 E240 DC CL14'ADDRESS LINE1:' 00004090 D3C9 D5C5 F17A 0000078A 0000 DC H'0' 00004100 0000078C 0018 01 DC XL3'001801' 00004110 0000078F 40 DC CL1' ' 00004120 00000790 019F 0000 DC XL4'019F0000' 00004130 00000794 0009 02 DC XL3'000902' 00004140 00000797 F0 DC CL1'0' 00004150 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000798 01B8 DC H'0440' 00004160 0000079A 4DF2 F440 C3C8 D9E2 DC CL9'(24 CHRS)' 00004170 5D 000007A3 00 DC XL1'00' 00004180 000007A4 0000 DC H'0' 00004190 000007A6 0602 BCTR R0,R2 00004200 000007A8 F801 E8D3 C9D5 ZAP 2259(1,R14),2517(2,R12) 00004210 000007AE C5F2 7A00 0000 BPRP 15,*+1268,*+0 00004220 000007B4 1801 LR R0,R1 00004230 000007B6 4001 EF00 STH R0,3840(R1,R14) 00004240 000007BA 0000 DC H'0' 00004250 000007BC 0902 ISK R0,R2 00004260 000007BE F002 084D F2F4 SRP 2125(1),756(R15),2 PSA reference 00004270 000007C4 40C3 C8D9 E25D DC CL6' CHRS)' 00004280 000007CA 0000 DC H'0' 00004290 000007CC 0006 02 DC XL3'000602' 00004300 000007CF F8 DC CL1'8' 00004310 000007D0 0238 DC H'0568' 00004320 000007D2 D3C9 D5C5 F37A DC CL6'LINE3:' 00004330 000007D8 0000 0018 DC F'00024' 00004340 000007DC 01 DC XL1'01' 00004350 000007DD 40 DC CL1' ' 00004360 000007DE 023F DC H'0575' 00004370 000007E0 0000 0012 DC F'00018' 00004380 000007E4 02 DC XL1'02' 00004390 000007E5 F0 DC CL1'0' 00004400 000007E6 0258 DC H'0600' 00004410 000007E8 4DF2 F440 C3C8 D9E2 DC CL18'(24 CHRS OPTIONAL)' 00004420 40D6 D7E3 C9D6 D5C1 D35D 000007FA 0000 DC H'0' 00004430 000007FC 000E 02 DC XL3'000E02' 00004440 000007FF F8 DC CL1'8' 00004450 00000800 02D0 DC H'0720' 00004460 00000802 C3C1 D9C4 E240 C9E2 DC CL14'CARDS ISSUED :' 00004470 E2E4 C5C4 407A 00000810 0000 0001 DC F'00001' 00004480 00000814 0D50 BASR R5,0 Address set 00004490 00000816 02DF DC H'0735' 00004500 00000818 0000 0001 DC F'00001' 00004510 0000081C 00 DC XL1'00' 00004520 0000081D F0 DC CL1'0' 00004530 0000081E 02E1 DC H'0737' 00004540 00000820 0000 0008 DC F'00008' 00004550 00000824 02 DC XL1'02' 00004560 00000825 F0 DC CL1'0' 00004570 00000826 02 DC XL1'02' 00004580 00000827 E94D F140 E3D6 40F9 DC CL9'Z(1 TO 9)' 00004590 5D 00000830 0000 000C DC F'00012' 00004600 00000834 02 DC XL1'02' 00004610 00000835 F8 DC CL1'8' 00004620 00000836 02FC DC H'0764' 00004630 00000838 C3C1 D9C4 40C3 D6C4 DC CL12'CARD CODE :' 00004640 C540 407A 00000844 0000 0001 DC F'00001' 00004650 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000848 01 DC XL1'01' 00004660 00000849 40 DC CL1' ' 00004670 0000084A 0309 DC H'0777' 00004680 0000084C 0000 0001 DC F'00001' 00004690 00000850 00 DC XL1'00' 00004700 00000851 F0 DC CL1'0' 00004710 00000852 030B DC H'0779' 00004720 00000854 0000 0007 DC F'00007' 00004730 00000858 02 DC XL1'02' 00004740 00000859 F0 DC CL1'0' 00004750 0000085A 030E DC H'0782' 00004760 0000085C 4DF1 40C3 C8D9 5D DC CL7'(1 CHR)' 00004770 00000863 00 DC XL1'00' 00004780 00000864 0000 DC H'0' 00004790 00000866 0E02 MVCL R0,R2 00004800 00000868 F803 20C4 C1E3 ZAP 196(1,R2),483(4,R12) 00004810 0000086E C540 C9E2 E2E4 C5C4 DC CL11'E ISSUED :' 00004820 4040 7A 00000879 00 DC XL1'00' 00004830 0000087A 0000 DC H'0' 00004840 0000087C 020D DC H'0525' 00004850 0000087E 5003 2F00 ST R0,3840(R3,R2) 00004860 00000882 0000 DC H'0' 00004870 00000884 020D DC H'0525' 00004880 00000886 5003 3200 ST R0,512(R3,R3) 00004890 0000088A 0000 DC H'0' 00004900 0000088C 020D DC H'0525' 00004910 0000088E 5003 3500 ST R0,1280(R3,R3) 00004920 00000892 0000 DC H'0' 00004930 00000894 0B02 BSM 0,R2 00004940 00000896 F003 3840 4DD4 SRP 2112(1,R3),3540(R4),3 00004950 0000089C D440 C4C4 40E8 E85D DC CL8'M DD YY)' 00004960 000008A4 0000 000C DC F'00012' 00004970 000008A8 02 DC XL1'02' 00004980 000008A9 F8 DC CL1'8' 00004990 000008AA 03 DC XL1'03' 00005000 000008AB 4CD9 C5C1 E2D6 D540 DC CL13'<REASON CODE:' 00005010 C3D6 C4C5 7A 000008B8 0000 0001 DC F'00001' 00005020 000008BC 01 DC XL1'01' 00005030 000008BD 40 DC CL1' ' 00005040 000008BE 0359 DC H'0857' 00005050 000008C0 0000 0001 DC F'00001' 00005060 000008C4 00 DC XL1'00' 00005070 000008C5 F0 DC CL1'0' 00005080 000008C6 03 DC XL1'03' 00005090 000008C7 5B DC CL1'$' 00005100 000008C8 0000 0009 DC F'00009' 00005110 000008CC 02 DC XL1'02' 00005120 000008CD F0 DC CL1'0' 00005130 000008CE 03 DC XL1'03' 00005140 000008CF 5E4D D56B D36B E26B DC CL10';(N,L,S,R)' 00005150 D95D 000008D9 00 DC XL1'00' 00005160 000008DA 0000 DC H'0' 00005170 000008DC 0E02 MVCL R0,R2 00005180 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0000008DE F803 70C1 D7D7 ZAP 193(1,R7),2007(4,R13) 00005190 000008E4 D9D6 E5C5 C440 C2E8 DC CL11'ROVED BY :' 00005200 4040 7A 000008EF 00 DC XL1'00' 00005210 000008F0 0000 0301 DC F'00769' 00005220 000008F4 4003 7F00 STH R0,3840(R3,R7) 00005230 000008F8 0000 0100 DC F'00256' 00005240 000008FC F003 8300 0000 SRP 768(1,R8),0,3 PSA reference 00005250 00000902 0802 SSK R0,R2 00005260 00000904 F003 894D F340 SRP 2381(1,R8),832(R15),3 00005270 0000090A C3C8 D9E2 5D DC CL5'CHRS)' 00005280 0000090F 00 DC XL1'00' 00005290 00000910 0000 DC H'0' 00005300 00000912 3402 HER FR0,FR2 00005310 00000914 F004 10E4 D7E3 SRP 228(1,R1),2019(R13),4 00005320 0000091A D640 F440 D6E3 C8C5 DC CL32'O 4 OTHERS WHO MAY CHARGE (EACH ' 00005330 D9E2 40E6 C8D6 40D4 C1E8 40C3 C8C1 D9C7 C540 4DC5 C1C3 C840 0000093A F3F2 40C3 C8D9 E240 DC CL17'32 CHRS OPTIONAL)' 00005340 D6D7 E3C9 D6D5 C1D3 5D 0000094B 00 DC XL1'00' 00005350 0000094C 0000 0302 DC F'00770' 00005360 00000950 F804 64D6 F17A ZAP 1238(1,R6),378(5,R15) 00005370 00000956 0000 DC H'0' 00005380 00000958 0020 01 DC XL3'002001' 00005390 0000095B 40 DC CL1' ' 00005400 0000095C 0468 SPM R6 00005410 0000095E 0000 DC H'0' 00005420 00000960 0003 02 DC XL3'000302' 00005430 00000963 F8 DC CL1'8' 00005440 00000964 0489 SPM R8 00005450 00000966 D6F2 7A00 0000 OC 2560(243,R7),0 PSA reference 00005460 0000096C 2001 LPDR FR0,FR1 00005470 0000096E 4004 8D00 STH R0,3328(R4,R8) 00005480 00000972 0000 DC H'0' 00005490 00000974 0100 DC H'0256' 00005500 00000976 F004 AE00 0000 SRP 3584(1,R10),0,4 PSA reference 00005510 0000097C 0302 DC H'0770' 00005520 0000097E F804 B4D6 F37A ZAP 1238(1,R11),890(5,R15) 00005530 00000984 0000 0020 DC F'00032' 00005540 00000988 01 DC XL1'01' 00005550 00000989 40 DC CL1' ' 00005560 0000098A 04B8 SPM R11 00005570 0000098C 0000 0003 DC F'00003' 00005580 00000990 02 DC XL1'02' 00005590 00000991 F8 DC CL1'8' 00005600 00000992 04D9 SPM R13 00005610 00000994 D6F4 7A00 0000 OC 2560(245,R7),0 PSA reference 00005620 0000099A 2001 LPDR FR0,FR1 00005630 0000099C 4004 DD00 STH R0,3328(R4,R13) 00005640 000009A0 0000 0100 DC F'00256' 00005650 000009A4 F004 FE00 0000 SRP 3584(1,R15),0,4 PSA reference 00005660 000009AA 0E02 MVCL R0,R2 00005670 000009AC F805 00E2 D7C5 ZAP 226(1),1989(6,R13) PSA reference 00005680 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0000009B2 C3C9 C1D3 40C3 D6C4 DC CL11'CIAL CODE1:' 00005690 C5F1 7A 000009BD 00 DC XL1'00' 00005700 000009BE 0000 DC H'0' 00005710 000009C0 0101 PR 00005720 000009C2 4005 0F00 STH R0,3840(R5) 00005730 000009C6 0000 DC H'0' 00005740 000009C8 0602 BCTR R0,R2 00005750 000009CA F805 11C3 D6C4 ZAP 451(1,R1),1732(6,R13) 00005760 000009D0 C5F2 7A00 0000 BPRP 15,*+1268,*+0 00005770 000009D6 0101 PR 00005780 000009D8 4005 1800 STH R0,2048(R5,R1) 00005790 000009DC 0000 DC H'0' 00005800 000009DE 0602 BCTR R0,R2 00005810 000009E0 F805 1AC3 D6C4 ZAP 2755(1,R1),1732(6,R13) 00005820 000009E6 C5F3 7A00 0000 BPRP 15,*+1780,*+0 00005830 000009EC 0101 PR 00005840 000009EE 4005 2100 STH R0,256(R5,R2) 00005850 000009F2 0000 DC H'0' 00005860 000009F4 1502 CLR R0,R2 00005870 000009F6 F005 234D C5C1 SRP 845(1,R2),1473(R12),5 00005880 000009FC C3C8 40F1 40C3 C8D9 DC CL18'CH 1 CHR OPTIONAL)' 00005890 40D6 D7E3 C9D6 D5C1 D35D 00000A0E 0000 DC H'0' 00005900 00000A10 0021 03 DC XL3'002103' 00005910 00000A13 F0 DC CL1'0' 00005920 00000A14 0550 BALR R5,0 Address set 00005930 00000A16 D5D6 40C8 C9E2 E3D6 DC CL32'NO HISTORY AVAILABLE AT THIS TIM' 00005940 D9E8 40C1 E5C1 C9D3 C1C2 D3C5 40C1 E340 E3C8 C9E2 40E3 C9D4 00000A36 C500 0000 0100 BPRP 0,*+0,*+512 00005950 00000A3C F005 7200 0000 SRP 512(1,R7),0,5 PSA reference 00005960 00000A42 0C03 BASSM R0,R3 Nonstd linkage 00005970 00000A44 F005 78C3 C8C1 SRP 2243(1,R7),2241(R12),5 00005980 00000A4A D9C7 C540 D3C9 D4C9 DC CL9'RGE LIMIT' 00005990 E3 00000A53 00 DC XL1'00' 00006000 00000A54 0000 DC H'0' 00006010 00000A56 0801 SSK R0,R1 00006020 00000A58 F005 8500 0000 SRP 1280(1,R8),0,5 PSA reference 00006030 00000A5E 0100 DC H'0256' 00006040 00000A60 F005 8E00 0000 SRP 3584(1,R8),0,5 PSA reference 00006050 00000A66 0603 BCTR R0,R3 00006060 00000A68 F005 94E2 E3C1 SRP 1250(1,R9),961(R14),5 00006070 00000A6E E3E4 E2 DC CL3'TUS' 00006080 00000A71 00 DC XL1'00' 00006090 00000A72 0000 DC H'0' 00006100 00000A74 0201 DC H'0513' 00006110 00000A76 F005 9B00 0000 SRP 2816(1,R9),0,5 PSA reference 00006120 00000A7C 0100 DC H'0256' 00006130 00000A7E F005 9E00 0000 SRP 3584(1,R9),0,5 PSA reference 00006140 00000A84 1A01 AR R0,R1 00006150 00000A86 F805 F000 0000 ZAP 0(1,R15),0(6) PSA reference 00006160 00000A8C 0101 PR 00006170 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000A8E F006 0B00 0000 SRP 2816(1),0,6 PSA reference 00006180 00000A94 0100 DC H'0256' 00006190 00000A96 F006 0D00 0000 SRP 3328(1),0,6 PSA reference 00006200 00000A9C 4E02 F006 CVD R0,6(R2,R15) 00006210 00000AA0 90D5 D6E3 STM R13,R5,1763(R13) Save regs 00006220 00000AA4 C57A 6040 C4C5 E3C1 DC CL32'E:- DETAILS IN BRACKETS SHOW MAX' 00006230 C9D3 E240 C9D5 40C2 D9C1 C3D2 C5E3 E240 E2C8 D6E6 40D4 C1E7 00000AC4 C9D4 E4D4 40D5 D64B DC CL32'IMUM NO. CHARACTERS ALLOWED AND ' 00006240 40C3 C8C1 D9C1 C3E3 C5D9 E240 C1D3 D3D6 E6C5 C440 C1D5 C440 00000AE4 C9C6 40D6 D7E3 C9D6 DC CL11'IF OPTIONAL' 00006250 D5C1 D3 00000AEF 00 DC XL1'00' 00006260 00000AF0 0000 DC H'0' 00006270 00000AF2 3C01 MDER FR0,FR1 00006280 00000AF4 F807 3000 0000 ZAP 0(1,R3),0(8) PSA reference 00006290 00000AFA 0100 DC H'0256' 00006300 00000AFC F007 6DFF FF05 SRP 3583(1,R6),3845(R15),7 00006310 00000B02 66 DC XL1'66' 00006320 00000B03 C1C4 E2C4 DC CL4'ADSD' 00006330 00000B07 00 DC XL1'00' 00006340 00000B08 0200 DC H'0512' 00006350 00000B0A 2002 LPDR FR0,FR2 00006360 00000B0C 1300 LCR R0,R0 00006370 00000B0E 00 DC XL1'00' 00006380 00000B0F 4040 4040 4040 4040 DC CL14' L ' 00006390 4040 4040 D340 00000B1D 00 DC XL1'00' 00006400 00000B1E FF00 DC XL2'FF00' 00006410 00000B20 FE00 DC XL2'FE00' 00006420 00000B22 1800 LR R0,R0 00006430 00000B24 504A 00E3 ST R4,227(R10) 00006440 00000B28 C9E3 D3C5 C440 4040 DC CL31'ITLED ' 00006450 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 00000B47 00 DC XL1'00' 00006460 00000B48 0600 BCTR R0,0 00006470 00000B4A 0000 DC H'0' 00006480 00000B4C 0C00 BASSM R0,0 Address set 00006490 00000B4E 0AD3 SVC 211 00006500 00000B50 40C1 C3C3 E3C4 4040 DC CL32' ACCTD ' 00006510 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000B70 4000 0500 STH R0,1280 PSA reference 00006520 00000B74 0000 DC H'0' 00006530 00000B76 1900 CR R0,R0 00006540 00000B78 05D3 BALR R13,R3 Nonstd linkage 00006550 00000B7A 40E2 D5C1 D4C5 C440 DC CL32' SNAMED ' 00006560 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000B9A 4000 0600 STH R0,1536 PSA reference 00006570 00000B9E 0000 DC H'0' 00006580 00000BA0 2100 LNDR FR0,FR0 00006590 00000BA2 12D3 LTR R13,R3 00006600 00000BA4 40E3 E3D3 C440 4040 DC CL32' TTLD ' 00006610 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000BC4 4000 0400 STH R0,1024 PSA reference 00006620 00000BC8 0000 DC H'0' 00006630 00000BCA 3600 AXR FR0,FR0 00006640 00000BCC 04D3 SPM R13 00006650 00000BCE 40C6 D5C1 D4C5 C440 DC CL32' FNAMED ' 00006660 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000BEE 4000 0600 STH R0,1536 PSA reference 00006670 00000BF2 0000 DC H'0' 00006680 00000BF4 3D00 DER FR0,FR0 00006690 00000BF6 0CD3 BASSM R13,R3 Nonstd linkage 00006700 00000BF8 40D4 C9C4 4040 4040 DC CL32' MID ' 00006710 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000C18 4000 0300 STH R0,768 PSA reference 00006720 00000C1C 0000 DC H'0' 00006730 00000C1E 4C00 01D3 MH R0,467 PSA reference 00006740 00000C22 40E3 C5D3 C440 4040 DC CL32' TELD ' 00006750 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000C42 4000 0400 STH R0,1024 PSA reference 00006760 00000C46 0000 DC H'0' 00006770 00000C48 5000 0AD9 ST R0,2777 PSA reference 00006780 00000C4C F0C1 C4C4 D9F1 C440 DC CL32'0ADDR1D ' 00006790 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000C6C 4000 0600 STH R0,1536 PSA reference 00006800 00000C70 0000 DC H'0' 00006810 00000C72 5D00 18D3 D R0,2259(,R1) 00006820 00000C76 40C1 C4C4 D9F2 C440 DC CL32' ADDR2D ' 00006830 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000C96 4000 0600 STH R0,1536 PSA reference 00006840 00000C9A 0000 DC H'0' 00006850 00000C9C 7800 18D3 LE FR0,2259(,R1) 00006860 00000CA0 40C1 C4C4 D9F3 C440 DC CL32' ADDR3D ' 00006870 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000CC0 4000 0600 STH R0,1536 PSA reference 00006880 00000CC4 0000 DC H'0' 00006890 00000CC6 9300 18D3 TS 2259(R1) 00006900 00000CCA 40C3 C1D9 C4E2 C440 DC CL32' CARDSD ' 00006910 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 0 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000CEA 4000 0600 STH R0,1536 PSA reference 00006920 00000CEE 0000 DC H'0' 00006930 00000CF0 AE00 01D9 SIGP R0,R0,473 PSA reference 00006940 00000CF4 F0C3 C3D6 C4C5 C440 DC CL32'0CCODED ' 00006950 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000D14 4000 0600 STH R0,1536 PSA reference 00006960 00000D18 0000 DC H'0' 00006970 00000D1A B200 01D3 CONCS 467 PSA reference 00006980 00000D1E 40C9 D4D6 C440 4040 DC CL32' IMOD ' 00006990 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000D3E 4000 0400 STH R0,1024 PSA reference 00007000 00000D42 0000 DC H'0' 00007010 00000D44 B600 02D9 STCTL CR0,CR0,729 PSA reference 00007020 00000D48 F0C9 C4C1 E8C4 4040 DC CL32'0IDAYD ' 00007030 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000D68 4000 0500 STH R0,1280 PSA reference 00007040 00000D6C 0000 DC H'0' 00007050 00000D6E BB00 02D9 CDS R0,R0,729 PSA reference 00007060 00000D72 F0C9 E8D9 C440 4040 DC CL32'0IYRD ' 00007070 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000D92 4000 0400 STH R0,1024 PSA reference 00007080 00000D96 0000 DC H'0' 00007090 00000D98 C000 02D9 F0D9 LARL R0,*+95674802 00007100 00000D9E E2D5 C440 4040 4040 DC CL31'SND ' 00007110 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 00000DBD 00 DC XL1'00' 00007120 00000DBE 0400 SPM R0 00007130 00000DC0 0000 DC H'0' 00007140 00000DC2 C500 01D3 40C1 BPRP 0,*+2,*-5865086 00007150 00000DC8 D7D7 D9C4 4040 4040 DC CL31'PPRD ' 00007160 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 00000DE7 00 DC XL1'00' 00007170 00000DE8 0500 BALR R0,0 Address set 00007180 00000DEA 0000 DC H'0' 00007190 00000DEC C9 DC CL1'I' 00007200 00000DED 00 DC XL1'00' 00007210 00000DEE 03 DC XL1'03' 00007220 00000DEF D340 C1E4 E3C8 F1C4 DC CL32'L AUTH1D ' 00007230 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000E0F 4040 DC CL2' ' 00007240 00000E11 00 DC XL1'00' 00007250 00000E12 0600 BCTR R0,0 00007260 00000E14 0000 CF00 DC F'52992' 00007270 00000E18 20D3 LPDR FR13,FR3 00007280 00000E1A 40C1 E4E3 C8F2 C440 DC CL32' AUTH2D ' 00007290 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000E3A 4000 0600 STH R0,1536 PSA reference 00007300 00000E3E 0000 DC H'0' 00007310 00000E40 F200 20D3 40C1 PACK 211(1,R2),193(1,R4) 00007320 00000E46 E4E3 C8F3 C440 4040 DC CL31'UTH3D ' 00007330 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 00000E65 00 DC XL1'00' 00007340 00000E66 0600 BCTR R0,0 00007350 00000E68 0001 DC H'0001' 00007360 00000E6A 1500 CLR R0,R0 00007370 00000E6C 20D3 LPDR FR13,FR3 00007380 00000E6E 40C1 E4E3 C8F4 C440 DC CL32' AUTH4D ' 00007390 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000E8E 4000 0600 STH R0,1536 PSA reference 00007400 00000E92 0001 DC H'0001' 00007410 00000E94 3800 LER FR0,FR0 00007420 00000E96 20D3 LPDR FR13,FR3 00007430 00000E98 40E2 C3D6 C4C5 F1C4 DC CL32' SCODE1D ' 00007440 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000EB8 4000 0700 STH R0,1792 PSA reference 00007450 00000EBC 0001 DC H'0001' 00007460 00000EBE 5B00 01D3 S R0,467 PSA reference 00007470 00000EC2 40E2 C3D6 C4C5 F2C4 DC CL32' SCODE2D ' 00007480 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000EE2 4000 0700 STH R0,1792 PSA reference 00007490 00000EE6 0001 DC H'0001' 00007500 00000EE8 5F00 01D3 SL R0,467 PSA reference 00007510 00000EEC 40E2 C3D6 C4C5 F3C4 DC CL32' SCODE3D ' 00007520 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000F0C 4000 0700 STH R0,1792 PSA reference 00007530 00000F10 0001 6300 DC F'90880' 00007540 00000F14 01 DC XL1'01' 00007550 00000F15 D340 C8C9 E2E3 E3D3 DC CL32'L HISTTLD ' 00007560 C440 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000F35 4040 DC CL2' ' 00007570 00000F37 00 DC XL1'00' 00007580 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000000F38 0700 NOPR 0 00007590 00000F3A 0001 DC H'0001' 00007600 00000F3C 6700 21D3 MXD FR0,467(,R2) 00007610 00000F40 40D3 C9D4 E3E3 D3C4 DC CL32' LIMTTLD ' 00007620 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000F60 4000 0700 STH R0,1792 PSA reference 00007630 00000F64 0001 DC H'0001' 00007640 00000F66 8B00 0CD3 SLA R0,3283 00007650 00000F6A 40D3 C9D4 C9E3 C440 DC CL32' LIMITD ' 00007660 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000F8A 4000 0600 STH R0,1536 PSA reference 00007670 00000F8E 0001 DC H'0001' 00007680 00000F90 9A00 08D3 LAM AR0,AR0,2259 PSA reference 00007690 00000F94 40E2 E3C1 E3E3 D3C4 DC CL32' STATTLD ' 00007700 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000FB4 4000 0700 STH R0,1792 PSA reference 00007710 00000FB8 0001 DC H'0001' 00007720 00000FBA A500 06D3 IIHH R0,X'06D3' 00007730 00000FBE 40E2 E3C1 E3C4 4040 DC CL32' STATD ' 00007740 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00000FDE 4000 0500 STH R0,1280 PSA reference 00007750 00000FE2 0001 DC H'0001' 00007760 00000FE4 AE00 02D3 SIGP R0,R0,723 PSA reference 00007770 00000FE8 40E5 C6E8 E3D3 C440 DC CL32' VFYTLD ' 00007780 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00001008 4000 0600 STH R0,1536 PSA reference 00007790 0000100C 0001 DC H'0001' 00007800 0000100E B300 1AD3 LPEBR FR13,FR3 00007810 00001012 40E5 C6E8 C440 4040 DC CL32' VFYD ' 00007820 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00001032 4000 0400 STH R0,1024 PSA reference 00007830 00001036 0001 DC H'0001' 00007840 00001038 D000 01D3 40D4 TRTR 467(1),212(R4) PSA reference 00007850 0000103E E2C7 C440 4040 4040 DC CL31'SGD ' 00007860 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 40 0000105D 00 DC XL1'00' 00007870 0000105E 0400 SPM R0 00007880 00001060 0001 DC H'0001' 00007890 00001062 D400 3CD3 4000 NC 3283(1,R3),0(R4) 00007900 00001068 4F00 0000 CVB R0,0 PSA reference 00007910 0000106C 0000 00 DC XL3'000000' 00007920 0000106F C1C3 C3E3 C5D9 D940 DC CL8'ACCTERR ' 00007930 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000001077 02 DC XL1'02' 00007940 00001078 6700 6E01 MXD FR0,3585(,R6) 00007950 0000107C 1502 CLR R0,R2 00007960 0000107E 16C0 OR R12,R0 00007970 00001080 4A00 0000 AH R0,0 PSA reference 00007980 00001084 1850 LR R5,R0 00007990 00001086 FFFE DC XL2'FFFE' 00008000 00001088 1000 LPR R0,R0 00008010 0000108A 0000 DC H'0' 00008020 0000108C 0001 DC H'0001' 00008030 0000108E 6F00 0C00 SW FR0,3072 PSA reference 00008040 00001092 0000 DC H'0' 00008050 00001094 0000 0000 DC F'0' 00008060 00001098 0000 0000 DC F'0' 00008070 0000109C 0000 0000 DC F'0' 00008080 000010A0 0000 0000 DC F'0' 00008090 000010A4 0000 0000 DC F'0' 00008100 000010A8 0000 0000 DC F'0' 00008110 000010AC 0000 0000 DC F'0' 00008120 000010B0 0000 DC H'0' 00008130 000010B2 4040 4040 DC CL4' ' 00008140 000010B6 0000 DC H'0' 00008150 000010B8 001A 02 DC XL3'001A02' 00008160 000010BB F0 DC CL1'0' 00008170 000010BC 00 DC XL1'00' 00008180 000010BD F0C1 C3C3 D6E4 D5E3 DC CL27'0ACCOUNT FILE: ERROR REPORT' 00008190 40C6 C9D3 C57A 40C5 D9D9 D6D9 40D9 C5D7 D6D9 E3 000010D8 0000 0008 DC F'00008' 00008200 000010DC 02 DC XL1'02' 00008210 000010DD F0 DC CL1'0' 00008220 000010DE 0190 DC H'0400' 00008230 000010E0 C5D9 D9D6 D940 C1E3 DC CL8'ERROR AT' 00008240 000010E8 0000 000A DC F'00010' 00008250 000010EC 01 DC XL1'01' 00008260 000010ED F8 DC CL1'8' 00008270 000010EE 01 DC XL1'01' 00008280 000010EF 99 DC CL1'r' 00008290 000010F0 0000 0008 DC F'00008' 00008300 000010F4 01 DC XL1'01' 00008310 000010F5 F8 DC CL1'8' 00008320 000010F6 01 DC XL1'01' 00008330 000010F7 A4 DC CL1'u' 00008340 000010F8 0000 004F DC F'00079' 00008350 000010FC 01 DC XL1'01' 00008360 000010FD F8 DC CL1'8' 00008370 000010FE 0230 DC H'0560' 00008380 00001100 0000 004F DC F'00079' 00008390 00001104 01 DC XL1'01' 00008400 00001105 F8 DC CL1'8' 00008410 00001106 0280 DC H'0640' 00008420 00001108 0000 004F DC F'00079' 00008430 0000110C 01 DC XL1'01' 00008440 0000110D F8 DC CL1'8' 00008450 0000110E 02D0 DC H'0720' 00008460 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000001110 0000 003C DC F'00060' 00008470 00001114 02 DC XL1'02' 00008480 00001115 F0 DC CL1'0' 00008490 00001116 0370 DC H'0880' 00008500 00001118 D7D3 C5C1 E2C5 40C1 DC CL32'PLEASE ASK YOUR SUPERVISOR TO CO' 00008510 E2D2 40E8 D6E4 D940 E2E4 D7C5 D9E5 C9E2 D6D9 40E3 D640 C3D6 00001138 D5E5 C5E8 40E3 C8C9 DC CL28'NVEY THIS INFORMATION TO THE' 00008520 E240 C9D5 C6D6 D9D4 C1E3 C9D6 D540 E3D6 40E3 C8C5 00001154 0000 0011 DC F'00017' 00008530 00001158 02 DC XL1'02' 00008540 00001159 F0 DC CL1'0' 00008550 0000115A 03C0 DC H'0960' 00008560 0000115C D6D7 C5D9 C1E3 C9D6 DC CL17'OPERATIONS STAFF.' 00008570 D5E2 40E2 E3C1 C6C6 4B 0000116D 00 DC XL1'00' 00008580 0000116E 0000 DC H'0' 00008590 00001170 4002 F004 STH R0,4(R2,R15) 00008600 00001174 60E3 C8C5 D540 D7D9 DC CL32'-THEN PRESS "CLEAR". THIS TERMI' 00008610 C5E2 E240 7FC3 D3C5 C1D9 7F4B 4040 E3C8 C9E2 40E3 C5D9 D4C9 00001194 D5C1 D340 C9E2 40D5 DC CL32'NAL IS NO LONGER UNDER CONTROL O' 00008620 D640 D3D6 D5C7 C5D9 40E4 D5C4 C5D9 40C3 D6D5 E3D9 D6D3 40D6 000011B4 C600 0000 1702 EXRL 0,*+11780 00008630 000011BA F004 B0E3 C8C5 SRP 227(1,R11),2245(R12),4 00008640 000011C0 407F D5C1 C3E3 7F40 DC CL20' "NACT" APPLICATION.' 00008650 C1D7 D7D3 C9C3 C1E3 C9D6 D54B 000011D4 FFFF 00 DC XL3'FFFF00' 00008660 000011D7 F8C1 C4E2 C4 DC CL5'8ADSD' 00008670 000011DC 0003 0005 DC XL4'00030005' 00008680 000011E0 011A 0000 DC XL4'011A0000' 00008690 000011E4 4040 4040 4040 4040 DC CL14' L ' 00008700 4040 4040 D340 000011F2 00FF DC H'0255' 00008710 000011F4 00FE 0018 DC XL4'00FE0018' 00008720 000011F8 00 DC XL1'00' 00008730 000011F9 50 DC CL1'&&' 00008740 000011FA 4A00 C4C1 AH R0,1217(,R12) 00008750 000011FE E3C5 C540 4040 4040 DC CL30'TEE ' 00008760 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 0000121C 0005 0000 DC XL4'00050000' 00008770 00001220 000C 000A DC XL4'000C000A' 00008780 00001224 D340 E3C9 D4C5 C540 DC CL32'L TIMEE ' 00008790 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 1$PRIV000 'Disassembly of CSECT $PRIV000 of Load Module NACTSET ' 0 Loc Object Code Source Statement 000001244 4040 0005 STH R4,5 PSA reference 00008800 00001248 0000 0019 DC F'00025' 00008810 0000124C 0008 DC H'0008' 00008820 0000124E D340 D4E2 C7C5 4040 DC CL32'L MSGE ' 00008830 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 0000126E 4040 0004 STH R4,4 PSA reference 00008840 00001272 0001 DC H'0001' 00008850 00001274 0024 004F DC XL4'0024004F' 00008860 00001278 D340 D4E2 C7C5 4040 DC CL32'L MSGE ' 00008870 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 00001298 4040 0004 STH R4,4 PSA reference 00008880 0000129C 0002 0076 DC XL4'00020076' 00008890 000012A0 004F DC H'0079' 00008900 000012A2 D340 D4E2 C7C5 4040 DC CL32'L MSGE ' 00008910 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 4040 000012C2 4040 0004 STH R4,4 PSA reference 00008920 000012C6 0003 DC H'0003' 00008930 000012C8 00 DC XL1'00' 00008940 000012C9 C8 DC CL1'H' 00008950 000012CA 004F DC H'0079' 00008960 000012CC D340 FFFF FFFF MVZ 4095(65,R15),4095(R15) 00008970 ASMDREG 00008980 END 00008990 !! END OF JES SPOOL FILE !! 1ASMD008 The user of the COPYRIGHTOK option ensures that this use will not violate any copyright restrictions or other rights pertaining to the code being disassembled DIRECTORY INFO FOR MODULE NACT01 TTR OF MODULE=00000F CONCATENATION NBR=00 ALIAS INDIC=2C TTR, 1ST TXT RECD=000015 TTR OF NOTE/SCATTER LIST=000000 NBR NOTE ENTRIES=00 ATTRIBUTES 1=02C2 EXEC TOTAL LENGTH=005170 LENGTH OF 1ST TXT RECD=5170 E. P. ADDR=000020 ATTRIBUTES 2=88 AUTH CODE=00 - *** EXTERNAL SYMBOL TABLE *** 0 SYMBOL TYPE IND ADDR SEG LRID LENG ESDID ** DFHECI SD 01 B_TEXT ED 000000 00001E DFHECI LD 000000 DFHEI1 LD 000008 DLZEI01 LD 000008 DLZEI02 LD 000008 DLZEI03 LD 000008 DLZEI04 LD 000008 NACT01 SD 01 B_TEXT ED 000020 004F7C NACT01 LD 000020 IGZEBST ER 000000 DFHEI1 ER 000000 IGZEBST SD 01 B_TEXT ED 004FA0 0001D0 IGZEBST LD 004FA0 IGZEBS2 LD 0050C8 IGZETUN ER 000000 IGZEOPT ER 000000 - ***** RLD INFO ***** 0 RELPTR POSPTR TYPE LEN DIR ADDR 1DFHECI *** User Control Statements *** 0NACT01 1***** Label Table ***** 0 ADDR TYPE LEN SYMBOL 000008 E DLZEI04 000008 E DLZEI03 000008 E DLZEI02 000008 E DLZEI01 000008 E DFHEI1 000020 E A000020 1 ***** T E X T ***** 0000000 C4C6C8E8 C3F5F3F0 58F0021C 58F0F0D0 58F0F014 58F0F00C 58FF000C 07FF0000 DFHYC530.0...00..00..00......... 1DFHECI 'Disassembly of CSECT DFHECI of Load Module NACT01 ' 0 Loc Object Code Source Statement 0 DFHECI TITLE 'Disassembly of CSECT DFHECI of Load Module NACT01 ' 00000010 * Produced by ASMDASM on 2024.102 at 15:30:01 00000020 DFHECI CSECT 00000030 ENTRY DFHEI1 00000040 ENTRY DLZEI01 00000050 ENTRY DLZEI02 00000060 ENTRY DLZEI03 00000070 ENTRY DLZEI04 00000080 00000000 C4C6 C8E8 C3F5 F3F0 DC CL8'DFHYC530' 00000090 00000008 58F0 021C DFHEI1 L R15,540 PSA reference 00000100 0000000C 58F0 F0D0 L R15,208(,R15) 00000110 00000010 58F0 F014 L R15,20(,R15) 00000120 00000014 58F0 F00C L R15,12(,R15) 00000130 00000018 58FF 000C L R15,12(R15) 00000140 0000001C 07FF BR R15 00000150 SPACE 00000160 ASMDREG 00000170 END 00000180 !! END OF JES SPOOL FILE !! 1ASMD008 The user of the COPYRIGHTOK option ensures that this use will not violate any copyright restrictions or other rights pertaining to the code being disassembled DIRECTORY INFO FOR MODULE NACT02 TTR OF MODULE=000019 CONCATENATION NBR=00 ALIAS INDIC=2C TTR, 1ST TXT RECD=000101 TTR OF NOTE/SCATTER LIST=000000 NBR NOTE ENTRIES=00 ATTRIBUTES 1=02C2 EXEC TOTAL LENGTH=001EB0 LENGTH OF 1ST TXT RECD=1EB0 E. P. ADDR=000020 ATTRIBUTES 2=88 AUTH CODE=00 - *** EXTERNAL SYMBOL TABLE *** 0 SYMBOL TYPE IND ADDR SEG LRID LENG ESDID ** DFHECI SD 01 B_TEXT ED 000000 00001E DFHECI LD 000000 DFHEI1 LD 000008 DLZEI01 LD 000008 DLZEI02 LD 000008 DLZEI03 LD 000008 DLZEI04 LD 000008 NACT02 SD 01 B_TEXT ED 000020 001CC0 NACT02 LD 000020 IGZEBST ER 000000 DFHEI1 ER 000000 IGZEBST SD 01 B_TEXT ED 001CE0 0001D0 IGZEBST LD 001CE0 IGZEBS2 LD 001E08 IGZETUN ER 000000 IGZEOPT ER 000000 - ***** RLD INFO ***** 0 RELPTR POSPTR TYPE LEN DIR ADDR 1DFHECI *** User Control Statements *** 0NACT02 1***** Label Table ***** 0 ADDR TYPE LEN SYMBOL 000008 E DLZEI04 000008 E DLZEI03 000008 E DLZEI02 000008 E DLZEI01 000008 E DFHEI1 000020 E A000020 1 ***** T E X T ***** 0000000 C4C6C8E8 C3F5F3F0 58F0021C 58F0F0D0 58F0F014 58F0F00C 58FF000C 07FF0000 DFHYC530.0...00..00..00......... 1DFHECI 'Disassembly of CSECT DFHECI of Load Module NACT02 ' 0 Loc Object Code Source Statement 0 DFHECI TITLE 'Disassembly of CSECT DFHECI of Load Module NACT02 ' 00000010 * Produced by ASMDASM on 2024.102 at 15:30:01 00000020 DFHECI CSECT 00000030 ENTRY DFHEI1 00000040 ENTRY DLZEI01 00000050 ENTRY DLZEI02 00000060 ENTRY DLZEI03 00000070 ENTRY DLZEI04 00000080 00000000 C4C6 C8E8 C3F5 F3F0 DC CL8'DFHYC530' 00000090 00000008 58F0 021C DFHEI1 L R15,540 PSA reference 00000100 0000000C 58F0 F0D0 L R15,208(,R15) 00000110 00000010 58F0 F014 L R15,20(,R15) 00000120 00000014 58F0 F00C L R15,12(,R15) 00000130 00000018 58FF 000C L R15,12(R15) 00000140 0000001C 07FF BR R15 00000150 SPACE 00000160 ASMDREG 00000170 END 00000180 !! END OF JES SPOOL FILE !! 1ASMD008 The user of the COPYRIGHTOK option ensures that this use will not violate any copyright restrictions or other rights pertaining to the code being disassembled DIRECTORY INFO FOR MODULE NACT03 TTR OF MODULE=000105 CONCATENATION NBR=00 ALIAS INDIC=2C TTR, 1ST TXT RECD=00010B TTR OF NOTE/SCATTER LIST=000000 NBR NOTE ENTRIES=00 ATTRIBUTES 1=02C2 EXEC TOTAL LENGTH=000CC0 LENGTH OF 1ST TXT RECD=0CC0 E. P. ADDR=000020 ATTRIBUTES 2=88 AUTH CODE=00 - *** EXTERNAL SYMBOL TABLE *** 0 SYMBOL TYPE IND ADDR SEG LRID LENG ESDID ** DFHECI SD 01 B_TEXT ED 000000 00001E DFHECI LD 000000 DFHEI1 LD 000008 DLZEI01 LD 000008 DLZEI02 LD 000008 DLZEI03 LD 000008 DLZEI04 LD 000008 NACT03 SD 01 B_TEXT ED 000020 000AD0 NACT03 LD 000020 IGZEBST ER 000000 DFHEI1 ER 000000 IGZEBST SD 01 B_TEXT ED 000AF0 0001D0 IGZEBST LD 000AF0 IGZEBS2 LD 000C18 IGZETUN ER 000000 IGZEOPT ER 000000 - ***** RLD INFO ***** 0 RELPTR POSPTR TYPE LEN DIR ADDR 1DFHECI *** User Control Statements *** 0NACT03 1***** Label Table ***** 0 ADDR TYPE LEN SYMBOL 000008 E DLZEI04 000008 E DLZEI03 000008 E DLZEI02 000008 E DLZEI01 000008 E DFHEI1 000020 E A000020 1 ***** T E X T ***** 0000000 C4C6C8E8 C3F5F3F0 58F0021C 58F0F0D0 58F0F014 58F0F00C 58FF000C 07FF0000 DFHYC530.0...00..00..00......... 1DFHECI 'Disassembly of CSECT DFHECI of Load Module NACT03 ' 0 Loc Object Code Source Statement 0 DFHECI TITLE 'Disassembly of CSECT DFHECI of Load Module NACT03 ' 00000010 * Produced by ASMDASM on 2024.102 at 15:30:02 00000020 DFHECI CSECT 00000030 ENTRY DFHEI1 00000040 ENTRY DLZEI01 00000050 ENTRY DLZEI02 00000060 ENTRY DLZEI03 00000070 ENTRY DLZEI04 00000080 00000000 C4C6 C8E8 C3F5 F3F0 DC CL8'DFHYC530' 00000090 00000008 58F0 021C DFHEI1 L R15,540 PSA reference 00000100 0000000C 58F0 F0D0 L R15,208(,R15) 00000110 00000010 58F0 F014 L R15,20(,R15) 00000120 00000014 58F0 F00C L R15,12(,R15) 00000130 00000018 58FF 000C L R15,12(R15) 00000140 0000001C 07FF BR R15 00000150 SPACE 00000160 ASMDREG 00000170 END 00000180 !! END OF JES SPOOL FILE !! 1ASMD008 The user of the COPYRIGHTOK option ensures that this use will not violate any copyright restrictions or other rights pertaining to the code being disassembled DIRECTORY INFO FOR MODULE NACT04 TTR OF MODULE=00010E CONCATENATION NBR=00 ALIAS INDIC=2C TTR, 1ST TXT RECD=000114 TTR OF NOTE/SCATTER LIST=000000 NBR NOTE ENTRIES=00 ATTRIBUTES 1=02C2 EXEC TOTAL LENGTH=0046E8 LENGTH OF 1ST TXT RECD=46E8 E. P. ADDR=000020 ATTRIBUTES 2=88 AUTH CODE=00 - *** EXTERNAL SYMBOL TABLE *** 0 SYMBOL TYPE IND ADDR SEG LRID LENG ESDID ** DFHECI SD 01 B_TEXT ED 000000 00001E DFHECI LD 000000 DFHEI1 LD 000008 DLZEI01 LD 000008 DLZEI02 LD 000008 DLZEI03 LD 000008 DLZEI04 LD 000008 NACT04 SD 01 B_TEXT ED 000020 0044F6 NACT04 LD 000020 IGZEBST ER 000000 DFHEI1 ER 000000 IGZEBST SD 01 B_TEXT ED 004518 0001D0 IGZEBST LD 004518 IGZEBS2 LD 004640 IGZETUN ER 000000 IGZEOPT ER 000000 - ***** RLD INFO ***** 0 RELPTR POSPTR TYPE LEN DIR ADDR 1DFHECI *** User Control Statements *** 0NACT04 1***** Label Table ***** 0 ADDR TYPE LEN SYMBOL 000008 E DLZEI04 000008 E DLZEI03 000008 E DLZEI02 000008 E DLZEI01 000008 E DFHEI1 000020 E A000020 1 ***** T E X T ***** 0000000 C4C6C8E8 C3F5F3F0 58F0021C 58F0F0D0 58F0F014 58F0F00C 58FF000C 07FF0000 DFHYC530.0...00..00..00......... 1DFHECI 'Disassembly of CSECT DFHECI of Load Module NACT04 ' 0 Loc Object Code Source Statement 0 DFHECI TITLE 'Disassembly of CSECT DFHECI of Load Module NACT04 ' 00000010 * Produced by ASMDASM on 2024.102 at 15:30:02 00000020 DFHECI CSECT 00000030 ENTRY DFHEI1 00000040 ENTRY DLZEI01 00000050 ENTRY DLZEI02 00000060 ENTRY DLZEI03 00000070 ENTRY DLZEI04 00000080 00000000 C4C6 C8E8 C3F5 F3F0 DC CL8'DFHYC530' 00000090 00000008 58F0 021C DFHEI1 L R15,540 PSA reference 00000100 0000000C 58F0 F0D0 L R15,208(,R15) 00000110 00000010 58F0 F014 L R15,20(,R15) 00000120 00000014 58F0 F00C L R15,12(,R15) 00000130 00000018 58FF 000C L R15,12(R15) 00000140 0000001C 07FF BR R15 00000150 SPACE 00000160 ASMDREG 00000170 END 00000180 !! END OF JES SPOOL FILE !! 1ASMD008 The user of the COPYRIGHTOK option ensures that this use will not violate any copyright restrictions or other rights pertaining to the code being disassembled DIRECTORY INFO FOR MODULE NACT05 TTR OF MODULE=000117 CONCATENATION NBR=00 ALIAS INDIC=2C TTR, 1ST TXT RECD=00011D TTR OF NOTE/SCATTER LIST=000000 NBR NOTE ENTRIES=00 ATTRIBUTES 1=02C2 EXEC TOTAL LENGTH=0017C8 LENGTH OF 1ST TXT RECD=17C8 E. P. ADDR=000020 ATTRIBUTES 2=88 AUTH CODE=00 - *** EXTERNAL SYMBOL TABLE *** 0 SYMBOL TYPE IND ADDR SEG LRID LENG ESDID ** DFHECI SD 01 B_TEXT ED 000000 00001E DFHECI LD 000000 DFHEI1 LD 000008 DLZEI01 LD 000008 DLZEI02 LD 000008 DLZEI03 LD 000008 DLZEI04 LD 000008 NACT05 SD 01 B_TEXT ED 000020 0015D4 NACT05 LD 000020 IGZEBST ER 000000 DFHEI1 ER 000000 IGZEBST SD 01 B_TEXT ED 0015F8 0001D0 IGZEBST LD 0015F8 IGZEBS2 LD 001720 IGZETUN ER 000000 IGZEOPT ER 000000 - ***** RLD INFO ***** 0 RELPTR POSPTR TYPE LEN DIR ADDR 1DFHECI *** User Control Statements *** 0NACT05 1***** Label Table ***** 0 ADDR TYPE LEN SYMBOL 000008 E DLZEI04 000008 E DLZEI03 000008 E DLZEI02 000008 E DLZEI01 000008 E DFHEI1 000020 E A000020 1 ***** T E X T ***** 0000000 C4C6C8E8 C3F5F3F0 58F0021C 58F0F0D0 58F0F014 58F0F00C 58FF000C 07FF0000 DFHYC530.0...00..00..00......... 1DFHECI 'Disassembly of CSECT DFHECI of Load Module NACT05 ' 0 Loc Object Code Source Statement 0 DFHECI TITLE 'Disassembly of CSECT DFHECI of Load Module NACT05 ' 00000010 * Produced by ASMDASM on 2024.102 at 15:30:02 00000020 DFHECI CSECT 00000030 ENTRY DFHEI1 00000040 ENTRY DLZEI01 00000050 ENTRY DLZEI02 00000060 ENTRY DLZEI03 00000070 ENTRY DLZEI04 00000080 00000000 C4C6 C8E8 C3F5 F3F0 DC CL8'DFHYC530' 00000090 00000008 58F0 021C DFHEI1 L R15,540 PSA reference 00000100 0000000C 58F0 F0D0 L R15,208(,R15) 00000110 00000010 58F0 F014 L R15,20(,R15) 00000120 00000014 58F0 F00C L R15,12(,R15) 00000130 00000018 58FF 000C L R15,12(R15) 00000140 0000001C 07FF BR R15 00000150
The optional OPTABLE
parameter values for ASMDASM
are documented in the
HLASM Installation and Customization Guide.