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

⟦c539d1bda⟧

    Length: 14188 (0x376c)
    Notes: pts_type(SC)
    Names: »DE50ST.SC«

Derivation

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

PTS(SC)

	IDENT	DE50ST	REL 10.0 80-04-11 
			UPD 80-04-24/DALI
			80-04-14/DALI
	DDUM	DEDDIV
	PDIV 
	ENTRY	DE50ST 
 ENTRY DEAP5A 
* 
*        EXTERNAL REFERENCES TO SCREEN
* 
	EXT	DECLRA 
	EXT	DERR 
 EXT DECLRN 
 EXT DECLRD 
 EXT DECLRS 
 EXT DEPOOL 
 EXT DEOPBC 
 EXT DENT01 
 EXT DERECS 
 EXT DEDISC 
 EXT SETB 
 EXT TESTB
 EXT CLEARB 
 EXT MSKOUT 
 EXT DERROR 
 EXT OPCL 
 EXT DESTAU BUILD STATUS
 EXT DEPRUT 
 EXT ATTWB
 EXT ATTDB
 EXT EMPTYT 
 EXT RESTOR 
* 
*        EXTERNAL REFERENCES TO APPLICATION ROUTINE 
* 
 EXT DEAOK0 
 EXT DEANOK 
 INCLUDE DELITT 
	EJECT
********************************************* 
* START OF SEARCH/CORR. HANDLE PRORAMSCREEN-
* LAYOUTS 50,51,52,53  SEARCH MODE. 
* THESE ROUTINES USE THE DENTER-SCREEN. 
********************************************* 
DE50ST PROC 
 CLEAR BOOL2
 MOVE JOBNAME,HEX00 
 MOVE BATCH,HEX00 
 CBNE BIN2,W0,DE50EN
DEST00
	SET	BOOL1	PART OF FORMAT DISPLAY 
DEST10
 TBT BOOL2,DE50EN 
	ATTFMT	F50ST 
	SET	DEPROMPT	PROMPT-TEXTS DISPLAY
DEST50
	CLEAR	DECHANGE 
 PERF DECLRS
DEST60
	IB	DEBINW2,DE50CA,DE50RE,DE50EN
	MOVE	DEBINW4,W0
 MOVE BIN3,DEBINW4
 CLEAR DOOL3
 BZ DE50E2
 PERF OPCL,W4 CLOSE USERFILE
 MOVE DEBINW4,BIN3
DE50E2
DE50ER
 PERF DERR
	B	DEST60 
 EJECT
* 
* CANCEL-KEY PRESSED
* 
DE50CA
	CLEAR	DEPROMPT 
	B	DEST50 
* 
* ENTER-KEY PRESSED 
* 
DE50EN
DEEN10
 CBNE BIN1,W5,DERE30
 IB BIN2,DE51ST,DE51ST,DE53ST 
 B DEST00 
* 
DE50RE
 CLEAR DOOL3
 BZ DERE20
 PERF OPCL,W4 CLOSE USERFILE
 BNERR DERE20 
 MOVE DEBINW1,W0
 PERF DERROR,DEKTAB6
DERE20
 TBT BOOL2,DERE50 
 MOVE BIN2,W1 
 MOVE BIN1,W0 
DERE30
	RET
DERE50
 CLEAR BOOL2
 CLEAR BOOL1
 CLEAR DOOL7
 CLEAR DOOL4
 B DEST10 
 EJECT
DE51ST
 CLEAR BOOL1 PART OF FORMAT DISPLAY 
 SET BOOL2 LEVEL 2 IN SEARCH
 MOVE EOLINE,W2 NUMBER OF BUFFERS 
 MOVE BIN4,W2 NUMBER OF CONSEC. 
 PERF DEPOOL,W2,EOLINE,BIN4,STRG10A GET LOCK
 BNOK DE50ER
 MOVE DEBINW2,W0
DE5203
 MOVE BIN4,EOLINE FIRST BUFFER
 ADD BIN4,W1 SECOND BUFFER
 MOVE BPOOL(EOLINE),HEX00 
 MOVE BPOOL(BIN4),HEX00 
 XCOPY BPOOL(EOLINE),W0,W1,W128,W1
 XCOPY BPOOL(EOLINE),W1,W1,W15,W1 
 XCOPY BPOOL(EOLINE),W5,W1,W24,W1 
 CALL ATTWB,BPOOL(EOLINE),W8,W11
 CALL ATTDB,BPOOL(EOLINE),W0,W11
 CBNE DEBINW2,W0,DE52EN 
 CBE BIN2,W2,DE5205 JUMP IF BATCH 
 ATTFMT F51ST 
 B DE5207 
DE5205
 ATTFMT F52ST 
DE5207
 SET DEPROMPT 
 CLEAR DECHANGE 
 PERF DECLRS
DE5210
 PERF DEPRUT,PRNUM,BIN1,BIN2
 IB DEBINW2,DE52CA,DE52RE,DE52EN
 MOVE DEBINW4,W0
DE5220
 PERF DERR
 B DE5210 
DE52CA
 PERF DECLRA
 B DE5210 
DE52ER
	MOVE	DEBINW3,W0
 CALL ATTWB,BPOOL(EOLINE),W8,W11
 CALL ATTDB,BPOOL(EOLINE),W0,W11
	GETFLD	0,DEBINW3,DEBINW2 
 B DE5220 
DE52EN
 MOVE DEBINW2,W0
 MOVE STSAVE(W2),BATCH
 MOVE BATCH,HEX00 
 PERF DEOPBC,DEBINW2
 MOVE BIN7,W0 
 PERF DEPRUT,PRNUM,BIN1,BIN2
 CBE BIN2,W2,EN5202 JUMP IF BATCH 
 ATTFMT F51ST 
 B EN5203 
EN5202
 ATTFMT F52ST 
EN5203
 MOVE BATCH,STSAVE(W2)
 IB DEBINW2,EN5205,EN5205,DE52RE,DE52ER 
EN5205
 CBE BIN2,W1,EN5210 JUMP IF JOB 
 MOVE BIN5,=W'34' GET NEXT BATCHNAME
 B EN5220 
EN5210
 MOVE BIN5,W21 GET NEXT JOBNAME 
EN5220
 PERF DEDISC,BIN5 
 BNOK EN5270
 CBE BIN2,W1,EN5250 JUMP IF JOB 
 PERF DERECS,W11 OPEN BATCH 
 BNOK EN5270
 CBE PINACC,W0,EN5240 
 XCOPY BIN10,W0,W2,BDSTAT,W0
* CALL MSKOUT,BIN10,BIN7
* CBNE BIN6,BIN10,DE52EN STATUS NOT MATCH 
 PERF DESTAU,BDSTAT,STRG10A 
 PERF DEPOOL,W6,PINACC,BIN8,STRG10A 
 B EN5250 
EN5240
 MOVE STRG10A,=C'IN USE ' 
EN5250
 ADD BIN7,W1
 CBG BIN7,W1,EN5253 
 ERASE 0,W5,W12 
EN5253
 CBE BIN2,W1,EN5255 
 CON X.COPY,FDVBCD(BIN7),W0,W6,BATCH,W0 COPY
 CON X.COPY,FDVBCD(BIN7),W6,W1,VALSTR,W18 : 
 CON X.COPY,FDVBCD(BIN7),W7,W8,STRG10A,W0 COPY
 MOVE STSAVE(W2),BATCH
 B EN5257 
EN5255
 CON X.COPY,FDVBCD(BIN7),W0,W6,JOBNAME,W0 
 MOVE STSAVE(W1),JOBNAME
EN5257
 ADD BIN7,W3
 ADD BIN7,BIN2
 DISPLAY 3,BIN7,BIN7
 SUB BIN7,W3
 SUB BIN7,BIN2
 CBNE BIN7,W24,EN5205 
EN5258
 CLEAR DOOL3
 BZ EN5259
 PERF OPCL,W4 CLOSE USERFILE
EN5259
 DISPLAY 3,W3,W4
 CLEAR DECHANGE 
 DSC0 DEDSDYKB,02 
 PERF DECLRN
EN5260
 IB DEBINW2,DE52CA,DE52RE,DE5203,DE52BW,DE52BW
EN5265
 MOVE DEBINW4,W0
 B EN5281 
EN5270
 CBNE DEBINW4,W9,EN5280 JUMP IF NOT 'NOT FOUND' 
 CBNE BIN7,W0,EN5258
 PERF DEPRUT,PRNUM,BIN1,BIN2
EN5280
 CLEAR DOOL3
	BZ	EN5281	IF NOT OPEN
 MOVE BIN3,DEBINW4
	PERF	OPCL,W4	CLOSE USER FILE 
 MOVE DEBINW4,BIN3
EN5281
 PERF DERR
 B EN5260 
DE52BW
 PERF DEPRUT,PRNUM,BIN1,BIN2
 CBE BIN2,W2,BW5200 JUMP IF BATCH 
 CBE DEBINW2,W4,DE52CL FWD PRESSED
 MOVE JOBNAME,HEX00 
 B DE5203 
BW5200
 CBE DEBINW2,W5,BW5210 BWD PREESED
 CALL EMPTYT,JOBNAME
 BNZ EN5265 EMPTY!
 B DE5203 
BW5210
 MOVE BATCH,HEX00 
DE52CL
 B DE5203 
DE52RE
 CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO
			WORKBLOCKS AND DESCRIPTORS 
 PERF DEPOOL,W6,EOLINE,BIN8,STRG10A 
 SET BOOL2
 B DE50RE 
 EJECT
******************************************
* THIS IS THE MAINLOOP IN SEARCH RECORD.
* THE PROCEDURES FOR BATCHHANDLING USED 
* ARE THE SAME AS FOR ENTRY AND VERIFY. 
******************************************
DE53ST
 ATTFMT F53ST 
 MOVE EOLINE,W0 USED AS POOLINDEX IN 51,52
			NOT USED WITHIN PROGRAM 53 
DE5305
 SET DEPROMPT 
 CLEAR DECHANGE 
DE5310
 MOVE WORK(W11),W0 COMP-WORD
 MOVE WORK(W12),W0 MSKOUT-WORD
 PERF DECLRS CLEAR SOME VARIABELS 
DE5315
 IB DEBINW2,DE53CA,DE52RE,DE53EN
 MOVE DEBINW4,W0 ILLEGAL KEY
DE5320
 PERF DERR
 B DE5315 
DE53CA
 PERF DECLRA
 B DE5315 
DE53EN
 MOVE DEBINW2,W0
	CALL	EMPTYT,STR64A 
	BZ	EN5300	IF NOT EMPTY 
 MOVE WORK(W11),W0 COMP-WORD
 MOVE WORK(W12),W0 MSKOUT-WORD
EN5300
 PERF DEOPBC,DEBINW2 OPEN BATCH-ROUTINE 
 CLEAR SOOL2
 IB DEBINW2,EN5310,EN5310,DE53RE,EN5320 
EN5310			OPEN BATCH SUCCESSFULL 
 SET SOOL2
 PERF DENT01 DATARECORDHANDLING-ROUTINE 
 B EN5300 TAKE CARE OF RETURCODE
DE53RE
 CLEAR DOOL3
 CLEAR SOOL2
 PERF OPCL,W4 CLOSE USERFILE
 BOK DE53ST SUCCESSFULLY
EN5320			OPEN BATCH FAILED
 CLEAR DOOL3
 MOVE STR64A,HEX00
 MOVE DEBINW2,W0
 MOVE DEBINW3,W0
DES100
 CALL TESTB,WORK(W12),DEBINW3 MSKOUT-WORD 
 BZ DES200
 CBE DEBINW2,W0,DES120
 COPY STR64A,DEBINW2,W1,STATIU,W9 ',' 
 ADD DEBINW2,W1 
DES120
 CALL TESTB,WORK(W11),DEBINW3 COMP-WORD 
 BNZ DES140 
 COPY STR64A,DEBINW2,W1,STATIU,W8 '/' 
 ADD DEBINW2,W1 
DES140
 COPY STR64A,DEBINW2,W1,STATIU,DEBINW3
 ADD DEBINW2,W1 
DES200
 ADD DEBINW3,W1 
 CBNE DEBINW3,W8,DES100 
 ATTFMT F53ST 
 DISPLAY 3,W5,W5
 DISPLAY 3,W6,W6
 GETFLD 0,W4,DEBINW3
 B DE5320 DISPLAY ERRORMESSAGE
 EJECT
* 
*        APPL VALUE HANDLING ROUTINE
* 
DEAP5A
	IB	DEBINW4,DEAP51,DEAP52,DEAP53
DEAP50
DEAP51
 B DEAOK0 
DEAP52
	B	DEAOK0 
DEAP53
 MOVE WORK(W11),W0 COMP-WORD
 MOVE WORK(W12),W0 MSKOUT-WORD
 MOVE BIN9,W0 
APP003
 CBE BIN9,DEBINW1,APP340
 MOVE BIN8,W0 
APP005
 MATCH STATIU,BIN8,W10,DEINPUT,BIN9,W1
 BNOK APP395 ILLEGAL LETTER 
 IB BIN8,		C
		APP395	-	C
		APP310	=	C
		APP310	=	C
		APP310	=	C
		APP310	=	C
		APP395	=	C
		APP395	=	C
		APP335	=	C
		APP330	=
APP310
 CALL TESTB,WORK(W12),BIN8 LOOK IF STATUS 
 BNZ APP395 MASK ALREADY SET
 CALL SETB,WORK(W12),BIN8 MSKOUT-WORD 
 CLEAR DOOL6 NOT-FLAG SAT?
 BNZ APP330 
APP320
 CALL SETB,WORK(W11),BIN8 COMP-WORD 
APP330
 ADD BIN9,W1 ADJUST INPUTBUFFER 
 B APP003 GET NEXT INPUT
APP335
 SET DOOL6
 BZ APP330
APP340
 CLEAR DOOL6 NOT-FLAG 
 BNZ APP395 LAST LETTER = '/' 
APP350
 B DEAOK0 
APP395
DEAER6
 MOVE DEBINW4,W6
 B DEANOK 
 PEND 
	EJECT
* 
*        FORMATS
* 
F50ST	FRMT
 FSL
	FTEXT	'50 '
	FCOPY	=C'SEARCH' 
 FILLR ' ',1
 FCOPY =C'MODE' 
	FNL
	FCOPY	=C'PROGRAM:' 
 FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 
 FMEL 'XX',PRNUM
	FBF	BOOL1,F50OUT 
	FNL
 FLINK F51ST2 
 FNL
 FLINK F52ST2 
 FNL
 FLINK F53ST2 
F50OUT
 FMEND
F51ST FRMT
 FSL
 FLINK F51ST2 
 FNL
 FLINK F50UV
 FNL
 FLINK F50JOB 
 FLINK F50END 
 FNL
 FLINK F50STA 
 FMEND
F52ST FRMT
 FSL
 FLINK F52ST2 
 FNL
 FLINK F50UV
 FNL
 FLINK F52JOB 
 FTAB 20
 FLINK F50BAT 
 FLINK F50END 
 FNL
 FLINK F50STA 
 FMEND
F53ST FRMT
 FSL
 FLINK F53ST2 
 FNL
 FLINK F50UV
 FNL
 FLINK F52JOB 
 FTAB 20
 FLINK F53BAT 
 FNL
 FCOPY =C'RECORD' 
 FILLR '-',1
 FCOPY =C'NUMBER' 
 FILLR ':',1
 FKI 15,MAXL=7,NEOI 
 FMEL 'XXXX',BCDI21(W3) 
 FTAB 30
 FCOPY =C'RECORD' 
 FILLR '-',1
 FCOPY =C'STATUS' 
 FILLR ':',1
 FKI 45,MAXL=20,NEOI,ALPHA,APPL=101 
 FCOPY STR64A 
 FLINK F50END 
 FMEND
F51ST2 FRMT 
	FTEXT	'51 '
	FCOPY	=C'SEARCH' 
 FILLR ' ',1
 FCOPY =C'MODE' 
	FILLR	' ',1
	FCOPY	=C'JOB'
	FILLR	' ',1
	FCOPY	=C'LEVEL'
 FMEND
F52ST2 FRMT 
	FTEXT	'52 '
	FCOPY	=C'SEARCH' 
 FILLR ' ',1
 FCOPY =C'MODE' 
	FILLR	' ',1
	FCOPY	=C'BATCH'
	FILLR	' ',1
	FCOPY	=C'LEVEL'
 FMEND
F53ST2 FRMT 
	FTEXT	'53 '
	FCOPY	=C'SEARCH' 
 FILLR ' ',1
 FCOPY =C'MODE' 
	FILLR	' ',1
	FCOPY	=C'RECORD' 
	FILLR	' ',1
	FCOPY	=C'LEVEL'
	FMEND
F50UV FRMT
	FCOPY	=C'UNIT' 
 FTEXT ':U' 
 FKI 7,MINL=1,MAXL=1,NEOI,ME,APPL=2 
 FMEL 'X',USERFILE
 FTAB 20
	FCOPY	=C'VOLUME' 
	FILLR	':',1
 FINP 27
 FCOPY TABLE
 FMEND
F50JOB FRMT 
	FCOPY	=C'JOB'
	FCOPY	=C'NAME' 
	FILLR	':',1
 FKI 9,ALPHA,MINL=1,MAXL=6,NEOI,APPL=3,DUPL=STSAVE(W1)
	FCOPY	JOBNAME
 FMEND
F52JOB FRMT 
	FCOPY	=C'JOB'
	FCOPY	=C'NAME' 
	FILLR	':',1
 FKI 9,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=3,DUPL=STSAVE(W1) 
	FCOPY	JOBNAME
 FMEND
F50BAT FRMT 
	FCOPY	=C'BATCH'
	FCOPY	=C'NAME' 
	FILLR	':',1
 FKI 30,ALPHA,MINL=1,MAXL=6,NEOI,APPL=4,DUPL=STSAVE(W2) 
	FCOPY	BATCH
	FMEND
F53BAT FRMT 
	FCOPY	=C'BATCH'
	FCOPY	=C'NAME' 
	FILLR	':',1
 FKI 30,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=4,DUPL=STSAVE(W2)
	FCOPY	BATCH
	FMEND
F50STA FRMT 
 FINP 1 
 FCTL X'C0',FDVBCD(W1)
 FINP 21
 FCTL X'C0',FDVBCD(W2)
 FINP 41
 FCTL X'C0',FDVBCD(W3)
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W4)
 FINP 21
 FCTL X'C0',FDVBCD(W5)
 FINP 41
 FCTL X'C0',FDVBCD(W6)
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W7)
 FINP 21
 FCTL X'C0',FDVBCD(W8)
 FINP 41
 FCTL X'C0',FDVBCD(W9)
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W10) 
 FINP 21
 FCTL X'C0',FDVBCD(W11) 
 FINP 41
 FCTL X'C0',FDVBCD(W12) 
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W13) 
 FINP 21
 FCTL X'C0',FDVBCD(W14) 
 FINP 41
 FCTL X'C0',FDVBCD(W15) 
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W16) 
 FINP 21
 FCTL X'C0',FDVBCD(W17) 
 FINP 41
 FCTL X'C0',FDVBCD(W18) 
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W19) 
 FINP 21
 FCTL X'C0',FDVBCD(W20) 
 FINP 41
 FCTL X'C0',FDVBCD(W21) 
 FNL
 FINP 1 
 FCTL X'C0',FDVBCD(W22) 
 FINP 21
 FCTL X'C0',FDVBCD(W23) 
 FINP 41
 FCTL X'C0',FDVBCD(W24) 
 FMEND
F50END FRMT 
 FNL
 FKI 1
 FCOPY HEX00
 FMEND
	END

HexDump

0x0000…0028 (0, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» IDENT DE50ST REL 10.0 80-04-11 «, t00=0x0000, t01=0x0004}
0x0028…0044              Head {h00=0x0018, h01=0x0050, text=»   UPD 80-04-24/DALI«, t00=0x0000, t01=0x002c}
0x0044…005c              Head {h00=0x0014, h01=0x0050, text=»   80-04-14/DALI«, t00=0x0000, t01=0x0048}
0x005c…0070              Head {h00=0x0010, h01=0x000c, text=» DDUM DEDDIV«, t00=0x0000, t01=0x0060}
0x0070…007e              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0074}
0x007e…0094              Head {h00=0x0012, h01=0x0050, text=» ENTRY DE50ST «, t00=0x0000, t01=0x0082}
0x0094…00aa              Head {h00=0x0012, h01=0x0050, text=» ENTRY DEAP5A «, t00=0x0000, t01=0x0098}
0x00aa…00b4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x00ae}
0x00b4…00e2              Head {h00=0x002a, h01=0x002a, text=»*        EXTERNAL REFERENCES TO SCREEN«, t00=0x0000, t01=0x00b8}
0x00e2…00ec              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x00e6}
0x00ec…0100              Head {h00=0x0010, h01=0x0050, text=» EXT DECLRA «, t00=0x0000, t01=0x00f0}
0x0100…0112              Head {h00=0x000e, h01=0x0050, text=» EXT DERR «, t00=0x0000, t01=0x0104}
0x0112…0126              Head {h00=0x0010, h01=0x0050, text=» EXT DECLRN «, t00=0x0000, t01=0x0116}
0x0126…013a              Head {h00=0x0010, h01=0x0050, text=» EXT DECLRD «, t00=0x0000, t01=0x012a}
0x013a…014e              Head {h00=0x0010, h01=0x0050, text=» EXT DECLRS «, t00=0x0000, t01=0x013e}
0x014e…0162              Head {h00=0x0010, h01=0x0050, text=» EXT DEPOOL «, t00=0x0000, t01=0x0152}
0x0162…0176              Head {h00=0x0010, h01=0x0050, text=» EXT DEOPBC «, t00=0x0000, t01=0x0166}
0x0176…018a              Head {h00=0x0010, h01=0x0050, text=» EXT DENT01 «, t00=0x0000, t01=0x017a}
0x018a…019e              Head {h00=0x0010, h01=0x0050, text=» EXT DERECS «, t00=0x0000, t01=0x018e}
0x019e…01b2              Head {h00=0x0010, h01=0x0050, text=» EXT DEDISC «, t00=0x0001, t01=0x0012}
0x01b2…01c4              Head {h00=0x000e, h01=0x0050, text=» EXT SETB «, t00=0x0001, t01=0x0026}
0x01c4…01d6              Head {h00=0x000e, h01=0x0050, text=» EXT TESTB«, t00=0x0001, t01=0x0038}
0x01d6…01ea              Head {h00=0x0010, h01=0x0050, text=» EXT CLEARB «, t00=0x0001, t01=0x004a}
0x01ea…01fe              Head {h00=0x0010, h01=0x0050, text=» EXT MSKOUT «, t00=0x0001, t01=0x005e}
0x01fe…0212              Head {h00=0x0010, h01=0x0050, text=» EXT DERROR «, t00=0x0001, t01=0x0072}
0x0212…0224              Head {h00=0x000e, h01=0x0050, text=» EXT OPCL «, t00=0x0001, t01=0x0086}
0x0224…0244              Head {h00=0x001c, h01=0x0050, text=» EXT DESTAU BUILD STATUS«, t00=0x0001, t01=0x0098}
0x0244…0258              Head {h00=0x0010, h01=0x0050, text=» EXT DEPRUT «, t00=0x0001, t01=0x00b8}
0x0258…026a              Head {h00=0x000e, h01=0x0050, text=» EXT ATTWB«, t00=0x0001, t01=0x00cc}
0x026a…027c              Head {h00=0x000e, h01=0x0050, text=» EXT ATTDB«, t00=0x0001, t01=0x00de}
0x027c…0290              Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0001, t01=0x00f0}
0x0290…02a4              Head {h00=0x0010, h01=0x0050, text=» EXT RESTOR «, t00=0x0001, t01=0x0104}
0x02a4…02ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0118}
0x02ae…02ea              Head {h00=0x0038, h01=0x0050, text=»*        EXTERNAL REFERENCES TO APPLICATION ROUTINE «, t00=0x0001, t01=0x0122}
0x02ea…02f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015e}
0x02f4…0308              Head {h00=0x0010, h01=0x0050, text=» EXT DEAOK0 «, t00=0x0001, t01=0x0168}
0x0308…031c              Head {h00=0x0010, h01=0x0050, text=» EXT DEANOK «, t00=0x0001, t01=0x017c}
0x031c…0334              Head {h00=0x0014, h01=0x0050, text=» INCLUDE DELITT «, t00=0x0001, t01=0x0190}
0x0334…0342              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0002, t01=0x0018}
0x0342…0378              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x0026}
0x0378…03ac              Head {h00=0x0030, h01=0x0050, text=»* START OF SEARCH/CORR. HANDLE PRORAMSCREEN-«, t00=0x0002, t01=0x005c}
0x03ac…03d8              Head {h00=0x0028, h01=0x0050, text=»* LAYOUTS 50,51,52,53  SEARCH MODE. «, t00=0x0002, t01=0x0090}
0x03d8…0408              Head {h00=0x002c, h01=0x0050, text=»* THESE ROUTINES USE THE DENTER-SCREEN. «, t00=0x0002, t01=0x00bc}
0x0408…043e              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0002, t01=0x00ec}
0x043e…0452              Head {h00=0x0010, h01=0x0050, text=»DE50ST PROC «, t00=0x0002, t01=0x0122}
0x0452…0466              Head {h00=0x0010, h01=0x0050, text=» CLEAR BOOL2«, t00=0x0002, t01=0x0136}
0x0466…0482              Head {h00=0x0018, h01=0x0050, text=» MOVE JOBNAME,HEX00 «, t00=0x0002, t01=0x014a}
0x0482…049c              Head {h00=0x0016, h01=0x0050, text=» MOVE BATCH,HEX00 «, t00=0x0002, t01=0x0166}
0x049c…04b8              Head {h00=0x0018, h01=0x0050, text=» CBNE BIN2,W0,DE50EN«, t00=0x0002, t01=0x0180}
0x04b8…04c6              Head {h00=0x000a, h01=0x0050, text=»DEST00«, t00=0x0003, t01=0x000c}
0x04c6…04f0              Head {h00=0x0026, h01=0x0050, text=» SET BOOL1 PART OF FORMAT DISPLAY «, t00=0x0003, t01=0x001a}
0x04f0…04fe              Head {h00=0x000a, h01=0x0050, text=»DEST10«, t00=0x0003, t01=0x0044}
0x04fe…0518              Head {h00=0x0016, h01=0x0050, text=» TBT BOOL2,DE50EN «, t00=0x0003, t01=0x0052}
0x0518…052e              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F50ST «, t00=0x0003, t01=0x006c}
0x052e…0558              Head {h00=0x0026, h01=0x0050, text=» SET DEPROMPT PROMPT-TEXTS DISPLAY«, t00=0x0003, t01=0x0082}
0x0558…0566              Head {h00=0x000a, h01=0x0050, text=»DEST50«, t00=0x0003, t01=0x00ac}
0x0566…057e              Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0003, t01=0x00ba}
0x057e…0592              Head {h00=0x0010, h01=0x0050, text=» PERF DECLRS«, t00=0x0003, t01=0x00d2}
0x0592…05a0              Head {h00=0x000a, h01=0x0050, text=»DEST60«, t00=0x0003, t01=0x00e6}
0x05a0…05c8              Head {h00=0x0024, h01=0x0050, text=» IB DEBINW2,DE50CA,DE50RE,DE50EN«, t00=0x0003, t01=0x00f4}
0x05c8…05e0              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0003, t01=0x011c}
0x05e0…05fa              Head {h00=0x0016, h01=0x0050, text=» MOVE BIN3,DEBINW4«, t00=0x0003, t01=0x0134}
0x05fa…060e              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL3«, t00=0x0003, t01=0x014e}
0x060e…0620              Head {h00=0x000e, h01=0x0050, text=» BZ DE50E2«, t00=0x0003, t01=0x0162}
0x0620…0644              Head {h00=0x0020, h01=0x0050, text=» PERF OPCL,W4 CLOSE USERFILE«, t00=0x0003, t01=0x0174}
0x0644…065e              Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,BIN3«, t00=0x0004, t01=0x0008}
0x065e…066c              Head {h00=0x000a, h01=0x0050, text=»DE50E2«, t00=0x0004, t01=0x0022}
0x066c…067a              Head {h00=0x000a, h01=0x0050, text=»DE50ER«, t00=0x0004, t01=0x0030}
0x067a…068c              Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0004, t01=0x003e}
0x068c…069e              Head {h00=0x000e, h01=0x0050, text=» B DEST60 «, t00=0x0004, t01=0x0050}
0x069e…06ac              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0062}
0x06ac…06b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0070}
0x06b6…06d2              Head {h00=0x0018, h01=0x0050, text=»* CANCEL-KEY PRESSED«, t00=0x0004, t01=0x007a}
0x06d2…06dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0096}
0x06dc…06ea              Head {h00=0x000a, h01=0x0050, text=»DE50CA«, t00=0x0004, t01=0x00a0}
0x06ea…0702              Head {h00=0x0014, h01=0x0050, text=» CLEAR DEPROMPT «, t00=0x0004, t01=0x00ae}
0x0702…0714              Head {h00=0x000e, h01=0x0050, text=» B DEST50 «, t00=0x0004, t01=0x00c6}
0x0714…071e              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x00d8}
0x071e…073a              Head {h00=0x0018, h01=0x0050, text=»* ENTER-KEY PRESSED «, t00=0x0004, t01=0x00e2}
0x073a…0744              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00fe}
0x0744…0752              Head {h00=0x000a, h01=0x0050, text=»DE50EN«, t00=0x0004, t01=0x0108}
0x0752…0760              Head {h00=0x000a, h01=0x0050, text=»DEEN10«, t00=0x0004, t01=0x0116}
0x0760…077c              Head {h00=0x0018, h01=0x0050, text=» CBNE BIN1,W5,DERE30«, t00=0x0004, t01=0x0124}
0x077c…07a2              Head {h00=0x0022, h01=0x0050, text=» IB BIN2,DE51ST,DE51ST,DE53ST «, t00=0x0004, t01=0x0140}
0x07a2…07b4              Head {h00=0x000e, h01=0x0050, text=» B DEST00 «, t00=0x0004, t01=0x0166}
0x07b4…07be              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0004, t01=0x0178}
0x07be…07cc              Head {h00=0x000a, h01=0x0050, text=»DE50RE«, t00=0x0004, t01=0x0182}
0x07cc…07e0              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL3«, t00=0x0004, t01=0x0190}
0x07e0…07f2              Head {h00=0x000e, h01=0x0050, text=» BZ DERE20«, t00=0x0005, t01=0x0014}
0x07f2…0816              Head {h00=0x0020, h01=0x0050, text=» PERF OPCL,W4 CLOSE USERFILE«, t00=0x0005, t01=0x0026}
0x0816…082c              Head {h00=0x0012, h01=0x0050, text=» BNERR DERE20 «, t00=0x0005, t01=0x004a}
0x082c…0844              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW1,W0«, t00=0x0005, t01=0x0060}
0x0844…0860              Head {h00=0x0018, h01=0x0050, text=» PERF DERROR,DEKTAB6«, t00=0x0005, t01=0x0078}
0x0860…086e              Head {h00=0x000a, h01=0x0050, text=»DERE20«, t00=0x0005, t01=0x0094}
0x086e…0888              Head {h00=0x0016, h01=0x0050, text=» TBT BOOL2,DERE50 «, t00=0x0005, t01=0x00a2}
0x0888…089e              Head {h00=0x0012, h01=0x0050, text=» MOVE BIN2,W1 «, t00=0x0005, t01=0x00bc}
0x089e…08b4              Head {h00=0x0012, h01=0x0050, text=» MOVE BIN1,W0 «, t00=0x0005, t01=0x00d2}
0x08b4…08c2              Head {h00=0x000a, h01=0x0050, text=»DERE30«, t00=0x0005, t01=0x00e8}
0x08c2…08ce              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0005, t01=0x00f6}
0x08ce…08dc              Head {h00=0x000a, h01=0x0050, text=»DERE50«, t00=0x0005, t01=0x0102}
0x08dc…08f0              Head {h00=0x0010, h01=0x0050, text=» CLEAR BOOL2«, t00=0x0005, t01=0x0110}
0x08f0…0904              Head {h00=0x0010, h01=0x0050, text=» CLEAR BOOL1«, t00=0x0005, t01=0x0124}
0x0904…0918              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL7«, t00=0x0005, t01=0x0138}
0x0918…092c              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL4«, t00=0x0005, t01=0x014c}
0x092c…093e              Head {h00=0x000e, h01=0x0050, text=» B DEST10 «, t00=0x0005, t01=0x0160}
0x093e…094c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0172}
0x094c…095a              Head {h00=0x000a, h01=0x0050, text=»DE51ST«, t00=0x0005, t01=0x0180}
0x095a…0986              Head {h00=0x0028, h01=0x0050, text=» CLEAR BOOL1 PART OF FORMAT DISPLAY «, t00=0x0005, t01=0x018e}
0x0986…09aa              Head {h00=0x0020, h01=0x0050, text=» SET BOOL2 LEVEL 2 IN SEARCH«, t00=0x0006, t01=0x002a}
0x09aa…09d4              Head {h00=0x0026, h01=0x0050, text=» MOVE EOLINE,W2 NUMBER OF BUFFERS «, t00=0x0006, t01=0x004e}
0x09d4…09fc              Head {h00=0x0024, h01=0x0050, text=» MOVE BIN4,W2 NUMBER OF CONSEC. «, t00=0x0006, t01=0x0078}
0x09fc…0a30              Head {h00=0x0030, h01=0x0050, text=» PERF DEPOOL,W2,EOLINE,BIN4,STRG10A GET LOCK«, t00=0x0006, t01=0x00a0}
0x0a30…0a44              Head {h00=0x0010, h01=0x0050, text=» BNOK DE50ER«, t00=0x0006, t01=0x00d4}
0x0a44…0a5c              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W0«, t00=0x0006, t01=0x00e8}
0x0a5c…0a6a              Head {h00=0x000a, h01=0x0050, text=»DE5203«, t00=0x0006, t01=0x0100}
0x0a6a…0a90              Head {h00=0x0022, h01=0x0050, text=» MOVE BIN4,EOLINE FIRST BUFFER«, t00=0x0006, t01=0x010e}
0x0a90…0ab2              Head {h00=0x001e, h01=0x0050, text=» ADD BIN4,W1 SECOND BUFFER«, t00=0x0006, t01=0x0134}
0x0ab2…0ad4              Head {h00=0x001e, h01=0x0050, text=» MOVE BPOOL(EOLINE),HEX00 «, t00=0x0006, t01=0x0156}
0x0ad4…0af4              Head {h00=0x001c, h01=0x0050, text=» MOVE BPOOL(BIN4),HEX00 «, t00=0x0006, t01=0x0178}
0x0af4…0b1e              Head {h00=0x0026, h01=0x0050, text=» XCOPY BPOOL(EOLINE),W0,W1,W128,W1«, t00=0x0007, t01=0x0008}
0x0b1e…0b48              Head {h00=0x0026, h01=0x0050, text=» XCOPY BPOOL(EOLINE),W1,W1,W15,W1 «, t00=0x0007, t01=0x0032}
0x0b48…0b72              Head {h00=0x0026, h01=0x0050, text=» XCOPY BPOOL(EOLINE),W5,W1,W24,W1 «, t00=0x0007, t01=0x005c}
0x0b72…0b9a              Head {h00=0x0024, h01=0x0050, text=» CALL ATTWB,BPOOL(EOLINE),W8,W11«, t00=0x0007, t01=0x0086}
0x0b9a…0bc2              Head {h00=0x0024, h01=0x0050, text=» CALL ATTDB,BPOOL(EOLINE),W0,W11«, t00=0x0007, t01=0x00ae}
0x0bc2…0be2              Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW2,W0,DE52EN «, t00=0x0007, t01=0x00d6}
0x0be2…0c0c              Head {h00=0x0026, h01=0x0050, text=» CBE BIN2,W2,DE5205 JUMP IF BATCH «, t00=0x0007, t01=0x00f6}
0x0c0c…0c22              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F51ST «, t00=0x0007, t01=0x0120}
0x0c22…0c34              Head {h00=0x000e, h01=0x0050, text=» B DE5207 «, t00=0x0007, t01=0x0136}
0x0c34…0c42              Head {h00=0x000a, h01=0x0050, text=»DE5205«, t00=0x0007, t01=0x0148}
0x0c42…0c58              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F52ST «, t00=0x0007, t01=0x0156}
0x0c58…0c66              Head {h00=0x000a, h01=0x0050, text=»DE5207«, t00=0x0007, t01=0x016c}
0x0c66…0c7c              Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0007, t01=0x017a}
0x0c7c…0c94              Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0007, t01=0x0190}
0x0c94…0ca8              Head {h00=0x0010, h01=0x0050, text=» PERF DECLRS«, t00=0x0008, t01=0x0018}
0x0ca8…0cb6              Head {h00=0x000a, h01=0x0050, text=»DE5210«, t00=0x0008, t01=0x002c}
0x0cb6…0cda              Head {h00=0x0020, h01=0x0050, text=» PERF DEPRUT,PRNUM,BIN1,BIN2«, t00=0x0008, t01=0x003a}
0x0cda…0d02              Head {h00=0x0024, h01=0x0050, text=» IB DEBINW2,DE52CA,DE52RE,DE52EN«, t00=0x0008, t01=0x005e}
0x0d02…0d1a              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0008, t01=0x0086}
0x0d1a…0d28              Head {h00=0x000a, h01=0x0050, text=»DE5220«, t00=0x0008, t01=0x009e}
0x0d28…0d3a              Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0008, t01=0x00ac}
0x0d3a…0d4c              Head {h00=0x000e, h01=0x0050, text=» B DE5210 «, t00=0x0008, t01=0x00be}
0x0d4c…0d5a              Head {h00=0x000a, h01=0x0050, text=»DE52CA«, t00=0x0008, t01=0x00d0}
0x0d5a…0d6e              Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0008, t01=0x00de}
0x0d6e…0d80              Head {h00=0x000e, h01=0x0050, text=» B DE5210 «, t00=0x0008, t01=0x00f2}
0x0d80…0d8e              Head {h00=0x000a, h01=0x0050, text=»DE52ER«, t00=0x0008, t01=0x0104}
0x0d8e…0da6              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0008, t01=0x0112}
0x0da6…0dce              Head {h00=0x0024, h01=0x0050, text=» CALL ATTWB,BPOOL(EOLINE),W8,W11«, t00=0x0008, t01=0x012a}
0x0dce…0df6              Head {h00=0x0024, h01=0x0050, text=» CALL ATTDB,BPOOL(EOLINE),W0,W11«, t00=0x0008, t01=0x0152}
0x0df6…0e18              Head {h00=0x001e, h01=0x0050, text=» GETFLD 0,DEBINW3,DEBINW2 «, t00=0x0008, t01=0x017a}
0x0e18…0e2a              Head {h00=0x000e, h01=0x0050, text=» B DE5220 «, t00=0x0009, t01=0x000c}
0x0e2a…0e38              Head {h00=0x000a, h01=0x0050, text=»DE52EN«, t00=0x0009, t01=0x001e}
0x0e38…0e50              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W0«, t00=0x0009, t01=0x002c}
0x0e50…0e6e              Head {h00=0x001a, h01=0x0050, text=» MOVE STSAVE(W2),BATCH«, t00=0x0009, t01=0x0044}
0x0e6e…0e88              Head {h00=0x0016, h01=0x0050, text=» MOVE BATCH,HEX00 «, t00=0x0009, t01=0x0062}
0x0e88…0ea4              Head {h00=0x0018, h01=0x0050, text=» PERF DEOPBC,DEBINW2«, t00=0x0009, t01=0x007c}
0x0ea4…0eba              Head {h00=0x0012, h01=0x0050, text=» MOVE BIN7,W0 «, t00=0x0009, t01=0x0098}
0x0eba…0ede              Head {h00=0x0020, h01=0x0050, text=» PERF DEPRUT,PRNUM,BIN1,BIN2«, t00=0x0009, t01=0x00ae}
0x0ede…0f08              Head {h00=0x0026, h01=0x0050, text=» CBE BIN2,W2,EN5202 JUMP IF BATCH «, t00=0x0009, t01=0x00d2}
0x0f08…0f1e              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F51ST «, t00=0x0009, t01=0x00fc}
0x0f1e…0f30              Head {h00=0x000e, h01=0x0050, text=» B EN5203 «, t00=0x0009, t01=0x0112}
0x0f30…0f3e              Head {h00=0x000a, h01=0x0050, text=»EN5202«, t00=0x0009, t01=0x0124}
0x0f3e…0f54              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F52ST «, t00=0x0009, t01=0x0132}
0x0f54…0f62              Head {h00=0x000a, h01=0x0050, text=»EN5203«, t00=0x0009, t01=0x0148}
0x0f62…0f80              Head {h00=0x001a, h01=0x0050, text=» MOVE BATCH,STSAVE(W2)«, t00=0x0009, t01=0x0156}
0x0f80…0fb0              Head {h00=0x002c, h01=0x0050, text=» IB DEBINW2,EN5205,EN5205,DE52RE,DE52ER «, t00=0x0009, t01=0x0174}
0x0fb0…0fbe              Head {h00=0x000a, h01=0x0050, text=»EN5205«, t00=0x000a, t01=0x0014}
0x0fbe…0fe6              Head {h00=0x0024, h01=0x0050, text=» CBE BIN2,W1,EN5210 JUMP IF JOB «, t00=0x000a, t01=0x0022}
0x0fe6…1012              Head {h00=0x0028, h01=0x0050, text=» MOVE BIN5,=W'34' GET NEXT BATCHNAME«, t00=0x000a, t01=0x004a}
0x1012…1024              Head {h00=0x000e, h01=0x0050, text=» B EN5220 «, t00=0x000a, t01=0x0076}
0x1024…1032              Head {h00=0x000a, h01=0x0050, text=»EN5210«, t00=0x000a, t01=0x0088}
0x1032…105a              Head {h00=0x0024, h01=0x0050, text=» MOVE BIN5,W21 GET NEXT JOBNAME «, t00=0x000a, t01=0x0096}
0x105a…1068              Head {h00=0x000a, h01=0x0050, text=»EN5220«, t00=0x000a, t01=0x00be}
0x1068…1082              Head {h00=0x0016, h01=0x0050, text=» PERF DEDISC,BIN5 «, t00=0x000a, t01=0x00cc}
0x1082…1096              Head {h00=0x0010, h01=0x0050, text=» BNOK EN5270«, t00=0x000a, t01=0x00e6}
0x1096…10be              Head {h00=0x0024, h01=0x0050, text=» CBE BIN2,W1,EN5250 JUMP IF JOB «, t00=0x000a, t01=0x00fa}
0x10be…10e2              Head {h00=0x0020, h01=0x0050, text=» PERF DERECS,W11 OPEN BATCH «, t00=0x000a, t01=0x0122}
0x10e2…10f6              Head {h00=0x0010, h01=0x0050, text=» BNOK EN5270«, t00=0x000a, t01=0x0146}
0x10f6…1114              Head {h00=0x001a, h01=0x0050, text=» CBE PINACC,W0,EN5240 «, t00=0x000a, t01=0x015a}
0x1114…1138              Head {h00=0x0020, h01=0x0050, text=» XCOPY BIN10,W0,W2,BDSTAT,W0«, t00=0x000a, t01=0x0178}
0x1138…1158              Head {h00=0x001c, h01=0x0050, text=»* CALL MSKOUT,BIN10,BIN7«, t00=0x000b, t01=0x000c}
0x1158…118a              Head {h00=0x002e, h01=0x0050, text=»* CBNE BIN6,BIN10,DE52EN STATUS NOT MATCH «, t00=0x000b, t01=0x002c}
0x118a…11ae              Head {h00=0x0020, h01=0x0050, text=» PERF DESTAU,BDSTAT,STRG10A «, t00=0x000b, t01=0x005e}
0x11ae…11da              Head {h00=0x0028, h01=0x0050, text=» PERF DEPOOL,W6,PINACC,BIN8,STRG10A «, t00=0x000b, t01=0x0082}
0x11da…11ec              Head {h00=0x000e, h01=0x0050, text=» B EN5250 «, t00=0x000b, t01=0x00ae}
0x11ec…11fa              Head {h00=0x000a, h01=0x0050, text=»EN5240«, t00=0x000b, t01=0x00c0}
0x11fa…121c              Head {h00=0x001e, h01=0x0050, text=» MOVE STRG10A,=C'IN USE ' «, t00=0x000b, t01=0x00ce}
0x121c…122a              Head {h00=0x000a, h01=0x0050, text=»EN5250«, t00=0x000b, t01=0x00f0}
0x122a…123e              Head {h00=0x0010, h01=0x0050, text=» ADD BIN7,W1«, t00=0x000b, t01=0x00fe}
0x123e…125a              Head {h00=0x0018, h01=0x0050, text=» CBG BIN7,W1,EN5253 «, t00=0x000b, t01=0x0112}
0x125a…1272              Head {h00=0x0014, h01=0x0050, text=» ERASE 0,W5,W12 «, t00=0x000b, t01=0x012e}
0x1272…1280              Head {h00=0x000a, h01=0x0050, text=»EN5253«, t00=0x000b, t01=0x0146}
0x1280…129c              Head {h00=0x0018, h01=0x0050, text=» CBE BIN2,W1,EN5255 «, t00=0x000b, t01=0x0154}
0x129c…12d0              Head {h00=0x0030, h01=0x0050, text=» CON X.COPY,FDVBCD(BIN7),W0,W6,BATCH,W0 COPY«, t00=0x000b, t01=0x0170}
0x12d0…1304              Head {h00=0x0030, h01=0x0050, text=» CON X.COPY,FDVBCD(BIN7),W6,W1,VALSTR,W18 : «, t00=0x000c, t01=0x0014}
0x1304…133a              Head {h00=0x0032, h01=0x0050, text=» CON X.COPY,FDVBCD(BIN7),W7,W8,STRG10A,W0 COPY«, t00=0x000c, t01=0x0048}
0x133a…1358              Head {h00=0x001a, h01=0x0050, text=» MOVE STSAVE(W2),BATCH«, t00=0x000c, t01=0x007e}
0x1358…136a              Head {h00=0x000e, h01=0x0050, text=» B EN5257 «, t00=0x000c, t01=0x009c}
0x136a…1378              Head {h00=0x000a, h01=0x0050, text=»EN5255«, t00=0x000c, t01=0x00ae}
0x1378…13aa              Head {h00=0x002e, h01=0x0050, text=» CON X.COPY,FDVBCD(BIN7),W0,W6,JOBNAME,W0 «, t00=0x000c, t01=0x00bc}
0x13aa…13ca              Head {h00=0x001c, h01=0x0050, text=» MOVE STSAVE(W1),JOBNAME«, t00=0x000c, t01=0x00ee}
0x13ca…13d8              Head {h00=0x000a, h01=0x0050, text=»EN5257«, t00=0x000c, t01=0x010e}
0x13d8…13ec              Head {h00=0x0010, h01=0x0050, text=» ADD BIN7,W3«, t00=0x000c, t01=0x011c}
0x13ec…1402              Head {h00=0x0012, h01=0x0050, text=» ADD BIN7,BIN2«, t00=0x000c, t01=0x0130}
0x1402…141e              Head {h00=0x0018, h01=0x0050, text=» DISPLAY 3,BIN7,BIN7«, t00=0x000c, t01=0x0146}
0x141e…1432              Head {h00=0x0010, h01=0x0050, text=» SUB BIN7,W3«, t00=0x000c, t01=0x0162}
0x1432…1448              Head {h00=0x0012, h01=0x0050, text=» SUB BIN7,BIN2«, t00=0x000c, t01=0x0176}
0x1448…1466              Head {h00=0x001a, h01=0x0050, text=» CBNE BIN7,W24,EN5205 «, t00=0x000c, t01=0x018c}
0x1466…1474              Head {h00=0x000a, h01=0x0050, text=»EN5258«, t00=0x000d, t01=0x001a}
0x1474…1488              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL3«, t00=0x000d, t01=0x0028}
0x1488…149a              Head {h00=0x000e, h01=0x0050, text=» BZ EN5259«, t00=0x000d, t01=0x003c}
0x149a…14be              Head {h00=0x0020, h01=0x0050, text=» PERF OPCL,W4 CLOSE USERFILE«, t00=0x000d, t01=0x004e}
0x14be…14cc              Head {h00=0x000a, h01=0x0050, text=»EN5259«, t00=0x000d, t01=0x0072}
0x14cc…14e4              Head {h00=0x0014, h01=0x0050, text=» DISPLAY 3,W3,W4«, t00=0x000d, t01=0x0080}
0x14e4…14fc              Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x000d, t01=0x0098}
0x14fc…1516              Head {h00=0x0016, h01=0x0050, text=» DSC0 DEDSDYKB,02 «, t00=0x000d, t01=0x00b0}
0x1516…152a              Head {h00=0x0010, h01=0x0050, text=» PERF DECLRN«, t00=0x000d, t01=0x00ca}
0x152a…1538              Head {h00=0x000a, h01=0x0050, text=»EN5260«, t00=0x000d, t01=0x00de}
0x1538…156e              Head {h00=0x0032, h01=0x0050, text=» IB DEBINW2,DE52CA,DE52RE,DE5203,DE52BW,DE52BW«, t00=0x000d, t01=0x00ec}
0x156e…157c              Head {h00=0x000a, h01=0x0050, text=»EN5265«, t00=0x000d, t01=0x0122}
0x157c…1594              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x000d, t01=0x0130}
0x1594…15a6              Head {h00=0x000e, h01=0x0050, text=» B EN5281 «, t00=0x000d, t01=0x0148}
0x15a6…15b4              Head {h00=0x000a, h01=0x0050, text=»EN5270«, t00=0x000d, t01=0x015a}
0x15b4…15ec              Head {h00=0x0034, h01=0x0050, text=» CBNE DEBINW4,W9,EN5280 JUMP IF NOT 'NOT FOUND' «, t00=0x000d, t01=0x0168}
0x15ec…1608              Head {h00=0x0018, h01=0x0050, text=» CBNE BIN7,W0,EN5258«, t00=0x000e, t01=0x0010}
0x1608…162c              Head {h00=0x0020, h01=0x0050, text=» PERF DEPRUT,PRNUM,BIN1,BIN2«, t00=0x000e, t01=0x002c}
0x162c…163a              Head {h00=0x000a, h01=0x0050, text=»EN5280«, t00=0x000e, t01=0x0050}
0x163a…164e              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL3«, t00=0x000e, t01=0x005e}
0x164e…166c              Head {h00=0x001a, h01=0x0050, text=» BZ EN5281 IF NOT OPEN«, t00=0x000e, t01=0x0072}
0x166c…1686              Head {h00=0x0016, h01=0x0050, text=» MOVE BIN3,DEBINW4«, t00=0x000e, t01=0x0090}
0x1686…16ac              Head {h00=0x0022, h01=0x0050, text=» PERF OPCL,W4 CLOSE USER FILE «, t00=0x000e, t01=0x00aa}
0x16ac…16c6              Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,BIN3«, t00=0x000e, t01=0x00d0}
0x16c6…16d4              Head {h00=0x000a, h01=0x0050, text=»EN5281«, t00=0x000e, t01=0x00ea}
0x16d4…16e6              Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x000e, t01=0x00f8}
0x16e6…16f8              Head {h00=0x000e, h01=0x0050, text=» B EN5260 «, t00=0x000e, t01=0x010a}
0x16f8…1706              Head {h00=0x000a, h01=0x0050, text=»DE52BW«, t00=0x000e, t01=0x011c}
0x1706…172a              Head {h00=0x0020, h01=0x0050, text=» PERF DEPRUT,PRNUM,BIN1,BIN2«, t00=0x000e, t01=0x012a}
0x172a…1754              Head {h00=0x0026, h01=0x0050, text=» CBE BIN2,W2,BW5200 JUMP IF BATCH «, t00=0x000e, t01=0x014e}
0x1754…177e              Head {h00=0x0026, h01=0x0050, text=» CBE DEBINW2,W4,DE52CL FWD PRESSED«, t00=0x000e, t01=0x0178}
0x177e…179a              Head {h00=0x0018, h01=0x0050, text=» MOVE JOBNAME,HEX00 «, t00=0x000f, t01=0x0012}
0x179a…17ac              Head {h00=0x000e, h01=0x0050, text=» B DE5203 «, t00=0x000f, t01=0x002e}
0x17ac…17ba              Head {h00=0x000a, h01=0x0050, text=»BW5200«, t00=0x000f, t01=0x0040}
0x17ba…17e4              Head {h00=0x0026, h01=0x0050, text=» CBE DEBINW2,W5,BW5210 BWD PREESED«, t00=0x000f, t01=0x004e}
0x17e4…1800              Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,JOBNAME«, t00=0x000f, t01=0x0078}
0x1800…181a              Head {h00=0x0016, h01=0x0050, text=» BNZ EN5265 EMPTY!«, t00=0x000f, t01=0x0094}
0x181a…182c              Head {h00=0x000e, h01=0x0050, text=» B DE5203 «, t00=0x000f, t01=0x00ae}
0x182c…183a              Head {h00=0x000a, h01=0x0050, text=»BW5210«, t00=0x000f, t01=0x00c0}
0x183a…1854              Head {h00=0x0016, h01=0x0050, text=» MOVE BATCH,HEX00 «, t00=0x000f, t01=0x00ce}
0x1854…1862              Head {h00=0x000a, h01=0x0050, text=»DE52CL«, t00=0x000f, t01=0x00e8}
0x1862…1874              Head {h00=0x000e, h01=0x0050, text=» B DE5203 «, t00=0x000f, t01=0x00f6}
0x1874…1882              Head {h00=0x000a, h01=0x0050, text=»DE52RE«, t00=0x000f, t01=0x0108}
0x1882…18c2              Head {h00=0x003c, h01=0x0050, text=» CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO«, t00=0x000f, t01=0x0116}
0x18c2…18e8              Head {h00=0x0022, h01=0x0050, text=»   WORKBLOCKS AND DESCRIPTORS «, t00=0x000f, t01=0x0156}
0x18e8…1914              Head {h00=0x0028, h01=0x0050, text=» PERF DEPOOL,W6,EOLINE,BIN8,STRG10A «, t00=0x000f, t01=0x017c}
0x1914…1926              Head {h00=0x000e, h01=0x0050, text=» SET BOOL2«, t00=0x0010, t01=0x0018}
0x1926…1938              Head {h00=0x000e, h01=0x0050, text=» B DE50RE «, t00=0x0010, t01=0x002a}
0x1938…1946              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x003c}
0x1946…1978              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0010, t01=0x004a}
0x1978…19a8              Head {h00=0x002c, h01=0x0050, text=»* THIS IS THE MAINLOOP IN SEARCH RECORD.«, t00=0x0010, t01=0x007c}
0x19a8…19d8              Head {h00=0x002c, h01=0x0050, text=»* THE PROCEDURES FOR BATCHHANDLING USED «, t00=0x0010, t01=0x00ac}
0x19d8…1a08              Head {h00=0x002c, h01=0x0050, text=»* ARE THE SAME AS FOR ENTRY AND VERIFY. «, t00=0x0010, t01=0x00dc}
0x1a08…1a3a              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0010, t01=0x010c}
0x1a3a…1a48              Head {h00=0x000a, h01=0x0050, text=»DE53ST«, t00=0x0010, t01=0x013e}
0x1a48…1a5e              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F53ST «, t00=0x0010, t01=0x014c}
0x1a5e…1a90              Head {h00=0x002e, h01=0x0050, text=» MOVE EOLINE,W0 USED AS POOLINDEX IN 51,52«, t00=0x0010, t01=0x0162}
0x1a90…1ab6 (17, 0, 398) Head {h00=0x0022, h01=0x0050, text=»   NOT USED WITHIN PROGRAM 53 «, t00=0x0011, t01=0x0004}
0x1ab6…1ac4              Head {h00=0x000a, h01=0x0050, text=»DE5305«, t00=0x0011, t01=0x002a}
0x1ac4…1ada              Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0011, t01=0x0038}
0x1ada…1af2              Head {h00=0x0014, h01=0x0050, text=» CLEAR DECHANGE «, t00=0x0011, t01=0x004e}
0x1af2…1b00              Head {h00=0x000a, h01=0x0050, text=»DE5310«, t00=0x0011, t01=0x0066}
0x1b00…1b24              Head {h00=0x0020, h01=0x0050, text=» MOVE WORK(W11),W0 COMP-WORD«, t00=0x0011, t01=0x0074}
0x1b24…1b4a              Head {h00=0x0022, h01=0x0050, text=» MOVE WORK(W12),W0 MSKOUT-WORD«, t00=0x0011, t01=0x0098}
0x1b4a…1b74              Head {h00=0x0026, h01=0x0050, text=» PERF DECLRS CLEAR SOME VARIABELS «, t00=0x0011, t01=0x00be}
0x1b74…1b82              Head {h00=0x000a, h01=0x0050, text=»DE5315«, t00=0x0011, t01=0x00e8}
0x1b82…1baa              Head {h00=0x0024, h01=0x0050, text=» IB DEBINW2,DE53CA,DE52RE,DE53EN«, t00=0x0011, t01=0x00f6}
0x1baa…1bce              Head {h00=0x0020, h01=0x0050, text=» MOVE DEBINW4,W0 ILLEGAL KEY«, t00=0x0011, t01=0x011e}
0x1bce…1bdc              Head {h00=0x000a, h01=0x0050, text=»DE5320«, t00=0x0011, t01=0x0142}
0x1bdc…1bee              Head {h00=0x000e, h01=0x0050, text=» PERF DERR«, t00=0x0011, t01=0x0150}
0x1bee…1c00              Head {h00=0x000e, h01=0x0050, text=» B DE5315 «, t00=0x0011, t01=0x0162}
0x1c00…1c0e              Head {h00=0x000a, h01=0x0050, text=»DE53CA«, t00=0x0011, t01=0x0174}
0x1c0e…1c22              Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0011, t01=0x0182}
0x1c22…1c34              Head {h00=0x000e, h01=0x0050, text=» B DE5315 «, t00=0x0012, t01=0x0008}
0x1c34…1c42              Head {h00=0x000a, h01=0x0050, text=»DE53EN«, t00=0x0012, t01=0x001a}
0x1c42…1c5a              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W0«, t00=0x0012, t01=0x0028}
0x1c5a…1c76              Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,STR64A «, t00=0x0012, t01=0x0040}
0x1c76…1c96              Head {h00=0x001c, h01=0x0050, text=» BZ EN5300 IF NOT EMPTY «, t00=0x0012, t01=0x005c}
0x1c96…1cba              Head {h00=0x0020, h01=0x0050, text=» MOVE WORK(W11),W0 COMP-WORD«, t00=0x0012, t01=0x007c}
0x1cba…1ce0              Head {h00=0x0022, h01=0x0050, text=» MOVE WORK(W12),W0 MSKOUT-WORD«, t00=0x0012, t01=0x00a0}
0x1ce0…1cee              Head {h00=0x000a, h01=0x0050, text=»EN5300«, t00=0x0012, t01=0x00c6}
0x1cee…1d1e              Head {h00=0x002c, h01=0x0050, text=» PERF DEOPBC,DEBINW2 OPEN BATCH-ROUTINE «, t00=0x0012, t01=0x00d4}
0x1d1e…1d32              Head {h00=0x0010, h01=0x0050, text=» CLEAR SOOL2«, t00=0x0012, t01=0x0104}
0x1d32…1d62              Head {h00=0x002c, h01=0x0050, text=» IB DEBINW2,EN5310,EN5310,DE53RE,EN5320 «, t00=0x0012, t01=0x0118}
0x1d62…1d8a              Head {h00=0x0024, h01=0x0050, text=»EN5310   OPEN BATCH SUCCESSFULL «, t00=0x0012, t01=0x0148}
0x1d8a…1d9c              Head {h00=0x000e, h01=0x0050, text=» SET SOOL2«, t00=0x0012, t01=0x0170}
0x1d9c…1dcc              Head {h00=0x002c, h01=0x0050, text=» PERF DENT01 DATARECORDHANDLING-ROUTINE «, t00=0x0012, t01=0x0182}
0x1dcc…1df4              Head {h00=0x0024, h01=0x0050, text=» B EN5300 TAKE CARE OF RETURCODE«, t00=0x0013, t01=0x0022}
0x1df4…1e02              Head {h00=0x000a, h01=0x0050, text=»DE53RE«, t00=0x0013, t01=0x004a}
0x1e02…1e16              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL3«, t00=0x0013, t01=0x0058}
0x1e16…1e2a              Head {h00=0x0010, h01=0x0050, text=» CLEAR SOOL2«, t00=0x0013, t01=0x006c}
0x1e2a…1e4e              Head {h00=0x0020, h01=0x0050, text=» PERF OPCL,W4 CLOSE USERFILE«, t00=0x0013, t01=0x0080}
0x1e4e…1e6e              Head {h00=0x001c, h01=0x0050, text=» BOK DE53ST SUCCESSFULLY«, t00=0x0013, t01=0x00a4}
0x1e6e…1e90              Head {h00=0x001e, h01=0x0050, text=»EN5320   OPEN BATCH FAILED«, t00=0x0013, t01=0x00c4}
0x1e90…1ea4              Head {h00=0x0010, h01=0x0050, text=» CLEAR DOOL3«, t00=0x0013, t01=0x00e6}
0x1ea4…1ebe              Head {h00=0x0016, h01=0x0050, text=» MOVE STR64A,HEX00«, t00=0x0013, t01=0x00fa}
0x1ebe…1ed6              Head {h00=0x0014, h01=0x0010, text=» MOVE DEBINW2,W0«, t00=0x0013, t01=0x0114}
0x1ed6…1eee              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0013, t01=0x012c}
0x1eee…1efc              Head {h00=0x000a, h01=0x0006, text=»DES100«, t00=0x0013, t01=0x0144}
0x1efc…1f2e              Head {h00=0x002e, h01=0x0050, text=» CALL TESTB,WORK(W12),DEBINW3 MSKOUT-WORD «, t00=0x0013, t01=0x0152}
0x1f2e…1f40              Head {h00=0x000e, h01=0x000a, text=» BZ DES200«, t00=0x0013, t01=0x0184}
0x1f40…1f5e              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW2,W0,DES120«, t00=0x0014, t01=0x0008}
0x1f5e…1f8c              Head {h00=0x002a, h01=0x0050, text=» COPY STR64A,DEBINW2,W1,STATIU,W9 ',' «, t00=0x0014, t01=0x0026}
0x1f8c…1fa4              Head {h00=0x0014, h01=0x000f, text=» ADD DEBINW2,W1 «, t00=0x0014, t01=0x0054}
0x1fa4…1fb2              Head {h00=0x000a, h01=0x0050, text=»DES120«, t00=0x0014, t01=0x006c}
0x1fb2…1fe2              Head {h00=0x002c, h01=0x0050, text=» CALL TESTB,WORK(W11),DEBINW3 COMP-WORD «, t00=0x0014, t01=0x007a}
0x1fe2…1ff6              Head {h00=0x0010, h01=0x0050, text=» BNZ DES140 «, t00=0x0014, t01=0x00aa}
0x1ff6…2024              Head {h00=0x002a, h01=0x0050, text=» COPY STR64A,DEBINW2,W1,STATIU,W8 '/' «, t00=0x0014, t01=0x00be}
0x2024…203c              Head {h00=0x0014, h01=0x000f, text=» ADD DEBINW2,W1 «, t00=0x0014, t01=0x00ec}
0x203c…204a              Head {h00=0x000a, h01=0x0050, text=»DES140«, t00=0x0014, t01=0x0104}
0x204a…2078              Head {h00=0x002a, h01=0x0050, text=» COPY STR64A,DEBINW2,W1,STATIU,DEBINW3«, t00=0x0014, t01=0x0112}
0x2078…2090              Head {h00=0x0014, h01=0x000f, text=» ADD DEBINW2,W1 «, t00=0x0014, t01=0x0140}
0x2090…209e              Head {h00=0x000a, h01=0x0006, text=»DES200«, t00=0x0014, t01=0x0158}
0x209e…20b6              Head {h00=0x0014, h01=0x0050, text=» ADD DEBINW3,W1 «, t00=0x0014, t01=0x0166}
0x20b6…20d6              Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW3,W8,DES100 «, t00=0x0014, t01=0x017e}
0x20d6…20ec              Head {h00=0x0012, h01=0x0050, text=» ATTFMT F53ST «, t00=0x0015, t01=0x000e}
0x20ec…2104              Head {h00=0x0014, h01=0x0050, text=» DISPLAY 3,W5,W5«, t00=0x0015, t01=0x0024}
0x2104…211c              Head {h00=0x0014, h01=0x0050, text=» DISPLAY 3,W6,W6«, t00=0x0015, t01=0x003c}
0x211c…2138              Head {h00=0x0018, h01=0x0050, text=» GETFLD 0,W4,DEBINW3«, t00=0x0015, t01=0x0054}
0x2138…215e              Head {h00=0x0022, h01=0x0050, text=» B DE5320 DISPLAY ERRORMESSAGE«, t00=0x0015, t01=0x0070}
0x215e…216c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0096}
0x216c…2176              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a4}
0x2176…21a2              Head {h00=0x0028, h01=0x0050, text=»*        APPL VALUE HANDLING ROUTINE«, t00=0x0015, t01=0x00ae}
0x21a2…21ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00da}
0x21ac…21ba              Head {h00=0x000a, h01=0x0050, text=»DEAP5A«, t00=0x0015, t01=0x00e4}
0x21ba…21e2              Head {h00=0x0024, h01=0x0050, text=» IB DEBINW4,DEAP51,DEAP52,DEAP53«, t00=0x0015, t01=0x00f2}
0x21e2…21f0              Head {h00=0x000a, h01=0x0050, text=»DEAP50«, t00=0x0015, t01=0x011a}
0x21f0…21fe              Head {h00=0x000a, h01=0x0050, text=»DEAP51«, t00=0x0015, t01=0x0128}
0x21fe…2210              Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x0015, t01=0x0136}
0x2210…221e              Head {h00=0x000a, h01=0x0050, text=»DEAP52«, t00=0x0015, t01=0x0148}
0x221e…2230              Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x0015, t01=0x0156}
0x2230…223e              Head {h00=0x000a, h01=0x0050, text=»DEAP53«, t00=0x0015, t01=0x0168}
0x223e…2262              Head {h00=0x0020, h01=0x0050, text=» MOVE WORK(W11),W0 COMP-WORD«, t00=0x0015, t01=0x0176}
0x2262…2288              Head {h00=0x0022, h01=0x0050, text=» MOVE WORK(W12),W0 MSKOUT-WORD«, t00=0x0016, t01=0x000a}
0x2288…229e              Head {h00=0x0012, h01=0x0050, text=» MOVE BIN9,W0 «, t00=0x0016, t01=0x0030}
0x229e…22ac              Head {h00=0x000a, h01=0x0050, text=»APP003«, t00=0x0016, t01=0x0046}
0x22ac…22cc              Head {h00=0x001c, h01=0x0050, text=» CBE BIN9,DEBINW1,APP340«, t00=0x0016, t01=0x0054}
0x22cc…22e2              Head {h00=0x0012, h01=0x0050, text=» MOVE BIN8,W0 «, t00=0x0016, t01=0x0074}
0x22e2…22f0              Head {h00=0x000a, h01=0x0050, text=»APP005«, t00=0x0016, t01=0x008a}
0x22f0…231e              Head {h00=0x002a, h01=0x0050, text=» MATCH STATIU,BIN8,W10,DEINPUT,BIN9,W1«, t00=0x0016, t01=0x0098}
0x231e…2342              Head {h00=0x0020, h01=0x0050, text=» BNOK APP395 ILLEGAL LETTER «, t00=0x0016, t01=0x00c6}
0x2342…2356              Head {h00=0x0010, h01=0x0050, text=» IB BIN8,  C«, t00=0x0016, t01=0x00ea}
0x2356…236a              Head {h00=0x0010, h01=0x0050, text=»  APP395 - C«, t00=0x0016, t01=0x00fe}
0x236a…237e              Head {h00=0x0010, h01=0x0050, text=»  APP310 = C«, t00=0x0016, t01=0x0112}
0x237e…2392              Head {h00=0x0010, h01=0x0050, text=»  APP310 = C«, t00=0x0016, t01=0x0126}
0x2392…23a6              Head {h00=0x0010, h01=0x0050, text=»  APP310 = C«, t00=0x0016, t01=0x013a}
0x23a6…23ba              Head {h00=0x0010, h01=0x0050, text=»  APP310 = C«, t00=0x0016, t01=0x014e}
0x23ba…23ce              Head {h00=0x0010, h01=0x0050, text=»  APP395 = C«, t00=0x0016, t01=0x0162}
0x23ce…23e2              Head {h00=0x0010, h01=0x0050, text=»  APP395 = C«, t00=0x0016, t01=0x0176}
0x23e2…23f6              Head {h00=0x0010, h01=0x0050, text=»  APP335 = C«, t00=0x0016, t01=0x018a}
0x23f6…2408              Head {h00=0x000e, h01=0x0050, text=»  APP330 =«, t00=0x0017, t01=0x000e}
0x2408…2416              Head {h00=0x000a, h01=0x0050, text=»APP310«, t00=0x0017, t01=0x0020}
0x2416…2448              Head {h00=0x002e, h01=0x0050, text=» CALL TESTB,WORK(W12),BIN8 LOOK IF STATUS «, t00=0x0017, t01=0x002e}
0x2448…246c              Head {h00=0x0020, h01=0x0050, text=» BNZ APP395 MASK ALREADY SET«, t00=0x0017, t01=0x0060}
0x246c…249a              Head {h00=0x002a, h01=0x0050, text=» CALL SETB,WORK(W12),BIN8 MSKOUT-WORD «, t00=0x0017, t01=0x0084}
0x249a…24bc              Head {h00=0x001e, h01=0x0050, text=» CLEAR DOOL6 NOT-FLAG SAT?«, t00=0x0017, t01=0x00b2}
0x24bc…24d0              Head {h00=0x0010, h01=0x0050, text=» BNZ APP330 «, t00=0x0017, t01=0x00d4}
0x24d0…24de              Head {h00=0x000a, h01=0x0050, text=»APP320«, t00=0x0017, t01=0x00e8}
0x24de…250a              Head {h00=0x0028, h01=0x0050, text=» CALL SETB,WORK(W11),BIN8 COMP-WORD «, t00=0x0017, t01=0x00f6}
0x250a…2518              Head {h00=0x000a, h01=0x0050, text=»APP330«, t00=0x0017, t01=0x0122}
0x2518…2540              Head {h00=0x0024, h01=0x0050, text=» ADD BIN9,W1 ADJUST INPUTBUFFER «, t00=0x0017, t01=0x0130}
0x2540…2560              Head {h00=0x001c, h01=0x0050, text=» B APP003 GET NEXT INPUT«, t00=0x0017, t01=0x0158}
0x2560…256e              Head {h00=0x000a, h01=0x0050, text=»APP335«, t00=0x0017, t01=0x0178}
0x256e…2580              Head {h00=0x000e, h01=0x0050, text=» SET DOOL6«, t00=0x0017, t01=0x0186}
0x2580…2592              Head {h00=0x000e, h01=0x0050, text=» BZ APP330«, t00=0x0018, t01=0x0008}
0x2592…25a0              Head {h00=0x000a, h01=0x0050, text=»APP340«, t00=0x0018, t01=0x001a}
0x25a0…25be              Head {h00=0x001a, h01=0x0050, text=» CLEAR DOOL6 NOT-FLAG «, t00=0x0018, t01=0x0028}
0x25be…25e4              Head {h00=0x0022, h01=0x0050, text=» BNZ APP395 LAST LETTER = '/' «, t00=0x0018, t01=0x0046}
0x25e4…25f2              Head {h00=0x000a, h01=0x0050, text=»APP350«, t00=0x0018, t01=0x006c}
0x25f2…2604              Head {h00=0x000e, h01=0x0050, text=» B DEAOK0 «, t00=0x0018, t01=0x007a}
0x2604…2612              Head {h00=0x000a, h01=0x0050, text=»APP395«, t00=0x0018, t01=0x008c}
0x2612…2620              Head {h00=0x000a, h01=0x0050, text=»DEAER6«, t00=0x0018, t01=0x009a}
0x2620…2638              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W6«, t00=0x0018, t01=0x00a8}
0x2638…264a              Head {h00=0x000e, h01=0x0050, text=» B DEANOK «, t00=0x0018, t01=0x00c0}
0x264a…2658              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0018, t01=0x00d2}
0x2658…2666              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0018, t01=0x00e0}
0x2666…2670              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0018, t01=0x00ee}
0x2670…2688              Head {h00=0x0014, h01=0x0010, text=»*        FORMATS«, t00=0x0018, t01=0x00f8}
0x2688…2692              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0018, t01=0x0110}
0x2692…26a4              Head {h00=0x000e, h01=0x0050, text=»F50ST FRMT«, t00=0x0018, t01=0x011a}
0x26a4…26b0              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0018, t01=0x012c}
0x26b0…26c4              Head {h00=0x0010, h01=0x0050, text=» FTEXT '50 '«, t00=0x0018, t01=0x0138}
0x26c4…26de              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'SEARCH' «, t00=0x0018, t01=0x014c}
0x26de…26f2              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0018, t01=0x0166}
0x26f2…270a              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x0018, t01=0x017a}
0x270a…2716 (25, 0, 400) Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0019, t01=0x0004}
0x2716…2732              Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'PROGRAM:' «, t00=0x0019, t01=0x0010}
0x2732…275e              Head {h00=0x0028, h01=0x0050, text=» FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 «, t00=0x0019, t01=0x002c}
0x275e…2776              Head {h00=0x0014, h01=0x0050, text=» FMEL 'XX',PRNUM«, t00=0x0019, t01=0x0058}
0x2776…2790              Head {h00=0x0016, h01=0x0050, text=» FBF BOOL1,F50OUT «, t00=0x0019, t01=0x0070}
0x2790…279c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0019, t01=0x008a}
0x279c…27b2              Head {h00=0x0012, h01=0x0050, text=» FLINK F51ST2 «, t00=0x0019, t01=0x0096}
0x27b2…27be              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0019, t01=0x00ac}
0x27be…27d4              Head {h00=0x0012, h01=0x0050, text=» FLINK F52ST2 «, t00=0x0019, t01=0x00b8}
0x27d4…27e0              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0019, t01=0x00ce}
0x27e0…27f6              Head {h00=0x0012, h01=0x0050, text=» FLINK F53ST2 «, t00=0x0019, t01=0x00da}
0x27f6…2804              Head {h00=0x000a, h01=0x0050, text=»F50OUT«, t00=0x0019, t01=0x00f0}
0x2804…2812              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0019, t01=0x00fe}
0x2812…2824              Head {h00=0x000e, h01=0x0050, text=»F51ST FRMT«, t00=0x0019, t01=0x010c}
0x2824…2830              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0019, t01=0x011e}
0x2830…2846              Head {h00=0x0012, h01=0x0050, text=» FLINK F51ST2 «, t00=0x0019, t01=0x012a}
0x2846…2852              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0019, t01=0x0140}
0x2852…2866              Head {h00=0x0010, h01=0x0050, text=» FLINK F50UV«, t00=0x0019, t01=0x014c}
0x2866…2872              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0019, t01=0x0160}
0x2872…2888              Head {h00=0x0012, h01=0x0050, text=» FLINK F50JOB «, t00=0x0019, t01=0x016c}
0x2888…289e              Head {h00=0x0012, h01=0x0050, text=» FLINK F50END «, t00=0x0019, t01=0x0182}
0x289e…28aa              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001a, t01=0x0008}
0x28aa…28c0              Head {h00=0x0012, h01=0x0050, text=» FLINK F50STA «, t00=0x001a, t01=0x0014}
0x28c0…28ce              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001a, t01=0x002a}
0x28ce…28e0              Head {h00=0x000e, h01=0x0050, text=»F52ST FRMT«, t00=0x001a, t01=0x0038}
0x28e0…28ec              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x001a, t01=0x004a}
0x28ec…2902              Head {h00=0x0012, h01=0x0050, text=» FLINK F52ST2 «, t00=0x001a, t01=0x0056}
0x2902…290e              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001a, t01=0x006c}
0x290e…2922              Head {h00=0x0010, h01=0x0050, text=» FLINK F50UV«, t00=0x001a, t01=0x0078}
0x2922…292e              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001a, t01=0x008c}
0x292e…2944              Head {h00=0x0012, h01=0x0050, text=» FLINK F52JOB «, t00=0x001a, t01=0x0098}
0x2944…2954              Head {h00=0x000c, h01=0x0050, text=» FTAB 20«, t00=0x001a, t01=0x00ae}
0x2954…296a              Head {h00=0x0012, h01=0x0050, text=» FLINK F50BAT «, t00=0x001a, t01=0x00be}
0x296a…2980              Head {h00=0x0012, h01=0x0050, text=» FLINK F50END «, t00=0x001a, t01=0x00d4}
0x2980…298c              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001a, t01=0x00ea}
0x298c…29a2              Head {h00=0x0012, h01=0x0050, text=» FLINK F50STA «, t00=0x001a, t01=0x00f6}
0x29a2…29b0              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001a, t01=0x010c}
0x29b0…29c2              Head {h00=0x000e, h01=0x0050, text=»F53ST FRMT«, t00=0x001a, t01=0x011a}
0x29c2…29ce              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x001a, t01=0x012c}
0x29ce…29e4              Head {h00=0x0012, h01=0x0050, text=» FLINK F53ST2 «, t00=0x001a, t01=0x0138}
0x29e4…29f0              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001a, t01=0x014e}
0x29f0…2a04              Head {h00=0x0010, h01=0x0050, text=» FLINK F50UV«, t00=0x001a, t01=0x015a}
0x2a04…2a10              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001a, t01=0x016e}
0x2a10…2a26              Head {h00=0x0012, h01=0x0050, text=» FLINK F52JOB «, t00=0x001a, t01=0x017a}
0x2a26…2a36              Head {h00=0x000c, h01=0x0050, text=» FTAB 20«, t00=0x001a, t01=0x0190}
0x2a36…2a4c              Head {h00=0x0012, h01=0x0050, text=» FLINK F53BAT «, t00=0x001b, t01=0x0010}
0x2a4c…2a58              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x001b, t01=0x0026}
0x2a58…2a72              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'RECORD' «, t00=0x001b, t01=0x0032}
0x2a72…2a86              Head {h00=0x0010, h01=0x0050, text=» FILLR '-',1«, t00=0x001b, t01=0x004c}
0x2a86…2aa0              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'NUMBER' «, t00=0x001b, t01=0x0060}
0x2aa0…2ab4              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001b, t01=0x007a}
0x2ab4…2ad0              Head {h00=0x0018, h01=0x0050, text=» FKI 15,MAXL=7,NEOI «, t00=0x001b, t01=0x008e}
0x2ad0…2af0              Head {h00=0x001c, h01=0x0050, text=» FMEL 'XXXX',BCDI21(W3) «, t00=0x001b, t01=0x00aa}
0x2af0…2b00              Head {h00=0x000c, h01=0x0050, text=» FTAB 30«, t00=0x001b, t01=0x00ca}
0x2b00…2b1a              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'RECORD' «, t00=0x001b, t01=0x00da}
0x2b1a…2b2e              Head {h00=0x0010, h01=0x0050, text=» FILLR '-',1«, t00=0x001b, t01=0x00f4}
0x2b2e…2b48              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'STATUS' «, t00=0x001b, t01=0x0108}
0x2b48…2b5c              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001b, t01=0x0122}
0x2b5c…2b88              Head {h00=0x0028, h01=0x0050, text=» FKI 45,MAXL=20,NEOI,ALPHA,APPL=101 «, t00=0x001b, t01=0x0136}
0x2b88…2b9e              Head {h00=0x0012, h01=0x0050, text=» FCOPY STR64A «, t00=0x001b, t01=0x0162}
0x2b9e…2bb4              Head {h00=0x0012, h01=0x0050, text=» FLINK F50END «, t00=0x001b, t01=0x0178}
0x2bb4…2bc2              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001b, t01=0x018e}
0x2bc2…2bd6              Head {h00=0x0010, h01=0x0050, text=»F51ST2 FRMT «, t00=0x001c, t01=0x000c}
0x2bd6…2bea              Head {h00=0x0010, h01=0x0050, text=» FTEXT '51 '«, t00=0x001c, t01=0x0020}
0x2bea…2c04              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'SEARCH' «, t00=0x001c, t01=0x0034}
0x2c04…2c18              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001c, t01=0x004e}
0x2c18…2c30              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001c, t01=0x0062}
0x2c30…2c44              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001c, t01=0x007a}
0x2c44…2c5a              Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'JOB'«, t00=0x001c, t01=0x008e}
0x2c5a…2c6e              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001c, t01=0x00a4}
0x2c6e…2c86              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'LEVEL'«, t00=0x001c, t01=0x00b8}
0x2c86…2c94              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001c, t01=0x00d0}
0x2c94…2ca8              Head {h00=0x0010, h01=0x0050, text=»F52ST2 FRMT «, t00=0x001c, t01=0x00de}
0x2ca8…2cbc              Head {h00=0x0010, h01=0x0050, text=» FTEXT '52 '«, t00=0x001c, t01=0x00f2}
0x2cbc…2cd6              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'SEARCH' «, t00=0x001c, t01=0x0106}
0x2cd6…2cea              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001c, t01=0x0120}
0x2cea…2d02              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001c, t01=0x0134}
0x2d02…2d16              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001c, t01=0x014c}
0x2d16…2d2e              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'BATCH'«, t00=0x001c, t01=0x0160}
0x2d2e…2d42              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001c, t01=0x0178}
0x2d42…2d5a              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'LEVEL'«, t00=0x001c, t01=0x018c}
0x2d5a…2d68              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001d, t01=0x0014}
0x2d68…2d7c              Head {h00=0x0010, h01=0x0050, text=»F53ST2 FRMT «, t00=0x001d, t01=0x0022}
0x2d7c…2d90              Head {h00=0x0010, h01=0x0050, text=» FTEXT '53 '«, t00=0x001d, t01=0x0036}
0x2d90…2daa              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'SEARCH' «, t00=0x001d, t01=0x004a}
0x2daa…2dbe              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001d, t01=0x0064}
0x2dbe…2dd6              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'MODE' «, t00=0x001d, t01=0x0078}
0x2dd6…2dea              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001d, t01=0x0090}
0x2dea…2e04              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'RECORD' «, t00=0x001d, t01=0x00a4}
0x2e04…2e18              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x001d, t01=0x00be}
0x2e18…2e30              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'LEVEL'«, t00=0x001d, t01=0x00d2}
0x2e30…2e3e              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001d, t01=0x00ea}
0x2e3e…2e50              Head {h00=0x000e, h01=0x0050, text=»F50UV FRMT«, t00=0x001d, t01=0x00f8}
0x2e50…2e68              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'UNIT' «, t00=0x001d, t01=0x010a}
0x2e68…2e7c              Head {h00=0x0010, h01=0x0050, text=» FTEXT ':U' «, t00=0x001d, t01=0x0122}
0x2e7c…2ea8              Head {h00=0x0028, h01=0x0050, text=» FKI 7,MINL=1,MAXL=1,NEOI,ME,APPL=2 «, t00=0x001d, t01=0x0136}
0x2ea8…2ec2              Head {h00=0x0016, h01=0x0050, text=» FMEL 'X',USERFILE«, t00=0x001d, t01=0x0162}
0x2ec2…2ed2              Head {h00=0x000c, h01=0x0050, text=» FTAB 20«, t00=0x001d, t01=0x017c}
0x2ed2…2eec              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'VOLUME' «, t00=0x001d, t01=0x018c}
0x2eec…2f00              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001e, t01=0x0016}
0x2f00…2f10              Head {h00=0x000c, h01=0x0050, text=» FINP 27«, t00=0x001e, t01=0x002a}
0x2f10…2f24              Head {h00=0x0010, h01=0x0050, text=» FCOPY TABLE«, t00=0x001e, t01=0x003a}
0x2f24…2f32              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001e, t01=0x004e}
0x2f32…2f46              Head {h00=0x0010, h01=0x0050, text=»F50JOB FRMT «, t00=0x001e, t01=0x005c}
0x2f46…2f5c              Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'JOB'«, t00=0x001e, t01=0x0070}
0x2f5c…2f74              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'NAME' «, t00=0x001e, t01=0x0086}
0x2f74…2f88              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001e, t01=0x009e}
0x2f88…2fc6              Head {h00=0x003a, h01=0x0050, text=» FKI 9,ALPHA,MINL=1,MAXL=6,NEOI,APPL=3,DUPL=STSAVE(W1)«, t00=0x001e, t01=0x00b2}
0x2fc6…2fdc              Head {h00=0x0012, h01=0x0050, text=» FCOPY JOBNAME«, t00=0x001e, t01=0x00f0}
0x2fdc…2fea              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001e, t01=0x0106}
0x2fea…2ffe              Head {h00=0x0010, h01=0x0050, text=»F52JOB FRMT «, t00=0x001e, t01=0x0114}
0x2ffe…3014              Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'JOB'«, t00=0x001e, t01=0x0128}
0x3014…302c              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'NAME' «, t00=0x001e, t01=0x013e}
0x302c…3040              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001e, t01=0x0156}
0x3040…3082              Head {h00=0x003e, h01=0x0050, text=» FKI 9,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=3,DUPL=STSAVE(W1) «, t00=0x001e, t01=0x016a}
0x3082…3098              Head {h00=0x0012, h01=0x0050, text=» FCOPY JOBNAME«, t00=0x001f, t01=0x001c}
0x3098…30a6              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x001f, t01=0x0032}
0x30a6…30ba              Head {h00=0x0010, h01=0x0050, text=»F50BAT FRMT «, t00=0x001f, t01=0x0040}
0x30ba…30d2              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'BATCH'«, t00=0x001f, t01=0x0054}
0x30d2…30ea              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'NAME' «, t00=0x001f, t01=0x006c}
0x30ea…30fe              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001f, t01=0x0084}
0x30fe…313e              Head {h00=0x003c, h01=0x0050, text=» FKI 30,ALPHA,MINL=1,MAXL=6,NEOI,APPL=4,DUPL=STSAVE(W2) «, t00=0x001f, t01=0x0098}
0x313e…3152              Head {h00=0x0010, h01=0x0050, text=» FCOPY BATCH«, t00=0x001f, t01=0x00d8}
0x3152…3160              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x001f, t01=0x00ec}
0x3160…3174              Head {h00=0x0010, h01=0x0050, text=»F53BAT FRMT «, t00=0x001f, t01=0x00fa}
0x3174…318c              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'BATCH'«, t00=0x001f, t01=0x010e}
0x318c…31a4              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'NAME' «, t00=0x001f, t01=0x0126}
0x31a4…31b8              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x001f, t01=0x013e}
0x31b8…31fa              Head {h00=0x003e, h01=0x0050, text=» FKI 30,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=4,DUPL=STSAVE(W2)«, t00=0x001f, t01=0x0152}
0x31fa…320e (32, 0, 400) Head {h00=0x0010, h01=0x0050, text=» FCOPY BATCH«, t00=0x0020, t01=0x0004}
0x320e…321c              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0020, t01=0x0018}
0x321c…3230              Head {h00=0x0010, h01=0x0050, text=»F50STA FRMT «, t00=0x0020, t01=0x0026}
0x3230…3240              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0020, t01=0x003a}
0x3240…325e              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W1)«, t00=0x0020, t01=0x004a}
0x325e…326e              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0020, t01=0x0068}
0x326e…328c              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W2)«, t00=0x0020, t01=0x0078}
0x328c…329c              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0020, t01=0x0096}
0x329c…32ba              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W3)«, t00=0x0020, t01=0x00a6}
0x32ba…32c6              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0020, t01=0x00c4}
0x32c6…32d6              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0020, t01=0x00d0}
0x32d6…32f4              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W4)«, t00=0x0020, t01=0x00e0}
0x32f4…3304              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0020, t01=0x00fe}
0x3304…3322              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W5)«, t00=0x0020, t01=0x010e}
0x3322…3332              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0020, t01=0x012c}
0x3332…3350              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W6)«, t00=0x0020, t01=0x013c}
0x3350…335c              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0020, t01=0x015a}
0x335c…336c              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0020, t01=0x0166}
0x336c…338a              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W7)«, t00=0x0020, t01=0x0176}
0x338a…339a (33, 0, 400) Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0021, t01=0x0004}
0x339a…33b8              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W8)«, t00=0x0021, t01=0x0014}
0x33b8…33c8              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0021, t01=0x0032}
0x33c8…33e6              Head {h00=0x001a, h01=0x0050, text=» FCTL X'C0',FDVBCD(W9)«, t00=0x0021, t01=0x0042}
0x33e6…33f2              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0021, t01=0x0060}
0x33f2…3402              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0021, t01=0x006c}
0x3402…3422              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W10) «, t00=0x0021, t01=0x007c}
0x3422…3432              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0021, t01=0x009c}
0x3432…3452              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W11) «, t00=0x0021, t01=0x00ac}
0x3452…3462              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0021, t01=0x00cc}
0x3462…3482              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W12) «, t00=0x0021, t01=0x00dc}
0x3482…348e              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0021, t01=0x00fc}
0x348e…349e              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0021, t01=0x0108}
0x349e…34be              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W13) «, t00=0x0021, t01=0x0118}
0x34be…34ce              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0021, t01=0x0138}
0x34ce…34ee              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W14) «, t00=0x0021, t01=0x0148}
0x34ee…34fe              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0021, t01=0x0168}
0x34fe…351e              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W15) «, t00=0x0021, t01=0x0178}
0x351e…352a              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0022, t01=0x0008}
0x352a…353a              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0022, t01=0x0014}
0x353a…355a              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W16) «, t00=0x0022, t01=0x0024}
0x355a…356a              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0022, t01=0x0044}
0x356a…358a              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W17) «, t00=0x0022, t01=0x0054}
0x358a…359a              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0022, t01=0x0074}
0x359a…35ba              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W18) «, t00=0x0022, t01=0x0084}
0x35ba…35c6              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0022, t01=0x00a4}
0x35c6…35d6              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0022, t01=0x00b0}
0x35d6…35f6              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W19) «, t00=0x0022, t01=0x00c0}
0x35f6…3606              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0022, t01=0x00e0}
0x3606…3626              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W20) «, t00=0x0022, t01=0x00f0}
0x3626…3636              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0022, t01=0x0110}
0x3636…3656              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W21) «, t00=0x0022, t01=0x0120}
0x3656…3662              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0022, t01=0x0140}
0x3662…3672              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x0022, t01=0x014c}
0x3672…3692              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W22) «, t00=0x0022, t01=0x015c}
0x3692…36a2              Head {h00=0x000c, h01=0x0050, text=» FINP 21«, t00=0x0022, t01=0x017c}
0x36a2…36c2              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W23) «, t00=0x0022, t01=0x018c}
0x36c2…36d2              Head {h00=0x000c, h01=0x0050, text=» FINP 41«, t00=0x0023, t01=0x001c}
0x36d2…36f2              Head {h00=0x001c, h01=0x0050, text=» FCTL X'C0',FDVBCD(W24) «, t00=0x0023, t01=0x002c}
0x36f2…3700              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0023, t01=0x004c}
0x3700…3714              Head {h00=0x0010, h01=0x0050, text=»F50END FRMT «, t00=0x0023, t01=0x005a}
0x3714…3720              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0023, t01=0x006e}
0x3720…372e              Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x0023, t01=0x007a}
0x372e…3742              Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0023, t01=0x0088}
0x3742…3750              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0023, t01=0x009c}
0x3750…375c              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0023, t01=0x00aa}
0x375c…3760              Head {h00=0x4004, h01=0x0000}
0x3760…3764              00 23 00 b6                                                                                                                                                                                                                                       ┆ #  ┆
0x3764…376c (36, 1, 8)   20 04 00 00 00 24 00 04                                                                                                                                                                                                                           ┆     $  ┆

Reduced view