|
|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 13898 (0x364a)
Notes: pts_type(SC)
Names: »DKRUT2.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »S:DU/DKRUT2.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DU/DKRUT2.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »S:DU/DKRUT2.SC«
IDENT DKRUT2 UPD 80-01-21/CHST ********************************************************** * * * AFTER EXECUTION, THE DATA-ITEM DEBINW4 WILL BE SET AS * FOLLOWS: * 0 = NO ERROR * 20 = NO SYSTEMDISC IN SYSTEM * 21 = NO DISC IN SPECIFIED UNIT * 22 = DISC I/0-ERROR * 23 = DISC NOT OPERABLE * *********************************************************** DDUM DDINIT PDIV EXT WAIT ENTRY ENTFMT ENTRY DELFMT ENTRY PREFMT ENTRY NEXFMT EXT SFMTCH EXT FREESP EXT DISU EXT RELEAS EXT NXPRFM EXT DLRCCH EXT RFRSP EXT RD EXT REFSP EXT EMPTYT EXT WRFSP EXT NOFFRE EXT COND EXT ALGO EXT RETURN EXT EMPTYT EXT DEPOOL EXT GETIND EXT DEDISC EXT CMPIND EXT OPENF EXT CLOSEF ENTRY OPCL WEOF EQU 3 CLOSE FILE EJECT OPCL PROC FUCO MOVE DEBINW4,W0 IB FUCO C OPENSY C CLOSSY C OPENUS C CLOSUS OPENSY TBF BOOLA1,GOON SWITCH B OPENSY GOON SET SWITSY BNZ OPENSY04 SET BOOLA1 CLEAR SWIT04 INCREASE DISC-COUNTER ADD FCOUNTER(W1),W1 ALREADY ASSIGNED? CBG FCOUNTER(W1),W1,OPENSY04 MOVE STRG10A,=C'SYSFIL ' MOVE JOBNAME,FVOLNAME(W1) CALL OPENF,DISK,FILECODE(W1),SYSBUF,STRG10A,JOBNAME BOK OPENSY02 OPENSY06 CALL CLOSEF,DISK,FILECODE(W1),SYSBUF,W0 CLEAR SWITSY MOVE DEBINW4,W20 SUB FCOUNTER(W1),W1 B OPENSY04 OPENSY02 MOVE LRUQUE,HEX00 MOVE DKBIN1,W1 DES1 CALL CMPIND,DKBIN1,BPOOL(W1) BNOK DES2 OUT OF RANGE MOVE RPOOL(DKBIN1),=X'5800' ADD DKBIN1,W1 B DES1 DES2 PERF NOFFRE,DEBIN1,W1 MOVE FNOOFREC(W1),DEBIN1 PERF DISU,W1,W1,SYSBUF XCOPY F95PROC(W1),W0,W2,SYSBUF,W5 XCOPY FRINF(W1),W0,W2,SYSBUF,W1 MOVE DKBIN1,W1 MOVE DKBIN2,W1 PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A BNOK OPENSY06 MOVE FINDEXPO(W1),DKBIN1 PERF REFSP,W2,W1 BNOK OPENSY06 OPENSY07 READ SYSTEM VARIABLES PERF DEDISC,W19 OPENSY04 CLEAR BOOLA1 PERF COND SET CONDITION-REG RET CLOSSY TBF SWITSY,CLOSSY02 CLEAR SWITSY SUB FCOUNTER(W1),W1 CBG FCOUNTER(W1),W0,CLOSSY02 PERF WRFSP,W1 BNOK CLOSSY01 PERF DISU,W1,W1,SYSBUF BNOK CLOSSY01 PERF DISU,W2,W1,SYSBUF CLOSSY01 CALL CLOSEF,DISK,FILECODE(W1),SYSBUF,W0 CLOSSY02 PERF COND RET OPENUS TBF BOOLA2,GOONN SWITCH B OPENUS OPENUS0E PERF DISU,W3,W1,RBUF BERR OPENUS03 PERF SETUSE BERR OPENUS03 B OPENUS01 GOONN SET SWITUS BNZ OPENUS0C SET BOOLA2 CLEAR SWIT01 ADD FCOUNTER(FILINDUS),W1 CBG FCOUNTER(FILINDUS),W1,OPENUS0E MOVE STRG10A,=C'PTS-DE ' MOVE STR6A,FVOLNAME(FILINDUS) CALL OPENF,DISK,FILECODE(FILINDUS),RBUF,STRG10A,STR6A BNOK OPENUS02 PERF NOFFRE,DEBIN1,FILINDUS BOK OPENUS0D SET SWIT01 OPENUS0D MOVE FNOOFREC(FILINDUS),DEBIN1 PERF DISU,W3,W1,RBUF BERR OPENUS02 OPENUS0A XCOPY F95PROC(FILINDUS),W0,W2,RBUF,W5 GET FILESTATUS MOVE DKBIN1,W0 XCOPY DKBIN1,W1,W1,RBUF,W0 XCOPY FRINF(FILINDUS),W0,W2,RBUF,W1 FILE CLOSED? CBE DKBIN1,W0,USCLS SET SWIT01 USCLS XCOPY RBUF,W0,W1,W7,W1 PERF DISU,W4,W1,RBUF BOK OPENUS0B SET SWIT01 OPENUS0B PERF SETUSE BERR OPENUS02 MOVE DKBIN3,W1 MOVE DKBIN2,W1 PERF DEPOOL,W2,DKBIN3,DKBIN2,STRG10A BNOK OPENUS02 MOVE FINDEXPO(FILINDUS),DKBIN3 PERF REFSP,W2,FILINDUS PERF RELEAS BOK OPENUS01 MOVE DKBIN1,FINDEXPO(FILINDUS) PERF DEPOOL,W6,DKBIN1,DKBIN2,STRG10A OPENUS02 CALL CLOSEF,DISK,FILECODE(FILINDUS),SYSBUF,W0 MOVE DEBINW4,W21 OPENUS03 CLEAR SWITUS SUB FCOUNTER(FILINDUS),W1 B OPENUS0C OPENUS01 TBF SWIT01,OPENUS0C MOVE DEBINW4,=W'-2' OPENUS0C CLEAR BOOLA2 PERF COND RET CLOSUS TBF SWITUS,CLOSUS01 CLEAR SWITUS SUB FCOUNTER(FILINDUS),W1 BP CLOSUS01 PERF WRFSP,FILINDUS PERF RELEAS BNOK CLOSUS02 MOVE DKBIN1,FINDEXPO(FILINDUS) PERF DEPOOL,W6,DKBIN1,DKBIN2,STRG10A PERF DISU,W3,W1,RBUF BNOK CLOSUS02 XCOPY RBUF,W0,W1,W0,W1 PERF DISU,W4,W1,RBUF BNOK CLOSUS02 CLOSUS02 CALL CLOSEF,DISK,FILECODE(FILINDUS),SYSBUF,W0 CLOSUS01 PERF COND RET PEND SETUSE PROC XCOPY SECLEN,W0,W2,RBUF,W9 CBNE SECLEN,W0,SETCOP MOVE SECLEN,=W'256' SETCOP XCOPY DKBIN1,W0,W2,RBUF,W7 CBNE DKBIN1,W0,SETNOZ MOVE DKBIN1,W1 SETNOZ MUL DKBIN1,SECLEN CALL GETIND,RBUF,DKBIN2,DKBIN3 CBNG DKBIN1,DKBIN2,SETOKA MOVE DEBINW4,W22 MOVE BCD13A,=D'0' B SETRET SETOKA MOVE USELEN,DKBIN1 SUB DKBIN1,W15 MOVE MAXOCC,DKBIN1 SETRET PERF COND RET PEND EJECT DUMPROC PROC FC * ENTFMT ENTER FORMAT PERF WAIT BERR RETURN MOVE STR6A,FORMAT PERF FREESP,DEBIN1,W1 BERR RETURN MOVE WORK(W9),DEBIN1 B WRTFMT FMTCHAIN MOVE DEBIN5,W4 RDCHAIN MOVE DEBIN3,DEBIN5 PERF DISU,W1,DEBIN3,SYSBUF READ FORMATCHAIN BNERR FST3 CBE DEBINW4,=W'30',FFIRST B RETURN FST3 XCOPY DEBIN4,W0,W2,SYSBUF,W6 OCCUPIED SPACE TO DEBIN4 CBG DEBIN4,=W'180',RENEXT NO SPACE FOR MORE ENTRIES? ADDENTRY XCOPY STRG10A,W0,W2,W0,W0 STATUS = '00' COPY STRG10A,W2,W6,FORMAT,W0 NAME XCOPY STRG10A,W8,W2,WORK(W9),W0 FREESPACE-RECNR = PTR TO FMT COPY SYSBUF,DEBIN4,W10,STRG10A,W0 INSERT ENTRY TO CHAIN ADD DEBIN4,W10 XCOPY SYSBUF,W6,W2,DEBIN4,W0 SET OCCUPIED SPACE PERF DISU,W2,DEBIN5,SYSBUF B RETURN FFIRST MOVE DEBIN3,W0 MOVE DEBINW4,W0 B FFST01 RENEXT XCOPY DEBIN5,W0,W2,SYSBUF,W4 GET LINK TO NEXT CBNE DEBIN5,W0,RDCHAIN PERF FREESP,DEBIN5,W1 BERR RETURN XCOPY SYSBUF,W4,W2,DEBIN5,W0 PERF DISU,W2,DEBIN3,SYSBUF FFST01 MOVE DEBIN4,W10 MOVE SYSBUF,=X'464300' SET SCTR-IDENTIFICATION XCOPY SYSBUF,W2,W2,DEBIN3,W0 SET LINK TO PREV XCOPY SYSBUF,W4,W2,W0,W0 LINK TO NEXT = 0 B ADDENTRY WRTFMT MOVE DEBIN3,PINDFR PERF ALGO,W1 SET FORMAT-IDENTIFICATION NEGST MOVE DEBIN2,W0 XCOPY DEBIN2,W1,W1,RPOOL(DEBIN3),W8 GET LINK NEXT BUF XCOPY SYSBUF,W8,W2,RPOOL(DEBIN3),W17 CBE DEBIN2,W0,NOMOREC LAST RECORD? PERF FREESP,DEBIN4,W1 BNERR COP MOVE DEBIN2,WORK(W9) SAVE POINTER TO 1:ST FORMAT RECORD MOVE WORK(W9),DEBINW4 SAVE ERROR CODE PERF DISU,W1,DEBIN2,SYSBUF READ FIRST FORMAT RECORD BERR RETURN B DELF2 COP XCOPY SYSBUF,W4,W2,DEBIN4,W0 SET LINK NEXT REC COPY SYSBUF,W10,W188,BPOOL(DEBIN3),W0 PERF DISU,W2,DEBIN1,SYSBUF BERR RETURN TBF SWIT01,CO10 B FMTCHAIN CO10 MOVE DEBIN3,DEBIN2 MOVE DEBIN1,=X'4600' XCOPY SYSBUF,W0,W2,DEBIN1,W0 MOVE DEBIN1,DEBIN4 B NEGST NOMOREC MOVE DEBIN4,W0 SET SWIT01 B COP * * * * * NEXFMT GET NEXT FORMAT SET SWIT03 * * PREFMT MOVE FRMTPNTR,W0 CALL EMPTYT,FORMAT BZ RRECNX MOVE RNRFMCH,W4 MOVE PTRFMCH,W0 TBT SWIT03,RRECNX ADD PTRFMCH,W20 RRECNX CBNE RNRFMCH,W0,RRECNZ MOVE STR6A,FORMAT PERF SFMTCH,W4,SYSBUF,W10 BERR RETURN MOVE RNRFMCH,DEBIN1 MOVE PTRFMCH,DEBIN2 SUB PTRFMCH,W8 RRECNZ PERF WAIT BERR RETURN RRECNY PERF DISU,W1,RNRFMCH,SYSBUF BNERR RREC01 CBE DEBINW4,=W'30',OUTOFRAN B RETURN OUTOFRAN MOVE DEBINW4,W9 MOVE RNRFMCH,W0 B RETURN RREC01 XCOPY DEBIN1,W0,W2,SYSBUF,W6 GET USED SPACE TBF SWIT03,RREC02 ADD PTRFMCH,W10 CBE PTRFMCH,DEBIN1,RREC03 RREC07 MOVE DEBIN1,PTRFMCH B RREC04 RREC03 MOVE DEBIN1,W4 RREC05 XCOPY DEBIN5,W0,W2,SYSBUF,DEBIN1 CBE DEBIN5,W0,OUTOFRAN MOVE RNRFMCH,DEBIN5 TBF SWIT03,RRECNY MOVE PTRFMCH,W0 B RRECNY RREC02 CBL PTRFMCH,W20,RREC06 CBNL DEBIN1,PTRFMCH,RREC02A IF WITHIN USED SPACE MOVE PTRFMCH,DEBIN1 UPDATE WITH MAX LIMIT RREC02A SUB PTRFMCH,W10 B RREC07 RREC06 MOVE PTRFMCH,=W'190' MOVE DEBIN1,W2 B RREC05 RREC04 ADD DEBIN1,W2 MOVE STRG10A,=X'4600' COPY STRG10A,W1,W6,SYSBUF,DEBIN1 COPY FORMAT,W0,W6,SYSBUF,DEBIN1 MOVE STR6A,FORMAT B NXPRFM * * * DELFMT DELETE FORMAT PERF WAIT BNOK RETURN MOVE STR6A,FORMAT CLEAR SWIT04 PERF SFMTCH,W4,SYSBUF,W10 BERR RETURN MOVE BIN16,DEBIN1 SUB DEBIN2,W6 DEBIN2=PTR TO ENTRY IN REC XCOPY DEBIN1,W0,W2,SYSBUF,W6 DEBIN1=OCC. SPACE DLETE SYSBUF,DEBIN2,W10 SUB DEBIN1,W10 XCOPY SYSBUF,W6,W2,DEBIN1,W0 SET OCC SPACE CBG DEBIN1,W10,DELF1 CLEAR SWIT04 PERF DLRCCH,SYSBUF BERR RETURN DELF1 PERF DISU,W2,BIN16,SYSBUF BERR RETURN MOVE DEBIN2,DEBIN3 PERF DISU,W1,DEBIN2,SYSBUF BERR RETURN PERF ALGO,W2 BNERR DELF2 DELF3 MOVE DEBINW4,W9 DELF31 CBNE FC,W9,DELF32 JUMP IF NOT ENTFMT MOVE DEBINW4,WORK(W9) RESTORE ORIGINAL ERROR CODE DELF32 B RETURN DELF2 XCOPY DEBIN1,W0,W2,SYSBUF,W4 XCOPY SYSBUF,W0,W2,W0,W0 DESTROY ALGORITMH PERF DISU,W2,DEBIN2,SYSBUF FIRST RECORD BERR RETURN PERF RFRSP,DEBIN2,W1 DELF CBE DEBIN1,W0,DELF31 PERF DISU,W1,DEBIN1,SYSBUF BERR RETURN COPY STR2A,W0,W2,SYSBUF,W0 CBNE STR2A,=X'4600',DELF3 PERF RFRSP,DEBIN1,W1 XCOPY DEBIN1,W0,W2,SYSBUF,W4 B DELF * PEND END
0x0000…0028 (0, 0, 400) Head {h00=0x0024, h01=0x0050, text=» IDENT DKRUT2 UPD 80-01-21/CHST «, t00=0x0000, t01=0x0004}
0x0028…006a Head {h00=0x003e, h01=0x003a, text=»**********************************************************«, t00=0x0000, t01=0x002c}
0x006a…0074 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x006e}
0x0074…007e Head {h00=0x0006, h01=0x0002, text=»* «, t00=0x0000, t01=0x0078}
0x007e…00c2 Head {h00=0x0040, h01=0x0050, text=»* AFTER EXECUTION, THE DATA-ITEM DEBINW4 WILL BE SET AS «, t00=0x0000, t01=0x0082}
0x00c2…00d8 Head {h00=0x0012, h01=0x000e, text=»* FOLLOWS:«, t00=0x0000, t01=0x00c6}
0x00d8…00fc Head {h00=0x0020, h01=0x001c, text=»* 0 = NO ERROR«, t00=0x0000, t01=0x00dc}
0x00fc…0130 Head {h00=0x0030, h01=0x002b, text=»* 20 = NO SYSTEMDISC IN SYSTEM «, t00=0x0000, t01=0x0100}
0x0130…0166 Head {h00=0x0032, h01=0x0050, text=»* 21 = NO DISC IN SPECIFIED UNIT «, t00=0x0000, t01=0x0134}
0x0166…0190 Head {h00=0x0026, h01=0x0050, text=»* 22 = DISC I/0-ERROR«, t00=0x0000, t01=0x016a}
0x0190…01be (1, 0, 400) Head {h00=0x002a, h01=0x0050, text=»* 23 = DISC NOT OPERABLE «, t00=0x0001, t01=0x0004}
0x01be…01c8 Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x0032}
0x01c8…020c Head {h00=0x0040, h01=0x003b, text=»*********************************************************** «, t00=0x0001, t01=0x003c}
0x020c…0220 Head {h00=0x0010, h01=0x0050, text=» DDUM DDINIT«, t00=0x0001, t01=0x0080}
0x0220…022e Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0001, t01=0x0094}
0x022e…0240 Head {h00=0x000e, h01=0x0050, text=» EXT WAIT «, t00=0x0001, t01=0x00a2}
0x0240…0256 Head {h00=0x0012, h01=0x000d, text=» ENTRY ENTFMT «, t00=0x0001, t01=0x00b4}
0x0256…026c Head {h00=0x0012, h01=0x000d, text=» ENTRY DELFMT «, t00=0x0001, t01=0x00ca}
0x026c…0282 Head {h00=0x0012, h01=0x000d, text=» ENTRY PREFMT «, t00=0x0001, t01=0x00e0}
0x0282…0298 Head {h00=0x0012, h01=0x000d, text=» ENTRY NEXFMT «, t00=0x0001, t01=0x00f6}
0x0298…02ac Head {h00=0x0010, h01=0x000b, text=» EXT SFMTCH «, t00=0x0001, t01=0x010c}
0x02ac…02c0 Head {h00=0x0010, h01=0x000b, text=» EXT FREESP «, t00=0x0001, t01=0x0120}
0x02c0…02d2 Head {h00=0x000e, h01=0x0009, text=» EXT DISU «, t00=0x0001, t01=0x0134}
0x02d2…02e6 Head {h00=0x0010, h01=0x000b, text=» EXT RELEAS «, t00=0x0001, t01=0x0146}
0x02e6…02fa Head {h00=0x0010, h01=0x0050, text=» EXT NXPRFM «, t00=0x0001, t01=0x015a}
0x02fa…030e Head {h00=0x0010, h01=0x0050, text=» EXT DLRCCH «, t00=0x0001, t01=0x016e}
0x030e…0320 Head {h00=0x000e, h01=0x0050, text=» EXT RFRSP«, t00=0x0001, t01=0x0182}
0x0320…0330 (2, 0, 400) Head {h00=0x000c, h01=0x0050, text=» EXT RD «, t00=0x0002, t01=0x0004}
0x0330…0342 Head {h00=0x000e, h01=0x0050, text=» EXT REFSP«, t00=0x0002, t01=0x0014}
0x0342…0356 Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0002, t01=0x0026}
0x0356…0368 Head {h00=0x000e, h01=0x0050, text=» EXT WRFSP«, t00=0x0002, t01=0x003a}
0x0368…037c Head {h00=0x0010, h01=0x0050, text=» EXT NOFFRE «, t00=0x0002, t01=0x004c}
0x037c…038e Head {h00=0x000e, h01=0x0050, text=» EXT COND «, t00=0x0002, t01=0x0060}
0x038e…03a0 Head {h00=0x000e, h01=0x0050, text=» EXT ALGO «, t00=0x0002, t01=0x0072}
0x03a0…03b4 Head {h00=0x0010, h01=0x0050, text=» EXT RETURN «, t00=0x0002, t01=0x0084}
0x03b4…03c8 Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0002, t01=0x0098}
0x03c8…03dc Head {h00=0x0010, h01=0x0050, text=» EXT DEPOOL «, t00=0x0002, t01=0x00ac}
0x03dc…03f0 Head {h00=0x0010, h01=0x0050, text=» EXT GETIND «, t00=0x0002, t01=0x00c0}
0x03f0…0404 Head {h00=0x0010, h01=0x0050, text=» EXT DEDISC «, t00=0x0002, t01=0x00d4}
0x0404…0418 Head {h00=0x0010, h01=0x0050, text=» EXT CMPIND «, t00=0x0002, t01=0x00e8}
0x0418…042a Head {h00=0x000e, h01=0x0050, text=» EXT OPENF«, t00=0x0002, t01=0x00fc}
0x042a…043e Head {h00=0x0010, h01=0x0050, text=» EXT CLOSEF «, t00=0x0002, t01=0x010e}
0x043e…0452 Head {h00=0x0010, h01=0x0050, text=» ENTRY OPCL «, t00=0x0002, t01=0x0122}
0x0452…045a Head {h00=0x0004, h01=0x0003, t00=0x0002, t01=0x0136}
0x045a…0478 Head {h00=0x001a, h01=0x0015, text=»WEOF EQU 3 CLOSE FILE «, t00=0x0002, t01=0x013e}
0x0478…0486 Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0002, t01=0x015c}
0x0486…049c Head {h00=0x0012, h01=0x0050, text=»OPCL PROC FUCO«, t00=0x0002, t01=0x016a}
0x049c…04b4 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0002, t01=0x0180}
0x04b4…04c8 Head {h00=0x0010, h01=0x0050, text=» IB FUCO C «, t00=0x0003, t01=0x0008}
0x04c8…04dc Head {h00=0x0010, h01=0x0050, text=» OPENSY C «, t00=0x0003, t01=0x001c}
0x04dc…04f0 Head {h00=0x0010, h01=0x0050, text=» CLOSSY C «, t00=0x0003, t01=0x0030}
0x04f0…0504 Head {h00=0x0010, h01=0x0050, text=» OPENUS C «, t00=0x0003, t01=0x0044}
0x0504…0514 Head {h00=0x000c, h01=0x0050, text=» CLOSUS«, t00=0x0003, t01=0x0058}
0x0514…0522 Head {h00=0x000a, h01=0x0050, text=»OPENSY«, t00=0x0003, t01=0x0068}
0x0522…053a Head {h00=0x0014, h01=0x0050, text=» TBF BOOLA1,GOON«, t00=0x0003, t01=0x0076}
0x053a…054a Head {h00=0x000c, h01=0x0050, text=» SWITCH «, t00=0x0003, t01=0x008e}
0x054a…055c Head {h00=0x000e, h01=0x0050, text=» B OPENSY «, t00=0x0003, t01=0x009e}
0x055c…0568 Head {h00=0x0008, h01=0x0050, text=»GOON«, t00=0x0003, t01=0x00b0}
0x0568…057c Head {h00=0x0010, h01=0x0050, text=» SET SWITSY «, t00=0x0003, t01=0x00bc}
0x057c…0592 Head {h00=0x0012, h01=0x0050, text=» BNZ OPENSY04 «, t00=0x0003, t01=0x00d0}
0x0592…05a6 Head {h00=0x0010, h01=0x0050, text=» SET BOOLA1 «, t00=0x0003, t01=0x00e6}
0x05a6…05bc Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT04 «, t00=0x0003, t01=0x00fa}
0x05bc…05dc Head {h00=0x001c, h01=0x0050, text=» INCREASE DISC-COUNTER«, t00=0x0003, t01=0x0110}
0x05dc…05f8 Head {h00=0x0018, h01=0x0050, text=» ADD FCOUNTER(W1),W1«, t00=0x0003, t01=0x0130}
0x05f8…0614 Head {h00=0x0018, h01=0x0050, text=» ALREADY ASSIGNED?«, t00=0x0003, t01=0x014c}
0x0614…063a Head {h00=0x0022, h01=0x0050, text=» CBG FCOUNTER(W1),W1,OPENSY04 «, t00=0x0003, t01=0x0168}
0x063a…065c Head {h00=0x001e, h01=0x0050, text=» MOVE STRG10A,=C'SYSFIL ' «, t00=0x0003, t01=0x018e}
0x065c…067e Head {h00=0x001e, h01=0x0050, text=» MOVE JOBNAME,FVOLNAME(W1)«, t00=0x0004, t01=0x0020}
0x067e…06ba Head {h00=0x0038, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W1),SYSBUF,STRG10A,JOBNAME«, t00=0x0004, t01=0x0042}
0x06ba…06d0 Head {h00=0x0012, h01=0x0050, text=» BOK OPENSY02 «, t00=0x0004, t01=0x007e}
0x06d0…06e0 Head {h00=0x000c, h01=0x0050, text=»OPENSY06«, t00=0x0004, t01=0x0094}
0x06e0…0710 Head {h00=0x002c, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(W1),SYSBUF,W0«, t00=0x0004, t01=0x00a4}
0x0710…0726 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWITSY «, t00=0x0004, t01=0x00d4}
0x0726…0740 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W20 «, t00=0x0004, t01=0x00ea}
0x0740…075c Head {h00=0x0018, h01=0x0050, text=» SUB FCOUNTER(W1),W1«, t00=0x0004, t01=0x0104}
0x075c…0770 Head {h00=0x0010, h01=0x0050, text=» B OPENSY04 «, t00=0x0004, t01=0x0120}
0x0770…0780 Head {h00=0x000c, h01=0x0050, text=»OPENSY02«, t00=0x0004, t01=0x0134}
0x0780…079a Head {h00=0x0016, h01=0x0050, text=» MOVE LRUQUE,HEX00«, t00=0x0004, t01=0x0144}
0x079a…07a2 Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x015e}
0x07a2…07ba Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W1 «, t00=0x0004, t01=0x0166}
0x07ba…07c6 Head {h00=0x0008, h01=0x0050, text=»DES1«, t00=0x0004, t01=0x017e}
0x07c6…07ec Head {h00=0x0022, h01=0x0050, text=» CALL CMPIND,DKBIN1,BPOOL(W1) «, t00=0x0004, t01=0x018a}
0x07ec…080c Head {h00=0x001c, h01=0x0050, text=» BNOK DES2 OUT OF RANGE «, t00=0x0005, t01=0x0020}
0x080c…0830 Head {h00=0x0020, h01=0x0050, text=» MOVE RPOOL(DKBIN1),=X'5800'«, t00=0x0005, t01=0x0040}
0x0830…0846 Head {h00=0x0012, h01=0x0050, text=» ADD DKBIN1,W1«, t00=0x0005, t01=0x0064}
0x0846…0856 Head {h00=0x000c, h01=0x0050, text=» B DES1 «, t00=0x0005, t01=0x007a}
0x0856…0862 Head {h00=0x0008, h01=0x0050, text=»DES2«, t00=0x0005, t01=0x008a}
0x0862…0880 Head {h00=0x001a, h01=0x0050, text=» PERF NOFFRE,DEBIN1,W1«, t00=0x0005, t01=0x0096}
0x0880…08a2 Head {h00=0x001e, h01=0x0050, text=» MOVE FNOOFREC(W1),DEBIN1 «, t00=0x0005, t01=0x00b4}
0x08a2…08c2 Head {h00=0x001c, h01=0x0050, text=» PERF DISU,W1,W1,SYSBUF «, t00=0x0005, t01=0x00d6}
0x08c2…08ec Head {h00=0x0026, h01=0x0050, text=» XCOPY F95PROC(W1),W0,W2,SYSBUF,W5«, t00=0x0005, t01=0x00f6}
0x08ec…0914 Head {h00=0x0024, h01=0x0050, text=» XCOPY FRINF(W1),W0,W2,SYSBUF,W1«, t00=0x0005, t01=0x0120}
0x0914…092c Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W1 «, t00=0x0005, t01=0x0148}
0x092c…0944 Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN2,W1 «, t00=0x0005, t01=0x0160}
0x0944…0972 Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A «, t00=0x0005, t01=0x0178}
0x0972…0988 Head {h00=0x0012, h01=0x0050, text=» BNOK OPENSY06«, t00=0x0006, t01=0x0016}
0x0988…09aa Head {h00=0x001e, h01=0x0050, text=» MOVE FINDEXPO(W1),DKBIN1 «, t00=0x0006, t01=0x002c}
0x09aa…09c4 Head {h00=0x0016, h01=0x0050, text=» PERF REFSP,W2,W1 «, t00=0x0006, t01=0x004e}
0x09c4…09da Head {h00=0x0012, h01=0x0050, text=» BNOK OPENSY06«, t00=0x0006, t01=0x0068}
0x09da…09ea Head {h00=0x000c, h01=0x0050, text=»OPENSY07«, t00=0x0006, t01=0x007e}
0x09ea…0a0a Head {h00=0x001c, h01=0x0050, text=» READ SYSTEM VARIABLES«, t00=0x0006, t01=0x008e}
0x0a0a…0a22 Head {h00=0x0014, h01=0x0050, text=» PERF DEDISC,W19«, t00=0x0006, t01=0x00ae}
0x0a22…0a32 Head {h00=0x000c, h01=0x0050, text=»OPENSY04«, t00=0x0006, t01=0x00c6}
0x0a32…0a48 Head {h00=0x0012, h01=0x0050, text=» CLEAR BOOLA1 «, t00=0x0006, t01=0x00d6}
0x0a48…0a6c Head {h00=0x0020, h01=0x0050, text=» PERF COND SET CONDITION-REG«, t00=0x0006, t01=0x00ec}
0x0a6c…0a78 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0006, t01=0x0110}
0x0a78…0a86 Head {h00=0x000a, h01=0x0050, text=»CLOSSY«, t00=0x0006, t01=0x011c}
0x0a86…0aa2 Head {h00=0x0018, h01=0x0050, text=» TBF SWITSY,CLOSSY02«, t00=0x0006, t01=0x012a}
0x0aa2…0ab8 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWITSY «, t00=0x0006, t01=0x0146}
0x0ab8…0ad4 Head {h00=0x0018, h01=0x0050, text=» SUB FCOUNTER(W1),W1«, t00=0x0006, t01=0x015c}
0x0ad4…0afa Head {h00=0x0022, h01=0x0050, text=» CBG FCOUNTER(W1),W0,CLOSSY02 «, t00=0x0006, t01=0x0178}
0x0afa…0b10 Head {h00=0x0012, h01=0x0050, text=» PERF WRFSP,W1«, t00=0x0007, t01=0x000e}
0x0b10…0b26 Head {h00=0x0012, h01=0x0050, text=» BNOK CLOSSY01«, t00=0x0007, t01=0x0024}
0x0b26…0b46 Head {h00=0x001c, h01=0x0050, text=» PERF DISU,W1,W1,SYSBUF «, t00=0x0007, t01=0x003a}
0x0b46…0b5c Head {h00=0x0012, h01=0x0050, text=» BNOK CLOSSY01«, t00=0x0007, t01=0x005a}
0x0b5c…0b7c Head {h00=0x001c, h01=0x0050, text=» PERF DISU,W2,W1,SYSBUF «, t00=0x0007, t01=0x0070}
0x0b7c…0b8c Head {h00=0x000c, h01=0x0050, text=»CLOSSY01«, t00=0x0007, t01=0x0090}
0x0b8c…0bbc Head {h00=0x002c, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(W1),SYSBUF,W0«, t00=0x0007, t01=0x00a0}
0x0bbc…0bcc Head {h00=0x000c, h01=0x0050, text=»CLOSSY02«, t00=0x0007, t01=0x00d0}
0x0bcc…0bde Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x0007, t01=0x00e0}
0x0bde…0bea Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0007, t01=0x00f2}
0x0bea…0bf8 Head {h00=0x000a, h01=0x0050, text=»OPENUS«, t00=0x0007, t01=0x00fe}
0x0bf8…0c12 Head {h00=0x0016, h01=0x0050, text=» TBF BOOLA2,GOONN «, t00=0x0007, t01=0x010c}
0x0c12…0c22 Head {h00=0x000c, h01=0x0050, text=» SWITCH «, t00=0x0007, t01=0x0126}
0x0c22…0c34 Head {h00=0x000e, h01=0x0050, text=» B OPENUS «, t00=0x0007, t01=0x0136}
0x0c34…0c44 Head {h00=0x000c, h01=0x0050, text=»OPENUS0E«, t00=0x0007, t01=0x0148}
0x0c44…0c62 Head {h00=0x001a, h01=0x0050, text=» PERF DISU,W3,W1,RBUF «, t00=0x0007, t01=0x0158}
0x0c62…0c78 Head {h00=0x0012, h01=0x0050, text=» BERR OPENUS03«, t00=0x0007, t01=0x0176}
0x0c78…0c8c Head {h00=0x0010, h01=0x0050, text=» PERF SETUSE«, t00=0x0007, t01=0x018c}
0x0c8c…0ca2 Head {h00=0x0012, h01=0x0050, text=» BERR OPENUS03«, t00=0x0008, t01=0x0010}
0x0ca2…0cb6 Head {h00=0x0010, h01=0x0050, text=» B OPENUS01 «, t00=0x0008, t01=0x0026}
0x0cb6…0cc4 Head {h00=0x000a, h01=0x0050, text=»GOONN «, t00=0x0008, t01=0x003a}
0x0cc4…0cd8 Head {h00=0x0010, h01=0x0050, text=» SET SWITUS «, t00=0x0008, t01=0x0048}
0x0cd8…0cee Head {h00=0x0012, h01=0x0050, text=» BNZ OPENUS0C «, t00=0x0008, t01=0x005c}
0x0cee…0d02 Head {h00=0x0010, h01=0x0050, text=» SET BOOLA2 «, t00=0x0008, t01=0x0072}
0x0d02…0d18 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT01 «, t00=0x0008, t01=0x0086}
0x0d18…0d3a Head {h00=0x001e, h01=0x0050, text=» ADD FCOUNTER(FILINDUS),W1«, t00=0x0008, t01=0x009c}
0x0d3a…0d66 Head {h00=0x0028, h01=0x0050, text=» CBG FCOUNTER(FILINDUS),W1,OPENUS0E «, t00=0x0008, t01=0x00be}
0x0d66…0d88 Head {h00=0x001e, h01=0x0050, text=» MOVE STRG10A,=C'PTS-DE ' «, t00=0x0008, t01=0x00ea}
0x0d88…0dae Head {h00=0x0022, h01=0x0050, text=» MOVE STR6A,FVOLNAME(FILINDUS)«, t00=0x0008, t01=0x010c}
0x0dae…0dec Head {h00=0x003a, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(FILINDUS),RBUF,STRG10A,STR6A«, t00=0x0008, t01=0x0132}
0x0dec…0e02 Head {h00=0x0012, h01=0x0050, text=» BNOK OPENUS02«, t00=0x0008, t01=0x0170}
0x0e02…0e26 Head {h00=0x0020, h01=0x0050, text=» PERF NOFFRE,DEBIN1,FILINDUS«, t00=0x0008, t01=0x0186}
0x0e26…0e3c Head {h00=0x0012, h01=0x0050, text=» BOK OPENUS0D «, t00=0x0009, t01=0x001a}
0x0e3c…0e50 Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x0009, t01=0x0030}
0x0e50…0e60 Head {h00=0x000c, h01=0x0050, text=»OPENUS0D«, t00=0x0009, t01=0x0044}
0x0e60…0e88 Head {h00=0x0024, h01=0x0050, text=» MOVE FNOOFREC(FILINDUS),DEBIN1 «, t00=0x0009, t01=0x0054}
0x0e88…0ea6 Head {h00=0x001a, h01=0x0050, text=» PERF DISU,W3,W1,RBUF «, t00=0x0009, t01=0x007c}
0x0ea6…0ebc Head {h00=0x0012, h01=0x0050, text=» BERR OPENUS02«, t00=0x0009, t01=0x009a}
0x0ebc…0ecc Head {h00=0x000c, h01=0x0050, text=»OPENUS0A«, t00=0x0009, t01=0x00b0}
0x0ecc…0efa Head {h00=0x002a, h01=0x0050, text=» XCOPY F95PROC(FILINDUS),W0,W2,RBUF,W5«, t00=0x0009, t01=0x00c0}
0x0efa…0f14 Head {h00=0x0016, h01=0x0050, text=» GET FILESTATUS «, t00=0x0009, t01=0x00ee}
0x0f14…0f2c Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W0 «, t00=0x0009, t01=0x0108}
0x0f2c…0f50 Head {h00=0x0020, h01=0x0050, text=» XCOPY DKBIN1,W1,W1,RBUF,W0 «, t00=0x0009, t01=0x0120}
0x0f50…0f7c Head {h00=0x0028, h01=0x0050, text=» XCOPY FRINF(FILINDUS),W0,W2,RBUF,W1«, t00=0x0009, t01=0x0144}
0x0f7c…0f94 Head {h00=0x0014, h01=0x0050, text=» FILE CLOSED? «, t00=0x0009, t01=0x0170}
0x0f94…0fb0 Head {h00=0x0018, h01=0x0050, text=» CBE DKBIN1,W0,USCLS«, t00=0x0009, t01=0x0188}
0x0fb0…0fc4 Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x000a, t01=0x0014}
0x0fc4…0fd2 Head {h00=0x000a, h01=0x0050, text=»USCLS «, t00=0x000a, t01=0x0028}
0x0fd2…0ff2 Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W0,W1,W7,W1 «, t00=0x000a, t01=0x0036}
0x0ff2…1010 Head {h00=0x001a, h01=0x0050, text=» PERF DISU,W4,W1,RBUF «, t00=0x000a, t01=0x0056}
0x1010…1026 Head {h00=0x0012, h01=0x0050, text=» BOK OPENUS0B «, t00=0x000a, t01=0x0074}
0x1026…103a Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x000a, t01=0x008a}
0x103a…104a Head {h00=0x000c, h01=0x0050, text=»OPENUS0B«, t00=0x000a, t01=0x009e}
0x104a…105e Head {h00=0x0010, h01=0x0050, text=» PERF SETUSE«, t00=0x000a, t01=0x00ae}
0x105e…1074 Head {h00=0x0012, h01=0x0050, text=» BERR OPENUS02«, t00=0x000a, t01=0x00c2}
0x1074…108c Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN3,W1 «, t00=0x000a, t01=0x00d8}
0x108c…10a4 Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN2,W1 «, t00=0x000a, t01=0x00f0}
0x10a4…10d2 Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W2,DKBIN3,DKBIN2,STRG10A «, t00=0x000a, t01=0x0108}
0x10d2…10e8 Head {h00=0x0012, h01=0x0050, text=» BNOK OPENUS02«, t00=0x000a, t01=0x0136}
0x10e8…1110 Head {h00=0x0024, h01=0x0050, text=» MOVE FINDEXPO(FILINDUS),DKBIN3 «, t00=0x000a, t01=0x014c}
0x1110…1130 Head {h00=0x001c, h01=0x0050, text=» PERF REFSP,W2,FILINDUS «, t00=0x000a, t01=0x0174}
0x1130…1144 (11, 0, 400) Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x000b, t01=0x0004}
0x1144…115a Head {h00=0x0012, h01=0x0050, text=» BOK OPENUS01 «, t00=0x000b, t01=0x0018}
0x115a…1182 Head {h00=0x0024, h01=0x0050, text=» MOVE DKBIN1,FINDEXPO(FILINDUS) «, t00=0x000b, t01=0x002e}
0x1182…11b0 Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W6,DKBIN1,DKBIN2,STRG10A «, t00=0x000b, t01=0x0056}
0x11b0…11c0 Head {h00=0x000c, h01=0x0008, text=»OPENUS02«, t00=0x000b, t01=0x0084}
0x11c0…11f6 Head {h00=0x0032, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(FILINDUS),SYSBUF,W0«, t00=0x000b, t01=0x0094}
0x11f6…1210 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W21 «, t00=0x000b, t01=0x00ca}
0x1210…1220 Head {h00=0x000c, h01=0x0050, text=»OPENUS03«, t00=0x000b, t01=0x00e4}
0x1220…1236 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWITUS «, t00=0x000b, t01=0x00f4}
0x1236…1258 Head {h00=0x001e, h01=0x0050, text=» SUB FCOUNTER(FILINDUS),W1«, t00=0x000b, t01=0x010a}
0x1258…126c Head {h00=0x0010, h01=0x0050, text=» B OPENUS0C «, t00=0x000b, t01=0x012c}
0x126c…127c Head {h00=0x000c, h01=0x0008, text=»OPENUS01«, t00=0x000b, t01=0x0140}
0x127c…1298 Head {h00=0x0018, h01=0x0050, text=» TBF SWIT01,OPENUS0C«, t00=0x000b, t01=0x0150}
0x1298…12b4 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW4,=W'-2'«, t00=0x000b, t01=0x016c}
0x12b4…12c4 Head {h00=0x000c, h01=0x0050, text=»OPENUS0C«, t00=0x000b, t01=0x0188}
0x12c4…12da Head {h00=0x0012, h01=0x0050, text=» CLEAR BOOLA2 «, t00=0x000c, t01=0x0008}
0x12da…12ec Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x000c, t01=0x001e}
0x12ec…12f8 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x000c, t01=0x0030}
0x12f8…1306 Head {h00=0x000a, h01=0x0050, text=»CLOSUS«, t00=0x000c, t01=0x003c}
0x1306…1322 Head {h00=0x0018, h01=0x0050, text=» TBF SWITUS,CLOSUS01«, t00=0x000c, t01=0x004a}
0x1322…1338 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWITUS «, t00=0x000c, t01=0x0066}
0x1338…135a Head {h00=0x001e, h01=0x0050, text=» SUB FCOUNTER(FILINDUS),W1«, t00=0x000c, t01=0x007c}
0x135a…136e Head {h00=0x0010, h01=0x0050, text=» BP CLOSUS01«, t00=0x000c, t01=0x009e}
0x136e…138a Head {h00=0x0018, h01=0x0050, text=» PERF WRFSP,FILINDUS«, t00=0x000c, t01=0x00b2}
0x138a…139e Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x000c, t01=0x00ce}
0x139e…13b4 Head {h00=0x0012, h01=0x0050, text=» BNOK CLOSUS02«, t00=0x000c, t01=0x00e2}
0x13b4…13dc Head {h00=0x0024, h01=0x0050, text=» MOVE DKBIN1,FINDEXPO(FILINDUS) «, t00=0x000c, t01=0x00f8}
0x13dc…140a Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W6,DKBIN1,DKBIN2,STRG10A «, t00=0x000c, t01=0x0120}
0x140a…1428 Head {h00=0x001a, h01=0x0050, text=» PERF DISU,W3,W1,RBUF «, t00=0x000c, t01=0x014e}
0x1428…143e Head {h00=0x0012, h01=0x0050, text=» BNOK CLOSUS02«, t00=0x000c, t01=0x016c}
0x143e…145e Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W0,W1,W0,W1 «, t00=0x000c, t01=0x0182}
0x145e…147c Head {h00=0x001a, h01=0x0050, text=» PERF DISU,W4,W1,RBUF «, t00=0x000d, t01=0x0012}
0x147c…1492 Head {h00=0x0012, h01=0x0050, text=» BNOK CLOSUS02«, t00=0x000d, t01=0x0030}
0x1492…14a2 Head {h00=0x000c, h01=0x0050, text=»CLOSUS02«, t00=0x000d, t01=0x0046}
0x14a2…14d8 Head {h00=0x0032, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(FILINDUS),SYSBUF,W0«, t00=0x000d, t01=0x0056}
0x14d8…14e8 Head {h00=0x000c, h01=0x0008, text=»CLOSUS01«, t00=0x000d, t01=0x008c}
0x14e8…14fa Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x000d, t01=0x009c}
0x14fa…1506 Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x000d, t01=0x00ae}
0x1506…1514 Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x000d, t01=0x00ba}
0x1514…1528 Head {h00=0x0010, h01=0x0050, text=»SETUSE PROC «, t00=0x000d, t01=0x00c8}
0x1528…154c Head {h00=0x0020, h01=0x0050, text=» XCOPY SECLEN,W0,W2,RBUF,W9 «, t00=0x000d, t01=0x00dc}
0x154c…156a Head {h00=0x001a, h01=0x0050, text=» CBNE SECLEN,W0,SETCOP«, t00=0x000d, t01=0x0100}
0x156a…1586 Head {h00=0x0018, h01=0x0050, text=» MOVE SECLEN,=W'256'«, t00=0x000d, t01=0x011e}
0x1586…1594 Head {h00=0x000a, h01=0x0050, text=»SETCOP«, t00=0x000d, t01=0x013a}
0x1594…15b8 Head {h00=0x0020, h01=0x0050, text=» XCOPY DKBIN1,W0,W2,RBUF,W7 «, t00=0x000d, t01=0x0148}
0x15b8…15d6 Head {h00=0x001a, h01=0x0050, text=» CBNE DKBIN1,W0,SETNOZ«, t00=0x000d, t01=0x016c}
0x15d6…15ee Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W1 «, t00=0x000d, t01=0x018a}
0x15ee…15fc Head {h00=0x000a, h01=0x0050, text=»SETNOZ«, t00=0x000e, t01=0x0012}
0x15fc…1616 Head {h00=0x0016, h01=0x0050, text=» MUL DKBIN1,SECLEN«, t00=0x000e, t01=0x0020}
0x1616…163e Head {h00=0x0024, h01=0x0050, text=» CALL GETIND,RBUF,DKBIN2,DKBIN3 «, t00=0x000e, t01=0x003a}
0x163e…1660 Head {h00=0x001e, h01=0x0050, text=» CBNG DKBIN1,DKBIN2,SETOKA«, t00=0x000e, t01=0x0062}
0x1660…167a Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W22 «, t00=0x000e, t01=0x0084}
0x167a…1694 Head {h00=0x0016, h01=0x0050, text=» MOVE BCD13A,=D'0'«, t00=0x000e, t01=0x009e}
0x1694…16a6 Head {h00=0x000e, h01=0x0050, text=» B SETRET «, t00=0x000e, t01=0x00b8}
0x16a6…16c8 Head {h00=0x001e, h01=0x0050, text=»SETOKA MOVE USELEN,DKBIN1 «, t00=0x000e, t01=0x00ca}
0x16c8…16e0 Head {h00=0x0014, h01=0x0050, text=» SUB DKBIN1,W15 «, t00=0x000e, t01=0x00ec}
0x16e0…16fc Head {h00=0x0018, h01=0x0050, text=» MOVE MAXOCC,DKBIN1 «, t00=0x000e, t01=0x0104}
0x16fc…170a Head {h00=0x000a, h01=0x0050, text=»SETRET«, t00=0x000e, t01=0x0120}
0x170a…171c Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x000e, t01=0x012e}
0x171c…1728 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x0140}
0x1728…1736 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000e, t01=0x014c}
0x1736…1744 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x015a}
0x1744…175c Head {h00=0x0014, h01=0x0050, text=»DUMPROC PROC FC «, t00=0x000e, t01=0x0168}
0x175c…1766 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0180}
0x1766…1784 Head {h00=0x001a, h01=0x0050, text=»ENTFMT ENTER FORMAT «, t00=0x000e, t01=0x018a}
0x1784…1796 Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x000f, t01=0x0018}
0x1796…17aa Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000f, t01=0x002a}
0x17aa…17c4 Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,FORMAT«, t00=0x000f, t01=0x003e}
0x17c4…17e2 Head {h00=0x001a, h01=0x0050, text=» PERF FREESP,DEBIN1,W1«, t00=0x000f, t01=0x0058}
0x17e2…17f6 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000f, t01=0x0076}
0x17f6…1814 Head {h00=0x001a, h01=0x0050, text=» MOVE WORK(W9),DEBIN1 «, t00=0x000f, t01=0x008a}
0x1814…1826 Head {h00=0x000e, h01=0x0050, text=» B WRTFMT «, t00=0x000f, t01=0x00a8}
0x1826…1836 Head {h00=0x000c, h01=0x0050, text=»FMTCHAIN«, t00=0x000f, t01=0x00ba}
0x1836…184e Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN5,W4 «, t00=0x000f, t01=0x00ca}
0x184e…185e Head {h00=0x000c, h01=0x0050, text=»RDCHAIN «, t00=0x000f, t01=0x00e2}
0x185e…187a Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN3,DEBIN5 «, t00=0x000f, t01=0x00f2}
0x187a…18ae Head {h00=0x0030, h01=0x0050, text=» PERF DISU,W1,DEBIN3,SYSBUF READ FORMATCHAIN«, t00=0x000f, t01=0x010e}
0x18ae…18c2 Head {h00=0x0010, h01=0x0050, text=» BNERR FST3 «, t00=0x000f, t01=0x0142}
0x18c2…18e4 Head {h00=0x001e, h01=0x0050, text=» CBE DEBINW4,=W'30',FFIRST«, t00=0x000f, t01=0x0156}
0x18e4…18f6 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000f, t01=0x0178}
0x18f6…1902 Head {h00=0x0008, h01=0x0050, text=»FST3«, t00=0x000f, t01=0x018a}
0x1902…1940 Head {h00=0x003a, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,SYSBUF,W6 OCCUPIED SPACE TO DEBIN4«, t00=0x0010, t01=0x0008}
0x1940…197e Head {h00=0x003a, h01=0x0050, text=» CBG DEBIN4,=W'180',RENEXT NO SPACE FOR MORE ENTRIES? «, t00=0x0010, t01=0x0046}
0x197e…198e Head {h00=0x000c, h01=0x0050, text=»ADDENTRY«, t00=0x0010, t01=0x0084}
0x198e…19be Head {h00=0x002c, h01=0x0050, text=» XCOPY STRG10A,W0,W2,W0,W0 STATUS = '00'«, t00=0x0010, t01=0x0094}
0x19be…19e8 Head {h00=0x0026, h01=0x0050, text=» COPY STRG10A,W2,W6,FORMAT,W0 NAME«, t00=0x0010, t01=0x00c4}
0x19e8…1a2e Head {h00=0x0042, h01=0x0050, text=» XCOPY STRG10A,W8,W2,WORK(W9),W0 FREESPACE-RECNR = PTR TO FMT «, t00=0x0010, t01=0x00ee}
0x1a2e…1a6e Head {h00=0x003c, h01=0x0050, text=» COPY SYSBUF,DEBIN4,W10,STRG10A,W0 INSERT ENTRY TO CHAIN«, t00=0x0010, t01=0x0134}
0x1a6e…1a86 Head {h00=0x0014, h01=0x0050, text=» ADD DEBIN4,W10 «, t00=0x0010, t01=0x0174}
0x1a86…1abe Head {h00=0x0034, h01=0x0050, text=» XCOPY SYSBUF,W6,W2,DEBIN4,W0 SET OCCUPIED SPACE«, t00=0x0010, t01=0x018c}
0x1abe…1ae2 Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN5,SYSBUF «, t00=0x0011, t01=0x0034}
0x1ae2…1af4 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0011, t01=0x0058}
0x1af4…1b02 Head {h00=0x000a, h01=0x0050, text=»FFIRST«, t00=0x0011, t01=0x006a}
0x1b02…1b1a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN3,W0 «, t00=0x0011, t01=0x0078}
0x1b1a…1b32 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0011, t01=0x0090}
0x1b32…1b44 Head {h00=0x000e, h01=0x0050, text=» B FFST01 «, t00=0x0011, t01=0x00a8}
0x1b44…1b52 Head {h00=0x000a, h01=0x0050, text=»RENEXT«, t00=0x0011, t01=0x00ba}
0x1b52…1b88 Head {h00=0x0032, h01=0x0050, text=» XCOPY DEBIN5,W0,W2,SYSBUF,W4 GET LINK TO NEXT«, t00=0x0011, t01=0x00c8}
0x1b88…1ba8 Head {h00=0x001c, h01=0x0050, text=» CBNE DEBIN5,W0,RDCHAIN «, t00=0x0011, t01=0x00fe}
0x1ba8…1bc6 Head {h00=0x001a, h01=0x0050, text=» PERF FREESP,DEBIN5,W1«, t00=0x0011, t01=0x011e}
0x1bc6…1bda Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0011, t01=0x013c}
0x1bda…1c00 Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,W4,W2,DEBIN5,W0 «, t00=0x0011, t01=0x0150}
0x1c00…1c24 Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN3,SYSBUF «, t00=0x0011, t01=0x0176}
0x1c24…1c32 Head {h00=0x000a, h01=0x0050, text=»FFST01«, t00=0x0012, t01=0x000a}
0x1c32…1c4a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN4,W10«, t00=0x0012, t01=0x0018}
0x1c4a…1c82 Head {h00=0x0034, h01=0x0050, text=» MOVE SYSBUF,=X'464300' SET SCTR-IDENTIFICATION «, t00=0x0012, t01=0x0030}
0x1c82…1cb8 Head {h00=0x0032, h01=0x0050, text=» XCOPY SYSBUF,W2,W2,DEBIN3,W0 SET LINK TO PREV«, t00=0x0012, t01=0x0068}
0x1cb8…1cea Head {h00=0x002e, h01=0x0050, text=» XCOPY SYSBUF,W4,W2,W0,W0 LINK TO NEXT = 0«, t00=0x0012, t01=0x009e}
0x1cea…1cfe Head {h00=0x0010, h01=0x0050, text=» B ADDENTRY «, t00=0x0012, t01=0x00d0}
0x1cfe…1d0c Head {h00=0x000a, h01=0x0050, text=»WRTFMT«, t00=0x0012, t01=0x00e4}
0x1d0c…1d28 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN3,PINDFR «, t00=0x0012, t01=0x00f2}
0x1d28…1d58 Head {h00=0x002c, h01=0x0050, text=» PERF ALGO,W1 SET FORMAT-IDENTIFICATION «, t00=0x0012, t01=0x010e}
0x1d58…1d66 Head {h00=0x000a, h01=0x0050, text=»NEGST «, t00=0x0012, t01=0x013e}
0x1d66…1d7e Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W0 «, t00=0x0012, t01=0x014c}
0x1d7e…1dbc Head {h00=0x003a, h01=0x0050, text=» XCOPY DEBIN2,W1,W1,RPOOL(DEBIN3),W8 GET LINK NEXT BUF«, t00=0x0012, t01=0x0164}
0x1dbc…1dea Head {h00=0x002a, h01=0x0050, text=» XCOPY SYSBUF,W8,W2,RPOOL(DEBIN3),W17 «, t00=0x0013, t01=0x0012}
0x1dea…1e16 Head {h00=0x0028, h01=0x0050, text=» CBE DEBIN2,W0,NOMOREC LAST RECORD? «, t00=0x0013, t01=0x0040}
0x1e16…1e34 Head {h00=0x001a, h01=0x0050, text=» PERF FREESP,DEBIN4,W1«, t00=0x0013, t01=0x006c}
0x1e34…1e46 Head {h00=0x000e, h01=0x0050, text=» BNERR COP«, t00=0x0013, t01=0x008a}
0x1e46…1e86 Head {h00=0x003c, h01=0x0050, text=» MOVE DEBIN2,WORK(W9) SAVE POINTER TO 1:ST FORMAT RECORD«, t00=0x0013, t01=0x009c}
0x1e86…1eb4 Head {h00=0x002a, h01=0x0050, text=» MOVE WORK(W9),DEBINW4 SAVE ERROR CODE«, t00=0x0013, t01=0x00dc}
0x1eb4…1ef0 Head {h00=0x0038, h01=0x0050, text=» PERF DISU,W1,DEBIN2,SYSBUF READ FIRST FORMAT RECORD«, t00=0x0013, t01=0x010a}
0x1ef0…1f04 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0013, t01=0x0146}
0x1f04…1f14 Head {h00=0x000c, h01=0x0050, text=» B DELF2«, t00=0x0013, t01=0x015a}
0x1f14…1f20 Head {h00=0x0008, h01=0x0050, text=»COP «, t00=0x0013, t01=0x016a}
0x1f20…1f58 Head {h00=0x0034, h01=0x0050, text=» XCOPY SYSBUF,W4,W2,DEBIN4,W0 SET LINK NEXT REC «, t00=0x0013, t01=0x0176}
0x1f58…1f86 Head {h00=0x002a, h01=0x0050, text=» COPY SYSBUF,W10,W188,BPOOL(DEBIN3),W0«, t00=0x0014, t01=0x001e}
0x1f86…1faa Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN1,SYSBUF «, t00=0x0014, t01=0x004c}
0x1faa…1fbe Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0014, t01=0x0070}
0x1fbe…1fd6 Head {h00=0x0014, h01=0x0050, text=» TBF SWIT01,CO10«, t00=0x0014, t01=0x0084}
0x1fd6…1fea Head {h00=0x0010, h01=0x0050, text=» B FMTCHAIN «, t00=0x0014, t01=0x009c}
0x1fea…1ff6 Head {h00=0x0008, h01=0x0050, text=»CO10«, t00=0x0014, t01=0x00b0}
0x1ff6…2012 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN3,DEBIN2 «, t00=0x0014, t01=0x00bc}
0x2012…2030 Head {h00=0x001a, h01=0x0050, text=» MOVE DEBIN1,=X'4600' «, t00=0x0014, t01=0x00d8}
0x2030…2056 Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,W0,W2,DEBIN1,W0 «, t00=0x0014, t01=0x00f6}
0x2056…2072 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,DEBIN4 «, t00=0x0014, t01=0x011c}
0x2072…2082 Head {h00=0x000c, h01=0x0050, text=» B NEGST«, t00=0x0014, t01=0x0138}
0x2082…2092 Head {h00=0x000c, h01=0x0050, text=»NOMOREC «, t00=0x0014, t01=0x0148}
0x2092…20aa Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN4,W0 «, t00=0x0014, t01=0x0158}
0x20aa…20be Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x0014, t01=0x0170}
0x20be…20cc Head {h00=0x000a, h01=0x0050, text=» B COP«, t00=0x0014, t01=0x0184}
0x20cc…20d6 (21, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0004}
0x20d6…20e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x000e}
0x20e0…20ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0018}
0x20ea…20f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0022}
0x20f4…20fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x002c}
0x20fe…211e Head {h00=0x001c, h01=0x0050, text=»NEXFMT GET NEXT FORMAT«, t00=0x0015, t01=0x0036}
0x211e…2132 Head {h00=0x0010, h01=0x0050, text=» SET SWIT03 «, t00=0x0015, t01=0x0056}
0x2132…213c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x006a}
0x213c…2146 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0074}
0x2146…2154 Head {h00=0x000a, h01=0x0050, text=»PREFMT«, t00=0x0015, t01=0x007e}
0x2154…216e Head {h00=0x0016, h01=0x0050, text=» MOVE FRMTPNTR,W0 «, t00=0x0015, t01=0x008c}
0x216e…218a Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,FORMAT «, t00=0x0015, t01=0x00a6}
0x218a…219c Head {h00=0x000e, h01=0x0050, text=» BZ RRECNX«, t00=0x0015, t01=0x00c2}
0x219c…21b4 Head {h00=0x0014, h01=0x0050, text=» MOVE RNRFMCH,W4«, t00=0x0015, t01=0x00d4}
0x21b4…21cc Head {h00=0x0014, h01=0x0050, text=» MOVE PTRFMCH,W0«, t00=0x0015, t01=0x00ec}
0x21cc…21e6 Head {h00=0x0016, h01=0x0050, text=» TBT SWIT03,RRECNX«, t00=0x0015, t01=0x0104}
0x21e6…21fe Head {h00=0x0014, h01=0x0050, text=» ADD PTRFMCH,W20«, t00=0x0015, t01=0x011e}
0x21fe…220c Head {h00=0x000a, h01=0x0050, text=»RRECNX«, t00=0x0015, t01=0x0136}
0x220c…222c Head {h00=0x001c, h01=0x0050, text=» CBNE RNRFMCH,W0,RRECNZ «, t00=0x0015, t01=0x0144}
0x222c…2246 Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,FORMAT«, t00=0x0015, t01=0x0164}
0x2246…2268 Head {h00=0x001e, h01=0x0050, text=» PERF SFMTCH,W4,SYSBUF,W10«, t00=0x0015, t01=0x017e}
0x2268…227c Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0016, t01=0x0010}
0x227c…2298 Head {h00=0x0018, h01=0x0050, text=» MOVE RNRFMCH,DEBIN1«, t00=0x0016, t01=0x0024}
0x2298…22b4 Head {h00=0x0018, h01=0x0050, text=» MOVE PTRFMCH,DEBIN2«, t00=0x0016, t01=0x0040}
0x22b4…22cc Head {h00=0x0014, h01=0x0050, text=» SUB PTRFMCH,W8 «, t00=0x0016, t01=0x005c}
0x22cc…22da Head {h00=0x000a, h01=0x0050, text=»RRECNZ«, t00=0x0016, t01=0x0074}
0x22da…22ec Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0016, t01=0x0082}
0x22ec…2300 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0016, t01=0x0094}
0x2300…230e Head {h00=0x000a, h01=0x0050, text=»RRECNY«, t00=0x0016, t01=0x00a8}
0x230e…2332 Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,RNRFMCH,SYSBUF«, t00=0x0016, t01=0x00b6}
0x2332…2348 Head {h00=0x0012, h01=0x0050, text=» BNERR RREC01 «, t00=0x0016, t01=0x00da}
0x2348…236c Head {h00=0x0020, h01=0x0050, text=» CBE DEBINW4,=W'30',OUTOFRAN«, t00=0x0016, t01=0x00f0}
0x236c…237e Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0016, t01=0x0114}
0x237e…238e Head {h00=0x000c, h01=0x0050, text=»OUTOFRAN«, t00=0x0016, t01=0x0126}
0x238e…23a6 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W9«, t00=0x0016, t01=0x0136}
0x23a6…23be Head {h00=0x0014, h01=0x0050, text=» MOVE RNRFMCH,W0«, t00=0x0016, t01=0x014e}
0x23be…23d0 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0016, t01=0x0166}
0x23d0…23de Head {h00=0x000a, h01=0x0050, text=»RREC01«, t00=0x0016, t01=0x0178}
0x23de…2412 Head {h00=0x0030, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,W6 GET USED SPACE«, t00=0x0016, t01=0x0186}
0x2412…242c Head {h00=0x0016, h01=0x0050, text=» TBF SWIT03,RREC02«, t00=0x0017, t01=0x002a}
0x242c…2444 Head {h00=0x0014, h01=0x0050, text=» ADD PTRFMCH,W10«, t00=0x0017, t01=0x0044}
0x2444…2466 Head {h00=0x001e, h01=0x0050, text=» CBE PTRFMCH,DEBIN1,RREC03«, t00=0x0017, t01=0x005c}
0x2466…2474 Head {h00=0x000a, h01=0x0050, text=»RREC07«, t00=0x0017, t01=0x007e}
0x2474…2490 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,PTRFMCH«, t00=0x0017, t01=0x008c}
0x2490…24a2 Head {h00=0x000e, h01=0x0050, text=» B RREC04 «, t00=0x0017, t01=0x00a8}
0x24a2…24b0 Head {h00=0x000a, h01=0x0050, text=»RREC03«, t00=0x0017, t01=0x00ba}
0x24b0…24c8 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W4 «, t00=0x0017, t01=0x00c8}
0x24c8…24d6 Head {h00=0x000a, h01=0x0050, text=»RREC05«, t00=0x0017, t01=0x00e0}
0x24d6…2500 Head {h00=0x0026, h01=0x0050, text=» XCOPY DEBIN5,W0,W2,SYSBUF,DEBIN1 «, t00=0x0017, t01=0x00ee}
0x2500…2520 Head {h00=0x001c, h01=0x0050, text=» CBE DEBIN5,W0,OUTOFRAN «, t00=0x0017, t01=0x0118}
0x2520…253c Head {h00=0x0018, h01=0x0050, text=» MOVE RNRFMCH,DEBIN5«, t00=0x0017, t01=0x0138}
0x253c…2556 Head {h00=0x0016, h01=0x0050, text=» TBF SWIT03,RRECNY«, t00=0x0017, t01=0x0154}
0x2556…256e Head {h00=0x0014, h01=0x0050, text=» MOVE PTRFMCH,W0«, t00=0x0017, t01=0x016e}
0x256e…2580 Head {h00=0x000e, h01=0x0050, text=» B RRECNY «, t00=0x0017, t01=0x0186}
0x2580…258e Head {h00=0x000a, h01=0x0050, text=»RREC02«, t00=0x0018, t01=0x0008}
0x258e…25ae Head {h00=0x001c, h01=0x0050, text=» CBL PTRFMCH,W20,RREC06 «, t00=0x0018, t01=0x0016}
0x25ae…25e8 Head {h00=0x0036, h01=0x0050, text=» CBNL DEBIN1,PTRFMCH,RREC02A IF WITHIN USED SPACE «, t00=0x0018, t01=0x0036}
0x25e8…261a Head {h00=0x002e, h01=0x0050, text=» MOVE PTRFMCH,DEBIN1 UPDATE WITH MAX LIMIT«, t00=0x0018, t01=0x0070}
0x261a…262a Head {h00=0x000c, h01=0x0050, text=»RREC02A «, t00=0x0018, t01=0x00a2}
0x262a…2642 Head {h00=0x0014, h01=0x0050, text=» SUB PTRFMCH,W10«, t00=0x0018, t01=0x00b2}
0x2642…2654 Head {h00=0x000e, h01=0x0050, text=» B RREC07 «, t00=0x0018, t01=0x00ca}
0x2654…2662 Head {h00=0x000a, h01=0x0050, text=»RREC06«, t00=0x0018, t01=0x00dc}
0x2662…2680 Head {h00=0x001a, h01=0x0050, text=» MOVE PTRFMCH,=W'190' «, t00=0x0018, t01=0x00ea}
0x2680…2698 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W2 «, t00=0x0018, t01=0x0108}
0x2698…26aa Head {h00=0x000e, h01=0x0050, text=» B RREC05 «, t00=0x0018, t01=0x0120}
0x26aa…26b8 Head {h00=0x000a, h01=0x0050, text=»RREC04«, t00=0x0018, t01=0x0132}
0x26b8…26ce Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN1,W2«, t00=0x0018, t01=0x0140}
0x26ce…26ec Head {h00=0x001a, h01=0x0050, text=» MOVE STRG10A,=X'4600'«, t00=0x0018, t01=0x0156}
0x26ec…2716 Head {h00=0x0026, h01=0x0050, text=» COPY STRG10A,W1,W6,SYSBUF,DEBIN1 «, t00=0x0018, t01=0x0174}
0x2716…273e Head {h00=0x0024, h01=0x0050, text=» COPY FORMAT,W0,W6,SYSBUF,DEBIN1«, t00=0x0019, t01=0x000e}
0x273e…2758 Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,FORMAT«, t00=0x0019, t01=0x0036}
0x2758…276a Head {h00=0x000e, h01=0x0050, text=» B NXPRFM «, t00=0x0019, t01=0x0050}
0x276a…2774 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0062}
0x2774…277e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x006c}
0x277e…2788 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0076}
0x2788…27a6 Head {h00=0x001a, h01=0x0050, text=»DELFMT DELETE FORMAT«, t00=0x0019, t01=0x0080}
0x27a6…27b8 Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0019, t01=0x009e}
0x27b8…27cc Head {h00=0x0010, h01=0x0050, text=» BNOK RETURN«, t00=0x0019, t01=0x00b0}
0x27cc…27e6 Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,FORMAT«, t00=0x0019, t01=0x00c4}
0x27e6…27fc Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT04 «, t00=0x0019, t01=0x00de}
0x27fc…281e Head {h00=0x001e, h01=0x0050, text=» PERF SFMTCH,W4,SYSBUF,W10«, t00=0x0019, t01=0x00f4}
0x281e…2832 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0019, t01=0x0116}
0x2832…284c Head {h00=0x0016, h01=0x0050, text=» MOVE BIN16,DEBIN1«, t00=0x0019, t01=0x012a}
0x284c…287e Head {h00=0x002e, h01=0x0050, text=» SUB DEBIN2,W6 DEBIN2=PTR TO ENTRY IN REC «, t00=0x0019, t01=0x0144}
0x287e…28b6 Head {h00=0x0034, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,W6 DEBIN1=OCC. SPACE «, t00=0x0019, t01=0x0176}
0x28b6…28d6 Head {h00=0x001c, h01=0x0050, text=» DLETE SYSBUF,DEBIN2,W10«, t00=0x001a, t01=0x001e}
0x28d6…28ee Head {h00=0x0014, h01=0x0050, text=» SUB DEBIN1,W10 «, t00=0x001a, t01=0x003e}
0x28ee…2922 Head {h00=0x0030, h01=0x0050, text=» XCOPY SYSBUF,W6,W2,DEBIN1,W0 SET OCC SPACE «, t00=0x001a, t01=0x0056}
0x2922…2940 Head {h00=0x001a, h01=0x0050, text=» CBG DEBIN1,W10,DELF1 «, t00=0x001a, t01=0x008a}
0x2940…2956 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT04 «, t00=0x001a, t01=0x00a8}
0x2956…2972 Head {h00=0x0018, h01=0x0050, text=» PERF DLRCCH,SYSBUF «, t00=0x001a, t01=0x00be}
0x2972…2986 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x001a, t01=0x00da}
0x2986…2994 Head {h00=0x000a, h01=0x0050, text=»DELF1 «, t00=0x001a, t01=0x00ee}
0x2994…29b6 Head {h00=0x001e, h01=0x0050, text=» PERF DISU,W2,BIN16,SYSBUF«, t00=0x001a, t01=0x00fc}
0x29b6…29ca Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x001a, t01=0x011e}
0x29ca…29e6 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN2,DEBIN3 «, t00=0x001a, t01=0x0132}
0x29e6…2a0a Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,DEBIN2,SYSBUF «, t00=0x001a, t01=0x014e}
0x2a0a…2a1e Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x001a, t01=0x0172}
0x2a1e…2a34 Head {h00=0x0012, h01=0x0050, text=» PERF ALGO,W2 «, t00=0x001a, t01=0x0186}
0x2a34…2a48 Head {h00=0x0010, h01=0x0050, text=» BNERR DELF2«, t00=0x001b, t01=0x000c}
0x2a48…2a56 Head {h00=0x000a, h01=0x0050, text=»DELF3 «, t00=0x001b, t01=0x0020}
0x2a56…2a6e Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W9«, t00=0x001b, t01=0x002e}
0x2a6e…2a7c Head {h00=0x000a, h01=0x0050, text=»DELF31«, t00=0x001b, t01=0x0046}
0x2a7c…2aaa Head {h00=0x002a, h01=0x0050, text=» CBNE FC,W9,DELF32 JUMP IF NOT ENTFMT «, t00=0x001b, t01=0x0054}
0x2aaa…2ae4 Head {h00=0x0036, h01=0x0050, text=» MOVE DEBINW4,WORK(W9) RESTORE ORIGINAL ERROR CODE«, t00=0x001b, t01=0x0082}
0x2ae4…2af2 Head {h00=0x000a, h01=0x0050, text=»DELF32«, t00=0x001b, t01=0x00bc}
0x2af2…2b04 Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x001b, t01=0x00ca}
0x2b04…2b12 Head {h00=0x000a, h01=0x0050, text=»DELF2 «, t00=0x001b, t01=0x00dc}
0x2b12…2b38 Head {h00=0x0022, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,W4 «, t00=0x001b, t01=0x00ea}
0x2b38…2b6c Head {h00=0x0030, h01=0x0050, text=» XCOPY SYSBUF,W0,W2,W0,W0 DESTROY ALGORITMH «, t00=0x001b, t01=0x0110}
0x2b6c…2b9c Head {h00=0x002c, h01=0x0050, text=» PERF DISU,W2,DEBIN2,SYSBUF FIRST RECORD«, t00=0x001b, t01=0x0144}
0x2b9c…2bb0 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x001b, t01=0x0174}
0x2bb0…2bce Head {h00=0x001a, h01=0x0050, text=» PERF RFRSP,DEBIN2,W1 «, t00=0x001b, t01=0x0188}
0x2bce…2bda Head {h00=0x0008, h01=0x0050, text=»DELF«, t00=0x001c, t01=0x0016}
0x2bda…2bf8 Head {h00=0x001a, h01=0x0050, text=» CBE DEBIN1,W0,DELF31 «, t00=0x001c, t01=0x0022}
0x2bf8…2c1c Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,DEBIN1,SYSBUF «, t00=0x001c, t01=0x0040}
0x2c1c…2c30 Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x001c, t01=0x0064}
0x2c30…2c54 Head {h00=0x0020, h01=0x0050, text=» COPY STR2A,W0,W2,SYSBUF,W0 «, t00=0x001c, t01=0x0078}
0x2c54…2c76 Head {h00=0x001e, h01=0x0050, text=» CBNE STR2A,=X'4600',DELF3«, t00=0x001c, t01=0x009c}
0x2c76…2c94 Head {h00=0x001a, h01=0x0050, text=» PERF RFRSP,DEBIN1,W1 «, t00=0x001c, t01=0x00be}
0x2c94…2cba Head {h00=0x0022, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,W4 «, t00=0x001c, t01=0x00dc}
0x2cba…2cca Head {h00=0x000c, h01=0x0050, text=» B DELF «, t00=0x001c, t01=0x0102}
0x2cca…2cd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0112}
0x2cd4…2ce2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001c, t01=0x011c}
0x2ce2…2cee Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x001c, t01=0x012a}
0x2cee…2cf2 Head {h00=0x4004, h01=0x0000}
0x2cf2…2cf6 00 1c 01 36 ┆ 6┆
0x2cf6…2cfe (29, 1, 8) 20 04 00 00 00 1d 00 04 ┆ ┆
0x2cfe…2d06 (30, 1, 8) 20 04 00 00 00 36 00 04 ┆ 6 ┆
0x2d06…2d56 (31, 0, 400) 20 06 00 19 00 0a 00 86 01 8e 00 0a 00 05 00 02 26 03 e0 08 00 87 00 0e 00 0a 00 05 00 02 26 03 c9 08 00 87 00 1c 00 12 00 0e 00 06 16 0c 00 1a 00 06 52 45 43 4f 52 44 00 87 00 2a 00 0c 00 07 00 03 24 05 c1 00 1a 4e 00 87 00 40 00 0a 00 06 ┆ & & RECORD * $ N @ ┆
0x2d56…2da6 00 02 26 04 81 20 00 87 00 50 00 12 00 0d 00 06 1a 0b 00 1b 10 05 54 54 54 54 39 44 00 87 00 5e 00 0c 00 07 00 03 22 05 00 1b 98 4e 00 87 00 74 00 0a 00 06 00 02 26 04 81 20 00 87 00 84 00 08 00 04 00 01 28 02 00 87 00 92 00 0c 00 08 00 03 ┆ & P TTTT9D ^ " N t & ( ┆
0x2da6…2df6 20 06 00 1c 00 1f 00 87 00 9e 00 0a 00 05 00 02 26 03 e0 20 00 87 00 ae 00 0a 00 05 00 02 26 03 c9 20 00 87 00 bc 00 14 00 10 00 07 26 0e c3 0a 44 55 50 4c 20 46 52 4f 4d 20 00 87 00 ca 00 14 00 10 00 07 16 0e 00 1d 00 08 56 41 4c 55 45 53 ┆ & & & DUPL FROM VALUES┆
0x2df6…2e46 45 54 00 87 00 e2 00 0c 00 07 00 03 24 05 c1 00 1d 55 00 87 00 fa 00 0e 00 09 00 04 26 07 c3 03 20 54 3a 4c 00 87 01 0a 00 0e 00 0a 00 04 1a 08 00 1e 10 02 58 58 00 87 01 1c 00 0c 00 07 00 03 22 05 00 1e 97 54 00 87 01 2e 00 0a 00 06 00 02 ┆ET $ U & T:L XX " T . ┆
0x2e46…2e96 26 04 81 20 00 87 01 3e 00 14 00 0f 00 07 16 0d 00 1f 00 07 45 4c 45 4d 45 4e 54 20 00 87 01 4c 00 0c 00 07 00 03 24 05 c1 00 1f 54 00 87 01 64 00 12 00 0e 00 06 16 0c 00 20 00 06 4e 55 4d 42 45 52 00 87 01 74 00 0a 00 07 00 03 24 05 c1 00 ┆& > ELEMENT L $ T d NUMBER t $ ┆
0x2e96…2ee6 (32, 0, 398) 00 87 01 8a 00 0a 00 06 00 02 26 04 81 3a 00 88 00 08 00 08 00 04 00 01 28 02 00 88 00 16 00 0c 00 08 00 03 20 06 00 21 00 19 00 88 00 22 00 0a 00 05 00 02 26 03 e0 3a 00 88 00 32 00 0a 00 05 00 02 26 03 c9 3a 00 88 00 40 00 20 00 1b 00 0d ┆ & : ( ! " & : 2 & : @ ┆
0x2ee6…2f36 26 19 c3 15 43 4f 4e 46 49 52 4d 20 52 45 43 4f 52 44 20 49 4e 53 45 52 54 3a 00 88 00 4e 00 08 00 04 00 01 28 02 00 88 00 72 00 0c 00 08 00 03 20 06 00 22 00 29 00 88 00 7e 00 0a 00 05 00 02 26 03 e0 15 00 88 00 8e 00 0a 00 05 00 02 26 03 ┆& CONFIRM RECORD INSERT: N ( r " ) ~ & & ┆
0x2f36…2f86 c9 15 00 88 00 9c 00 16 00 12 00 08 26 10 c3 0c 52 45 43 4f 56 45 52 59 20 4f 46 20 00 88 00 aa 00 10 00 0b 00 05 16 09 00 23 00 03 4a 4f 42 45 00 88 00 c4 00 0c 00 07 00 03 24 05 c1 00 23 45 00 88 00 d8 00 0a 00 06 00 02 26 04 81 3a 00 88 ┆ & RECOVERY OF # JOBE $ #E & : ┆
0x2f86…2fd6 00 e8 00 0a 00 06 00 02 26 04 c0 6b 00 88 00 f6 00 0a 00 06 00 02 26 04 81 20 00 88 01 04 00 12 00 0d 00 06 16 0b 00 24 00 05 42 41 54 43 48 59 00 88 01 12 00 0c 00 07 00 03 24 05 c1 00 24 45 00 88 01 28 00 0a 00 06 00 02 26 04 81 3a 00 88 ┆ & k & $ BATCHY $ $E ( & : ┆
0x2fd6…3024 01 38 00 0a 00 06 00 02 26 04 c0 6c 00 88 01 46 00 14 00 0f 00 07 26 0d c3 09 20 52 55 4e 4e 49 4e 47 2e 4f 00 88 01 54 00 08 00 04 00 01 28 02 00 88 01 6c 00 0c 00 08 00 03 20 06 00 25 00 15 00 88 01 78 00 0a 00 05 00 02 26 03 e0 09 ┆ 8 & l F & RUNNING.O T ( l % x & ┆
0x3024…3074 (33, 0, 398) 00 88 01 88 00 0a 00 05 00 02 26 03 c9 09 00 89 00 08 00 1c 00 17 00 0b 26 15 c3 11 52 45 43 4f 52 44 20 43 4f 52 52 45 43 54 49 4f 4e 53 00 89 00 16 00 08 00 04 00 01 28 02 00 89 00 36 00 0c 00 08 00 03 20 06 00 26 00 1b 00 89 00 42 00 0a ┆ & & RECORD CORRECTIONS ( 6 & B ┆
0x3074…30c4 00 05 00 02 26 03 e0 11 00 89 00 52 00 0a 00 05 00 02 26 03 c9 11 00 89 00 60 00 22 00 1d 00 0e 26 1b c3 17 52 45 43 4f 52 44 20 4d 55 53 54 20 42 45 20 56 45 52 49 46 49 45 44 00 00 89 00 6e 00 08 00 04 00 01 28 02 00 89 00 94 00 0c 00 08 ┆ & R & ` " & RECORD MUST BE VERIFIED n ( ┆
0x30c4…3114 00 03 20 06 00 27 00 14 00 89 00 a0 00 0a 00 05 00 02 26 03 e0 17 00 89 00 b0 00 1c 00 17 00 0b 26 15 c3 11 52 45 43 4f 56 45 52 59 20 52 55 4e 4e 49 4e 47 2e 52 00 89 00 be 00 08 00 04 00 01 28 02 00 89 00 de 00 0c 00 08 00 03 20 06 00 28 ┆ ' & & RECOVERY RUNNING.R ( (┆
0x3114…3164 00 19 00 89 00 ea 00 0a 00 05 00 02 26 03 e0 11 00 89 00 fa 00 14 00 10 00 07 16 0e 00 29 00 08 43 4f 4e 46 49 52 4d 20 00 89 01 08 00 0c 00 07 00 03 24 05 c1 00 29 45 00 89 01 20 00 1c 00 18 00 0b 26 16 c3 12 46 52 45 45 5a 49 4e 47 20 4f ┆ & ) CONFIRM $ )E & FREEZING O┆
0x3164…31b2 46 20 42 41 54 43 48 20 00 89 01 30 00 0a 00 06 00 02 26 04 c0 6c 00 89 01 50 00 08 00 04 00 01 28 02 00 89 01 5e 00 0c 00 08 00 03 20 06 00 2a 00 1e 00 89 01 6a 00 14 00 10 00 07 16 0e 00 2b 00 08 43 4f 4e 46 49 52 4d 20 00 89 01 7a ┆F BATCH 0 & l P ( ^ * j + CONFIRM z┆
0x31b2…3202 (34, 0, 400) 00 0c 00 07 00 03 24 05 c1 00 2b 52 00 8a 00 04 00 24 00 20 00 0f 26 1e c3 1a 43 4f 4e 56 45 52 53 49 4f 4e 20 4f 46 20 41 4c 4c 20 42 41 54 43 48 45 53 20 00 8a 00 14 00 08 00 04 00 01 28 02 00 8a 00 3c 00 0c 00 08 00 03 20 06 00 2c 00 10 ┆ $ +R $ & CONVERSION OF ALL BATCHES ( < , ┆
0x3202…3252 00 8a 00 48 00 0a 00 05 00 02 26 03 e0 1a 00 8a 00 58 00 0c 00 07 00 03 24 05 df 00 2a 4f 00 8a 00 66 00 14 00 0f 00 07 26 0d c3 09 4f 4e 20 55 4e 49 54 3a 55 4e 00 8a 00 76 00 0e 00 09 00 04 1a 07 00 2d 10 01 58 55 00 8a 00 8e 00 0c 00 07 ┆ H & X $ *O f & ON UNIT:UN v - XU ┆
0x3252…32a2 00 03 22 05 00 2d 69 4e 00 8a 00 a0 00 08 00 04 00 01 28 02 00 8a 00 b0 00 0c 00 08 00 03 20 06 00 2e 00 12 00 8a 00 bc 00 0a 00 05 00 02 26 03 e0 2d 00 8a 00 cc 00 0c 00 07 00 03 24 05 df 00 2a 4e 00 8a 00 da 00 16 00 11 00 08 26 0f c3 0b ┆ " -iN ( . & - $ *N & ┆
0x32a2…32f2 57 49 54 48 49 4e 20 4a 4f 42 3a 4f 00 8a 00 ea 00 0a 00 06 00 02 26 04 c0 6b 00 8a 01 04 00 08 00 04 00 01 28 02 00 8a 01 12 00 0c 00 08 00 03 20 06 00 2f 00 26 00 8a 01 1e 00 0a 00 05 00 02 26 03 e0 6b 00 8a 01 2e 00 20 00 1b 00 0d 26 19 ┆WITHIN JOB:O & k ( / & & k . & ┆
0x32f2…3342 c3 15 41 55 54 4f 4d 41 54 49 43 20 53 4b 49 50 2f 44 55 50 20 2a 4f 43 00 8a 01 3c 00 0c 00 07 00 03 26 05 da e5 06 55 00 8a 01 60 00 0c 00 08 00 03 26 06 c3 02 4e 2a 00 8a 01 70 00 0a 00 06 00 02 26 04 d8 05 00 8a 01 80 00 0e 00 09 00 04 ┆ AUTOMATIC SKIP/DUP *OC < & U ` & N* p & ┆
0x3342…3392 (35, 2, 376) 26 07 c3 03 46 46 2a 4f 00 8a 01 8e 00 08 00 04 00 01 28 02 00 8b 00 10 00 0c 00 08 00 03 20 06 00 30 00 1d 00 8b 00 1c 00 0a 00 05 00 02 26 03 e0 03 00 8b 00 2c 00 24 00 20 00 0f 26 1e c3 1a 45 4e 54 45 52 20 57 41 4e 54 45 44 20 52 45 43 ┆& FF*O ( 0 & , $ & ENTER WANTED REC┆
0x3392…33e2 4f 52 44 4e 55 4d 42 45 52 3a 00 8b 00 3a 00 08 00 04 00 01 28 02 00 8b 00 62 00 0c 00 08 00 03 20 06 00 31 00 04 00 8b 00 6e 00 0c 00 08 00 03 26 06 c0 08 0a 87 00 8b 00 7e 00 08 00 04 00 01 28 02 00 8b 00 8e 00 0c 00 08 00 03 20 06 00 32 ┆ORDNUMBER: : ( b 1 n & ~ ( 2┆
0x33e2…3432 00 03 00 8b 00 9a 00 0c 00 07 00 03 26 05 c0 17 87 87 00 8b 00 aa 00 08 00 04 00 01 28 02 00 8b 00 ba 00 0c 00 08 00 03 20 06 00 33 00 03 00 8b 00 c6 00 0c 00 07 00 03 26 05 c0 d5 87 87 00 8b 00 d6 00 08 00 04 00 01 28 02 00 8b 00 e6 00 0c ┆ & ( 3 & ( ┆
0x3432…3482 00 08 00 03 20 06 00 34 00 03 00 8b 00 f2 00 0a 00 05 00 02 26 03 e0 d5 00 8b 01 02 00 0a 00 06 00 02 26 04 81 07 00 8b 01 10 00 08 00 04 00 01 28 02 00 8b 01 1e 00 34 00 2f 00 17 00 2d 02 80 58 13 92 20 5f 9b 31 58 92 46 57 19 30 58 00 21 ┆ 4 & & ( 4 / - X _ 1X FW 0X !┆
0x3482…34ba 20 5f a8 32 00 05 52 52 52 52 52 02 90 21 30 58 00 93 93 34 02 30 58 34 02 14 00 8b 01 2a 00 0e 00 0a 07 04 00 00 00 20 02 a9 00 03 00 8b 01 62 40 04 00 00 00 8b 01 74 ┆ _ 2 RRRRR !0X 4 0X4 * b@ t┆
0x34ba…350a (36, 0, 400) 00 46 00 48 20 49 44 45 4e 54 20 44 45 4e 54 30 33 20 20 54 52 41 20 34 2e 32 20 20 20 20 2d 20 20 2d 20 20 20 46 31 20 4f 31 31 31 31 20 20 50 52 52 52 20 31 2e 30 20 38 30 2d 30 31 2d 32 31 2f 44 41 4c 49 20 00 8c 00 04 00 16 00 12 01 08 ┆ F H IDENT DENT03 TRA 4.2 - - F1 O1111 PRRR 1.0 80-01-21/DALI ┆
0x350a…355a c8 44 45 46 4f 52 43 00 c8 44 45 56 45 52 49 00 00 8c 00 4e 00 0e 00 0a 02 04 c8 24 24 24 54 52 41 4e 00 8c 00 68 00 1a 00 16 05 0a c8 44 45 46 4f 52 43 00 00 00 c8 44 45 56 45 52 49 00 00 3a 00 8c 00 7a 00 42 00 3e 02 1e c8 44 45 4c 4f 43 ┆ DEFORC DEVERI N $$$TRAN h DEFORC DEVERI : z B > DELOC┆
0x355a…35aa 4b 4e c8 44 45 52 52 4f 52 41 c8 44 45 53 54 41 54 20 a8 46 4d 4f 56 45 c8 46 4f 52 43 45 44 31 88 4d 41 53 4b 52 c8 54 3a 44 49 53 50 30 c8 54 3a 45 44 57 52 44 00 8c 00 98 00 42 00 3e 02 1e c8 54 3a 47 45 54 41 00 c8 54 3a 47 45 54 43 52 ┆KN DERRORA DESTAT FMOVE FORCED1 MASKR T:DISP0 T:EDWRD B > T:GETA T:GETCR┆
0x35aa…35fa 88 54 3a 4b 49 00 c8 54 3a 53 45 54 43 00 c8 54 3a 54 53 54 43 00 c8 54 3a 55 50 44 46 00 c8 54 3a 58 53 54 41 00 a8 54 45 53 54 42 00 8c 00 de 00 26 00 21 00 10 1e 1f 00 00 00 19 18 8b 8f ff 80 91 92 9c 8a 85 8e 8d ff 82 96 98 90 86 8c 83 ┆ T:KI T:SETC T:TSTC T:UPDF T:XSTA TESTB & ! ┆
0x35fa…364a 81 99 89 93 94 54 00 8c 01 24 00 1e 00 1a 00 0c 1e 18 00 01 00 12 11 8b ff 8f 80 91 92 9c 8a 85 ff ff ff ff ff ff ff 84 00 8c 01 4e 00 1a 00 16 00 0a 1e 14 00 02 00 0e 0d 86 84 87 89 ff 8f 88 80 91 92 9c 8a 85 00 8c 01 70 00 12 00 0d 00 06 ┆ T $ N p ┆