DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦7e9ee0dfc⟧

    Length: 10988 (0x2aec)
    Notes: pts_type(SC)
    Names: »DKRUT4.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DU/DKRUT4.SC« 
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
    └─⟦this⟧ »S:DU/DKRUT4.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DU/DKRUT4.SC« 

PTS(SC)

	IDENT	DKRUT4	UPD 80-02-25/CHST 
 DDUM DDINIT
 PDIV 
 ENTRY ENTJOB 
 ENTRY GETJOB 
 ENTRY SCHJOB 
 ENTRY DELJOB 
 ENTRY NEXJOB 
 ENTRY PREJOB 
 ENTRY OPNEBC 
 ENTRY OPNNBC 
	ENTRY	READJB 
 EXT WAIT 
 EXT SFMTCH 
 EXT FREESP 
 EXT DISU 
 EXT DLRCCH 
 EXT RFRSP
 EXT WRFSP
 EXT DEPOOL 
	EXT	RETURN 
	ENTRY	DELBTC 
	ENTRY	NXJOB
	ENTRY	NXBTH
 EXT RDACC
 EXT SCHPOO 
 EXT RELEAS 
	EXT	COND 
 EXT EMPTYT 
 EXT RDDS 
 EXT WRDS 
 EJECT
DUMM03 PROC FC
DELBTC
	SET	SWIT01 
OPNEBC
 SET SWIT05 
OPNNBC
 PERF WAIT
 BERR RETURN
WUSOK 
 SET SWIT04 
 MOVE STR6A,JOBNAME 
 PERF SFMTCH,W3,RBUF,W10	SEARCH JOBCHAIN
 BNERR OPNN01	FOUND 
 CBE DEBINW4,W9,OPNN99
 B RETURN 
OPNN99
 TBF SWIT05,OPNN02	NEW ENTRY JOBCHAIN 
 B RETURN	'NOT IN SYSTEM' 
OPNN01
 MOVE STR6A,BATCH 
 PERF SFMTCH,DEBIN3,RBUF,W12	SEARCH BATCH 
 BNERR OPNN03	BATCH FOUND 
 CBE DEBINW4,W9,OPNN88
 B RETURN 
OPNN88
 TBF SWIT05,OPNN04	NEW ENTRY BATCHCHAIN 
 B RETURN	'NOT IN SYSTEM' 
OPNN03
 TBT SWIT05,OPNN06	OPEN EXISTING BATCH
 MOVE DEBINW4,W8	ALREADY DEFINED' 
 B RETURN 
OPNN02			NEW ENTRY JOBCHAIN 
 PERF FREESP,DEBIN4,FILINDUS
 BERR RETURN
 CBE DEBIN2,W10,OPNN08	FIRST JOBCHAIN-ENTRY 
 XCOPY DEBIN2,W0,W2,RBUF,W6	GET OCCUPIED SPACE
 CBG DEBIN2,MAXOCC,OPNN07	NEW RECORD
OPNN09
 PERF ENTR,JOBNAME
 XCOPY RBUF,DEBIN2,W2,DEBIN4,W0 
 ADD DEBIN2,W2
 XCOPY RBUF,W6,W2,DEBIN2,W0 
 PERF WRDS,DEBIN1 
 BERR RETURN
 MOVE DEBIN1,W0	PTR PREV B-CHAINREC 
 MOVE DEBIN2,W10
OPNN13
 MOVE RBUF,=X'424300' 
 XCOPY RBUF,W2,W2,DEBIN1,W0 
 XCOPY RBUF,W4,W2,W0,W0 
OPNN12
 PERF ENTR,BATCH
 PERF FREESP,DEBIN1,FILINDUS
 BERR RETURN
 XCOPY RBUF,DEBIN2,W2,DEBIN1,W0 
 ADD DEBIN2,W2
 PERF FREESP,CURSEC,FILINDUS
 BERR RETURN
 XCOPY RBUF,DEBIN2,W2,CURSEC,W0 
 ADD DEBIN2,W2
 XCOPY RBUF,W6,W2,DEBIN2,W0 
 PERF WRDS,DEBIN4 
 BERR RETURN
 MOVE RBUF,HEX00
 XCOPY RBUF,W6,W2,W10,W0
 B OPNN16 
OPNN08			FIRST SECTOR JOBCHAIN
 MOVE RBUF,=X'4A4300' 
 MOVE DEBIN1,W3 
 XCOPY RBUF,W2,W2,W0,W0 
OPNN10
 XCOPY RBUF,W4,W2,W0,W0 
 MOVE DEBIN2,W10
 B OPNN09 
OPNN07			NEW SECTOR JOBCHAIN
 XCOPY RBUF,W4,W2,DEBIN4,W0 
 PERF WRDS,DEBIN1 
 BERR RETURN
 MOVE RBUF,=X'4A4300' 
 XCOPY RBUF,W2,W2,DEBIN1,W0 
 MOVE DEBIN1,DEBIN4 
 PERF FREESP,DEBIN4,FILINDUS
 B OPNN10 
OPNN04			NEW ENTRY BATCH-CHAIN
 XCOPY DEBIN2,W0,W2,RBUF,W6	GET OCC. SPACE
 CBG DEBIN2,MAXOCC,OPNN11	NEW RECORD
 MOVE DEBIN4,DEBIN1 
 B OPNN12 
OPNN11
 PERF FREESP,DEBIN4,FILINDUS
 BERR RETURN
 XCOPY RBUF,W4,W2,DEBIN4,W0 
 PERF WRDS,DEBIN1 
 BERR RETURN
 MOVE DEBIN2,W10
 B OPNN13 
OPNN06			OPEN EXISTING BATCH
 XCOPY DEBIN5,W0,W2,RBUF,DEBIN2 
 XCOPY DEBIN4,W0,W2,RBUF,W6 
 ADD DEBIN2,W2
 XCOPY CURSEC,W0,W2,RBUF,DEBIN2 
 TBT SWIT01,OPNNDL
 MOVE DEBIN1,DEBIN5 
 B OPNN16 
OPNNDL
 SUB DEBIN2,W10 
 SUB DEBIN4,W12 
 XCOPY RBUF,W6,W2,DEBIN4,W0 
 DLETE RBUF,DEBIN2,W12
 PERF WRDS,DEBIN1 
 BERR DL10
 CBG DEBIN4,W10,DL01
 PERF DLRCCH,RBUF 
DL01
 PERF RFRSP,DEBIN5,FILINDUS 
DL02
 PERF RELEAS
 SWITCH 
 PERF WAIT
 BERR DL02
 PERF DISU,W3,CURSEC,RBUF 
 BNERR DL03 
 CBE DEBINW4,=W'30',DL04
 B DL10 
DL04
 MOVE RBUF,HEX00
 MOVE DEBINW4,W0
DL03
 XCOPY DEBIN5,W0,W2,RBUF,W4 
 PERF RFRSP,CURSEC,FILINDUS 
 MOVE CURSEC,DEBIN5 
 CBNE DEBIN5,W0,DL02
DL10
 MOVE WORK(W9),DEBINW4 SAVE ERRORCODE 
 PERF WRFSP,FILINDUS WRITE FREESPACE
 MOVE DEBINW4,WORK(W9) RESTORE ERRORCODE
 B RETURN 
OPNN16
 XCOPY STATSH,W0,W1,FILINDUS,W0 
 COPY STATSH,W1,W6,JOBNAME,W0 
 COPY STATSH,W7,W6,BATCH,W0 
 PERF DEPOOL,W9,DKBIN2,DKBIN3,STATSH
 BNERR EXIST IF IKAY, ALREADY OPEN
 MOVE DKBIN1,W1 
 MOVE DKBIN2,W1 
 PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A 
 BERR RETURN
 PERF DEPOOL,W10,DKBIN1,DKBIN2,STATSH 
 MOVE PINACC,DKBIN1 
 MOVE BPOOL(DKBIN1),HEX00 
 XCOPY RPOOL(PINACC),W9,W2,DEBIN1,W0
 TBT SWIT05,EXIBAT
 B RETURN 
EXIBAT
 PERF RDACC 
 PERF RDDS,CURSEC 
 CBNE DEBINW4,=W'30',ZWIHOP 
 MOVE DEBINW4,W0
ZWIHOP
 B RETURN 
EXIST 
 MOVE DEBINW4,=W'27'	'IN USE' 
 B RETURN 
* 
* 
* 
* 
ENTJOB			ENTER JOBDEF 
 PERF WAIT
 BERR RETURN
 PERF READJB
 BNERR FOUNDJ 
 CBE DEBINW4,=W'30',FIRST 
 CBE DEBINW4,W9,NOTIN 
 B RETURN 
FIRST 
	MOVE	DEBIN1,DEBIN3	SAVE RECORD NUMBER
 MOVE DEBIN3,W0 
 MOVE DEBINW4,W0
 B FST1 
NOTIN 
 PERF FREESP,DEBIN1,W1
 BERR RETURN
FST1
	MOVE	SYSBUF,=X'4A440000000000C600' 
 XCOPY SYSBUF,W2,W2,DEBIN3,W0 
 COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 
 PERF DISU,W2,DEBIN1,SYSBUF 
 BERR RETURN
 CBE DEBIN3,W0,ENTRET LAST IN CHAIN 
 PERF DISU,W1,DEBIN3,SYSBUF READ
 BERR RETURN
 XCOPY SYSBUF,W4,W2,DEBIN1,W0 
 PERF DISU,W2,DEBIN3,SYSBUF 
ENTRET
 B RETURN 
FOUNDJ
 COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 
 PERF DISU,W2,DEBIN3,SYSBUF 
 B RETURN 
* 
* 
* 
GETJOB			GET JOBDEF 
 MOVE STR6A,DEINPUT 
GTJ020
 PERF SCHPOO,=C'J ',STR6A,W7 SCAN POOL
 IB DEBIN4,GOTFRE,LOCKED
			SEARCH ON DISC 
 CLEAR SWIT03 
 BNZ RDCHJ
 MOVE DEBIN1,W3 
RDCHJ 
 PERF WAIT
 BERR RETURN
RDCNW 
 PERF DISU,W1,DEBIN1,SYSBUF 
 BNERR DATA 
 CBE DEBINW4,=W'30',NOTEX 
 B RETURN 
NOTEX 
 MOVE DEBINW4,W9 'NOT EXISTENT' 
 B RETURN 
DATA
 MOVE DEBIN2,=W'92' 
 COPY STR6B,W0,W6,SYSBUF,DEBIN2 
	CALL	EMPTYT,STR6B
	BNZ	NOTEX
 CBE STR6A,STR6B,RDCHJF 
 TBF SWIT03,GTJ010
 MOVE STR6A,STR6B 
 PERF RELEAS
 B GTJ020 
GTJ010
 XCOPY DEBIN1,W0,W2,SYSBUF,W4 
 CBE DEBIN1,W0,NOTEX
 B RDCNW
RDCHJF
 TEST SWIT02
 BNZ RETURN RETURN, IF SEARCH 
 TBF SWIT03,GJ010 
 PERF SCHPOO,=C'J ',STR6B,W7
 BOK GJ020
GJ010 
 MOVE DEBIN3,W1 
 MOVE DEBIN4,W1 
 PERF DEPOOL,W1,DEBIN3,DEBIN4,STRG10A 
 BNERR GTJOK
 MOVE DEBINW4,W13 'NO BUFFER FREE'
 B RETURN 
GTJOK 
 COPY BPOOL(DEBIN3),W0,W188,SYSBUF,W10
 COPY RPOOL(DEBIN3),W9,W10,SYSBUF,W0
 MOVE DKBIN1,W4 
GETUNL
 MOVE DEBIN4,=W'82' 
 COPY STRG10A,W1,W6,BPOOL(DEBIN3),DEBIN4
 COPY JOBNAME,W0,W6,STRG10A,W1
GJ020 
 PERF DEPOOL,W6,PJOBCUR,DEBIN3,STRG10A
 PERF DEPOOL,DKBIN1,DEBIN3,DEBIN2,STRG10A 
 MOVE PJOBCUR,DEBIN3
 B RETURN 
LOCKED
	MOVE	JOBNAME,STR6A 
 MOVE DEBINW4,=W'26'
 B RETURN 
GOTFRE
			TEST, IF USED
 TBT SWIT02,LOCKED
 MOVE DKBIN1,W5 
 B GETUNL 
* 
* 
SCHJOB			SEARCH JOBDEF
 SET SWIT02 
 B GETJOB 
* 
* 
DELJOB			DELETE JOBDEF
 PERF WAIT
 PERF READJB
 BERR RETURN
 CLEAR SWIT04 
 PERF DLRCCH,SYSBUF 
 TBF BOOL9,RETUR
 TBF BOOL8,RETUR
 MOVE SYSBUF,HEX00
 PERF DISU,W2,W3,SYSBUF 
RETUR 
 B RETURN 
* 
* 
NEXJOB			GET NEXT JOBDEF
 MOVE DEBIN2,W4 
 B PRE01
* 
* 
PREJOB			GET PREV JOBDEF
 MOVE DEBIN2,W2 
PRE01 
 MOVE STR6A,JOBNAME DALI 79-04-24 
 MOVE DEBIN1,W3 
 CALL EMPTYT,JOBNAME
 BNZ BUFREL 
 PERF READJB
 BERR RETURN
 XCOPY DEBIN1,W0,W2,SYSBUF,DEBIN2 
 CBE DEBIN1,W0,NOTEX
BUFREL
 MOVE STRG10A,=X'4A00'
 SET SWIT03 
 B RDCHJ
* 
* 
* 
* 
* 
NXJOB			GET NEXT JOBNAME
 SET SWIT01 
NXBTH			GET NEXT BATCHNAME
 SET SWIT04 
 CALL EMPTYT,JOBNAME
 BNZ FIRJOB 
 MOVE STR6A,JOBNAME 
 PERF SFMTCH,W3,RBUF,W10
 BERR NOT 
 TBF SWIT01,BANA
 ADD DEBIN2,W4
 CBNG DEBIN2,DKBIN1,GTNAM 
RENER			READ NEXT RECORD
 XCOPY DKBIN3,W0,W2,RBUF,W4 
 CBE DKBIN3,W0,NOT
 PERF RDDS,DKBIN3 
 BERR RETURN
FIJONA
 XCOPY DEBIN1,W0,W2,RBUF,W6 
 CBNG DEBIN1,W10,NOT
 MOVE DEBIN2,W12
GTNAM 
 TBF SWIT01,GTNAM1
 COPY JOBNAME,W0,W6,RBUF,DEBIN2 
 B RETURN 
BANA
 CALL EMPTYT,BATCH
 BNZ FIRBA
 MOVE STR6A,BATCH 
 PERF SFMTCH,DEBIN3,RBUF,W12
 BERR NOT 
 ADD DEBIN2,W6
 CBG DEBIN2,DKBIN1,RENER
GTNAM1
 COPY BATCH,W0,W6,RBUF,DEBIN2 
 B RETURN 
FIRJOB
 PERF RDDS,W3 
 BOK FIJONA 
 CBE DEBINW4,=W'30',NOT 
 B RETURN 
FIRBA 
 PERF RDDS,DEBIN3 
 BERR RETURN
 XCOPY DEBIN2,W0,W2,RBUF,W6 
 CBNG DEBIN2,W10,NOT
 MOVE DEBIN2,W12
 B GTNAM1 
NOT 
 MOVE DEBINW4,W9	INDICATE 'NOT IN SYSTEM' 
 B RETURN 
* 
* 
	PEND 
	EJECT
* 
* 
READJB PROC 
 MOVE DEBIN4,W3 
REDJCH
	MOVE	DEBIN3,DEBIN4 
 PERF DISU,W1,DEBIN3,SYSBUF 
 BERR RETRED
	XCOPY	DEBIN4,W0,W2,SYSBUF,W6	GET USED SPACE
	CBG	DEBIN4,W10,REDJ10	JUMP IF EMPTY
	MOVE	DEBINW4,=W'30'	IDICATE FIRST RECORD EMPTY 
	B	RETRED 
REDJ10
 MOVE DEBIN5,=W'92' 
 COPY STR6A,W0,W6,SYSBUF,DEBIN5 
 CBE STR6A,JOBNAME,RETRED 
REDJ20
 XCOPY DEBIN4,W0,W2,SYSBUF,W4 
 CBNE DEBIN4,W0,REDJCH
 MOVE DEBINW4,W9
RETRED
 PERF COND
 RET
 PEND 
* 

* 
ENTR PROC ITEM
 XCOPY RBUF,DEBIN2,W2,W0,W0 
 ADD DEBIN2,W2
 COPY RBUF,DEBIN2,W6,ITEM,W0
 ADD DEBIN2,W6
 RET
 PEND 
* 
 END

HexDump

0x0000…0028 (0, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» IDENT DKRUT4 UPD 80-02-25/CHST «, t00=0x0000, t01=0x0004}
0x0028…003c              Head {h00=0x0010, h01=0x0050, text=» DDUM DDINIT«, t00=0x0000, t01=0x002c}
0x003c…004a              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0040}
0x004a…0060              Head {h00=0x0012, h01=0x0050, text=» ENTRY ENTJOB «, t00=0x0000, t01=0x004e}
0x0060…0076              Head {h00=0x0012, h01=0x0050, text=» ENTRY GETJOB «, t00=0x0000, t01=0x0064}
0x0076…008c              Head {h00=0x0012, h01=0x0050, text=» ENTRY SCHJOB «, t00=0x0000, t01=0x007a}
0x008c…00a2              Head {h00=0x0012, h01=0x0050, text=» ENTRY DELJOB «, t00=0x0000, t01=0x0090}
0x00a2…00b8              Head {h00=0x0012, h01=0x0050, text=» ENTRY NEXJOB «, t00=0x0000, t01=0x00a6}
0x00b8…00ce              Head {h00=0x0012, h01=0x0050, text=» ENTRY PREJOB «, t00=0x0000, t01=0x00bc}
0x00ce…00e4              Head {h00=0x0012, h01=0x0050, text=» ENTRY OPNEBC «, t00=0x0000, t01=0x00d2}
0x00e4…00fa              Head {h00=0x0012, h01=0x0050, text=» ENTRY OPNNBC «, t00=0x0000, t01=0x00e8}
0x00fa…0110              Head {h00=0x0012, h01=0x0050, text=» ENTRY READJB «, t00=0x0000, t01=0x00fe}
0x0110…0122              Head {h00=0x000e, h01=0x0050, text=» EXT WAIT «, t00=0x0000, t01=0x0114}
0x0122…0136              Head {h00=0x0010, h01=0x0050, text=» EXT SFMTCH «, t00=0x0000, t01=0x0126}
0x0136…014a              Head {h00=0x0010, h01=0x0050, text=» EXT FREESP «, t00=0x0000, t01=0x013a}
0x014a…015c              Head {h00=0x000e, h01=0x0050, text=» EXT DISU «, t00=0x0000, t01=0x014e}
0x015c…0170              Head {h00=0x0010, h01=0x0050, text=» EXT DLRCCH «, t00=0x0000, t01=0x0160}
0x0170…0182              Head {h00=0x000e, h01=0x0050, text=» EXT RFRSP«, t00=0x0000, t01=0x0174}
0x0182…0194              Head {h00=0x000e, h01=0x0050, text=» EXT WRFSP«, t00=0x0000, t01=0x0186}
0x0194…01a8              Head {h00=0x0010, h01=0x0050, text=» EXT DEPOOL «, t00=0x0001, t01=0x0008}
0x01a8…01bc              Head {h00=0x0010, h01=0x0050, text=» EXT RETURN «, t00=0x0001, t01=0x001c}
0x01bc…01d2              Head {h00=0x0012, h01=0x0050, text=» ENTRY DELBTC «, t00=0x0001, t01=0x0030}
0x01d2…01e6              Head {h00=0x0010, h01=0x0050, text=» ENTRY NXJOB«, t00=0x0001, t01=0x0046}
0x01e6…01fa              Head {h00=0x0010, h01=0x0050, text=» ENTRY NXBTH«, t00=0x0001, t01=0x005a}
0x01fa…020c              Head {h00=0x000e, h01=0x0050, text=» EXT RDACC«, t00=0x0001, t01=0x006e}
0x020c…0220              Head {h00=0x0010, h01=0x0050, text=» EXT SCHPOO «, t00=0x0001, t01=0x0080}
0x0220…0234              Head {h00=0x0010, h01=0x0050, text=» EXT RELEAS «, t00=0x0001, t01=0x0094}
0x0234…0246              Head {h00=0x000e, h01=0x0050, text=» EXT COND «, t00=0x0001, t01=0x00a8}
0x0246…025a              Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0001, t01=0x00ba}
0x025a…026c              Head {h00=0x000e, h01=0x0050, text=» EXT RDDS «, t00=0x0001, t01=0x00ce}
0x026c…027e              Head {h00=0x000e, h01=0x0050, text=» EXT WRDS «, t00=0x0001, t01=0x00e0}
0x027e…028c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00f2}
0x028c…02a2              Head {h00=0x0012, h01=0x0050, text=»DUMM03 PROC FC«, t00=0x0001, t01=0x0100}
0x02a2…02b0              Head {h00=0x000a, h01=0x0050, text=»DELBTC«, t00=0x0001, t01=0x0116}
0x02b0…02c4              Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x0001, t01=0x0124}
0x02c4…02d2              Head {h00=0x000a, h01=0x0050, text=»OPNEBC«, t00=0x0001, t01=0x0138}
0x02d2…02e6              Head {h00=0x0010, h01=0x0050, text=» SET SWIT05 «, t00=0x0001, t01=0x0146}
0x02e6…02f4              Head {h00=0x000a, h01=0x0050, text=»OPNNBC«, t00=0x0001, t01=0x015a}
0x02f4…0306              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0001, t01=0x0168}
0x0306…031a              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0001, t01=0x017a}
0x031a…0328              Head {h00=0x000a, h01=0x0050, text=»WUSOK «, t00=0x0001, t01=0x018e}
0x0328…033c              Head {h00=0x0010, h01=0x0050, text=» SET SWIT04 «, t00=0x0002, t01=0x000c}
0x033c…0358              Head {h00=0x0018, h01=0x0050, text=» MOVE STR6A,JOBNAME «, t00=0x0002, t01=0x0020}
0x0358…0388              Head {h00=0x002c, h01=0x0050, text=» PERF SFMTCH,W3,RBUF,W10 SEARCH JOBCHAIN«, t00=0x0002, t01=0x003c}
0x0388…03a4              Head {h00=0x0018, h01=0x0050, text=» BNERR OPNN01 FOUND «, t00=0x0002, t01=0x006c}
0x03a4…03c2              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW4,W9,OPNN99«, t00=0x0002, t01=0x0088}
0x03c2…03d4              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0002, t01=0x00a6}
0x03d4…03e2              Head {h00=0x000a, h01=0x0050, text=»OPNN99«, t00=0x0002, t01=0x00b8}
0x03e2…0410              Head {h00=0x002a, h01=0x0050, text=» TBF SWIT05,OPNN02 NEW ENTRY JOBCHAIN «, t00=0x0002, t01=0x00c6}
0x0410…0432              Head {h00=0x001e, h01=0x0050, text=» B RETURN 'NOT IN SYSTEM' «, t00=0x0002, t01=0x00f4}
0x0432…0440              Head {h00=0x000a, h01=0x0050, text=»OPNN01«, t00=0x0002, t01=0x0116}
0x0440…045a              Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,BATCH «, t00=0x0002, t01=0x0124}
0x045a…048c              Head {h00=0x002e, h01=0x0050, text=» PERF SFMTCH,DEBIN3,RBUF,W12 SEARCH BATCH «, t00=0x0002, t01=0x013e}
0x048c…04ae              Head {h00=0x001e, h01=0x0050, text=» BNERR OPNN03 BATCH FOUND «, t00=0x0002, t01=0x0170}
0x04ae…04cc (3, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW4,W9,OPNN88«, t00=0x0003, t01=0x0004}
0x04cc…04de              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0003, t01=0x0022}
0x04de…04ec              Head {h00=0x000a, h01=0x0050, text=»OPNN88«, t00=0x0003, t01=0x0034}
0x04ec…051c              Head {h00=0x002c, h01=0x0050, text=» TBF SWIT05,OPNN04 NEW ENTRY BATCHCHAIN «, t00=0x0003, t01=0x0042}
0x051c…053e              Head {h00=0x001e, h01=0x0050, text=» B RETURN 'NOT IN SYSTEM' «, t00=0x0003, t01=0x0072}
0x053e…054c              Head {h00=0x000a, h01=0x0050, text=»OPNN03«, t00=0x0003, t01=0x0094}
0x054c…057a              Head {h00=0x002a, h01=0x0050, text=» TBT SWIT05,OPNN06 OPEN EXISTING BATCH«, t00=0x0003, t01=0x00a2}
0x057a…05a4              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,W8 ALREADY DEFINED' «, t00=0x0003, t01=0x00d0}
0x05a4…05b6              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0003, t01=0x00fa}
0x05b6…05da              Head {h00=0x0020, h01=0x0050, text=»OPNN02   NEW ENTRY JOBCHAIN «, t00=0x0003, t01=0x010c}
0x05da…05fe              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN4,FILINDUS«, t00=0x0003, t01=0x0130}
0x05fe…0612              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0003, t01=0x0154}
0x0612…0646              Head {h00=0x0030, h01=0x0050, text=» CBE DEBIN2,W10,OPNN08 FIRST JOBCHAIN-ENTRY «, t00=0x0003, t01=0x0168}
0x0646…067c              Head {h00=0x0032, h01=0x0050, text=» XCOPY DEBIN2,W0,W2,RBUF,W6 GET OCCUPIED SPACE«, t00=0x0004, t01=0x000c}
0x067c…06a8              Head {h00=0x0028, h01=0x0050, text=» CBG DEBIN2,MAXOCC,OPNN07 NEW RECORD«, t00=0x0004, t01=0x0042}
0x06a8…06b6              Head {h00=0x000a, h01=0x0050, text=»OPNN09«, t00=0x0004, t01=0x006e}
0x06b6…06d0              Head {h00=0x0016, h01=0x0050, text=» PERF ENTR,JOBNAME«, t00=0x0004, t01=0x007c}
0x06d0…06f8              Head {h00=0x0024, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,DEBIN4,W0 «, t00=0x0004, t01=0x0096}
0x06f8…070e              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0004, t01=0x00be}
0x070e…0732              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W6,W2,DEBIN2,W0 «, t00=0x0004, t01=0x00d4}
0x0732…074c              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0004, t01=0x00f8}
0x074c…0760              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0004, t01=0x0112}
0x0760…078c              Head {h00=0x0028, h01=0x0050, text=» MOVE DEBIN1,W0 PTR PREV B-CHAINREC «, t00=0x0004, t01=0x0126}
0x078c…07a4              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W10«, t00=0x0004, t01=0x0152}
0x07a4…07b2              Head {h00=0x000a, h01=0x0050, text=»OPNN13«, t00=0x0004, t01=0x016a}
0x07b2…07d0              Head {h00=0x001a, h01=0x0050, text=» MOVE RBUF,=X'424300' «, t00=0x0004, t01=0x0178}
0x07d0…07f4              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W2,W2,DEBIN1,W0 «, t00=0x0005, t01=0x0008}
0x07f4…0814              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W4,W2,W0,W0 «, t00=0x0005, t01=0x002c}
0x0814…0822              Head {h00=0x000a, h01=0x0050, text=»OPNN12«, t00=0x0005, t01=0x004c}
0x0822…083a              Head {h00=0x0014, h01=0x0050, text=» PERF ENTR,BATCH«, t00=0x0005, t01=0x005a}
0x083a…085e              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN1,FILINDUS«, t00=0x0005, t01=0x0072}
0x085e…0872              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0005, t01=0x0096}
0x0872…089a              Head {h00=0x0024, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,DEBIN1,W0 «, t00=0x0005, t01=0x00aa}
0x089a…08b0              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0005, t01=0x00d2}
0x08b0…08d4              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,CURSEC,FILINDUS«, t00=0x0005, t01=0x00e8}
0x08d4…08e8              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0005, t01=0x010c}
0x08e8…0910              Head {h00=0x0024, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,CURSEC,W0 «, t00=0x0005, t01=0x0120}
0x0910…0926              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0005, t01=0x0148}
0x0926…094a              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W6,W2,DEBIN2,W0 «, t00=0x0005, t01=0x015e}
0x094a…0964              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN4 «, t00=0x0005, t01=0x0182}
0x0964…0978              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0006, t01=0x000c}
0x0978…0990              Head {h00=0x0014, h01=0x0050, text=» MOVE RBUF,HEX00«, t00=0x0006, t01=0x0020}
0x0990…09b0              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W6,W2,W10,W0«, t00=0x0006, t01=0x0038}
0x09b0…09c2              Head {h00=0x000e, h01=0x0050, text=» B OPNN16 «, t00=0x0006, t01=0x0058}
0x09c2…09e8              Head {h00=0x0022, h01=0x0050, text=»OPNN08   FIRST SECTOR JOBCHAIN«, t00=0x0006, t01=0x006a}
0x09e8…0a06              Head {h00=0x001a, h01=0x0050, text=» MOVE RBUF,=X'4A4300' «, t00=0x0006, t01=0x0090}
0x0a06…0a1e              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W3 «, t00=0x0006, t01=0x00ae}
0x0a1e…0a3e              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W2,W2,W0,W0 «, t00=0x0006, t01=0x00c6}
0x0a3e…0a4c              Head {h00=0x000a, h01=0x0050, text=»OPNN10«, t00=0x0006, t01=0x00e6}
0x0a4c…0a6c              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W4,W2,W0,W0 «, t00=0x0006, t01=0x00f4}
0x0a6c…0a84              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W10«, t00=0x0006, t01=0x0114}
0x0a84…0a96              Head {h00=0x000e, h01=0x0050, text=» B OPNN09 «, t00=0x0006, t01=0x012c}
0x0a96…0aba              Head {h00=0x0020, h01=0x0050, text=»OPNN07   NEW SECTOR JOBCHAIN«, t00=0x0006, t01=0x013e}
0x0aba…0ade              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W4,W2,DEBIN4,W0 «, t00=0x0006, t01=0x0162}
0x0ade…0af8              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0006, t01=0x0186}
0x0af8…0b0c              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0007, t01=0x0010}
0x0b0c…0b2a              Head {h00=0x001a, h01=0x0050, text=» MOVE RBUF,=X'4A4300' «, t00=0x0007, t01=0x0024}
0x0b2a…0b4e              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W2,W2,DEBIN1,W0 «, t00=0x0007, t01=0x0042}
0x0b4e…0b6a              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,DEBIN4 «, t00=0x0007, t01=0x0066}
0x0b6a…0b8e              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN4,FILINDUS«, t00=0x0007, t01=0x0082}
0x0b8e…0ba0              Head {h00=0x000e, h01=0x0050, text=» B OPNN10 «, t00=0x0007, t01=0x00a6}
0x0ba0…0bc6              Head {h00=0x0022, h01=0x0050, text=»OPNN04   NEW ENTRY BATCH-CHAIN«, t00=0x0007, t01=0x00b8}
0x0bc6…0bf8              Head {h00=0x002e, h01=0x0050, text=» XCOPY DEBIN2,W0,W2,RBUF,W6 GET OCC. SPACE«, t00=0x0007, t01=0x00de}
0x0bf8…0c24              Head {h00=0x0028, h01=0x0050, text=» CBG DEBIN2,MAXOCC,OPNN11 NEW RECORD«, t00=0x0007, t01=0x0110}
0x0c24…0c40              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN4,DEBIN1 «, t00=0x0007, t01=0x013c}
0x0c40…0c52              Head {h00=0x000e, h01=0x0050, text=» B OPNN12 «, t00=0x0007, t01=0x0158}
0x0c52…0c60              Head {h00=0x000a, h01=0x0050, text=»OPNN11«, t00=0x0007, t01=0x016a}
0x0c60…0c84              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN4,FILINDUS«, t00=0x0007, t01=0x0178}
0x0c84…0c98              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0008, t01=0x000c}
0x0c98…0cbc              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W4,W2,DEBIN4,W0 «, t00=0x0008, t01=0x0020}
0x0cbc…0cd6              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0008, t01=0x0044}
0x0cd6…0cea              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0008, t01=0x005e}
0x0cea…0d02              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W10«, t00=0x0008, t01=0x0072}
0x0d02…0d14              Head {h00=0x000e, h01=0x0050, text=» B OPNN13 «, t00=0x0008, t01=0x008a}
0x0d14…0d38              Head {h00=0x0020, h01=0x0050, text=»OPNN06   OPEN EXISTING BATCH«, t00=0x0008, t01=0x009c}
0x0d38…0d60              Head {h00=0x0024, h01=0x0050, text=» XCOPY DEBIN5,W0,W2,RBUF,DEBIN2 «, t00=0x0008, t01=0x00c0}
0x0d60…0d84              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,RBUF,W6 «, t00=0x0008, t01=0x00e8}
0x0d84…0d9a              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0008, t01=0x010c}
0x0d9a…0dc2              Head {h00=0x0024, h01=0x0050, text=» XCOPY CURSEC,W0,W2,RBUF,DEBIN2 «, t00=0x0008, t01=0x0122}
0x0dc2…0ddc              Head {h00=0x0016, h01=0x0050, text=» TBT SWIT01,OPNNDL«, t00=0x0008, t01=0x014a}
0x0ddc…0df8              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,DEBIN5 «, t00=0x0008, t01=0x0164}
0x0df8…0e0a              Head {h00=0x000e, h01=0x0050, text=» B OPNN16 «, t00=0x0008, t01=0x0180}
0x0e0a…0e18 (9, 0, 400)  Head {h00=0x000a, h01=0x0050, text=»OPNNDL«, t00=0x0009, t01=0x0004}
0x0e18…0e30              Head {h00=0x0014, h01=0x0050, text=» SUB DEBIN2,W10 «, t00=0x0009, t01=0x0012}
0x0e30…0e48              Head {h00=0x0014, h01=0x0050, text=» SUB DEBIN4,W12 «, t00=0x0009, t01=0x002a}
0x0e48…0e6c              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W6,W2,DEBIN4,W0 «, t00=0x0009, t01=0x0042}
0x0e6c…0e8a              Head {h00=0x001a, h01=0x0050, text=» DLETE RBUF,DEBIN2,W12«, t00=0x0009, t01=0x0066}
0x0e8a…0ea4              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0009, t01=0x0084}
0x0ea4…0eb6              Head {h00=0x000e, h01=0x0050, text=» BERR DL10«, t00=0x0009, t01=0x009e}
0x0eb6…0ed2              Head {h00=0x0018, h01=0x0050, text=» CBG DEBIN4,W10,DL01«, t00=0x0009, t01=0x00b0}
0x0ed2…0eec              Head {h00=0x0016, h01=0x0050, text=» PERF DLRCCH,RBUF «, t00=0x0009, t01=0x00cc}
0x0eec…0ef8              Head {h00=0x0008, h01=0x0050, text=»DL01«, t00=0x0009, t01=0x00e6}
0x0ef8…0f1c              Head {h00=0x0020, h01=0x0050, text=» PERF RFRSP,DEBIN5,FILINDUS «, t00=0x0009, t01=0x00f2}
0x0f1c…0f28              Head {h00=0x0008, h01=0x0050, text=»DL02«, t00=0x0009, t01=0x0116}
0x0f28…0f3c              Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x0009, t01=0x0122}
0x0f3c…0f4c              Head {h00=0x000c, h01=0x0050, text=» SWITCH «, t00=0x0009, t01=0x0136}
0x0f4c…0f5e              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0009, t01=0x0146}
0x0f5e…0f70              Head {h00=0x000e, h01=0x0050, text=» BERR DL02«, t00=0x0009, t01=0x0158}
0x0f70…0f92              Head {h00=0x001e, h01=0x0050, text=» PERF DISU,W3,CURSEC,RBUF «, t00=0x0009, t01=0x016a}
0x0f92…0fa6              Head {h00=0x0010, h01=0x0050, text=» BNERR DL03 «, t00=0x0009, t01=0x018c}
0x0fa6…0fc6              Head {h00=0x001c, h01=0x0050, text=» CBE DEBINW4,=W'30',DL04«, t00=0x000a, t01=0x0010}
0x0fc6…0fd6              Head {h00=0x000c, h01=0x0050, text=» B DL10 «, t00=0x000a, t01=0x0030}
0x0fd6…0fe2              Head {h00=0x0008, h01=0x0050, text=»DL04«, t00=0x000a, t01=0x0040}
0x0fe2…0ffa              Head {h00=0x0014, h01=0x0050, text=» MOVE RBUF,HEX00«, t00=0x000a, t01=0x004c}
0x0ffa…1012              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000a, t01=0x0064}
0x1012…101e              Head {h00=0x0008, h01=0x0050, text=»DL03«, t00=0x000a, t01=0x007c}
0x101e…1042              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN5,W0,W2,RBUF,W4 «, t00=0x000a, t01=0x0088}
0x1042…1066              Head {h00=0x0020, h01=0x0050, text=» PERF RFRSP,CURSEC,FILINDUS «, t00=0x000a, t01=0x00ac}
0x1066…1082              Head {h00=0x0018, h01=0x0050, text=» MOVE CURSEC,DEBIN5 «, t00=0x000a, t01=0x00d0}
0x1082…109e              Head {h00=0x0018, h01=0x0050, text=» CBNE DEBIN5,W0,DL02«, t00=0x000a, t01=0x00ec}
0x109e…10aa              Head {h00=0x0008, h01=0x0050, text=»DL10«, t00=0x000a, t01=0x0108}
0x10aa…10d8              Head {h00=0x002a, h01=0x0050, text=» MOVE WORK(W9),DEBINW4 SAVE ERRORCODE «, t00=0x000a, t01=0x0114}
0x10d8…1104              Head {h00=0x0028, h01=0x0050, text=» PERF WRFSP,FILINDUS WRITE FREESPACE«, t00=0x000a, t01=0x0142}
0x1104…1134              Head {h00=0x002c, h01=0x0050, text=» MOVE DEBINW4,WORK(W9) RESTORE ERRORCODE«, t00=0x000a, t01=0x016e}
0x1134…1146              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000b, t01=0x000e}
0x1146…1154              Head {h00=0x000a, h01=0x0050, text=»OPNN16«, t00=0x000b, t01=0x0020}
0x1154…117c              Head {h00=0x0024, h01=0x0050, text=» XCOPY STATSH,W0,W1,FILINDUS,W0 «, t00=0x000b, t01=0x002e}
0x117c…11a2              Head {h00=0x0022, h01=0x0050, text=» COPY STATSH,W1,W6,JOBNAME,W0 «, t00=0x000b, t01=0x0056}
0x11a2…11c6              Head {h00=0x0020, h01=0x0050, text=» COPY STATSH,W7,W6,BATCH,W0 «, t00=0x000b, t01=0x007c}
0x11c6…11f2              Head {h00=0x0028, h01=0x0050, text=» PERF DEPOOL,W9,DKBIN2,DKBIN3,STATSH«, t00=0x000b, t01=0x00a0}
0x11f2…121c              Head {h00=0x0026, h01=0x0050, text=» BNERR EXIST IF IKAY, ALREADY OPEN«, t00=0x000b, t01=0x00cc}
0x121c…1234              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W1 «, t00=0x000b, t01=0x00f6}
0x1234…124c              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN2,W1 «, t00=0x000b, t01=0x010e}
0x124c…127a              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A «, t00=0x000b, t01=0x0126}
0x127a…128e              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000b, t01=0x0154}
0x128e…12bc              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W10,DKBIN1,DKBIN2,STATSH «, t00=0x000b, t01=0x0168}
0x12bc…12d8              Head {h00=0x0018, h01=0x0050, text=» MOVE PINACC,DKBIN1 «, t00=0x000c, t01=0x0008}
0x12d8…12fa              Head {h00=0x001e, h01=0x0050, text=» MOVE BPOOL(DKBIN1),HEX00 «, t00=0x000c, t01=0x0024}
0x12fa…1326              Head {h00=0x0028, h01=0x0050, text=» XCOPY RPOOL(PINACC),W9,W2,DEBIN1,W0«, t00=0x000c, t01=0x0046}
0x1326…1340              Head {h00=0x0016, h01=0x0050, text=» TBT SWIT05,EXIBAT«, t00=0x000c, t01=0x0072}
0x1340…1352              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000c, t01=0x008c}
0x1352…1360              Head {h00=0x000a, h01=0x0050, text=»EXIBAT«, t00=0x000c, t01=0x009e}
0x1360…1374              Head {h00=0x0010, h01=0x0050, text=» PERF RDACC «, t00=0x000c, t01=0x00ac}
0x1374…138e              Head {h00=0x0016, h01=0x0050, text=» PERF RDDS,CURSEC «, t00=0x000c, t01=0x00c0}
0x138e…13b2              Head {h00=0x0020, h01=0x0050, text=» CBNE DEBINW4,=W'30',ZWIHOP «, t00=0x000c, t01=0x00da}
0x13b2…13ca              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000c, t01=0x00fe}
0x13ca…13d8              Head {h00=0x000a, h01=0x0050, text=»ZWIHOP«, t00=0x000c, t01=0x0116}
0x13d8…13ea              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000c, t01=0x0124}
0x13ea…13f8              Head {h00=0x000a, h01=0x0050, text=»EXIST «, t00=0x000c, t01=0x0136}
0x13f8…141e              Head {h00=0x0022, h01=0x0050, text=» MOVE DEBINW4,=W'27' 'IN USE' «, t00=0x000c, t01=0x0144}
0x141e…1430              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000c, t01=0x016a}
0x1430…143a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x017c}
0x143a…1444              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0186}
0x1444…144e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0190}
0x144e…1458              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x000a}
0x1458…1476              Head {h00=0x001a, h01=0x0050, text=»ENTJOB   ENTER JOBDEF «, t00=0x000d, t01=0x0014}
0x1476…1488              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x000d, t01=0x0032}
0x1488…149c              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000d, t01=0x0044}
0x149c…14b0              Head {h00=0x0010, h01=0x0050, text=» PERF READJB«, t00=0x000d, t01=0x0058}
0x14b0…14c6              Head {h00=0x0012, h01=0x0050, text=» BNERR FOUNDJ «, t00=0x000d, t01=0x006c}
0x14c6…14e8              Head {h00=0x001e, h01=0x0050, text=» CBE DEBINW4,=W'30',FIRST «, t00=0x000d, t01=0x0082}
0x14e8…1506              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW4,W9,NOTIN «, t00=0x000d, t01=0x00a4}
0x1506…1518              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000d, t01=0x00c2}
0x1518…1526              Head {h00=0x000a, h01=0x0050, text=»FIRST «, t00=0x000d, t01=0x00d4}
0x1526…1554              Head {h00=0x002a, h01=0x0050, text=» MOVE DEBIN1,DEBIN3 SAVE RECORD NUMBER«, t00=0x000d, t01=0x00e2}
0x1554…156c              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN3,W0 «, t00=0x000d, t01=0x0110}
0x156c…1584              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000d, t01=0x0128}
0x1584…1594              Head {h00=0x000c, h01=0x0050, text=» B FST1 «, t00=0x000d, t01=0x0140}
0x1594…15a2              Head {h00=0x000a, h01=0x0050, text=»NOTIN «, t00=0x000d, t01=0x0150}
0x15a2…15c0              Head {h00=0x001a, h01=0x0050, text=» PERF FREESP,DEBIN1,W1«, t00=0x000d, t01=0x015e}
0x15c0…15d4              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000d, t01=0x017c}
0x15d4…15e0              Head {h00=0x0008, h01=0x0050, text=»FST1«, t00=0x000d, t01=0x0190}
0x15e0…160c              Head {h00=0x0028, h01=0x0050, text=» MOVE SYSBUF,=X'4A440000000000C600' «, t00=0x000e, t01=0x000c}
0x160c…1632              Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,W2,W2,DEBIN3,W0 «, t00=0x000e, t01=0x0038}
0x1632…1662              Head {h00=0x002c, h01=0x0050, text=» COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 «, t00=0x000e, t01=0x005e}
0x1662…1686              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN1,SYSBUF «, t00=0x000e, t01=0x008e}
0x1686…169a              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000e, t01=0x00b2}
0x169a…16c6              Head {h00=0x0028, h01=0x0050, text=» CBE DEBIN3,W0,ENTRET LAST IN CHAIN «, t00=0x000e, t01=0x00c6}
0x16c6…16ee              Head {h00=0x0024, h01=0x0050, text=» PERF DISU,W1,DEBIN3,SYSBUF READ«, t00=0x000e, t01=0x00f2}
0x16ee…1702              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000e, t01=0x011a}
0x1702…1728              Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,W4,W2,DEBIN1,W0 «, t00=0x000e, t01=0x012e}
0x1728…174c              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN3,SYSBUF «, t00=0x000e, t01=0x0154}
0x174c…175a              Head {h00=0x000a, h01=0x0050, text=»ENTRET«, t00=0x000e, t01=0x0178}
0x175a…176c              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000e, t01=0x0186}
0x176c…177a              Head {h00=0x000a, h01=0x0050, text=»FOUNDJ«, t00=0x000f, t01=0x0008}
0x177a…17aa              Head {h00=0x002c, h01=0x0050, text=» COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 «, t00=0x000f, t01=0x0016}
0x17aa…17ce              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN3,SYSBUF «, t00=0x000f, t01=0x0046}
0x17ce…17e0              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000f, t01=0x006a}
0x17e0…17ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007c}
0x17ea…17f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0086}
0x17f4…17fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0090}
0x17fe…181a              Head {h00=0x0018, h01=0x0050, text=»GETJOB   GET JOBDEF «, t00=0x000f, t01=0x009a}
0x181a…1836              Head {h00=0x0018, h01=0x0050, text=» MOVE STR6A,DEINPUT «, t00=0x000f, t01=0x00b6}
0x1836…1844              Head {h00=0x000a, h01=0x0050, text=»GTJ020«, t00=0x000f, t01=0x00d2}
0x1844…1872              Head {h00=0x002a, h01=0x0050, text=» PERF SCHPOO,=C'J ',STR6A,W7 SCAN POOL«, t00=0x000f, t01=0x00e0}
0x1872…1892              Head {h00=0x001c, h01=0x0050, text=» IB DEBIN4,GOTFRE,LOCKED«, t00=0x000f, t01=0x010e}
0x1892…18ac              Head {h00=0x0016, h01=0x0050, text=»   SEARCH ON DISC «, t00=0x000f, t01=0x012e}
0x18ac…18c2              Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT03 «, t00=0x000f, t01=0x0148}
0x18c2…18d4              Head {h00=0x000e, h01=0x0050, text=» BNZ RDCHJ«, t00=0x000f, t01=0x015e}
0x18d4…18ec              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W3 «, t00=0x000f, t01=0x0170}
0x18ec…18fa              Head {h00=0x000a, h01=0x0050, text=»RDCHJ «, t00=0x000f, t01=0x0188}
0x18fa…190c              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0010, t01=0x0008}
0x190c…1920              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0010, t01=0x001a}
0x1920…192e              Head {h00=0x000a, h01=0x0050, text=»RDCNW «, t00=0x0010, t01=0x002e}
0x192e…1952              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,DEBIN1,SYSBUF «, t00=0x0010, t01=0x003c}
0x1952…1966              Head {h00=0x0010, h01=0x0050, text=» BNERR DATA «, t00=0x0010, t01=0x0060}
0x1966…1988              Head {h00=0x001e, h01=0x0050, text=» CBE DEBINW4,=W'30',NOTEX «, t00=0x0010, t01=0x0074}
0x1988…199a              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0010, t01=0x0096}
0x199a…19a8              Head {h00=0x000a, h01=0x0050, text=»NOTEX «, t00=0x0010, t01=0x00a8}
0x19a8…19d0              Head {h00=0x0024, h01=0x0050, text=» MOVE DEBINW4,W9 'NOT EXISTENT' «, t00=0x0010, t01=0x00b6}
0x19d0…19e2              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0010, t01=0x00de}
0x19e2…19ee              Head {h00=0x0008, h01=0x0050, text=»DATA«, t00=0x0010, t01=0x00f0}
0x19ee…1a0a              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN2,=W'92' «, t00=0x0010, t01=0x00fc}
0x1a0a…1a32              Head {h00=0x0024, h01=0x0050, text=» COPY STR6B,W0,W6,SYSBUF,DEBIN2 «, t00=0x0010, t01=0x0118}
0x1a32…1a4c              Head {h00=0x0016, h01=0x0050, text=» CALL EMPTYT,STR6B«, t00=0x0010, t01=0x0140}
0x1a4c…1a5e              Head {h00=0x000e, h01=0x0050, text=» BNZ NOTEX«, t00=0x0010, t01=0x015a}
0x1a5e…1a7e              Head {h00=0x001c, h01=0x0050, text=» CBE STR6A,STR6B,RDCHJF «, t00=0x0010, t01=0x016c}
0x1a7e…1a98              Head {h00=0x0016, h01=0x0050, text=» TBF SWIT03,GTJ010«, t00=0x0010, t01=0x018c}
0x1a98…1ab2              Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,STR6B «, t00=0x0011, t01=0x0016}
0x1ab2…1ac6              Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x0011, t01=0x0030}
0x1ac6…1ad8              Head {h00=0x000e, h01=0x0050, text=» B GTJ020 «, t00=0x0011, t01=0x0044}
0x1ad8…1ae6              Head {h00=0x000a, h01=0x0050, text=»GTJ010«, t00=0x0011, t01=0x0056}
0x1ae6…1b0c              Head {h00=0x0022, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,W4 «, t00=0x0011, t01=0x0064}
0x1b0c…1b28              Head {h00=0x0018, h01=0x0050, text=» CBE DEBIN1,W0,NOTEX«, t00=0x0011, t01=0x008a}
0x1b28…1b38              Head {h00=0x000c, h01=0x0050, text=» B RDCNW«, t00=0x0011, t01=0x00a6}
0x1b38…1b46              Head {h00=0x000a, h01=0x0050, text=»RDCHJF«, t00=0x0011, t01=0x00b6}
0x1b46…1b5a              Head {h00=0x0010, h01=0x0050, text=» TEST SWIT02«, t00=0x0011, t01=0x00c4}
0x1b5a…1b80              Head {h00=0x0022, h01=0x0050, text=» BNZ RETURN RETURN, IF SEARCH «, t00=0x0011, t01=0x00d8}
0x1b80…1b9a              Head {h00=0x0016, h01=0x0050, text=» TBF SWIT03,GJ010 «, t00=0x0011, t01=0x00fe}
0x1b9a…1bbe              Head {h00=0x0020, h01=0x0050, text=» PERF SCHPOO,=C'J ',STR6B,W7«, t00=0x0011, t01=0x0118}
0x1bbe…1bd0              Head {h00=0x000e, h01=0x0050, text=» BOK GJ020«, t00=0x0011, t01=0x013c}
0x1bd0…1bde              Head {h00=0x000a, h01=0x0050, text=»GJ010 «, t00=0x0011, t01=0x014e}
0x1bde…1bf6              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN3,W1 «, t00=0x0011, t01=0x015c}
0x1bf6…1c0e              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN4,W1 «, t00=0x0011, t01=0x0174}
0x1c0e…1c3c              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W1,DEBIN3,DEBIN4,STRG10A «, t00=0x0011, t01=0x018c}
0x1c3c…1c50              Head {h00=0x0010, h01=0x0050, text=» BNERR GTJOK«, t00=0x0012, t01=0x002a}
0x1c50…1c7a              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,W13 'NO BUFFER FREE'«, t00=0x0012, t01=0x003e}
0x1c7a…1c8c              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0012, t01=0x0068}
0x1c8c…1c9a              Head {h00=0x000a, h01=0x0050, text=»GTJOK «, t00=0x0012, t01=0x007a}
0x1c9a…1cc8              Head {h00=0x002a, h01=0x0050, text=» COPY BPOOL(DEBIN3),W0,W188,SYSBUF,W10«, t00=0x0012, t01=0x0088}
0x1cc8…1cf4              Head {h00=0x0028, h01=0x0050, text=» COPY RPOOL(DEBIN3),W9,W10,SYSBUF,W0«, t00=0x0012, t01=0x00b6}
0x1cf4…1d0c              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W4 «, t00=0x0012, t01=0x00e2}
0x1d0c…1d1a              Head {h00=0x000a, h01=0x0050, text=»GETUNL«, t00=0x0012, t01=0x00fa}
0x1d1a…1d36              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN4,=W'82' «, t00=0x0012, t01=0x0108}
0x1d36…1d66              Head {h00=0x002c, h01=0x0050, text=» COPY STRG10A,W1,W6,BPOOL(DEBIN3),DEBIN4«, t00=0x0012, t01=0x0124}
0x1d66…1d8c              Head {h00=0x0022, h01=0x0050, text=» COPY JOBNAME,W0,W6,STRG10A,W1«, t00=0x0012, t01=0x0154}
0x1d8c…1d9a              Head {h00=0x000a, h01=0x0050, text=»GJ020 «, t00=0x0012, t01=0x017a}
0x1d9a…1dc8              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W6,PJOBCUR,DEBIN3,STRG10A«, t00=0x0012, t01=0x0188}
0x1dc8…1dfa              Head {h00=0x002e, h01=0x0050, text=» PERF DEPOOL,DKBIN1,DEBIN3,DEBIN2,STRG10A «, t00=0x0013, t01=0x0026}
0x1dfa…1e16              Head {h00=0x0018, h01=0x0050, text=» MOVE PJOBCUR,DEBIN3«, t00=0x0013, t01=0x0058}
0x1e16…1e28              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0013, t01=0x0074}
0x1e28…1e36              Head {h00=0x000a, h01=0x0050, text=»LOCKED«, t00=0x0013, t01=0x0086}
0x1e36…1e52              Head {h00=0x0018, h01=0x0050, text=» MOVE JOBNAME,STR6A «, t00=0x0013, t01=0x0094}
0x1e52…1e6e              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW4,=W'26'«, t00=0x0013, t01=0x00b0}
0x1e6e…1e80              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0013, t01=0x00cc}
0x1e80…1e8e              Head {h00=0x000a, h01=0x0050, text=»GOTFRE«, t00=0x0013, t01=0x00de}
0x1e8e…1ea6              Head {h00=0x0014, h01=0x0050, text=»   TEST, IF USED«, t00=0x0013, t01=0x00ec}
0x1ea6…1ec0              Head {h00=0x0016, h01=0x0050, text=» TBT SWIT02,LOCKED«, t00=0x0013, t01=0x0104}
0x1ec0…1ed8              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W5 «, t00=0x0013, t01=0x011e}
0x1ed8…1eea              Head {h00=0x000e, h01=0x0050, text=» B GETUNL «, t00=0x0013, t01=0x0136}
0x1eea…1ef4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0148}
0x1ef4…1efe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0152}
0x1efe…1f1c              Head {h00=0x001a, h01=0x0050, text=»SCHJOB   SEARCH JOBDEF«, t00=0x0013, t01=0x015c}
0x1f1c…1f30              Head {h00=0x0010, h01=0x0050, text=» SET SWIT02 «, t00=0x0013, t01=0x017a}
0x1f30…1f42              Head {h00=0x000e, h01=0x0050, text=» B GETJOB «, t00=0x0013, t01=0x018e}
0x1f42…1f4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0010}
0x1f4c…1f56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x001a}
0x1f56…1f74              Head {h00=0x001a, h01=0x0050, text=»DELJOB   DELETE JOBDEF«, t00=0x0014, t01=0x0024}
0x1f74…1f86              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0014, t01=0x0042}
0x1f86…1f9a              Head {h00=0x0010, h01=0x0050, text=» PERF READJB«, t00=0x0014, t01=0x0054}
0x1f9a…1fae              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0014, t01=0x0068}
0x1fae…1fc4              Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT04 «, t00=0x0014, t01=0x007c}
0x1fc4…1fe0              Head {h00=0x0018, h01=0x0050, text=» PERF DLRCCH,SYSBUF «, t00=0x0014, t01=0x0092}
0x1fe0…1ff8              Head {h00=0x0014, h01=0x0050, text=» TBF BOOL9,RETUR«, t00=0x0014, t01=0x00ae}
0x1ff8…2010              Head {h00=0x0014, h01=0x0050, text=» TBF BOOL8,RETUR«, t00=0x0014, t01=0x00c6}
0x2010…202a              Head {h00=0x0016, h01=0x0050, text=» MOVE SYSBUF,HEX00«, t00=0x0014, t01=0x00de}
0x202a…204a              Head {h00=0x001c, h01=0x0050, text=» PERF DISU,W2,W3,SYSBUF «, t00=0x0014, t01=0x00f8}
0x204a…2058              Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0014, t01=0x0118}
0x2058…206a              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0014, t01=0x0126}
0x206a…2074              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0138}
0x2074…207e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0142}
0x207e…209e              Head {h00=0x001c, h01=0x0050, text=»NEXJOB   GET NEXT JOBDEF«, t00=0x0014, t01=0x014c}
0x209e…20b6              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W4 «, t00=0x0014, t01=0x016c}
0x20b6…20c6              Head {h00=0x000c, h01=0x0050, text=» B PRE01«, t00=0x0014, t01=0x0184}
0x20c6…20d0 (21, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0004}
0x20d0…20da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x000e}
0x20da…20fa              Head {h00=0x001c, h01=0x0050, text=»PREJOB   GET PREV JOBDEF«, t00=0x0015, t01=0x0018}
0x20fa…2112              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W2 «, t00=0x0015, t01=0x0038}
0x2112…2120              Head {h00=0x000a, h01=0x0050, text=»PRE01 «, t00=0x0015, t01=0x0050}
0x2120…214a              Head {h00=0x0026, h01=0x0050, text=» MOVE STR6A,JOBNAME DALI 79-04-24 «, t00=0x0015, t01=0x005e}
0x214a…2162              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W3 «, t00=0x0015, t01=0x0088}
0x2162…217e              Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,JOBNAME«, t00=0x0015, t01=0x00a0}
0x217e…2192              Head {h00=0x0010, h01=0x0050, text=» BNZ BUFREL «, t00=0x0015, t01=0x00bc}
0x2192…21a6              Head {h00=0x0010, h01=0x0050, text=» PERF READJB«, t00=0x0015, t01=0x00d0}
0x21a6…21ba              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0015, t01=0x00e4}
0x21ba…21e4              Head {h00=0x0026, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,DEBIN2 «, t00=0x0015, t01=0x00f8}
0x21e4…2200              Head {h00=0x0018, h01=0x0050, text=» CBE DEBIN1,W0,NOTEX«, t00=0x0015, t01=0x0122}
0x2200…220e              Head {h00=0x000a, h01=0x0050, text=»BUFREL«, t00=0x0015, t01=0x013e}
0x220e…222c              Head {h00=0x001a, h01=0x0050, text=» MOVE STRG10A,=X'4A00'«, t00=0x0015, t01=0x014c}
0x222c…2240              Head {h00=0x0010, h01=0x0050, text=» SET SWIT03 «, t00=0x0015, t01=0x016a}
0x2240…2250              Head {h00=0x000c, h01=0x0050, text=» B RDCHJ«, t00=0x0015, t01=0x017e}
0x2250…225a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x018e}
0x225a…2264              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0008}
0x2264…226e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0012}
0x226e…2278              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x001c}
0x2278…2282              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0026}
0x2282…22a2              Head {h00=0x001c, h01=0x0050, text=»NXJOB   GET NEXT JOBNAME«, t00=0x0016, t01=0x0030}
0x22a2…22b6              Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x0016, t01=0x0050}
0x22b6…22d8              Head {h00=0x001e, h01=0x0050, text=»NXBTH   GET NEXT BATCHNAME«, t00=0x0016, t01=0x0064}
0x22d8…22ec              Head {h00=0x0010, h01=0x0050, text=» SET SWIT04 «, t00=0x0016, t01=0x0086}
0x22ec…2308              Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,JOBNAME«, t00=0x0016, t01=0x009a}
0x2308…231c              Head {h00=0x0010, h01=0x0050, text=» BNZ FIRJOB «, t00=0x0016, t01=0x00b6}
0x231c…2338              Head {h00=0x0018, h01=0x0050, text=» MOVE STR6A,JOBNAME «, t00=0x0016, t01=0x00ca}
0x2338…2358              Head {h00=0x001c, h01=0x0050, text=» PERF SFMTCH,W3,RBUF,W10«, t00=0x0016, t01=0x00e6}
0x2358…236a              Head {h00=0x000e, h01=0x0050, text=» BERR NOT «, t00=0x0016, t01=0x0106}
0x236a…2382              Head {h00=0x0014, h01=0x0050, text=» TBF SWIT01,BANA«, t00=0x0016, t01=0x0118}
0x2382…2398              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W4«, t00=0x0016, t01=0x0130}
0x2398…23ba              Head {h00=0x001e, h01=0x0050, text=» CBNG DEBIN2,DKBIN1,GTNAM «, t00=0x0016, t01=0x0146}
0x23ba…23da              Head {h00=0x001c, h01=0x0050, text=»RENER   READ NEXT RECORD«, t00=0x0016, t01=0x0168}
0x23da…23fe              Head {h00=0x0020, h01=0x0050, text=» XCOPY DKBIN3,W0,W2,RBUF,W4 «, t00=0x0016, t01=0x0188}
0x23fe…2418              Head {h00=0x0016, h01=0x0050, text=» CBE DKBIN3,W0,NOT«, t00=0x0017, t01=0x001c}
0x2418…2432              Head {h00=0x0016, h01=0x0050, text=» PERF RDDS,DKBIN3 «, t00=0x0017, t01=0x0036}
0x2432…2446              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0017, t01=0x0050}
0x2446…2454              Head {h00=0x000a, h01=0x0050, text=»FIJONA«, t00=0x0017, t01=0x0064}
0x2454…2478              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,RBUF,W6 «, t00=0x0017, t01=0x0072}
0x2478…2494              Head {h00=0x0018, h01=0x0050, text=» CBNG DEBIN1,W10,NOT«, t00=0x0017, t01=0x0096}
0x2494…24ac              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W12«, t00=0x0017, t01=0x00b2}
0x24ac…24ba              Head {h00=0x000a, h01=0x0050, text=»GTNAM «, t00=0x0017, t01=0x00ca}
0x24ba…24d4              Head {h00=0x0016, h01=0x0050, text=» TBF SWIT01,GTNAM1«, t00=0x0017, t01=0x00d8}
0x24d4…24fc              Head {h00=0x0024, h01=0x0050, text=» COPY JOBNAME,W0,W6,RBUF,DEBIN2 «, t00=0x0017, t01=0x00f2}
0x24fc…250e              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0017, t01=0x011a}
0x250e…251a              Head {h00=0x0008, h01=0x0050, text=»BANA«, t00=0x0017, t01=0x012c}
0x251a…2534              Head {h00=0x0016, h01=0x0050, text=» CALL EMPTYT,BATCH«, t00=0x0017, t01=0x0138}
0x2534…2546              Head {h00=0x000e, h01=0x0050, text=» BNZ FIRBA«, t00=0x0017, t01=0x0152}
0x2546…2560              Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,BATCH «, t00=0x0017, t01=0x0164}
0x2560…2584              Head {h00=0x0020, h01=0x0050, text=» PERF SFMTCH,DEBIN3,RBUF,W12«, t00=0x0017, t01=0x017e}
0x2584…2596              Head {h00=0x000e, h01=0x0050, text=» BERR NOT «, t00=0x0018, t01=0x0012}
0x2596…25ac              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W6«, t00=0x0018, t01=0x0024}
0x25ac…25cc              Head {h00=0x001c, h01=0x0050, text=» CBG DEBIN2,DKBIN1,RENER«, t00=0x0018, t01=0x003a}
0x25cc…25da              Head {h00=0x000a, h01=0x0050, text=»GTNAM1«, t00=0x0018, t01=0x005a}
0x25da…2600              Head {h00=0x0022, h01=0x0050, text=» COPY BATCH,W0,W6,RBUF,DEBIN2 «, t00=0x0018, t01=0x0068}
0x2600…2612              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0018, t01=0x008e}
0x2612…2620              Head {h00=0x000a, h01=0x0050, text=»FIRJOB«, t00=0x0018, t01=0x00a0}
0x2620…2636              Head {h00=0x0012, h01=0x0050, text=» PERF RDDS,W3 «, t00=0x0018, t01=0x00ae}
0x2636…264a              Head {h00=0x0010, h01=0x0050, text=» BOK FIJONA «, t00=0x0018, t01=0x00c4}
0x264a…266a              Head {h00=0x001c, h01=0x0050, text=» CBE DEBINW4,=W'30',NOT «, t00=0x0018, t01=0x00d8}
0x266a…267c              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0018, t01=0x00f8}
0x267c…268a              Head {h00=0x000a, h01=0x0050, text=»FIRBA «, t00=0x0018, t01=0x010a}
0x268a…26a4              Head {h00=0x0016, h01=0x0050, text=» PERF RDDS,DEBIN3 «, t00=0x0018, t01=0x0118}
0x26a4…26b8              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0018, t01=0x0132}
0x26b8…26dc              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN2,W0,W2,RBUF,W6 «, t00=0x0018, t01=0x0146}
0x26dc…26f8              Head {h00=0x0018, h01=0x0050, text=» CBNG DEBIN2,W10,NOT«, t00=0x0018, t01=0x016a}
0x26f8…2710              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W12«, t00=0x0018, t01=0x0186}
0x2710…2722              Head {h00=0x000e, h01=0x0050, text=» B GTNAM1 «, t00=0x0019, t01=0x000e}
0x2722…272e              Head {h00=0x0008, h01=0x0050, text=»NOT «, t00=0x0019, t01=0x0020}
0x272e…2760              Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,W9 INDICATE 'NOT IN SYSTEM' «, t00=0x0019, t01=0x002c}
0x2760…2772              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0019, t01=0x005e}
0x2772…277c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0070}
0x277c…2786              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x007a}
0x2786…2794              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0019, t01=0x0084}
0x2794…27a2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x0092}
0x27a2…27ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00a0}
0x27ac…27b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00aa}
0x27b6…27ca              Head {h00=0x0010, h01=0x0050, text=»READJB PROC «, t00=0x0019, t01=0x00b4}
0x27ca…27e2              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN4,W3 «, t00=0x0019, t01=0x00c8}
0x27e2…27f0              Head {h00=0x000a, h01=0x0050, text=»REDJCH«, t00=0x0019, t01=0x00e0}
0x27f0…280c              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN3,DEBIN4 «, t00=0x0019, t01=0x00ee}
0x280c…2830              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,DEBIN3,SYSBUF «, t00=0x0019, t01=0x010a}
0x2830…2844              Head {h00=0x0010, h01=0x0050, text=» BERR RETRED«, t00=0x0019, t01=0x012e}
0x2844…2878              Head {h00=0x0030, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,SYSBUF,W6 GET USED SPACE«, t00=0x0019, t01=0x0142}
0x2878…28a4              Head {h00=0x0028, h01=0x0050, text=» CBG DEBIN4,W10,REDJ10 JUMP IF EMPTY«, t00=0x0019, t01=0x0176}
0x28a4…28dc              Head {h00=0x0034, h01=0x0050, text=» MOVE DEBINW4,=W'30' IDICATE FIRST RECORD EMPTY «, t00=0x001a, t01=0x0012}
0x28dc…28ee              Head {h00=0x000e, h01=0x0050, text=» B RETRED «, t00=0x001a, t01=0x004a}
0x28ee…28fc              Head {h00=0x000a, h01=0x0050, text=»REDJ10«, t00=0x001a, t01=0x005c}
0x28fc…2918              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN5,=W'92' «, t00=0x001a, t01=0x006a}
0x2918…2940              Head {h00=0x0024, h01=0x0050, text=» COPY STR6A,W0,W6,SYSBUF,DEBIN5 «, t00=0x001a, t01=0x0086}
0x2940…2962              Head {h00=0x001e, h01=0x0050, text=» CBE STR6A,JOBNAME,RETRED «, t00=0x001a, t01=0x00ae}
0x2962…2970              Head {h00=0x000a, h01=0x0050, text=»REDJ20«, t00=0x001a, t01=0x00d0}
0x2970…2996              Head {h00=0x0022, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,SYSBUF,W4 «, t00=0x001a, t01=0x00de}
0x2996…29b4              Head {h00=0x001a, h01=0x0050, text=» CBNE DEBIN4,W0,REDJCH«, t00=0x001a, t01=0x0104}
0x29b4…29cc              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W9«, t00=0x001a, t01=0x0122}
0x29cc…29da              Head {h00=0x000a, h01=0x0050, text=»RETRED«, t00=0x001a, t01=0x013a}
0x29da…29ec              Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x001a, t01=0x0148}
0x29ec…29f8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x015a}
0x29f8…2a06              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x0166}
0x2a06…2a10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0174}
0x2a10…2a18              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x017e}
0x2a18…2a22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0186}
0x2a22…2a38              Head {h00=0x0012, h01=0x0050, text=»ENTR PROC ITEM«, t00=0x001a, t01=0x0190}
0x2a38…2a5c              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,W0,W0 «, t00=0x001b, t01=0x0016}
0x2a5c…2a72              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x001b, t01=0x003a}
0x2a72…2a96              Head {h00=0x0020, h01=0x0050, text=» COPY RBUF,DEBIN2,W6,ITEM,W0«, t00=0x001b, t01=0x0050}
0x2a96…2aac              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W6«, t00=0x001b, t01=0x0074}
0x2aac…2ab8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x008a}
0x2ab8…2ac6              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x0096}
0x2ac6…2ad0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00a4}
0x2ad0…2adc              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x001b, t01=0x00ae}
0x2adc…2ae0              Head {h00=0x4004, h01=0x0000}
0x2ae0…2ae4              00 1b 00 ba                                                                                                                                                                                                                                       ┆    ┆
0x2ae4…2aec (28, 1, 8)   20 04 00 00 00 1c 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view