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.