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

⟦4419f226d⟧

    Length: 11012 (0x2b04)
    Notes: pts_type(SC)
    Names: »DKRUT4.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DE/DKRUT4.SC« 
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
    └─⟦this⟧ »DEN10/DKRUT4.SC« 
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
    └─⟦this⟧ »S:DE/DKRUT4.SC« 
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
    └─⟦this⟧ »DEN10/DKRUT4.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DE/DKRUT4.SC« 

PTS(SC)

	IDENT	DKRUT4	REL 10.0 80-04-11 
			80-02-25/CHST
 DDUM DEDDIV
 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 REL 10.0 80-04-11 «, t00=0x0000, t01=0x0004}
0x0028…0040              Head {h00=0x0014, h01=0x0050, text=»   80-02-25/CHST«, t00=0x0000, t01=0x002c}
0x0040…0054              Head {h00=0x0010, h01=0x0050, text=» DDUM DEDDIV«, t00=0x0000, t01=0x0044}
0x0054…0062              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0058}
0x0062…0078              Head {h00=0x0012, h01=0x0050, text=» ENTRY ENTJOB «, t00=0x0000, t01=0x0066}
0x0078…008e              Head {h00=0x0012, h01=0x0050, text=» ENTRY GETJOB «, t00=0x0000, t01=0x007c}
0x008e…00a4              Head {h00=0x0012, h01=0x0050, text=» ENTRY SCHJOB «, t00=0x0000, t01=0x0092}
0x00a4…00ba              Head {h00=0x0012, h01=0x0050, text=» ENTRY DELJOB «, t00=0x0000, t01=0x00a8}
0x00ba…00d0              Head {h00=0x0012, h01=0x0050, text=» ENTRY NEXJOB «, t00=0x0000, t01=0x00be}
0x00d0…00e6              Head {h00=0x0012, h01=0x0050, text=» ENTRY PREJOB «, t00=0x0000, t01=0x00d4}
0x00e6…00fc              Head {h00=0x0012, h01=0x0050, text=» ENTRY OPNEBC «, t00=0x0000, t01=0x00ea}
0x00fc…0112              Head {h00=0x0012, h01=0x0050, text=» ENTRY OPNNBC «, t00=0x0000, t01=0x0100}
0x0112…0128              Head {h00=0x0012, h01=0x0050, text=» ENTRY READJB «, t00=0x0000, t01=0x0116}
0x0128…013a              Head {h00=0x000e, h01=0x0050, text=» EXT WAIT «, t00=0x0000, t01=0x012c}
0x013a…014e              Head {h00=0x0010, h01=0x0050, text=» EXT SFMTCH «, t00=0x0000, t01=0x013e}
0x014e…0162              Head {h00=0x0010, h01=0x0050, text=» EXT FREESP «, t00=0x0000, t01=0x0152}
0x0162…0174              Head {h00=0x000e, h01=0x0050, text=» EXT DISU «, t00=0x0000, t01=0x0166}
0x0174…0188              Head {h00=0x0010, h01=0x0050, text=» EXT DLRCCH «, t00=0x0000, t01=0x0178}
0x0188…019a              Head {h00=0x000e, h01=0x0050, text=» EXT RFRSP«, t00=0x0000, t01=0x018c}
0x019a…01ac              Head {h00=0x000e, h01=0x0050, text=» EXT WRFSP«, t00=0x0001, t01=0x000e}
0x01ac…01c0              Head {h00=0x0010, h01=0x0050, text=» EXT DEPOOL «, t00=0x0001, t01=0x0020}
0x01c0…01d4              Head {h00=0x0010, h01=0x0050, text=» EXT RETURN «, t00=0x0001, t01=0x0034}
0x01d4…01ea              Head {h00=0x0012, h01=0x0050, text=» ENTRY DELBTC «, t00=0x0001, t01=0x0048}
0x01ea…01fe              Head {h00=0x0010, h01=0x0050, text=» ENTRY NXJOB«, t00=0x0001, t01=0x005e}
0x01fe…0212              Head {h00=0x0010, h01=0x0050, text=» ENTRY NXBTH«, t00=0x0001, t01=0x0072}
0x0212…0224              Head {h00=0x000e, h01=0x0050, text=» EXT RDACC«, t00=0x0001, t01=0x0086}
0x0224…0238              Head {h00=0x0010, h01=0x0050, text=» EXT SCHPOO «, t00=0x0001, t01=0x0098}
0x0238…024c              Head {h00=0x0010, h01=0x0050, text=» EXT RELEAS «, t00=0x0001, t01=0x00ac}
0x024c…025e              Head {h00=0x000e, h01=0x0050, text=» EXT COND «, t00=0x0001, t01=0x00c0}
0x025e…0272              Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0001, t01=0x00d2}
0x0272…0284              Head {h00=0x000e, h01=0x0050, text=» EXT RDDS «, t00=0x0001, t01=0x00e6}
0x0284…0296              Head {h00=0x000e, h01=0x0050, text=» EXT WRDS «, t00=0x0001, t01=0x00f8}
0x0296…02a4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x010a}
0x02a4…02ba              Head {h00=0x0012, h01=0x0050, text=»DUMM03 PROC FC«, t00=0x0001, t01=0x0118}
0x02ba…02c8              Head {h00=0x000a, h01=0x0050, text=»DELBTC«, t00=0x0001, t01=0x012e}
0x02c8…02dc              Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x0001, t01=0x013c}
0x02dc…02ea              Head {h00=0x000a, h01=0x0050, text=»OPNEBC«, t00=0x0001, t01=0x0150}
0x02ea…02fe              Head {h00=0x0010, h01=0x0050, text=» SET SWIT05 «, t00=0x0001, t01=0x015e}
0x02fe…030c              Head {h00=0x000a, h01=0x0050, text=»OPNNBC«, t00=0x0001, t01=0x0172}
0x030c…031e              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0001, t01=0x0180}
0x031e…0332 (2, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0002, t01=0x0004}
0x0332…0340              Head {h00=0x000a, h01=0x0050, text=»WUSOK «, t00=0x0002, t01=0x0018}
0x0340…0354              Head {h00=0x0010, h01=0x0050, text=» SET SWIT04 «, t00=0x0002, t01=0x0026}
0x0354…0370              Head {h00=0x0018, h01=0x0050, text=» MOVE STR6A,JOBNAME «, t00=0x0002, t01=0x003a}
0x0370…03a0              Head {h00=0x002c, h01=0x0050, text=» PERF SFMTCH,W3,RBUF,W10 SEARCH JOBCHAIN«, t00=0x0002, t01=0x0056}
0x03a0…03bc              Head {h00=0x0018, h01=0x0050, text=» BNERR OPNN01 FOUND «, t00=0x0002, t01=0x0086}
0x03bc…03da              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW4,W9,OPNN99«, t00=0x0002, t01=0x00a2}
0x03da…03ec              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0002, t01=0x00c0}
0x03ec…03fa              Head {h00=0x000a, h01=0x0050, text=»OPNN99«, t00=0x0002, t01=0x00d2}
0x03fa…0428              Head {h00=0x002a, h01=0x0050, text=» TBF SWIT05,OPNN02 NEW ENTRY JOBCHAIN «, t00=0x0002, t01=0x00e0}
0x0428…044a              Head {h00=0x001e, h01=0x0050, text=» B RETURN 'NOT IN SYSTEM' «, t00=0x0002, t01=0x010e}
0x044a…0458              Head {h00=0x000a, h01=0x0050, text=»OPNN01«, t00=0x0002, t01=0x0130}
0x0458…0472              Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,BATCH «, t00=0x0002, t01=0x013e}
0x0472…04a4              Head {h00=0x002e, h01=0x0050, text=» PERF SFMTCH,DEBIN3,RBUF,W12 SEARCH BATCH «, t00=0x0002, t01=0x0158}
0x04a4…04c6              Head {h00=0x001e, h01=0x0050, text=» BNERR OPNN03 BATCH FOUND «, t00=0x0002, t01=0x018a}
0x04c6…04e4              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW4,W9,OPNN88«, t00=0x0003, t01=0x001c}
0x04e4…04f6              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0003, t01=0x003a}
0x04f6…0504              Head {h00=0x000a, h01=0x0050, text=»OPNN88«, t00=0x0003, t01=0x004c}
0x0504…0534              Head {h00=0x002c, h01=0x0050, text=» TBF SWIT05,OPNN04 NEW ENTRY BATCHCHAIN «, t00=0x0003, t01=0x005a}
0x0534…0556              Head {h00=0x001e, h01=0x0050, text=» B RETURN 'NOT IN SYSTEM' «, t00=0x0003, t01=0x008a}
0x0556…0564              Head {h00=0x000a, h01=0x0050, text=»OPNN03«, t00=0x0003, t01=0x00ac}
0x0564…0592              Head {h00=0x002a, h01=0x0050, text=» TBT SWIT05,OPNN06 OPEN EXISTING BATCH«, t00=0x0003, t01=0x00ba}
0x0592…05bc              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,W8 ALREADY DEFINED' «, t00=0x0003, t01=0x00e8}
0x05bc…05ce              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0003, t01=0x0112}
0x05ce…05f2              Head {h00=0x0020, h01=0x0050, text=»OPNN02   NEW ENTRY JOBCHAIN «, t00=0x0003, t01=0x0124}
0x05f2…0616              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN4,FILINDUS«, t00=0x0003, t01=0x0148}
0x0616…062a              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0003, t01=0x016c}
0x062a…065e              Head {h00=0x0030, h01=0x0050, text=» CBE DEBIN2,W10,OPNN08 FIRST JOBCHAIN-ENTRY «, t00=0x0003, t01=0x0180}
0x065e…0694              Head {h00=0x0032, h01=0x0050, text=» XCOPY DEBIN2,W0,W2,RBUF,W6 GET OCCUPIED SPACE«, t00=0x0004, t01=0x0024}
0x0694…06c0              Head {h00=0x0028, h01=0x0050, text=» CBG DEBIN2,MAXOCC,OPNN07 NEW RECORD«, t00=0x0004, t01=0x005a}
0x06c0…06ce              Head {h00=0x000a, h01=0x0050, text=»OPNN09«, t00=0x0004, t01=0x0086}
0x06ce…06e8              Head {h00=0x0016, h01=0x0050, text=» PERF ENTR,JOBNAME«, t00=0x0004, t01=0x0094}
0x06e8…0710              Head {h00=0x0024, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,DEBIN4,W0 «, t00=0x0004, t01=0x00ae}
0x0710…0726              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0004, t01=0x00d6}
0x0726…074a              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W6,W2,DEBIN2,W0 «, t00=0x0004, t01=0x00ec}
0x074a…0764              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0004, t01=0x0110}
0x0764…0778              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0004, t01=0x012a}
0x0778…07a4              Head {h00=0x0028, h01=0x0050, text=» MOVE DEBIN1,W0 PTR PREV B-CHAINREC «, t00=0x0004, t01=0x013e}
0x07a4…07bc              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W10«, t00=0x0004, t01=0x016a}
0x07bc…07ca              Head {h00=0x000a, h01=0x0050, text=»OPNN13«, t00=0x0004, t01=0x0182}
0x07ca…07e8              Head {h00=0x001a, h01=0x0050, text=» MOVE RBUF,=X'424300' «, t00=0x0004, t01=0x0190}
0x07e8…080c              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W2,W2,DEBIN1,W0 «, t00=0x0005, t01=0x001e}
0x080c…082c              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W4,W2,W0,W0 «, t00=0x0005, t01=0x0042}
0x082c…083a              Head {h00=0x000a, h01=0x0050, text=»OPNN12«, t00=0x0005, t01=0x0062}
0x083a…0852              Head {h00=0x0014, h01=0x0050, text=» PERF ENTR,BATCH«, t00=0x0005, t01=0x0070}
0x0852…0876              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN1,FILINDUS«, t00=0x0005, t01=0x0088}
0x0876…088a              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0005, t01=0x00ac}
0x088a…08b2              Head {h00=0x0024, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,DEBIN1,W0 «, t00=0x0005, t01=0x00c0}
0x08b2…08c8              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0005, t01=0x00e8}
0x08c8…08ec              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,CURSEC,FILINDUS«, t00=0x0005, t01=0x00fe}
0x08ec…0900              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0005, t01=0x0122}
0x0900…0928              Head {h00=0x0024, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,CURSEC,W0 «, t00=0x0005, t01=0x0136}
0x0928…093e              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0005, t01=0x015e}
0x093e…0962              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W6,W2,DEBIN2,W0 «, t00=0x0005, t01=0x0174}
0x0962…097c              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN4 «, t00=0x0006, t01=0x0008}
0x097c…0990              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0006, t01=0x0022}
0x0990…09a8              Head {h00=0x0014, h01=0x0050, text=» MOVE RBUF,HEX00«, t00=0x0006, t01=0x0036}
0x09a8…09c8              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W6,W2,W10,W0«, t00=0x0006, t01=0x004e}
0x09c8…09da              Head {h00=0x000e, h01=0x0050, text=» B OPNN16 «, t00=0x0006, t01=0x006e}
0x09da…0a00              Head {h00=0x0022, h01=0x0050, text=»OPNN08   FIRST SECTOR JOBCHAIN«, t00=0x0006, t01=0x0080}
0x0a00…0a1e              Head {h00=0x001a, h01=0x0050, text=» MOVE RBUF,=X'4A4300' «, t00=0x0006, t01=0x00a6}
0x0a1e…0a36              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W3 «, t00=0x0006, t01=0x00c4}
0x0a36…0a56              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W2,W2,W0,W0 «, t00=0x0006, t01=0x00dc}
0x0a56…0a64              Head {h00=0x000a, h01=0x0050, text=»OPNN10«, t00=0x0006, t01=0x00fc}
0x0a64…0a84              Head {h00=0x001c, h01=0x0050, text=» XCOPY RBUF,W4,W2,W0,W0 «, t00=0x0006, t01=0x010a}
0x0a84…0a9c              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W10«, t00=0x0006, t01=0x012a}
0x0a9c…0aae              Head {h00=0x000e, h01=0x0050, text=» B OPNN09 «, t00=0x0006, t01=0x0142}
0x0aae…0ad2              Head {h00=0x0020, h01=0x0050, text=»OPNN07   NEW SECTOR JOBCHAIN«, t00=0x0006, t01=0x0154}
0x0ad2…0af6              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W4,W2,DEBIN4,W0 «, t00=0x0006, t01=0x0178}
0x0af6…0b10              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0007, t01=0x000c}
0x0b10…0b24              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0007, t01=0x0026}
0x0b24…0b42              Head {h00=0x001a, h01=0x0050, text=» MOVE RBUF,=X'4A4300' «, t00=0x0007, t01=0x003a}
0x0b42…0b66              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W2,W2,DEBIN1,W0 «, t00=0x0007, t01=0x0058}
0x0b66…0b82              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,DEBIN4 «, t00=0x0007, t01=0x007c}
0x0b82…0ba6              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN4,FILINDUS«, t00=0x0007, t01=0x0098}
0x0ba6…0bb8              Head {h00=0x000e, h01=0x0050, text=» B OPNN10 «, t00=0x0007, t01=0x00bc}
0x0bb8…0bde              Head {h00=0x0022, h01=0x0050, text=»OPNN04   NEW ENTRY BATCH-CHAIN«, t00=0x0007, t01=0x00ce}
0x0bde…0c10              Head {h00=0x002e, h01=0x0050, text=» XCOPY DEBIN2,W0,W2,RBUF,W6 GET OCC. SPACE«, t00=0x0007, t01=0x00f4}
0x0c10…0c3c              Head {h00=0x0028, h01=0x0050, text=» CBG DEBIN2,MAXOCC,OPNN11 NEW RECORD«, t00=0x0007, t01=0x0126}
0x0c3c…0c58              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN4,DEBIN1 «, t00=0x0007, t01=0x0152}
0x0c58…0c6a              Head {h00=0x000e, h01=0x0050, text=» B OPNN12 «, t00=0x0007, t01=0x016e}
0x0c6a…0c78              Head {h00=0x000a, h01=0x0050, text=»OPNN11«, t00=0x0007, t01=0x0180}
0x0c78…0c9c              Head {h00=0x0020, h01=0x0050, text=» PERF FREESP,DEBIN4,FILINDUS«, t00=0x0007, t01=0x018e}
0x0c9c…0cb0              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0008, t01=0x0022}
0x0cb0…0cd4              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W4,W2,DEBIN4,W0 «, t00=0x0008, t01=0x0036}
0x0cd4…0cee              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0008, t01=0x005a}
0x0cee…0d02              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0008, t01=0x0074}
0x0d02…0d1a              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W10«, t00=0x0008, t01=0x0088}
0x0d1a…0d2c              Head {h00=0x000e, h01=0x0050, text=» B OPNN13 «, t00=0x0008, t01=0x00a0}
0x0d2c…0d50              Head {h00=0x0020, h01=0x0050, text=»OPNN06   OPEN EXISTING BATCH«, t00=0x0008, t01=0x00b2}
0x0d50…0d78              Head {h00=0x0024, h01=0x0050, text=» XCOPY DEBIN5,W0,W2,RBUF,DEBIN2 «, t00=0x0008, t01=0x00d6}
0x0d78…0d9c              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,RBUF,W6 «, t00=0x0008, t01=0x00fe}
0x0d9c…0db2              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x0008, t01=0x0122}
0x0db2…0dda              Head {h00=0x0024, h01=0x0050, text=» XCOPY CURSEC,W0,W2,RBUF,DEBIN2 «, t00=0x0008, t01=0x0138}
0x0dda…0df4              Head {h00=0x0016, h01=0x0050, text=» TBT SWIT01,OPNNDL«, t00=0x0008, t01=0x0160}
0x0df4…0e10              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN1,DEBIN5 «, t00=0x0008, t01=0x017a}
0x0e10…0e22              Head {h00=0x000e, h01=0x0050, text=» B OPNN16 «, t00=0x0009, t01=0x0008}
0x0e22…0e30              Head {h00=0x000a, h01=0x0050, text=»OPNNDL«, t00=0x0009, t01=0x001a}
0x0e30…0e48              Head {h00=0x0014, h01=0x0050, text=» SUB DEBIN2,W10 «, t00=0x0009, t01=0x0028}
0x0e48…0e60              Head {h00=0x0014, h01=0x0050, text=» SUB DEBIN4,W12 «, t00=0x0009, t01=0x0040}
0x0e60…0e84              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,W6,W2,DEBIN4,W0 «, t00=0x0009, t01=0x0058}
0x0e84…0ea2              Head {h00=0x001a, h01=0x0050, text=» DLETE RBUF,DEBIN2,W12«, t00=0x0009, t01=0x007c}
0x0ea2…0ebc              Head {h00=0x0016, h01=0x0050, text=» PERF WRDS,DEBIN1 «, t00=0x0009, t01=0x009a}
0x0ebc…0ece              Head {h00=0x000e, h01=0x0050, text=» BERR DL10«, t00=0x0009, t01=0x00b4}
0x0ece…0eea              Head {h00=0x0018, h01=0x0050, text=» CBG DEBIN4,W10,DL01«, t00=0x0009, t01=0x00c6}
0x0eea…0f04              Head {h00=0x0016, h01=0x0050, text=» PERF DLRCCH,RBUF «, t00=0x0009, t01=0x00e2}
0x0f04…0f10              Head {h00=0x0008, h01=0x0050, text=»DL01«, t00=0x0009, t01=0x00fc}
0x0f10…0f34              Head {h00=0x0020, h01=0x0050, text=» PERF RFRSP,DEBIN5,FILINDUS «, t00=0x0009, t01=0x0108}
0x0f34…0f40              Head {h00=0x0008, h01=0x0050, text=»DL02«, t00=0x0009, t01=0x012c}
0x0f40…0f54              Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x0009, t01=0x0138}
0x0f54…0f64              Head {h00=0x000c, h01=0x0050, text=» SWITCH «, t00=0x0009, t01=0x014c}
0x0f64…0f76              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0009, t01=0x015c}
0x0f76…0f88              Head {h00=0x000e, h01=0x0050, text=» BERR DL02«, t00=0x0009, t01=0x016e}
0x0f88…0faa              Head {h00=0x001e, h01=0x0050, text=» PERF DISU,W3,CURSEC,RBUF «, t00=0x0009, t01=0x0180}
0x0faa…0fbe              Head {h00=0x0010, h01=0x0050, text=» BNERR DL03 «, t00=0x000a, t01=0x0012}
0x0fbe…0fde              Head {h00=0x001c, h01=0x0050, text=» CBE DEBINW4,=W'30',DL04«, t00=0x000a, t01=0x0026}
0x0fde…0fee              Head {h00=0x000c, h01=0x0050, text=» B DL10 «, t00=0x000a, t01=0x0046}
0x0fee…0ffa              Head {h00=0x0008, h01=0x0050, text=»DL04«, t00=0x000a, t01=0x0056}
0x0ffa…1012              Head {h00=0x0014, h01=0x0050, text=» MOVE RBUF,HEX00«, t00=0x000a, t01=0x0062}
0x1012…102a              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000a, t01=0x007a}
0x102a…1036              Head {h00=0x0008, h01=0x0050, text=»DL03«, t00=0x000a, t01=0x0092}
0x1036…105a              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN5,W0,W2,RBUF,W4 «, t00=0x000a, t01=0x009e}
0x105a…107e              Head {h00=0x0020, h01=0x0050, text=» PERF RFRSP,CURSEC,FILINDUS «, t00=0x000a, t01=0x00c2}
0x107e…109a              Head {h00=0x0018, h01=0x0050, text=» MOVE CURSEC,DEBIN5 «, t00=0x000a, t01=0x00e6}
0x109a…10b6              Head {h00=0x0018, h01=0x0050, text=» CBNE DEBIN5,W0,DL02«, t00=0x000a, t01=0x0102}
0x10b6…10c2              Head {h00=0x0008, h01=0x0050, text=»DL10«, t00=0x000a, t01=0x011e}
0x10c2…10f0              Head {h00=0x002a, h01=0x0050, text=» MOVE WORK(W9),DEBINW4 SAVE ERRORCODE «, t00=0x000a, t01=0x012a}
0x10f0…111c              Head {h00=0x0028, h01=0x0050, text=» PERF WRFSP,FILINDUS WRITE FREESPACE«, t00=0x000a, t01=0x0158}
0x111c…114c              Head {h00=0x002c, h01=0x0050, text=» MOVE DEBINW4,WORK(W9) RESTORE ERRORCODE«, t00=0x000a, t01=0x0184}
0x114c…115e              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000b, t01=0x0024}
0x115e…116c              Head {h00=0x000a, h01=0x0050, text=»OPNN16«, t00=0x000b, t01=0x0036}
0x116c…1194              Head {h00=0x0024, h01=0x0050, text=» XCOPY STATSH,W0,W1,FILINDUS,W0 «, t00=0x000b, t01=0x0044}
0x1194…11ba              Head {h00=0x0022, h01=0x0050, text=» COPY STATSH,W1,W6,JOBNAME,W0 «, t00=0x000b, t01=0x006c}
0x11ba…11de              Head {h00=0x0020, h01=0x0050, text=» COPY STATSH,W7,W6,BATCH,W0 «, t00=0x000b, t01=0x0092}
0x11de…120a              Head {h00=0x0028, h01=0x0050, text=» PERF DEPOOL,W9,DKBIN2,DKBIN3,STATSH«, t00=0x000b, t01=0x00b6}
0x120a…1234              Head {h00=0x0026, h01=0x0050, text=» BNERR EXIST IF IKAY, ALREADY OPEN«, t00=0x000b, t01=0x00e2}
0x1234…124c              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W1 «, t00=0x000b, t01=0x010c}
0x124c…1264              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN2,W1 «, t00=0x000b, t01=0x0124}
0x1264…1292              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A «, t00=0x000b, t01=0x013c}
0x1292…12a6              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000b, t01=0x016a}
0x12a6…12d4              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W10,DKBIN1,DKBIN2,STATSH «, t00=0x000b, t01=0x017e}
0x12d4…12f0              Head {h00=0x0018, h01=0x0050, text=» MOVE PINACC,DKBIN1 «, t00=0x000c, t01=0x001c}
0x12f0…1312              Head {h00=0x001e, h01=0x0050, text=» MOVE BPOOL(DKBIN1),HEX00 «, t00=0x000c, t01=0x0038}
0x1312…133e              Head {h00=0x0028, h01=0x0050, text=» XCOPY RPOOL(PINACC),W9,W2,DEBIN1,W0«, t00=0x000c, t01=0x005a}
0x133e…1358              Head {h00=0x0016, h01=0x0050, text=» TBT SWIT05,EXIBAT«, t00=0x000c, t01=0x0086}
0x1358…136a              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000c, t01=0x00a0}
0x136a…1378              Head {h00=0x000a, h01=0x0050, text=»EXIBAT«, t00=0x000c, t01=0x00b2}
0x1378…138c              Head {h00=0x0010, h01=0x0050, text=» PERF RDACC «, t00=0x000c, t01=0x00c0}
0x138c…13a6              Head {h00=0x0016, h01=0x0050, text=» PERF RDDS,CURSEC «, t00=0x000c, t01=0x00d4}
0x13a6…13ca              Head {h00=0x0020, h01=0x0050, text=» CBNE DEBINW4,=W'30',ZWIHOP «, t00=0x000c, t01=0x00ee}
0x13ca…13e2              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000c, t01=0x0112}
0x13e2…13f0              Head {h00=0x000a, h01=0x0050, text=»ZWIHOP«, t00=0x000c, t01=0x012a}
0x13f0…1402              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000c, t01=0x0138}
0x1402…1410              Head {h00=0x000a, h01=0x0050, text=»EXIST «, t00=0x000c, t01=0x014a}
0x1410…1436              Head {h00=0x0022, h01=0x0050, text=» MOVE DEBINW4,=W'27' 'IN USE' «, t00=0x000c, t01=0x0158}
0x1436…1448              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000c, t01=0x017e}
0x1448…1452              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0190}
0x1452…145c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x000a}
0x145c…1466              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0014}
0x1466…1470              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001e}
0x1470…148e              Head {h00=0x001a, h01=0x0050, text=»ENTJOB   ENTER JOBDEF «, t00=0x000d, t01=0x0028}
0x148e…14a0              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x000d, t01=0x0046}
0x14a0…14b4              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000d, t01=0x0058}
0x14b4…14c8              Head {h00=0x0010, h01=0x0050, text=» PERF READJB«, t00=0x000d, t01=0x006c}
0x14c8…14de              Head {h00=0x0012, h01=0x0050, text=» BNERR FOUNDJ «, t00=0x000d, t01=0x0080}
0x14de…1500              Head {h00=0x001e, h01=0x0050, text=» CBE DEBINW4,=W'30',FIRST «, t00=0x000d, t01=0x0096}
0x1500…151e              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW4,W9,NOTIN «, t00=0x000d, t01=0x00b8}
0x151e…1530              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000d, t01=0x00d6}
0x1530…153e              Head {h00=0x000a, h01=0x0050, text=»FIRST «, t00=0x000d, t01=0x00e8}
0x153e…156c              Head {h00=0x002a, h01=0x0050, text=» MOVE DEBIN1,DEBIN3 SAVE RECORD NUMBER«, t00=0x000d, t01=0x00f6}
0x156c…1584              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN3,W0 «, t00=0x000d, t01=0x0124}
0x1584…159c              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000d, t01=0x013c}
0x159c…15ac              Head {h00=0x000c, h01=0x0050, text=» B FST1 «, t00=0x000d, t01=0x0154}
0x15ac…15ba              Head {h00=0x000a, h01=0x0050, text=»NOTIN «, t00=0x000d, t01=0x0164}
0x15ba…15d8              Head {h00=0x001a, h01=0x0050, text=» PERF FREESP,DEBIN1,W1«, t00=0x000d, t01=0x0172}
0x15d8…15ec              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000d, t01=0x0190}
0x15ec…15f8              Head {h00=0x0008, h01=0x0050, text=»FST1«, t00=0x000e, t01=0x0014}
0x15f8…1624              Head {h00=0x0028, h01=0x0050, text=» MOVE SYSBUF,=X'4A440000000000C600' «, t00=0x000e, t01=0x0020}
0x1624…164a              Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,W2,W2,DEBIN3,W0 «, t00=0x000e, t01=0x004c}
0x164a…167a              Head {h00=0x002c, h01=0x0050, text=» COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 «, t00=0x000e, t01=0x0072}
0x167a…169e              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN1,SYSBUF «, t00=0x000e, t01=0x00a2}
0x169e…16b2              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000e, t01=0x00c6}
0x16b2…16de              Head {h00=0x0028, h01=0x0050, text=» CBE DEBIN3,W0,ENTRET LAST IN CHAIN «, t00=0x000e, t01=0x00da}
0x16de…1706              Head {h00=0x0024, h01=0x0050, text=» PERF DISU,W1,DEBIN3,SYSBUF READ«, t00=0x000e, t01=0x0106}
0x1706…171a              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x000e, t01=0x012e}
0x171a…1740              Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,W4,W2,DEBIN1,W0 «, t00=0x000e, t01=0x0142}
0x1740…1764              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN3,SYSBUF «, t00=0x000e, t01=0x0168}
0x1764…1772              Head {h00=0x000a, h01=0x0050, text=»ENTRET«, t00=0x000e, t01=0x018c}
0x1772…1784              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000f, t01=0x000a}
0x1784…1792              Head {h00=0x000a, h01=0x0050, text=»FOUNDJ«, t00=0x000f, t01=0x001c}
0x1792…17c2              Head {h00=0x002c, h01=0x0050, text=» COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 «, t00=0x000f, t01=0x002a}
0x17c2…17e6              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W2,DEBIN3,SYSBUF «, t00=0x000f, t01=0x005a}
0x17e6…17f8              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x000f, t01=0x007e}
0x17f8…1802              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0090}
0x1802…180c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x009a}
0x180c…1816              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a4}
0x1816…1832              Head {h00=0x0018, h01=0x0050, text=»GETJOB   GET JOBDEF «, t00=0x000f, t01=0x00ae}
0x1832…184e              Head {h00=0x0018, h01=0x0050, text=» MOVE STR6A,DEINPUT «, t00=0x000f, t01=0x00ca}
0x184e…185c              Head {h00=0x000a, h01=0x0050, text=»GTJ020«, t00=0x000f, t01=0x00e6}
0x185c…188a              Head {h00=0x002a, h01=0x0050, text=» PERF SCHPOO,=C'J ',STR6A,W7 SCAN POOL«, t00=0x000f, t01=0x00f4}
0x188a…18aa              Head {h00=0x001c, h01=0x0050, text=» IB DEBIN4,GOTFRE,LOCKED«, t00=0x000f, t01=0x0122}
0x18aa…18c4              Head {h00=0x0016, h01=0x0050, text=»   SEARCH ON DISC «, t00=0x000f, t01=0x0142}
0x18c4…18da              Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT03 «, t00=0x000f, t01=0x015c}
0x18da…18ec              Head {h00=0x000e, h01=0x0050, text=» BNZ RDCHJ«, t00=0x000f, t01=0x0172}
0x18ec…1904              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W3 «, t00=0x000f, t01=0x0184}
0x1904…1912              Head {h00=0x000a, h01=0x0050, text=»RDCHJ «, t00=0x0010, t01=0x000c}
0x1912…1924              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0010, t01=0x001a}
0x1924…1938              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0010, t01=0x002c}
0x1938…1946              Head {h00=0x000a, h01=0x0050, text=»RDCNW «, t00=0x0010, t01=0x0040}
0x1946…196a              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,DEBIN1,SYSBUF «, t00=0x0010, t01=0x004e}
0x196a…197e              Head {h00=0x0010, h01=0x0050, text=» BNERR DATA «, t00=0x0010, t01=0x0072}
0x197e…19a0              Head {h00=0x001e, h01=0x0050, text=» CBE DEBINW4,=W'30',NOTEX «, t00=0x0010, t01=0x0086}
0x19a0…19b2              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0010, t01=0x00a8}
0x19b2…19c0              Head {h00=0x000a, h01=0x0050, text=»NOTEX «, t00=0x0010, t01=0x00ba}
0x19c0…19e8              Head {h00=0x0024, h01=0x0050, text=» MOVE DEBINW4,W9 'NOT EXISTENT' «, t00=0x0010, t01=0x00c8}
0x19e8…19fa              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0010, t01=0x00f0}
0x19fa…1a06              Head {h00=0x0008, h01=0x0050, text=»DATA«, t00=0x0010, t01=0x0102}
0x1a06…1a22              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN2,=W'92' «, t00=0x0010, t01=0x010e}
0x1a22…1a4a              Head {h00=0x0024, h01=0x0050, text=» COPY STR6B,W0,W6,SYSBUF,DEBIN2 «, t00=0x0010, t01=0x012a}
0x1a4a…1a64              Head {h00=0x0016, h01=0x0050, text=» CALL EMPTYT,STR6B«, t00=0x0010, t01=0x0152}
0x1a64…1a76              Head {h00=0x000e, h01=0x0050, text=» BNZ NOTEX«, t00=0x0010, t01=0x016c}
0x1a76…1a96              Head {h00=0x001c, h01=0x0050, text=» CBE STR6A,STR6B,RDCHJF «, t00=0x0010, t01=0x017e}
0x1a96…1ab0              Head {h00=0x0016, h01=0x0050, text=» TBF SWIT03,GTJ010«, t00=0x0011, t01=0x000e}
0x1ab0…1aca              Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,STR6B «, t00=0x0011, t01=0x0028}
0x1aca…1ade              Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x0011, t01=0x0042}
0x1ade…1af0              Head {h00=0x000e, h01=0x0050, text=» B GTJ020 «, t00=0x0011, t01=0x0056}
0x1af0…1afe              Head {h00=0x000a, h01=0x0050, text=»GTJ010«, t00=0x0011, t01=0x0068}
0x1afe…1b24              Head {h00=0x0022, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,W4 «, t00=0x0011, t01=0x0076}
0x1b24…1b40              Head {h00=0x0018, h01=0x0050, text=» CBE DEBIN1,W0,NOTEX«, t00=0x0011, t01=0x009c}
0x1b40…1b50              Head {h00=0x000c, h01=0x0050, text=» B RDCNW«, t00=0x0011, t01=0x00b8}
0x1b50…1b5e              Head {h00=0x000a, h01=0x0050, text=»RDCHJF«, t00=0x0011, t01=0x00c8}
0x1b5e…1b72              Head {h00=0x0010, h01=0x0050, text=» TEST SWIT02«, t00=0x0011, t01=0x00d6}
0x1b72…1b98              Head {h00=0x0022, h01=0x0050, text=» BNZ RETURN RETURN, IF SEARCH «, t00=0x0011, t01=0x00ea}
0x1b98…1bb2              Head {h00=0x0016, h01=0x0050, text=» TBF SWIT03,GJ010 «, t00=0x0011, t01=0x0110}
0x1bb2…1bd6              Head {h00=0x0020, h01=0x0050, text=» PERF SCHPOO,=C'J ',STR6B,W7«, t00=0x0011, t01=0x012a}
0x1bd6…1be8              Head {h00=0x000e, h01=0x0050, text=» BOK GJ020«, t00=0x0011, t01=0x014e}
0x1be8…1bf6              Head {h00=0x000a, h01=0x0050, text=»GJ010 «, t00=0x0011, t01=0x0160}
0x1bf6…1c0e              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN3,W1 «, t00=0x0011, t01=0x016e}
0x1c0e…1c26              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN4,W1 «, t00=0x0011, t01=0x0186}
0x1c26…1c54              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W1,DEBIN3,DEBIN4,STRG10A «, t00=0x0012, t01=0x000e}
0x1c54…1c68              Head {h00=0x0010, h01=0x0050, text=» BNERR GTJOK«, t00=0x0012, t01=0x003c}
0x1c68…1c92              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW4,W13 'NO BUFFER FREE'«, t00=0x0012, t01=0x0050}
0x1c92…1ca4              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0012, t01=0x007a}
0x1ca4…1cb2              Head {h00=0x000a, h01=0x0050, text=»GTJOK «, t00=0x0012, t01=0x008c}
0x1cb2…1ce0              Head {h00=0x002a, h01=0x0050, text=» COPY BPOOL(DEBIN3),W0,W188,SYSBUF,W10«, t00=0x0012, t01=0x009a}
0x1ce0…1d0c              Head {h00=0x0028, h01=0x0050, text=» COPY RPOOL(DEBIN3),W9,W10,SYSBUF,W0«, t00=0x0012, t01=0x00c8}
0x1d0c…1d24              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W4 «, t00=0x0012, t01=0x00f4}
0x1d24…1d32              Head {h00=0x000a, h01=0x0050, text=»GETUNL«, t00=0x0012, t01=0x010c}
0x1d32…1d4e              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN4,=W'82' «, t00=0x0012, t01=0x011a}
0x1d4e…1d7e              Head {h00=0x002c, h01=0x0050, text=» COPY STRG10A,W1,W6,BPOOL(DEBIN3),DEBIN4«, t00=0x0012, t01=0x0136}
0x1d7e…1da4              Head {h00=0x0022, h01=0x0050, text=» COPY JOBNAME,W0,W6,STRG10A,W1«, t00=0x0012, t01=0x0166}
0x1da4…1db2              Head {h00=0x000a, h01=0x0050, text=»GJ020 «, t00=0x0012, t01=0x018c}
0x1db2…1de0              Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,W6,PJOBCUR,DEBIN3,STRG10A«, t00=0x0013, t01=0x000a}
0x1de0…1e12              Head {h00=0x002e, h01=0x0050, text=» PERF DEPOOL,DKBIN1,DEBIN3,DEBIN2,STRG10A «, t00=0x0013, t01=0x0038}
0x1e12…1e2e              Head {h00=0x0018, h01=0x0050, text=» MOVE PJOBCUR,DEBIN3«, t00=0x0013, t01=0x006a}
0x1e2e…1e40              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0013, t01=0x0086}
0x1e40…1e4e              Head {h00=0x000a, h01=0x0050, text=»LOCKED«, t00=0x0013, t01=0x0098}
0x1e4e…1e6a              Head {h00=0x0018, h01=0x0050, text=» MOVE JOBNAME,STR6A «, t00=0x0013, t01=0x00a6}
0x1e6a…1e86              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW4,=W'26'«, t00=0x0013, t01=0x00c2}
0x1e86…1e98              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0013, t01=0x00de}
0x1e98…1ea6              Head {h00=0x000a, h01=0x0050, text=»GOTFRE«, t00=0x0013, t01=0x00f0}
0x1ea6…1ebe              Head {h00=0x0014, h01=0x0050, text=»   TEST, IF USED«, t00=0x0013, t01=0x00fe}
0x1ebe…1ed8              Head {h00=0x0016, h01=0x0050, text=» TBT SWIT02,LOCKED«, t00=0x0013, t01=0x0116}
0x1ed8…1ef0              Head {h00=0x0014, h01=0x0050, text=» MOVE DKBIN1,W5 «, t00=0x0013, t01=0x0130}
0x1ef0…1f02              Head {h00=0x000e, h01=0x0050, text=» B GETUNL «, t00=0x0013, t01=0x0148}
0x1f02…1f0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x015a}
0x1f0c…1f16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0164}
0x1f16…1f34              Head {h00=0x001a, h01=0x0050, text=»SCHJOB   SEARCH JOBDEF«, t00=0x0013, t01=0x016e}
0x1f34…1f48              Head {h00=0x0010, h01=0x0050, text=» SET SWIT02 «, t00=0x0013, t01=0x018c}
0x1f48…1f5a              Head {h00=0x000e, h01=0x0050, text=» B GETJOB «, t00=0x0014, t01=0x0010}
0x1f5a…1f64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0022}
0x1f64…1f6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002c}
0x1f6e…1f8c              Head {h00=0x001a, h01=0x0050, text=»DELJOB   DELETE JOBDEF«, t00=0x0014, t01=0x0036}
0x1f8c…1f9e              Head {h00=0x000e, h01=0x0050, text=» PERF WAIT«, t00=0x0014, t01=0x0054}
0x1f9e…1fb2              Head {h00=0x0010, h01=0x0050, text=» PERF READJB«, t00=0x0014, t01=0x0066}
0x1fb2…1fc6              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0014, t01=0x007a}
0x1fc6…1fdc              Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT04 «, t00=0x0014, t01=0x008e}
0x1fdc…1ff8              Head {h00=0x0018, h01=0x0050, text=» PERF DLRCCH,SYSBUF «, t00=0x0014, t01=0x00a4}
0x1ff8…2010              Head {h00=0x0014, h01=0x0050, text=» TBF BOOL9,RETUR«, t00=0x0014, t01=0x00c0}
0x2010…2028              Head {h00=0x0014, h01=0x0050, text=» TBF BOOL8,RETUR«, t00=0x0014, t01=0x00d8}
0x2028…2042              Head {h00=0x0016, h01=0x0050, text=» MOVE SYSBUF,HEX00«, t00=0x0014, t01=0x00f0}
0x2042…2062              Head {h00=0x001c, h01=0x0050, text=» PERF DISU,W2,W3,SYSBUF «, t00=0x0014, t01=0x010a}
0x2062…2070              Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0014, t01=0x012a}
0x2070…2082              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0014, t01=0x0138}
0x2082…208c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x014a}
0x208c…2096              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0154}
0x2096…20b6              Head {h00=0x001c, h01=0x0050, text=»NEXJOB   GET NEXT JOBDEF«, t00=0x0014, t01=0x015e}
0x20b6…20ce              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W4 «, t00=0x0014, t01=0x017e}
0x20ce…20de              Head {h00=0x000c, h01=0x0050, text=» B PRE01«, t00=0x0015, t01=0x0008}
0x20de…20e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0018}
0x20e8…20f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0022}
0x20f2…2112              Head {h00=0x001c, h01=0x0050, text=»PREJOB   GET PREV JOBDEF«, t00=0x0015, t01=0x002c}
0x2112…212a              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W2 «, t00=0x0015, t01=0x004c}
0x212a…2138              Head {h00=0x000a, h01=0x0050, text=»PRE01 «, t00=0x0015, t01=0x0064}
0x2138…2162              Head {h00=0x0026, h01=0x0050, text=» MOVE STR6A,JOBNAME DALI 79-04-24 «, t00=0x0015, t01=0x0072}
0x2162…217a              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN1,W3 «, t00=0x0015, t01=0x009c}
0x217a…2196              Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,JOBNAME«, t00=0x0015, t01=0x00b4}
0x2196…21aa              Head {h00=0x0010, h01=0x0050, text=» BNZ BUFREL «, t00=0x0015, t01=0x00d0}
0x21aa…21be              Head {h00=0x0010, h01=0x0050, text=» PERF READJB«, t00=0x0015, t01=0x00e4}
0x21be…21d2              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0015, t01=0x00f8}
0x21d2…21fc              Head {h00=0x0026, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,SYSBUF,DEBIN2 «, t00=0x0015, t01=0x010c}
0x21fc…2218              Head {h00=0x0018, h01=0x0050, text=» CBE DEBIN1,W0,NOTEX«, t00=0x0015, t01=0x0136}
0x2218…2226              Head {h00=0x000a, h01=0x0050, text=»BUFREL«, t00=0x0015, t01=0x0152}
0x2226…2244              Head {h00=0x001a, h01=0x0050, text=» MOVE STRG10A,=X'4A00'«, t00=0x0015, t01=0x0160}
0x2244…2258              Head {h00=0x0010, h01=0x0050, text=» SET SWIT03 «, t00=0x0015, t01=0x017e}
0x2258…2268 (22, 0, 400) Head {h00=0x000c, h01=0x0050, text=» B RDCHJ«, t00=0x0016, t01=0x0004}
0x2268…2272              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0014}
0x2272…227c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x001e}
0x227c…2286              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0028}
0x2286…2290              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0032}
0x2290…229a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003c}
0x229a…22ba              Head {h00=0x001c, h01=0x0050, text=»NXJOB   GET NEXT JOBNAME«, t00=0x0016, t01=0x0046}
0x22ba…22ce              Head {h00=0x0010, h01=0x0050, text=» SET SWIT01 «, t00=0x0016, t01=0x0066}
0x22ce…22f0              Head {h00=0x001e, h01=0x0050, text=»NXBTH   GET NEXT BATCHNAME«, t00=0x0016, t01=0x007a}
0x22f0…2304              Head {h00=0x0010, h01=0x0050, text=» SET SWIT04 «, t00=0x0016, t01=0x009c}
0x2304…2320              Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,JOBNAME«, t00=0x0016, t01=0x00b0}
0x2320…2334              Head {h00=0x0010, h01=0x0050, text=» BNZ FIRJOB «, t00=0x0016, t01=0x00cc}
0x2334…2350              Head {h00=0x0018, h01=0x0050, text=» MOVE STR6A,JOBNAME «, t00=0x0016, t01=0x00e0}
0x2350…2370              Head {h00=0x001c, h01=0x0050, text=» PERF SFMTCH,W3,RBUF,W10«, t00=0x0016, t01=0x00fc}
0x2370…2382              Head {h00=0x000e, h01=0x0050, text=» BERR NOT «, t00=0x0016, t01=0x011c}
0x2382…239a              Head {h00=0x0014, h01=0x0050, text=» TBF SWIT01,BANA«, t00=0x0016, t01=0x012e}
0x239a…23b0              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W4«, t00=0x0016, t01=0x0146}
0x23b0…23d2              Head {h00=0x001e, h01=0x0050, text=» CBNG DEBIN2,DKBIN1,GTNAM «, t00=0x0016, t01=0x015c}
0x23d2…23f2              Head {h00=0x001c, h01=0x0050, text=»RENER   READ NEXT RECORD«, t00=0x0016, t01=0x017e}
0x23f2…2416              Head {h00=0x0020, h01=0x0050, text=» XCOPY DKBIN3,W0,W2,RBUF,W4 «, t00=0x0017, t01=0x000e}
0x2416…2430              Head {h00=0x0016, h01=0x0050, text=» CBE DKBIN3,W0,NOT«, t00=0x0017, t01=0x0032}
0x2430…244a              Head {h00=0x0016, h01=0x0050, text=» PERF RDDS,DKBIN3 «, t00=0x0017, t01=0x004c}
0x244a…245e              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0017, t01=0x0066}
0x245e…246c              Head {h00=0x000a, h01=0x0050, text=»FIJONA«, t00=0x0017, t01=0x007a}
0x246c…2490              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN1,W0,W2,RBUF,W6 «, t00=0x0017, t01=0x0088}
0x2490…24ac              Head {h00=0x0018, h01=0x0050, text=» CBNG DEBIN1,W10,NOT«, t00=0x0017, t01=0x00ac}
0x24ac…24c4              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W12«, t00=0x0017, t01=0x00c8}
0x24c4…24d2              Head {h00=0x000a, h01=0x0050, text=»GTNAM «, t00=0x0017, t01=0x00e0}
0x24d2…24ec              Head {h00=0x0016, h01=0x0050, text=» TBF SWIT01,GTNAM1«, t00=0x0017, t01=0x00ee}
0x24ec…2514              Head {h00=0x0024, h01=0x0050, text=» COPY JOBNAME,W0,W6,RBUF,DEBIN2 «, t00=0x0017, t01=0x0108}
0x2514…2526              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0017, t01=0x0130}
0x2526…2532              Head {h00=0x0008, h01=0x0050, text=»BANA«, t00=0x0017, t01=0x0142}
0x2532…254c              Head {h00=0x0016, h01=0x0050, text=» CALL EMPTYT,BATCH«, t00=0x0017, t01=0x014e}
0x254c…255e              Head {h00=0x000e, h01=0x0050, text=» BNZ FIRBA«, t00=0x0017, t01=0x0168}
0x255e…2578              Head {h00=0x0016, h01=0x0050, text=» MOVE STR6A,BATCH «, t00=0x0017, t01=0x017a}
0x2578…259c (24, 0, 400) Head {h00=0x0020, h01=0x0050, text=» PERF SFMTCH,DEBIN3,RBUF,W12«, t00=0x0018, t01=0x0004}
0x259c…25ae              Head {h00=0x000e, h01=0x0050, text=» BERR NOT «, t00=0x0018, t01=0x0028}
0x25ae…25c4              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W6«, t00=0x0018, t01=0x003a}
0x25c4…25e4              Head {h00=0x001c, h01=0x0050, text=» CBG DEBIN2,DKBIN1,RENER«, t00=0x0018, t01=0x0050}
0x25e4…25f2              Head {h00=0x000a, h01=0x0050, text=»GTNAM1«, t00=0x0018, t01=0x0070}
0x25f2…2618              Head {h00=0x0022, h01=0x0050, text=» COPY BATCH,W0,W6,RBUF,DEBIN2 «, t00=0x0018, t01=0x007e}
0x2618…262a              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0018, t01=0x00a4}
0x262a…2638              Head {h00=0x000a, h01=0x0050, text=»FIRJOB«, t00=0x0018, t01=0x00b6}
0x2638…264e              Head {h00=0x0012, h01=0x0050, text=» PERF RDDS,W3 «, t00=0x0018, t01=0x00c4}
0x264e…2662              Head {h00=0x0010, h01=0x0050, text=» BOK FIJONA «, t00=0x0018, t01=0x00da}
0x2662…2682              Head {h00=0x001c, h01=0x0050, text=» CBE DEBINW4,=W'30',NOT «, t00=0x0018, t01=0x00ee}
0x2682…2694              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0018, t01=0x010e}
0x2694…26a2              Head {h00=0x000a, h01=0x0050, text=»FIRBA «, t00=0x0018, t01=0x0120}
0x26a2…26bc              Head {h00=0x0016, h01=0x0050, text=» PERF RDDS,DEBIN3 «, t00=0x0018, t01=0x012e}
0x26bc…26d0              Head {h00=0x0010, h01=0x0050, text=» BERR RETURN«, t00=0x0018, t01=0x0148}
0x26d0…26f4              Head {h00=0x0020, h01=0x0050, text=» XCOPY DEBIN2,W0,W2,RBUF,W6 «, t00=0x0018, t01=0x015c}
0x26f4…2710              Head {h00=0x0018, h01=0x0050, text=» CBNG DEBIN2,W10,NOT«, t00=0x0018, t01=0x0180}
0x2710…2728              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN2,W12«, t00=0x0019, t01=0x000c}
0x2728…273a              Head {h00=0x000e, h01=0x0050, text=» B GTNAM1 «, t00=0x0019, t01=0x0024}
0x273a…2746              Head {h00=0x0008, h01=0x0050, text=»NOT «, t00=0x0019, t01=0x0036}
0x2746…2778              Head {h00=0x002e, h01=0x0050, text=» MOVE DEBINW4,W9 INDICATE 'NOT IN SYSTEM' «, t00=0x0019, t01=0x0042}
0x2778…278a              Head {h00=0x000e, h01=0x0050, text=» B RETURN «, t00=0x0019, t01=0x0074}
0x278a…2794              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0086}
0x2794…279e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0090}
0x279e…27ac              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0019, t01=0x009a}
0x27ac…27ba              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x00a8}
0x27ba…27c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00b6}
0x27c4…27ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00c0}
0x27ce…27e2              Head {h00=0x0010, h01=0x0050, text=»READJB PROC «, t00=0x0019, t01=0x00ca}
0x27e2…27fa              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBIN4,W3 «, t00=0x0019, t01=0x00de}
0x27fa…2808              Head {h00=0x000a, h01=0x0050, text=»REDJCH«, t00=0x0019, t01=0x00f6}
0x2808…2824              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN3,DEBIN4 «, t00=0x0019, t01=0x0104}
0x2824…2848              Head {h00=0x0020, h01=0x0050, text=» PERF DISU,W1,DEBIN3,SYSBUF «, t00=0x0019, t01=0x0120}
0x2848…285c              Head {h00=0x0010, h01=0x0050, text=» BERR RETRED«, t00=0x0019, t01=0x0144}
0x285c…2890              Head {h00=0x0030, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,SYSBUF,W6 GET USED SPACE«, t00=0x0019, t01=0x0158}
0x2890…28bc              Head {h00=0x0028, h01=0x0050, text=» CBG DEBIN4,W10,REDJ10 JUMP IF EMPTY«, t00=0x0019, t01=0x018c}
0x28bc…28f4              Head {h00=0x0034, h01=0x0050, text=» MOVE DEBINW4,=W'30' IDICATE FIRST RECORD EMPTY «, t00=0x001a, t01=0x0028}
0x28f4…2906              Head {h00=0x000e, h01=0x0050, text=» B RETRED «, t00=0x001a, t01=0x0060}
0x2906…2914              Head {h00=0x000a, h01=0x0050, text=»REDJ10«, t00=0x001a, t01=0x0072}
0x2914…2930              Head {h00=0x0018, h01=0x0050, text=» MOVE DEBIN5,=W'92' «, t00=0x001a, t01=0x0080}
0x2930…2958              Head {h00=0x0024, h01=0x0050, text=» COPY STR6A,W0,W6,SYSBUF,DEBIN5 «, t00=0x001a, t01=0x009c}
0x2958…297a              Head {h00=0x001e, h01=0x0050, text=» CBE STR6A,JOBNAME,RETRED «, t00=0x001a, t01=0x00c4}
0x297a…2988              Head {h00=0x000a, h01=0x0050, text=»REDJ20«, t00=0x001a, t01=0x00e6}
0x2988…29ae              Head {h00=0x0022, h01=0x0050, text=» XCOPY DEBIN4,W0,W2,SYSBUF,W4 «, t00=0x001a, t01=0x00f4}
0x29ae…29cc              Head {h00=0x001a, h01=0x0050, text=» CBNE DEBIN4,W0,REDJCH«, t00=0x001a, t01=0x011a}
0x29cc…29e4              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W9«, t00=0x001a, t01=0x0138}
0x29e4…29f2              Head {h00=0x000a, h01=0x0050, text=»RETRED«, t00=0x001a, t01=0x0150}
0x29f2…2a04              Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x001a, t01=0x015e}
0x2a04…2a10              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x0170}
0x2a10…2a1e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x017c}
0x2a1e…2a28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x018a}
0x2a28…2a30 (27, 2, 212) Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0004}
0x2a30…2a3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x000c}
0x2a3a…2a50              Head {h00=0x0012, h01=0x0050, text=»ENTR PROC ITEM«, t00=0x001b, t01=0x0016}
0x2a50…2a74              Head {h00=0x0020, h01=0x0050, text=» XCOPY RBUF,DEBIN2,W2,W0,W0 «, t00=0x001b, t01=0x002c}
0x2a74…2a8a              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W2«, t00=0x001b, t01=0x0050}
0x2a8a…2aae              Head {h00=0x0020, h01=0x0050, text=» COPY RBUF,DEBIN2,W6,ITEM,W0«, t00=0x001b, t01=0x0066}
0x2aae…2ac4              Head {h00=0x0012, h01=0x0050, text=» ADD DEBIN2,W6«, t00=0x001b, t01=0x008a}
0x2ac4…2ad0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x00a0}
0x2ad0…2ade              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x00ac}
0x2ade…2ae8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ba}
0x2ae8…2af4              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x001b, t01=0x00c4}
0x2af4…2af8              Head {h00=0x4004, h01=0x0000}
0x2af8…2afc              00 1b 00 d0                                                                                                                                                                                                                                       ┆    ┆
0x2afc…2b04 (28, 1, 8)   20 04 00 00 00 1c 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view