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

⟦9f91ec39d⟧

    Length: 62056 (0xf268)
    Notes: pts_type(SC)
    Names: »RGADM.SC«

Derivation

└─⟦9ad21746d⟧ Bits:30009682 Philips computer tape "600304"
    └─⟦this⟧ »NJ-AMT/RGADM.SC« 

PTS(SC)

	IDENT RGADM 	02.01.XXX.1 
 DDUM KMD08 
 PDIV 
 ENTRY RGADM
 ENTRY ADM
 ENTRY CLEJ 
 ENTRY CLEDB
 ENTRY CLBEH
 ENTRY RGA120 
 ENTRY ZERO 
 ENTRY SKIFT
 ENTRY STRTWR 
 ENTRY STRTID 
 ENTRY SLUTID 
 ENTRY SOPRD
 ENTRY LAMPOF 
 ENTRY LAMPON 
 ENTRY ADMRET 
* 
 ENTRY TCLOSE 
 ENTRY TR2GEN 
 ENTRY WAHEAD 
 ENTRY WALINE 
 ENTRY BCKUP
* 
 EXT ADM600 
 EXT CNFWRT 
 EXT RADEL
 EXT ABORT
 EXT EMPTYT 
 EXT RGREAD 
 EXT TRPAGE 
 EXT SETKRE 
 EXT SETDEB 
 EXT WRITJT 
 EXT INITRG 
 EXT SPCLRN 
 EXT SPCLRS 
 EXT SPCLRA 
 EXT SPINF1 
 EXT FRMXTA 
 EXT WTALLY 
 EXT FRMTKV 
 EXT CRVO 
 EXT TCONFR 
 EXT FRMXSP 
 EXT SPCHK5 
 EXT SUM
 EXT PACKCL 
 EXT CLEAR8 
 EXT SPLIN8 
 EXT SLUT 
 EXT GRASPV 
 EXT FRMXVO 
 EXT FRMXJT 
 EXT KORT 
 EXT MODP 
 EXT KVIT 
 EXT LSTINT 
 EXT SUBTOT 
 EXT CYK
 EXT DIVTR
 EXT TCONFW 
 EXT CONFWR 
 EXT WRITFD 
 EXT SQWRIT 
 EXT RAREAD 
 EXT RAWRIT 
 EXT ASGVOL 
 EXT CLSVOL 
 EXT CRKJ 
 EXT BACKUP 
 EXT CONRDX 
 EXT RSTORE 
 EXT SETMK
 EXT WRITID 
 EXT KTOPR
 EXT KTPRT
 EXT ONLINE 
* 
 INCLUDE EQUATE 
* 
 EJECT
RGADM 
 SET SPPROMPT 
 MOVE SPKEY,CBIN2 
 ATTFMT ADFRM01 
 PERF SPCLRA
 IB SPBINW2,RGADM,RGADM,RGADM,RGADM,RGA100,RGA200,RGA300,		C
		RGADM,RGADM,RGA007
 B RGADM
* 
RGA007			GO ONLINE
 PERF ADM,CBIN7 
 B RGADM
* 
RGA100
* 
********************************************************
* 
*                   OPEN ROUTINE
* 
********************************************************
* 
 TBT CCONVFLG,RGADM 
 CLEAR GTDYFLG
 SET SPPROMPT 
 SET SPME 
 MOVE GSWBCD3,=X'FF' ERASE
RGA105
 ATTFMT OPENFRM 
 PERF SPCLRN
 IB SPBINW2,RGADM,RGADM,RGA110
 B RGADM
RGA110
 MOVE TTEJEDB,=D'0' 
 MUL TTSTLBNR,=D'-1' SET POSITIVE (OPEN)
 MUL CMASK(TTASKNR),=D'-1' SET CMASK >0, OPEN 
 MOVE TTCASH,TTSTCASH 
 CBNE TTSTLBNR,=D'0',RGA115 
 MOVE TTSTLBNR,=D'1'
RGA115
 MOVE TTLBNR,TTSTLBNR 
 SUB TTLBNR,=D'1' 
 MOVE TTRECOPN,CRECBCD
 PERF ZERO
 PERF TCONFW,TTASKNR	STORE INF FROM ADM FUNC. 
 PERF CONFWR
 PERF WRITJT,=W'5' OPEN MES ON JT 
 SET GTKASSE
 ADD CTASKNR,CBIN1
RGA120
 PERF INITRG START REGISTRATION 
 PERF TCLOSE CLOSE
 BNOK RGA120
 SUB CTASKNR,CBIN1
 B RGADM
 EJECT
TCLOSE PROC 
 MOVE SPKEY,CBIN2 
TCL000
 SET SPPROMPT 
 ATTFMT CLFRM01 
 PERF SPCLRA
 IB SPBINW2,TCLMAK,TCLMAK,TCL010
 B TCL000 
TCL010
*     CLEAR FLAGS 
 CLEAR GTSUMKEY 
 CLEAR TTTSTFLG 
 CLEAR TTCY1FLG 
 CLEAR TTCY2FLG 
 CLEAR TTLSTFLG 
 CLEAR TTPSEFLG 
 CLEAR TTSUMFLG 
 CLEAR TTSUPFLG 
 CLEAR GTCYFLG
 CLEAR GTSUBFLG 
 MOVE TTSUPMRK,=C' '
 MOVE TTSUMMRK,=C' '
 MOVE GTTEXT,=C' '
 MOVE GTSUM,=D'0' 
 WAIT KVOUCH
 DSC0 KVOUCH,RLEAS
*                  TR12 ACCUMULATORS
 MOVE GTREGNR,=D'2' 
 MOVE GTREGDEX,CBIN2
 PERF PACKCL
 MOVE GSWBIN1,CBIN1 
TCL025
 MOVE GTDUPF(GSWBIN1),=X'FF'
 ADD GSWBIN1,CBIN1
 CBL GSWBIN1,CBINMAX,TCL025 
 MOVE GSWBCD5,=D'0' 
TCL030
 ADD GSWBCD5,=D'1' ACC NR 
TCL035
 MOVE GSWBIN5,GSWBCD5 CONVERT 
 CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL100
 ADD GSWBIN5,CTR12(TTASKNR,CBIN1) 
 MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5)
 CBE GTDUPF(CBIN1),=D'0',TCL030 
 MOVE GTUSED(CBIN1),CBIN5 INDICATE UPDATED
 MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) 
 CBE GTDUPF(CBIN4),=D'0',TCL040 
 MOVE GTUSED(CBIN4),=W'-8'
 MOVE GSWSTR20,=C'EJ-EDB T[LLER ' 
 MOVE GTWBCD1,GSWBCD5 
 PERF TR2GEN,CBIN1 GENERATE TR2 WITH KREDIT 
 BNOK TCL035
TCL040
 MOVE GSWBIN5,GSWBCD5 
 ADD GSWBIN5,CTR12(TTASKNR,CBIN1) 
 MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2) 
 CBE GTDUPF(CBIN4),=D'0',TCL030 
 MOVE GTUSED(CBIN4),=W'-8'
 MOVE GSWSTR20,=C'EJ-EDB T[LLER ' 
 MOVE GTWBCD1,GSWBCD5 
 PERF TR2GEN,CBIN2 GENERATE TR2 WITH DEBET
 BNOK TCL040
 B TCL030 
 EJECT
TCL100
 MOVE GSWSTR9,=C'TOTAL   '
 PERF CLEJ	EJ EDB 
 MOVE TTEJEDB,=D'0' 
TCL205
			CASH MOVEMENT
 MOVE GTDUPF(CBIN1),TTCASHAC ACCOUNTNR
 MOVE GTDUPF(CBIN4),TTCASH CURRENT CASH 
 SUB GTDUPF(CBIN4),TTSTCASH INITIAL CASH
 MOVE GTUSED(CBIN1),CBIN5 
 MOVE GTUSED(CBIN4),=W'-8'
 MOVE GSWSTR20,=C'KASSE-KONTO ' 
 MOVE GTWBCD1,=D'0' 
 SET GTTFLG 
 PERF TR2GEN,CBIN0
 BNOK TCL205
 TBF CCLKTFLG,TCL230
 PERF KORT ASK FOR KONTOKORT
TCL230
 CBE TVERSUR,=D'0',TCL235 
 MOVE GTDUPF(CBIN1),TVERSUR REMIT ACC 
 MOVE GTDUPF(CBIN4),TTACC(CBIN6,CBIN1)
 ADD GTDUPF(CBIN4),TTACC(CBIN6,CBIN2) 
 CBE GTDUPF(CBIN4),=D'0',TCL235 
 MOVE GTUSED(CBIN1),CBIN5 
 MOVE GTUSED(CBIN4),=W'-8'
 MUL GTDUPF(CBIN4),=D'-1' 
 MOVE GSWSTR20,=C'VERSUR KONTONR REMIT '
 MOVE GTWBCD1,=D'0' 
 PERF TR2GEN,CBIN0
 BNOK TCL230
 TBF CCLKTFLG,TCL235
 PERF KORT
* 
*       WRITING OF DISC JOURNAL AND VOUCHER 
* 
TCL235
 MOVE GSWSTR9,=C'TOTAL   '
 PERF CLEDB 
* 
*  BEHOLDNINGST[LLERE 
* 
 PERF CLBEH 
* 
TCL500
 MOVE TTSTCASH,TTCASH 
 MOVE TTSTLBNR,TTLBNR 
 ADD TTSTLBNR,=D'1' 
 MUL TTSTLBNR,=D'-1' SET NEGATIVE (CLOSE) 
 MUL CMASK(TTASKNR),=D'-1' SET CMASK < 0, CLOSE 
 CLEAR GTTFLG 
TCL550
 MOVE TTRECOPN,CRECBCD
 PERF ZERO
 PERF TCONFW,TTASKNR STORE NEW INITIAL VALUES 
 PERF CONFWR
 BNOK TCL550
 CLEAR GTKASSE
TCLRET
*   ZERONIZE COUNTERS 
*   TRANS 12 COUNTERS 
 MOVE GSWSTR20,=C'*'
 PERF WRITJT,=W'12' 
 CMP CBIN0,CBIN0 DUMMY
 RET
TCLNOK10
TCLMAK
 CMP CBIN0,CBIN1
 RET
 PEND 
 EJECT
RGA200
************************************************
* 
*                PERFORM OF SELECTED ADM ROUTINE
* 
************************************************* 
* 
 MOVE GSWBIN1,GSWBCD3 
 PERF ADM,GSWBIN1 
 B RGADM
 EJECT
ZERO PROC 
* 
*   ZERONIZE COUNTERS 
*   TRANS 12 COUNTERS 
 MOVE GSWBIN1,CTR12(TTASKNR,CBIN1)
 MOVE GSWBIN2,GSWBIN1 
 ADD GSWBIN2,CTR12(TTASKNR,CBIN2) 
TCL610
 ADD GSWBIN1,CBIN1
 CBG GSWBIN1,GSWBIN2,TCL615 
 MOVE C12ACC(GSWBIN1,CBIN1),=D'0' 
 MOVE C12ACC(GSWBIN1,CBIN2),=D'0' 
 B TCL610 
TCL615
*   ACCUMULATORS
 MOVE GSWBIN1,CBIN0 
TCL620
 ADD GSWBIN1,CBIN1
 MOVE TTACC(GSWBIN1,CBIN1),=D'0'
 MOVE TTACC(GSWBIN1,CBIN2),=D'0'
 CBL GSWBIN1,CBIN8,TCL620 
 RET
 PEND 
 EJECT
CLEJ PROC 
***************************************************** 
* 
*             NOW ALL ACCUMULATORS NOT = 0
*             HAS BEEN REGISTRATED
*             A VOUCHER PRINT OF ALL TR12 ACC 
*             IS NOW PERFORMED
**
********************************************************
 MOVE TTLINNR,=D'25'
 MOVE GSWSTR20,='EJ-EDB T[LLER '
 CBE CTR12(TTASKNR,CBIN2),CBIN0,TCLEJRET
 PERF WAHEAD,CBIN8
 MOVE GTWBCD1,=D'0' 
TCL110
 ADD GTWBCD1,=D'1'
 MOVE GSWBIN5,GTWBCD1 CONVERT 
 CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL200
 ADD GSWBIN5,CTR12(TTASKNR,CBIN1) 
 MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) 
 ADD GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2)
 MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5)
 CBE GTDUPF(CBIN1),=D'0',TCL110 
 CBG TTLINNR,=D'0',TCL190 
 DSC0 KVOUCH,RLEAS
 MOVE TTLINNR,=D'25'
 PERF WAHEAD,CBIN8
TCL190
 PERF WALINE,CBIN9
 B TCL110 
TCL200
 DSC0 KVOUCH,RLEAS
TCLEJRET
 RET
 PEND 
 EJECT
CLEDB PROC
* 
*       WRITING OF DISC JOURNAL AND VOUCHER 
* 
 MOVE GSWSTR20,=C'EDB-T[LLERE ' 
 PERF WRITJT,=W'6'
 PERF WAHEAD,CBIN8
 MOVE GSWBCD5,=D'0' 
 MOVE GTREGF(CBIN1),=D'0' TOTAL 
 MOVE GTREGF(CBIN2),=D'0' 
TCL240
 TBT GTSPGFLG,TCL242
 MOVE GTREGNR,=D'11'
TCL242
 ADD GSWBCD5,=D'1'
TCL245
 MOVE GSWBIN5,GSWBCD5 
 CBG GSWBIN5,CBIN6,TCL300 
 ADD GTREGF(CBIN1),TTACC(GSWBIN5,CBIN1) 
 ADD GTREGF(CBIN2),TTACC(GSWBIN5,CBIN2) 
 MOVE GTUSED(CBIN4),CBIN0 
 MOVE GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN1)
 ADD GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN2) 
 MOVE GTDUPF(CBIN6),TTACC(GSWBIN5,CBIN1)
 MOVE GTDUPF(CBIN5),TTACC(GSWBIN5,CBIN2) DEBET
 TBT GTSPGFLG,TCL290
 MOVE GTUSED(CBIN6),=W'-53' 
 MOVE GTUSED(CBIN5),=W'-52' 
 MOVE GTDUPF(CBIN1),GSWBCD5 
 MOVE GTUSED(CBIN1),=W'50'
 MOVE GTDUPF(CBIN2),=D'2' MARK FOR TOTAL
 MOVE GTUSED(CBIN2),=W'51'
 PERF CRKJ
 PERF WRITFD
 BNOK TCL245
TCL290
 MOVE GSWBIN5,GSWBCD5 RESTORE 
 MOVE GTWBCD1,GSWBCD5 
 PERF WRITJT,=W'7'
 PERF WALINE,CBIN10 
 B TCL240 
TCL300
 PERF PACKCL
 MOVE GTDUPF(CBIN4),GTREGF(CBIN1) 
 ADD GTDUPF(CBIN4),GTREGF(CBIN2)
 MOVE GTDUPF(CBIN5),TTACC(CBIN8,CBIN1)
 ADD GTDUPF(CBIN5),TTACC(CBIN8,CBIN2) 
 PERF WALINE,CBIN11 
 MOVE GTDUPF(CBIN5),TTACC(CBIN1,CBIN1)
 MOVE GTDUPF(CBIN6),TTACC(CBIN1,CBIN2)
 MOVE GSWBIN1,CBIN1 
TCL310
 ADD GSWBIN1,CBIN1
 CBG GSWBIN1,CBIN4,TCL320 
 ADD GTDUPF(CBIN5),TTACC(GSWBIN1,CBIN1) 
 ADD GTDUPF(CBIN6),TTACC(GSWBIN1,CBIN2) 
 B TCL310 
TCL320
 TBT GTSPGFLG,TCL329
*   ADJUST FOR 'KASSE INDBERETNING' 
 MOVE GSWBCD1,TTCASH
 SUB GSWBCD1,TTSTCASH 
 CBL GSWBCD1,=D'0',TCL323 
 SUB GTDUPF(CBIN6),GSWBCD1
 B TCL325 
TCL323
 SUB GTDUPF(CBIN5),GSWBCD1
TCL325
*   ADJUST FOR 'VERSUR INDBERETNING'
 MOVE GSWBCD1,TTACC(CBIN6,CBIN1)
 ADD GSWBCD1,TTACC(CBIN6,CBIN2) 
 MUL GSWBCD1,=D'-1' 'VEND'
 CBL GSWBCD1,=D'0',TCL328 
 SUB GTDUPF(CBIN6),GSWBCD1
 B TCL329 
TCL328
 SUB GTDUPF(CBIN5),GSWBCD1
TCL329
 MUL GTDUPF(CBIN5),=D'-1' 
 MUL GTDUPF(CBIN6),=D'-1' 
 MOVE GSWBCD1,TTCASH
 SUB GSWBCD1,TTSTCASH 
 MOVE GTDUPF(CBIN4),GSWBCD1 
 PERF WALINE,CBIN12 
 DSC0 KVOUCH,RLEAS
 RET
 PEND 
 EJECT
CLBEH PROC
* 
*  BEHOLDNINGST[LLERE 
* 
TCL400
 MOVE TTLINNR,=D'25'
 MOVE GSWBIN2,CBEH(TTASKNR,CBIN2) 
 CMP GSWBIN2,CBIN0
 BE CLBEHRET
 ADD GSWBIN2,CBEH(TTASKNR,CBIN1)
 MOVE GTWBCD2,GSWBIN2 
TCL405
	ATTFMT	CLFRM04 
 SET SPPROMPT 
	PERF	SPCLRA
	IB	SPBINW2,		C 
		TCL415,TCL415,TCL412,TCL411,TCL415,		C
		TCL415,TCL415,TCL415,TCL413,TCL415,		C
		TCL415,TCL415,TCL413
TCL415
	B	TCL400 
TCL411
 TBT GTSPGFLG,TCL400
	MOVE	GSWSTR20,=C'SLET SALDO '
	MOVE	GSWBIN6,CBIN1 
	B	TCL420 
TCL412
 TBT GTSPGFLG,TCL400
	MOVE	GSWSTR20,=C'SLET PERIODE '
	MOVE	GSWBIN6,CBIN2 
	B	TCL420 
TCL413
	MOVE	GSWSTR20,=C'SUBTOTAL '
	MOVE	GSWBIN6,CBIN3 
	B	TCL420 
TCL420
 MOVE GTWBCD1,=D'0' 
 MOVE GSWBCD6,=D'0' 
 MOVE GSWBCD7,=D'0' 
TCL425
	PERF	GRASPV
 MOVE GSWBIN3,CVOUTOP 
 ADD GSWBIN3,CBIN6
	DSC1	KVOUCH,POS,GSWBIN3
	PERF	CLEAR8
	PERF	FRMXVO,CBIN13	HEAD ON VOUCHER 
	EDWRT	KVOUCH,GTSTRFMT
TCL430
	ADD	GTWBCD1,=D'1'
	MOVE	GSWBIN3,GTWBCD1 
 ADD GSWBIN3,CBEH(TTASKNR,CBIN1)
 MOVE GSWBIN4,GTWBCD2 
	CBG	GSWBIN3,GSWBIN4,TCL490 
 CBE CBACC(GSWBIN3,CBIN1),=D'0',TCL430
*     ADD TO TOTAL, PERIODE AND SALDO 
 ADD GSWBCD6,CBACC(GSWBIN3,CBIN2) PERIODE 
 ADD GSWBCD7,CBACC(GSWBIN3,CBIN3) SALDO 
	PERF	FRMXVO,CBIN14 
	EDWRT	KVOUCH,GTSTRFMT
 TBT GTTESTFL,TCL433
	IB	GSWBIN6,TCL431,TCL432,TCL433
	B	TCL433 
TCL431
	MOVE	CBACC(GSWBIN3,CBIN3),=D'0'	SALDO
TCL432
	MOVE	CBACC(GSWBIN3,CBIN2),=D'0'	PERIODE
TCL433
 SUB TTLINNR,=D'1'
 CBG TTLINNR,=D'0',TCL430 
 DSC0 KVOUCH,RLEAS
 MOVE TTLINNR,=D'25'
 B TCL425 
TCL490
*     WRITE TOTAL LINE
 PERF FRMXVO,CBIN18 
 EDWRT KVOUCH,GTSTRFMT
	DSC0	KVOUCH,RLEAS
CLBEHRET
 RET
 PEND 
 EJECT
************************
* 
* 
*          ADM FUNCTIONS          * 
* 
*     ADM  1     EJ EDB T[LLERE 
*     ADM  2     BEHOLDNINGST[LLERE 
*     ADM  3     OPRETTELSE KONTOPLAN 
*     ADM  4
*     ADM  5     KONVERTERING 
*     ADM  6     DATATRANSMISSION 
*     ADM  7     3270 ONLINE
*     ADM  8
*     ADM  9     DEFAULT LINE NO. 
*     ADM 10     SUPPLEMENT POST
*     ADM 11     SPOERGE
*          SPG  1     BILAG  EJ EDB 
*          SPG  2     BILAG  BEHOLDNINGST[LLERE 
*          SPG  3     BILAG  EDB T[LLERE
*          SPG  4     AABNE KASSER
*          SPG  5     UDSKRIFT KONTOPLAN
*          SPG  6     ENKELT BEHOLDNINGST[LLER
*          SPG  7     KASSEBEHOLDNING 
*          SPG  8     SPG. P] POSTERINGER 
*          SPG  9     -"-  GL. REGSET 
*          SPG 10     SPG. PRINT INTERVAL 
*          SPG 11     -"-  GL. REGSET 
*     ADM 12     DISKETTE SKIFT 
*     ADM 13     AUTOSUM
*     ADM 14     DAGS DATO
*     ADM 15
*     ADM 16
*     ADM 17     NEW KASSEKONTO 
*     ADM 18     NEW VERSURKONTO
*     ADM 19     REGNEFUNKTION
*     ADM 20     CHECKCIFFER
*     ADM 21     TEST MODE
*     ADM 22     [NDRE EKSP LBNR (NOT IN USE) 
*     ADM 23     MODPOST
*     ADM 24     KONTOKORT
*     ADM 25     KVITTERING 
*     ADM 26     SUM FUNKTION 
*     ADM 27     LISTE FUNCTION 
*     ADM 28     SUBTOTAL 
*     ADM 29     TEST AF VOUCHER
*     ADM 30     CYCLE SLUT 
*     ADM 31     CYCLE 1 START (CYCLE)
*     ADM 32     CYCLE 2 START (STABEL) 
*     ADM 33
*     ADM 34     4 CYCLE, PAUSE IN CYCLE/STABEL 
*     ADM 35     DIVERSE TRANS
* 
* 
********************
 EJECT
ADM PROC ADMNO
******************* 
* 
*         BRANCH TO SELECTED ADM ROUTINE
* 
******************* 
 TBT GTLOKSPG,ADM002
 MOVE GSWSTR9,=C'TOTAL   '
 TBF GTSPGFLG,ADM001
 MOVE GSWSTR9,=C'SUBTOTAL ' 
ADM001
 MOVE GSWBIN1,ADMNO 
 IB GSWBIN1,ADM1,ADM2,ADM3,ADM4,ADM5,ADM6,ADM7,		C
		ADM8,ADM9,ADM10,ADM11,ADM12,ADM13,ADM14,ADM15,ADM16,		C 
		ADM17,ADM18,ADM19,ADM20,ADM21,ADM22,ADM23,ADM24,		C 
		ADM25,ADM26,ADM27,ADM28,ADM29,ADM30,ADM31,ADM32,		C 
		ADM33,ADM34,ADM35 
 B ADM00
* 
ADM002			LOCAL INQUIRIES
 MOVE GSWBIN1,ADMNO 
 CMP GSWBIN1,CBIN11 TEST IF INQUIRIES 
 BE ADM11 
	SUB GSWBIN1,=W'22' ADJUST
 IB GSWBIN1,ADM23,ADM24,ADM25 
ADM00 
 B ADMRET 
 EJECT
* 
* 
ADM1
* EJ-EDB TAELLERE * 
ADM1000 
 SET GTADMFLG 
 TBT GTKASSE,ADM1RET
 MOVE SPKEY,CBIN2 
 SET SPPROMPT 
	SET	GTDYFLG
ADM1010 
 ATTFMT ADMFRM1 
 PERF SPCLRN
 IB SPBINW2,ADM1RET,ADM1RET,ADM1020 
 B ADM1000
ADM1020 
 TBF GTDYFLG,ADM1RET
	CLEAR	GTDYFLG
 B ADM1010
ADM1RET 
 CLEAR GTADMFLG 
 CLEAR GTDYFLG
 B ADMRET 
* 
* 
ADM2
* BEHOLDNINGSTAELLERE * 
ADM2000 
 SET GTADMFLG 
 TBT GTSPGFLG,ADM2001 
 TBT GTKASSE,ADM2RET
 TBT GTTESTFL,ADM2RET 
ADM2001 
 SET SPPROMPT 
	SET	GTDYFLG
 ATTFMT ADM2FRM1
 PERF SPCLRN
 IB SPBINW2,ADM2RET,ADM2RET,ADM2020 
 B ADM2000
ADM2020 
 PERF PACKCL
 MOVE GTDUPF(CBIN5),=D'2' ADM FUNCTION NO 
 MOVE GTDUPF(CBIN2),GSWBCD1 COUNTER NO
 MOVE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1) REG. KNT. NO 
 MOVE GTDUPF(CBIN4),CBACC(GSWBIN6,CBIN3) SALDO
 CLEAR GTDYFLG
 SET SPPROMPT 
 ATTFMT ADM2FRM1
 PERF SPCLRN
 IB SPBINW2,ADM2RET,ADM2RET,ADM2030 
 B ADM2000
ADM2030 
 CBE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1),ADM2040 
 MOVE CBACC(GSWBIN6,CBIN2),=D'0' CLEAR PERIODE
ADM2040 
 MOVE CBACC(GSWBIN6,CBIN1),GTDUPF(CBIN1)
 MOVE CBACC(GSWBIN6,CBIN3),GTDUPF(CBIN4)
 PERF WRITJT,=W'13' 
ADM2RET 
 CLEAR GTADMFLG 
 CLEAR GTDYFLG
 B ADMRET 
* 
* 
ADM3
*     OPRETTELSE KONTOPLAN
 B KTOPR BRANCH TO OTHER MODULE 
* 
* 
ADM4
* DUMMY * 
 B ADMRET 
 EJECT
ADM5
* KONVERTERING *
ADM0500 
 SET CCONVFLG 
 CLEAR SPKEYFLG 
 TEST GTKASSE 
 BNZ ADM05RET BRANCH IF TRUE
 CMP TTASKNR,CBIN1
 BNE ADM05RET 
 CMP CTASKNR,CBIN0
 BNE ADM05RET 
 SET SPPROMPT 
 MOVE SPKEY,CBIN2 
 ATTFMT KONFRMT 
 PERF SPCLRN
 IB SPBINW2,ADM05RET,ADM05RET,ADM0510 
 B ADM0500
			WRITE EOF RECORD 
			AND CLOSE ALL FILES
ADM0510 
 TBT CCONVERT,ADM0513 NO WRITE IF CONVERT 
 SUB CRECBCD,=D'1'
 PERF SLUTID,CRECBCD
 ADD CRECBCD,=D'1'
 PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR
 BNOK ADM0500 
 PERF WRITID,CBIN2,CBIN2
ADM0513 
 PERF CLSVOL,CBIN1
 PERF CLSVOL,CBIN2
 MOVE CRECNR,CBIN1
 MOVE CRECBCD,=D'1' 
 PERF LAMPOF,=W'2047' 
 TBT C5MDISK,ADM0514
 PERF LAMPON,=W'64' LAMP 5
ADM0514 
 PERF LAMPON,=W'32' LAMP 6
 PERF LAMPON,=W'16' LAMP 7
 PERF LAMPON,=W'2' LAMP 10
ADM0515 
 PERF SOPRD 
 IB GSWBIN2,		C 
		ADM05010,ADM05009,ADM05008,ADM05007,ADM05006,		C
		ADM05005,ADM05004,ADM05003,ADM05002,ADM05001
ADM05001
ADM05002
ADM05003
ADM05004
ADM05008
ADM05009
 B ADM0515
* 
ADM05010			LAMP 10
 B ADM0513 CLOSE AND SOPRD
* 
* 
* 
* 
* 
ADM05005			SOP 5
 TBT C5MDISK,ADM0515 CONVERSION NOT ALLOWED 
*     EQUIVALENT TO START OF ADM5 MODULE
 PERF LAMPON,=W'1024' LAMP 1 ON 
 DSC1 FD01,LOAD,CBIN7 LOAD IBM
 BBEOD ADM0535
 BNOK ADM0513 
ADM0535 
 DSC0 FD01,RWIND
 PERF LAMPOF,=W'1024' LAMP 1 OFF
 PERF LAMPON,=W'512' LAMP 2 ON
 PERF ASGVOL,CBIN2
 BNOK ADM0513 
 PERF LAMPOF,=W'512' LAMP 2 OFF 
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF LAMPON,=W'64' LAMP 5 ON 
 MOVE GSWBIN6,CBIN1 
 MOVE GSWBIN1,=W'128' READ HEADER 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 
 BOK ADM0536
 PERF STRTID,CVOLNO SET UP STRTID 
 PERF WRITID,CBIN3,CBIN1
 B ADM0540
ADM0536 
 PERF WRITID,CBIN3,CBIN1 PRINT HEADER 
 MOVE GSWBIN6,CBIN0 
 MOVE GSWBIN1,=W'40' DELETE AND WRITE HEADER
 MOVE GSWSTR20,CBLANKS
 COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 
ADM0540 
 PERF SQWRIT,FD01,=D'1',CPCKBUF 
 BNOK ADM0568 
 CLEAR CERRORFL 
 MOVE GSWBCD6,=D'0' FOR TEST PURPOSE
 MOVE CRECNR,CBIN1
ADM0550			START LOOP
 ADD CRECNR,CBIN1 
 MOVE GSWBIN1,=W'128' 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR
 BNOK ADM0560 NOT OK
 TBT CERRORFL,ADM0560 
 CBE GTWBCD1,=D'4',ADM0565 END OF DATA
 MOVE GSWSTR20,=C'SLUTD'
 MOVE GSWBIN5,CBIN0 
 MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 
 BE ADM0570 SLUTD: END OF CONVERT 
 TBF CTESTFLG,ADM0578 
*     THIS PART CAN BE USED TO CHANGE 
*     TTLBNR  DURING CONVERSION.
*     CAN ONLY BE USED IN DEBUGGER MODE 
 MOVE GSWSTR20,=C'&04'
 MOVE GSWBIN5,=W'30'
 MOVE GSWBIN2,CBIN0 
 MATCH CPCKBUF,GSWBIN5,CBIN20,GSWSTR20,GSWBIN2,CBIN3
 BNOK ADM0578 
 ADD GSWBIN5,CBIN3
 MOVE GSWSTR20,=X'00' 
 COPY GSWSTR20,CBIN0,CBIN5,CPCKBUF,GSWBIN5
 MOVE GSWBCD5,GSWSTR20
 ADD GSWBCD5,GSWBCD6
 MOVE GSWSTR20,GSWBCD5
 COPY CPCKBUF,GSWBIN5,CBIN5,GSWSTR20,CBIN1
ADM0578 
 PERF SQWRIT,FD01,=D'1',CPCKBUF 
 BOK ADM0550
ADM0568 
 PERF LAMPOF,=W'2047' SWITCH OFF LAMPS
 PERF LAMPON,=W'2' LAMP 10 ON 
 B ADM0515 READ SOP 
ADM0570 
 PERF SQWRIT,FD01,=D'1',CPCKBUF WRITE SLUTD 
 BNOK ADM0568 
 PERF WRITID,CBIN3,CBIN2
 B ADM0513 LAMPS ON 
ADM0560			NOT OK
 PERF WRITID,CBIN4,CBIN2 PRINT FIRST PART OF
			LAST CORRECT RECORD
 SET SPPROMPT 
 ATTFMT KONV4FMT
 PERF SPCLRA CONTINUE ? 
 IB SPBINW2,A0561,A0561,A0562,A0563,A0561,		C 
		A0561,A0561,A0561,A0564 
 B ADM0560
A0561			MAK 
 B ADM0560
* 
A0562			SLUT, CONTINUE
			READ AGAIN 
 SUB CRECNR,CBIN1 
 CLEAR CERRORFL 
 B ADM0550
* 
A0563			KRE, TRY NEXT 
 SET CERRORFL 
 B ADM0550
* 
A0564			KVIT
 CLEAR CERRORFL 
 B ADM0565 WRITE SLUTD
* 
* 
ADM0565			END OF DATA 
 MOVE GSWBCD3,CRECNR
 SUB GSWBCD3,=D'2' SET UP SLUTD 
 PERF SLUTID,GSWBCD3
 B ADM0570
* 
* 
* 
*     EQUVALENT TO END OF ADM5 MODULE 
* 
* 
ADM05006			SOP 6
 PERF ASGVOL,CBIN1 ASSIGN SYSTEM DISK 
 BNOK ADM0513 
 PERF BCKUP,=W'1' WITHOUT BACKUP
 BNOK ADM0513 
 B ADM05RET 
* 
* 
* 
* 
* 
ADM05007			SOP 7
 PERF ASGVOL,CBIN1
 BNOK ADM0513 
 PERF BCKUP,=W'2' WITH BACKUP 
 BNOK ADM0513 
 B ADM05RET 
* 
* 
* 
* 
* 
ADM05RET
 PERF LAMPOF,=W'2047' 
 SET SPKEYFLG 
 CLEAR CCONVFLG 
 B ADMRET 
* 
* 
ADM6
* DATATRANSMISSION *
 B ADM600 
* 
* 
ADM7
* 
*     JUMP TO 3270 ONLINE 
 PERF ONLINE
 B ADMRET 
* 
* 
ADM8
* 
*     DUMMY     *** 
 B ADMRET 
* 
* 
ADM9
********************
* 
*          SET DEFAULT LINE NUMBER
* 
********************
ADM0900 
 MOVE GSWBCD5,GTDFLIN 
	PERF	FRMXSP,CBIN13	ASK FOR DEFAULT LINE
	SET	SPPROMPT 
	PERF	SPCLRN
 IB SPBINW2,ADM09RET,ADM09RET,ADM0910 
 B ADM0900
ADM0910 
	CLEAR SPPROMPT 
 MOVE GTDFLIN,GSWBCD5 
ADM09RET
	CMP	CBIN0,CBIN0	SET CR = 0 
 B ADMRET 
* 
* 
ADM10 
 TBF GTKASSE,ADM10RET 
********************
* 
*          SET OR CLEAR SUPPLEMENT INFORMATION
* 
********************
	TBT	TTSUPFLG,SUPL10
	SET	TTSUPFLG 
	MOVE	TTSUPMRK,=C'S'
	B	SUPLOK 
SUPL10
	MOVE	TTSUPMRK,=C' '
	CLEAR	TTSUPFLG 
SUPLOK
 SET GTREGFLG 
	PERF	SPINF1
ADM10RET
	CMP	CBIN0,CBIN0	SET CR = 0, OK 
 B ADMRET 
* 
* 
ADM11 
* LOCAL INQUIRIES * 
 TBT GTLOKSPG,SPGL08
ADM1100 
 ATTFMT SPGFM00 
 SET SPPROMPT 
 SET GTSPGFLG 
 MOVE GSWSTR9,=C'SUBTOTAL ' 
 PERF SPCLRA
 IB SPBINW2,ADM11RET,ADM11RET,ADM1110 
 B ADM11RET 
ADM1110 
 MOVE GSWBIN1,GSWBCD3 
 IB GSWBIN1,SPGL01,SPGL02,SPGL03,SPGL04,		C 
		SPGL05,SPGL06,SPGL07,SPGL08,SPGL09,		C
		SPGL10,SPGL11 
 B ADM1100
SPGL01
 PERF CLEJ
 B ADM11RET 
* 
SPGL02
 PERF CLBEH 
 B ADM11RET 
* 
SPGL03
 PERF CLEDB 
 B ADM11RET 
* 
SPGL04
 MOVE GSWBCD3,CTASKNR 
 SET SPPROMPT 
 ATTFMT SPGFM04 
 PERF SPCLRA
 B ADM11RET 
SPGL05
 PERF KTPRT UDSKRIV KONTOPLAN 
 B ADM11RET 
SPGL06
 PERF ADM,CBIN2 BEHOLDNINGST[LLERE
 B ADM11RET 
SPGL07
 MUL TTEJEDB,=D'-1' VEND
 MOVE GSWBCD6,TTCASH
 ADD GSWBCD6,TTEJEDB
 SET SPPROMPT 
 ATTFMT SPGFM17 
 PERF SPCLRA
 MUL TTEJEDB,=D'-1' VEND TILBAGE
 B ADM11RET 
* 
* 
SPGL08			LOCAL INQUIRIES
 TBT GTLOKSPG,SPG0820 ALREADY ACTIVE, CONTINUE
 TEST GTKASSE 
 BZ SPG08MAK ONLY IF 'KASSE FUNCTIONS 
 CLEAR GTGLSPG
SPG0805 
 SET SPPROMPT 
 ATTFMT SPGFM08 INQUIRY FORMAT
 PERF SPCLRA
*     GTLBNRIN     CONTAINS FIRST (OR ONLY) TRANSACTION 
*                  OF INTEREST (EKSP. LB.NR.) 
*     GSWBCD6      CONTAINS FIELD NO. OF WANTED FIELD 
*     GSWBCD7      CONTAINS FIELD CONTENT OF WANTED FIELD 
* 
 IB SPBINW2,SPG08MAK,SPG08MAK,SPG0810 
 B SPG0805
* 
SPG0810			SPG-CONDITION ENTERED 
 MOVE SPKEY,CBIN3 
 SET GTLOKSPG 
 TBT GTGLSPG,SPG0815
 MOVE GTRECNR,CRECNR POINT TO START OF DSET 
 B SPG0820
SPG0815 
 MOVE GTRECNR,CGLRECNR
* 
SPG0820 
 SUB GTRECNR,CBIN1 NEXT RECORD
SPG0822 
 CBNG GTRECNR,CBIN1,SPG08RET
 TBT GTGLSPG,SPG0825
			NEW REGSET 
 CBNL GTRECNR,CRECNR,SPG08RET 
 PERF RGREAD,DK02,=D'2' READ RECORD 
 BNOK SPG0820 IF TRANS 11, OR 
			NOT SAME MACHINE, OR 
			DISK ERROR 
 B SPG0828
SPG0825 
			OLD REGSET 
 CBNL GTRECNR,CGLRECNR,SPG08RET 
 PERF RGREAD,DK05,=D'5' READ RECORD 
 BNOK SPG0820 IF TRANS 11, OR 
			NOT SAME MACHINE, OR 
			DISK ERROR 
SPG0828 
 CBE GTREGNR,=D'12',SPG0820 TR 12 
* 
*     SAME MACHINE: 
*     GTREGNR      TRANSTYPE
*     GTREGDEX     TRANSTYPE - INDEX
*     CEORFLG      TRUE 
*     TTEORFLG     TRUE 
*     GTLBNR       EKSP. OF CURRENT RECORD
*     GTUSED       SAT FOR PRESENT FIELDS 
*     GTDUPF       -     -     -     -
*     GTREGF       -     -     -     -
*     DEB/KRE      RELEVANT ROUTINE PERFORMED 
*        GTDBKRC
*        GTDBKRS
*        TTDKBCD
*        TTDKDEX
* 
 CALL EMPTYT,GTLBNRIN 
 BNOK SPG0830 IF NO SPECIFIC EKSP.
 CMP GTLBNR,GTLBNRIN ACTUAL - WANTED EKSP.
 BL SPG0830 WANTED EKSP. PASSED 
 BE SPG0840 FOUND 
*     NOT YET FOUND 
*     JUMP TO FIND RECORD 
 MOVE GSWBIN1,GTLBNR
 SUB GTRECNR,GSWBIN1 GTRECNR= 
 MOVE GSWBIN1,GTLBNRIN GTRECNR -
 ADD GTRECNR,GSWBIN1 ( GTLBNR - GTLBNRIN )
 B SPG0822
* 
SPG0830 
 CBE GSWBCD6,=D'0',SPG08RET NO FIELDS WANTED
 B SPG0850 SEARCH FIELD 
* 
SPG0840 
 CBE GSWBCD6,=D'0',SPGFOUND RECORD FOUND
* 
SPG0850			CHECK FIELD 
 MOVE GSWBIN1,GSWBCD6 GET FIELD INDEX 
 MOVE GSWBIN2,CFLTDEX(GSWBIN1)
 MOVE GSWBIN2,GTUSED(GSWBIN2) 
 CBE GSWBIN1,GSWBIN2,SPG0860 FIELD PRESENT
 MUL GSWBIN2,=W'-1' 
 CBE GSWBIN1,GSWBIN2,SPG0860 FIELD PRESENT
 B SPG0820 FIELD NOT PRESENT
* 
SPG0860			CHECK FIELD CONTENT 
 MOVE GSWBIN2,CFLTDEX(GSWBIN1)
 CBNE GSWBCD7,GTDUPF(GSWBIN2),SPG0820 
* 
* 
SPGFOUND			A WANTED RECORD FOUND
* 
 MOVE TTDBKRM,=C'K' 
 CBE TTDKDEX,CBIN1,SPG0870
 MOVE TTDBKRM,=C'D' 
SPG0870 
* 
 SET TTSUPFLG 
 MOVE TTSUPMRK,=C'S'
 CBNE GTUSED(CBIN6),CBIN0,SPG0880 
 CLEAR TTSUPFLG 
 MOVE TTSUPMRK,=C' '
SPG0880 
* 
 PERF TRPAGE
 SET GTDIVTR SET DIVERSE TRANS
 CLEAR GTREGFLG 
* 
 B ADM11RET 
* 
SPG08RET
 MOVE SPKEY,CBIN1 
 CLEAR GTLOKSPG 
 CLEAR TTSUPFLG 
 MOVE TTSUPMRK,=C' '
SPG08MAK
 B ADM11RET 
**
* 
* 
SPGL09			INQ. OLD REGSET
 TBF CGLREGFL,SPG09MAK ALLOWED? 
 TBF GTKASSE,SPG09MAK ONLY IF 'KASSE' 
 SET GTGLSPG INDICATE OLD REGSET
 B SPG0805
SPG09MAK
 B ADM11RET 
* 
* 
* 
*          PRINT OUT OF SPECIFIED TRANSACTIONS
* 
SPGL10			PRINT A INTERVAL 
 TEST GTCYFLG 
 BNZ SPG10MAK NOT IN CYCLE
 TEST TTLSTFLG
 BNZ SPG10MAK NOT IN LISTE
 TEST GTKASSE 
 BZ SPG10MAK ONLY IF 'KASSE FUNCTIONS 
 CLEAR GTGLSPG INDICATE CURRENT REGSET
SPG1005 
 SET SPPROMPT 
 ATTFMT SPGFM10 SCREEN FORMAT 
 PERF SPCLRA
*     GTLBNRIN   HIGHEST EKS.LBNR WANTED (FIRST PRINTED)
*     GSWBCD7    LOWEST EKS.LBNR WANTED 
 IB SPBINW2,SPG10MAK,SPG10MAK,SPG1010 
 B SPG1005
* 
SPG1010 
 SET GTLOKSPG 
 CLEAR TTTSTFLG INITIATE FIRST TIME 
 TBT GTGLSPG,SPG1015
 MOVE GTRECNR,CRECNR POINT TO LAST RECORD 
 B SPG1020
SPG1015 
 MOVE GTRECNR,CGLRECNR
SPG1020 
 SUB GTRECNR,CBIN1 PREVIOUS RECORD
SPG1022 
 CBNG GTRECNR,CBIN1,SPG1090 
 TBT GTGLSPG,SPG1025
			NEW REGSET 
 CBNL GTRECNR,CRECNR,SPG1090
 PERF RGREAD,DK02,=D'2' READ RECORD 
 BNOK SPG1020 IF TR 11, OR
			NOT SAME MACHINE, OR 
			DISK ERROR 
 B SPG1028
SPG1025 
			OLD REGSET 
 CBNL GTRECNR,CGLRECNR,SPG1090
 PERF RGREAD,DK05,=D'5' READ RECORD 
 BNOK SPG1020 IF TR 11, OR
			NOT SAME MACHINE, OR 
			DISK ERROR 
SPG1028 
 CBE GTREGNR,=D'12',SPG1020 TR 12 
 CBL GTLBNR,GSWBCD7,SPG1090 TOO FAR 
 CMP GTLBNR,GTLBNRIN ACTUAL - WANTED EKSP.
 BL SPG1040 WANTED EKSP. PASSED 
 BE SPG1040 FOUND 
*     NOT YET FOUND 
 MOVE GSWBIN1,GTLBNR
 SUB GTRECNR,GSWBIN1 GTRECNR =
 MOVE GSWBIN1,GTLBNRIN GTRECNR -
 ADD GTRECNR,GSWBIN1 ( GTLBNR - GTLBNRIN )
 B SPG1022
* 
SPG1040 
 MOVE TTDBKRM,=C'K' 
 CBE TTDKDEX,CBIN1,SPG1060
 MOVE TTDBKRM,=C'D' 
SPG1060 
 SET TTSUPFLG 
 MOVE TTSUPMRK,=C'S'
 CBNE GTUSED(CBIN6),CBIN0,SPG1070 
 CLEAR TTSUPFLG 
 MOVE TTSUPMRK,=C' '
SPG1070 
 TBT TTTSTFLG,SPG1080 
 SET TTTSTFLG 
 PERF SPLIN8,CBIN5,CBIN2 WRITE 'BILAG'
 PERF GRASPV
 PERF CLEAR8
 MOVE TTLINNR,=D'6' LINE 25 
 MOVE TTCYM,=C'K' KVIT
SPG1080 
 MOVE GSWBIN1,TTLINNR 
 DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER 
 PERF FRMTKV GET FORMAT 
 EDWRT KVOUCH,GTSTRFMT WRITE
 PERF CRVO
 ADD TTLINNR,=D'2' ONE LINE UP
 MOVE GSWBIN1,TTLINNR 
 CBG GSWBIN1,CMAXLIN,SPG1090 NO MORE LINES
 SUB GTLBNRIN,=D'1' NEXT LBNR 
 B SPG1020
SPG1090 
 TBF TTTSTFLG,SPG10RET
 CLEAR TTSUPFLG 
 MOVE TTSUPMRK,=C' '
 MOVE TTCYM,=C' ' 
 WAIT KVOUCH
 DSC0 KVOUCH,RLEAS
SPG10RET
 CLEAR GTLOKSPG 
SPG10MAK
 B ADM11RET 
* 
* 
SPGL11			PRINT INTERVAL, OLD REGSET 
 TBF CGLREGFL,SPG11MAK ALLOWED? 
 TBT GTCYFLG,SPG11MAK NOT IN CYCLE
 TBT TTLSTFLG,SPG11MAK NOT IN LISTE 
 TBF GTKASSE,SPG11MAK ONLY IF 'KASSE' 
 SET GTGLSPG
 B SPG1005
SPG11MAK
 B ADM11RET 
* 
* 
* 
* 
ADM11RET
 CLEAR GTSPGFLG 
 MOVE GSWSTR9,=C' ' 
 B ADMRET 
* 
* 
ADM12 
* FLOPPY DISC EXCHANGE *
 TBT GTTESTFL,ADM12RET
 TBF GTMASTFL,ADM1250 DISKETTE SKIFT
 SET SPPROMPT 
 ATTFMT ADM12FRM
 PERF SPCLRA
 IB SPBINW2,ADM12RET,ADM12RET,ADM1210 
 B ADM12RET 
ADM1210 
 SET CSKIFTFL 
 PERF SKIFT 
 B ADM12RET 
* 
* 
*          FOR NON MASTER 
* 
ADM1250 
 TBF CSKIFTFL,FDEXIT T=CHANGE DISK
 TBF CWFLAG,FDEXIT
 PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' 
FD10
 DELAY CBIN20 WAIT A SECOND 
 TBT CSKIFTFL,FD10 FINISHED?
			YES
 MOVE GSWBIN1,CBIN11
 PERF FRMXJT,GSWBIN1
 EDWRT .NW,KJTAPE,GTSTRFMT
 CALL ABORT,KEYB
 DSC0 KEYB,SKIB 
 PERF CLEAR8
 DELAY CBIN20 
 CALL ABORT,KJTAPE
* 
FDEXIT
ADM12RET
 B ADMRET 
* 
* 
ADM13 
********************************************* 
* 
*          SET CLEAR AUTOSUM FLAG 
* 
************************************************
* 
 TBT GTASUMFL,ADM13CL 
 SET GTASUMFL SET AUTOSUM 
 PERF SUM INITIATE SUM
 B ADM13OK
ADM13CL 
 CLEAR GTASUMFL CLEAR AUTOSUM 
ADM13OK 
 CMP CBIN0,CBIN0
 B ADMRET 
* 
* 
ADM14 
*********************************************** 
* 
*              SET 'DAGS DATO'
* 
*********************************************** 
* 
ADM14000
 SET GTDYFLG
 SET SPPROMPT 
 SET SPME 
 MOVE GSWBCD3,=X'FF'
ADM1410 
 ATTFMT OPENFRM 
 PERF SPCLRN
 IB SPBINW2,ADM14000,ADM14000,ADM14RET
 B ADM14000 
ADM14RET
 CLEAR SPME 
 CLEAR GTDYFLG
 B ADMRET 
* 
* 
ADM15 
* DUMMY 
 B ADMRET 
* 
* 
ADM16 
* DUMMY * 
 B ADMRET 
* 
* 
ADM17 
******************************************* 
* 
*            SET NEW 'KASSEKONTONR' 
* 
******************************************* 
* 
ADM17000
 TBT GTKASSE,ADM17RET 
 MOVE SPKEY,CBIN2 
 SET SPPROMPT 
 PERF PACKCL
 MOVE GTDUPF(CBIN2),=D'0' 
 MOVE GTDUPF(CBIN5),=D'17' ADM FUNCTION NO
 MOVE GTDUPF(CBIN1),TTCASHAC
 MOVE GTDUPF(CBIN4),TTSTCASH
 ATTFMT ADM17FRM
 PERF SPCLRN
 CBE GTDUPF(CBIN1),=D'0',ADM17000 
 IB SPBINW2,ADM17RET,ADM17RET,ADM1730 
 B ADM17000 
ADM1730 
 MOVE TTCASHAC,GTDUPF(CBIN1)
 MOVE TTSTCASH,GTDUPF(CBIN4)
 PERF WRITJT,=W'13' 
ADM17RET
 B ADMRET 
* 
* 
ADM18 
* SET NEW VERSURKONTONR 
ADM18000
			VERSUR KONTONR 
 TBT GTKASSE,ADM18RET 
 MOVE SPKEY,CBIN2 
 SET SPPROMPT 
 ATTFMT ADM18FRM
 PERF SPCLRN
 CBE TVERSUR,=D'0',ADM18000 
 IB SPBINW2,ADM18RET,ADM18RET,ADM18RET
 B ADM18000 
ADM18RET
 B ADMRET 
* 
* 
ADM19 
********************
* 
*      CALCULATOR FUNCTION
* 
********************
CALCBEG 
 MOVE SPKEY,CBIN1 
  MOVE GSWBCD2,=D'0'          TOTAL=0 
  MOVE GSWBCD1,=D'0'     NUMBER=0 
 PERF FRMXTA,CBIN1    '* ' ON TALLY 
 PERF WTALLY
 ATTFMT CALFRM02
 SET SPPROMPT 
 PERF SPCLRA
 B CALCFRST 
CALCNEXT
 CLEAR SPPROMPT 
 PERF SPCLRN
CALCFRST
 IB SPBINW2,CALCNEXT,CALCNEXT,CALCADD,CALCNEG 
 CBE SPBINW2,=W'7',CALCSUB
  CBE SPBINW2,=W'15',CALCTOT
 B  CALCNEXT
CALCNEG 
  MUL  GSWBCD1,=D'-1' 
CALCADD 
 ADD  GSWBCD2,GSWBCD1 
 MOVE GSWBCD6,GSWBCD1 
 PERF FRMXTA,CBIN5
 PERF WTALLY    NUMBER ON TALLY 
 B CALCNEXT 
CALCSUB 
 MOVE GSWBCD6,GSWBCD2 
 MOVE GSWSTR9,=C'SUBTOTAL ' 
 PERF FRMXTA,CBIN3
 PERF WTALLY     SUBTOTAL ON TALLY
 B CALCNEXT 
CALCTOT 
 MOVE GSWBCD6,GSWBCD2 
 MOVE GSWSTR9,=C'TOTAL   '
 PERF FRMXTA,CBIN2
 PERF  WTALLY     TOTAL ON TALLY
 SET SPPROMPT 
 ATTFMT CALFRM05
 PERF SPCLRA   TOTAL ON SCREEN
 CBE SPBINW2,=W'3',CALCBEG
 B ADMRET 
* 
* 
ADM20 
****************************************************
* 
*            CONTROLDIGIT-VALUE CALCULATION 
* 
****************************************************
* 
 SET SPPROMPT 
CALCD00 
 WAIT  KTALLY 
 ATTFMT  CCDFRM01 
 PERF SPCLRA    GET NUMBER
  CBNE  SPBINW2,=W'3',CALCDRET
 CBE GSWBCD5,=D'10',CALCD06 
 EDWRT .NW,KTALLY,CCDFRM03  CONTROLDIGIT ON TALLY 
 CLEAR GTDYFLG
CALCD05 
 ATTFMT CCDFRM02
 PERF SPCLRA    CONTROLDIGIT ON SCREEN
 CBE SPBINW2,=W'3',CALCD00
 B CALCDRET 
CALCD06 
 SET GTDYFLG	ERROR  (CONTR.DIGIT=10)
 B CALCD05
* 
CALCDRET
 CLEAR GTDYFLG
 B ADMRET 
* 
* 
ADM21 
********************
* 
*          SET/CLEAR TEST MODE
*          (NO WRITE ON DISKS 
*           T ON JOURNAL, VOUCHER, SCREEN 
*           NO 'BEHOLDNINGST[LLERE' 
* 
********************
 TBT GTMASTFLG,ADM21RET 
 TBT GTKASSE,ADM21RET 
 TBT GTTESTFL,ADM2150 
 PERF WRITJT,=W'9'
 PERF TCONFW,TTASKNR
 MOVE GTTESTMK,=C'T'
 SET GTTESTFL 
 B ADM21RET 
ADM2150 
 PERF WRITJT,=W'10' 
 CLEAR GTTESTFL 
 MOVE GTTESTMK,=C' '
 PERF TCONFR,TTASKNR
ADM21RET
 B ADMRET 
* 
* 
 EJECT
ADM22 
**********
* 
* 
**********
 TBF CADM22F,ADM22RET FUNCTION ALLOWED? 
 TBT GTKASSE,ADM22RET KASSE CLOSED? 
 MOVE SPKEY,CBIN2 
 MOVE GSWBCD5,TTSTLBNR
 MUL GSWBCD5,=D'-1' 
ADM2200 
 SET SPPROMPT 
 ATTFMT ADM22FRM
 PERF SPCLRN
 IB SPBINW2,ADM22RET,ADM22RET,ADM2210 
 B ADM2200
ADM2210 
 MUL GSWBCD5,=D'-1' 
 MOVE TTSTLBNR,GSWBCD5
ADM22RET
 B ADMRET 
* 
* 
 EJECT
ADM23 
* MODPOSTERING *
 PERF MODP
 B ADMRET 
* 
ADM24 
* KONTOKORT * 
 PERF KORT
 B ADMRET 
* 
ADM25 
* RECEIPT * 
 PERF KVIT
 B ADMRET 
* 
ADM26 
* SUMMARIZE * 
 PERF SUM 
 B ADMRET 
* 
ADM27 
* LISTE * 
 PERF LSTINT
 B ADMRET 
* 
ADM28 
* SUBTOTAL *
 PERF SUBTOT
 B ADMRET 
* 
 EJECT
ADM29 
********************
* 
*          TEST PRINT ON VOUCHER
* 
********************
 DSC0 KVOUCH,RLEAS RLEASE 
 PERF SPLIN8,CBIN5,CBIN2 ASK FOR 'BILAG'
 PERF GRASPV AND GRASP
 PERF CLEAR8
 MOVE GSWBIN1,CVOUTOP 
ADM2910 
 CBL GSWBIN1,CBIN6,ADM29RET 
 DSC1 KVOUCH,POS,GSWBIN1 POSITION ON LINE 
 PERF FRMXVO,CBIN16 GET FORMAT
 EDWRT KVOUCH,GTSTRFMT PRINT
 SUB GSWBIN1,CBIN8
 B ADM2910
ADM29RET
 DSC0 KVOUCH,RLEAS
 B ADMRET 
* 
 EJECT
ADM30 
* CYCLE END 
 PERF CYK,CBIN10
 B ADMRET 
* 
ADM31 
* CYCLE START * 
 PERF CYK,CBIN1 
 B ADMRET 
* 
ADM32 
* STABEL START *
 PERF CYK,CBIN2 
 B ADMRET 
* 
ADM33 
* DUMMY * 
	B	ADMRET 
* 
ADM34 
* 4-CYCLE, PAUSE IN CYCLE,STABEL
 PERF CYK,CBIN4 
	B	ADMRET 
* 
ADM35 
* VARIOUS TRANSACTIONS *
 PERF DIVTR 
 B ADMRET 
* 
 EJECT
* 
* 
* 
*     END OF ADM FUNCTIONS
* 
ADMRET
 RET
 PEND 
 EJECT
RGA300
 PERF ADM,CBIN11	SPG
 B RGADM
 EJECT
**************************************************
* 
*      TR2GEN    GENERATES A TRANSACTION 2
* 
****************************************************
TR2GEN PROC DBKR
 MOVE TTDKDEX,DBKR
 CBNE TTDKDEX,=W'0',TR2DBKR 
 MOVE TTDKDEX,CBIN1 
 CBL GTDUPF(CBIN4),=D'0',TR2DBKR
 MOVE TTDKDEX,CBIN2 
TR2DBKR 
 PERFI TTDKDEX,SETKRE,SETDEB
 EDWRT SCREEN,CLFRM02 
 PERF SLUT
 RET
 PEND 
 EJECT
********************************************************
* 
*         WAHEAD - GRASP  AND WRITE HEADLINE ON VOUCHER 
* 
********************************************************
WAHEAD PROC VOXDEX
 EDWRT SCREEN,CLFRM03 
 PERF SPLIN8,CBIN5,CBIN2
 PERF GRASPV
 DSC1 KVOUCH,POS,CVOUTOP
 PERF CLEAR8
 PERF FRMXVO,VOXDEX 
 EDWRT KVOUCH,GTSTRFMT
 RET
 PEND 
 EJECT
********************************************************* 
* 
*     WALINE   WRITE ACCUMULATORLINE
* 
**********************************************************
WALINE PROC LINDEX
 PERF FRMXVO,LINDEX 
 EDWRT KVOUCH,GTSTRFMT
 SUB TTLINNR,=D'1'
 RET
 PEND 
* 
 EJECT
SKIFT PROC
************************* 
* 
*          SKIFT - THIS  PROCEDURE TAKES HAND OF SHIFT
*          OF DISKS, IS ACTIVATED AFTER 
*          12 ADM 
* 
************************
SK00
 TBF CPFLG,SK10 DISC OCCUPIED?
 DELAY CBIN2 YES DELAY 200 MS 
 B SK00 
SK10
 SET CPFLG 	DIUSC FREE
 SET CSKIFTWN 
 PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' 
 TBF CWFLAG,SK15
 SUB CRECBCD,=D'1'
 PERF SLUTID,CRECBCD WRITE 'SLUTD'
 PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR
SK15
 PERF WRITID,CBIN2,CBIN2
 PERF CLSVOL,CBIN2
 PERF LAMPOF,=W'2047' 
 ADD CVOLNO,=D'1' 
SK120 
 PERF LAMPON,=W'512' LAMP 2 
 PERF SOPRD 
 CBNE GSWBIN2,CBIN9,SK120 
 PERF ASGVOL,CBIN2
 BNOK SK120 
 PERF LAMPOF,=W'2047' 
 MOVE CRECNR,CBIN1
 MOVE CRECBCD,=D'0' 
 TBF CWFLAG,SK130 
 PERF STRTWR
 BNOK SK120 
SK130 
 PERF CNFWRT REWRITE CONFDATA 
 TBF CWFLAG,SK150 
 MOVE CRECBCD,=D'1' 
 PERF WRITID,CBIN2,CBIN1
SK150 
 PERF CLEAR8
 PERF WRITJT,=W'11' 
 CLEAR CSKIFTFL 
 CLEAR CSKIFTWN 
 CLEAR CPFLG 	DISC FREE 
 RET
 PEND 
 EJECT
* 
LAMPON PROC $NR 
 PLIT $NR 
**************************************
* 
* LAMPON - FIRE LAMPS ON OPR. PANEL.
* CALL - PERF LAMPON,<$NR>
* 
* THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM
* 
***************************************** 
 MOVE GSWBIN2,$NR 
 DSC1 DSSOPO,ON,GSWBIN2 
 RET
 PEND 
* 
LAMPOF PROC $NR 
 PLIT $NR 
***************************************** 
* 
* LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL 
* CALL - PERF LAMPOF,<$NR>
* 
* THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM
* 
********************************************
 MOVE GSWBIN2,$NR 
 DSC1 DSSOPO,OFF,GSWBIN2
 RET
 PEND 
* 
SOPRD PROC
********************************************* 
* 
* SOPRD - READ SYSTEMS OPERATOR PANEL 
* 
********************************************* 
SOPR10
 MOVE GSWBIN1,CBIN1 
 KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2
 BNOK SOPR10
 RET
 PEND 
* 
 EJECT
STRTWR PROC 
********************* 
* 
*          STRTWR - SET UP AND WRITE START RECORD 
* 
* 
*********************** 
 PERF STRTID,CVOLNO 
 PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR
 BNOK STRTNOK 
 ADD CRECNR,CBIN1 
 PERF RADEL,DK02,CRECNR 
 BNOK STRTNOK 
 CMP CBIN0,CBIN0 OK 
 RET
STRTNOK 
 CMP CBIN1,CBIN0
 RET
 PEND 
 EJECT
STRTID PROC VOLID 
********************
* 
*          STRTID - SETS  UP A START ID IN PACK BUFFER
* 
* CALL - PERF STRTID,<VOLID>
* 
********************
 SET CSWFLAG
 CBE CRECLGD,=W'128',STRT10 
 CLEAR CSWFLAG
STRT10
 MOVE GSWBIN6,CBIN2 
 EDIT CPCKBUF,PCKINIT 
 EDIT CPCKBUF,STARTFR 
 MOVE GSWBCD3,VOLID 
 EDIT GSWSTR20,FRVOLID
 MOVE GSWBIN1,=W'40'
 COPY CPCKBUF,GSWBIN1,CBIN12,GSWSTR20,CBIN0 
STRTRET 
 RET
 PEND 
 EJECT
SLUTID PROC SLUTNO
********************
* 
*          SLUTID - SETS UP A SLUTD IN CPCKBUF
* 
* 
********************
 SET CSWFLAG
 CBE CRECLGD,=W'128',SLUT10 
 CLEAR CSWFLAG
SLUT10
 EDIT CPCKBUF,PCKINIT 
 MOVE CRECBCD,SLUTNO
 EDIT CPCKBUF,SLUTFRM 
 RET
 PEND 
 EJECT
BCKUP PROC $OPT 
 PLIT $OPT
********************
* 
*          THIS PROCEDURE TAKES CARE OF ADMINISTRATION
*          OB BACKUP
* 
*          CALL:          PERF BCKUP,<=W'X'>
*          $OPT = 1 : WITHOUT BACKUP
*          $OPT = 2 : WITH BACKUP 
* 
* 
********************
* 
 MOVE CRECNR,CBIN1
 MOVE CRECBCD,=D'1' 
 ADD CVOLNO,=D'1' NEXT VOLUME NO
 PERF CNFWRT REWRITE CONFIGURATION
 SUB CVOLNO,=D'1' 
 CBE CBIN1,$OPT,BCK100 NO BACKUP
* 
* 
*     BACKUP
* 
BCK000
 PERF LAMPOF,=W'2047' LAMPS OFF 
BCK005
 PERF LAMPON,=W'1024' LAMP 1
 PERF LAMPON,=W'128' LAMP 4 
 PERF LAMPON,=W'16' LAMP 7
 TBF CGLREGFL,BCK010
 PERF LAMPON,=W'512' LAMP 2 
BCK010
 PERF SOPRD READ SOP LAMPS
 IB GSWBIN2,		C 
		BSOP10,BSOP09,BSOP08,BSOP07,BSOP06,		C
		BSOP05,BSOP04,BSOP03,BSOP02,BSOP01
BSOP03
BSOP05
BSOP06
BSOP08
BSOP09
BSOP10
 B BCK010 OTHER LAMPS 
* 
BSOP01			BACKUP FD999001
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF LAMPON,=W'1024' LAMP 1
 PERF BACKUP,DK01,=D'1',=W'32',CCONBUF0,=W'199' 
 BNOK BCK050
 ADD CVOLNO,=D'1' 
 PERF WRITID,CBIN6,CBIN4 BACKUP OK
 SUB CVOLNO,=D'1' 
 PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA 
 B BCK000 
BCK050
 PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA 
 B BCK005 
* 
BSOP02			COPY FD999002 TO FD999005
 TBF CGLREGFL,BCK010 ALLOWED? 
 B BCK02
* 
***** 
BCK02			COPY FD999002 TO FD999005 
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF LAMPON,=W'512' LAMP 2 
 SET CPFLG
 PERF ASGVOL,CBIN2 ASSIGN REGSET
 BNOK BCK0290 
 MOVE CGLRECNR,CBIN0
BCK0250 
 ADD CGLRECNR,CBIN1 
 MOVE GSWBIN1,=W'128' LENGTH OF RECORD
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CGLRECNR
 BNOK BCK0270 ERROR 
 CBE GTWBCD1,=D'4',BCK0280 NO DATA
 MOVE GSWSTR20,=C'SLUTD'
 MOVE GSWBIN5,CBIN0 
 MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 
 BE BCK0280 SLUTD 
 PERF RAWRIT,DK05,=D'5',CPCKBUF,CGLRECNR
 BOK BCK0250
BCK0270			ERROR 
 PERF LAMPON,=W'2' LAMP 10
BCK0280			FINISH
 MOVE TTGLREC,CGLRECNR
 PERF TCONFW,CBIN1 SAVE LAST RECORD NO. 
BCK0290 
 CLEAR CPFLG
 DSC0 DK02,CLOSE CLOSE VOLUME 2 
 B BCK02R 
* 
***** 
BCK02R
 B BCK000 
* 
BSOP04			BACKUP FD999004
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF LAMPON,=W'128' LAMP 4 
 PERF BACKUP,DK04,=D'4',=W'30',CKTBUF,=W'128' 
 BNOK BCK005 NOK
 B BCK000 OK
* 
BSOP07			FINISH 
 PERF LAMPOF,=W'2047' LAMPS OFF 
 PERF ASGVOL,CBIN1 ASSIGN SYSTEM FILES
 BNOK BCKNOK
BCK100
 PERF ASGVOL,CBIN2
 BNOK BCKNOK
 ADD CVOLNO,=D'1' 
 PERF STRTWR
 BOK BCKOK
 SUB CVOLNO,=D'1' 
 PERF LAMPON,=W'2' LAMP 10
 B BCKNOK 
* 
BCKNOK
 CMP CBIN1,CBIN0 NOK
 RET
* 
BCKOK 
 PERF WRITID,CBIN2,CBIN1
 CMP CBIN0,CBIN0
 RET
 PEND 
 EJECT
* 
* 
************************************************* 
* 
*         FORMATS 
* 
************************************************* 
DUMTAB KTAB EORKY1
* 
FMTFKI FRMT 
 FNL
 FKI 1
 FMEL 'B',TSWBCD2 
 FMEND
* 
PCKINIT FRMT
 FBT CSWFLAG,INIT10 
 FILLR ' ',40 
 FILLR ' ',40 
 FILLR X'00',48 
 FEXIT
INIT10
 FILLR ' ',40 
 FILLR ' ',40 
 FILLR ' ',48 
 FMEND
* 
KONFRMT FRMT
 FSL
 FCOPY =C'KONVERTERING '
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
KONV4FMT FRMT 
 FSL
 FCOPY ='KORREKT' 
 FILLR '?',1
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
FRVOLID FRMT
 FMEL '999999',CMASKDAT 
 FMEL 'B99999',GSWBCD3
 FMEND
* 
SLUTFRM FRMT
 FCOPY =C'SLUTD'
 FMEL '99999',CRECBCD 
 FMEND
* 
STARTFR FRMT
 FCOPY =C'Z300 '
 FMEL '9999',CKMDNR KOMMUNE NR
 FILLR C'2',1 
 FCOPY CVOL(GSWBIN6)
 FMEL '999',CRELDAY DAG NR
 FILLR C'1',1 MIXED TRANS 
 FILLR ' ',6
 FMEND
* 
ADFRM01 FRMT
 FSL
 FCOPY ='KLAR ' 
 FCOPY ='ADM  ' 
 FKI 12,MINL=1,MAXL=2 
 FMEL 'ZZ',GSWBCD3
 FMEND
* 
* 
OPENFRM FRMT
 FSL
 FCOPY ='ADM  ' 
 FBT GTDYFLG,OPFR05 
 FTAB 1 
 FCOPY =C'KASSE]BNING'
OPFR05
 FNL
 FBF GTMASTFL,OPFR10
 FCOPY =C'DAGS-DATO'
 FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR
 FMEL '99E-99E-99',CMASKDAT 
 FNL
 FCOPY =C'DAG NR' 
 FKI 11,MINL=1,MAXL=3,ME,APPL=102 
 FMEL 'ZZZ',CRELDAY 
 FNL
OPFR10
 FCOPY ='POST-DATO' 
 FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT 
 FMEL '99E-99E-99',GTDATO 
 FNL
 FCOPY =C'DAG NR' 
 FKI 11,MINL=1,MAXL=3,ME,APPL=107 
 FMEL 'ZZZ',GSWBCD3	DUMMY 
 FMEND
ADMFRM1 FRMT
 FSL
 FBT GTSPGFLG,ADML0001
 FCOPY ='ADM  ' 
ADML0001
 FTAB 6 
 FCOPY ='EJ-EDB T[LLER '
 FNL
 FCOPY ='NR'
 FILLR ' ',2
 FCOPY ='KONTONR' 
 FNL
 FBF GTDYFLG,AFRM20 
 FKI 1,MINL=3,MAXL=3,ME,APPL=100
AFRM20
 FMEL 'ZZZ',GSWBCD1 
 FBT GTDYFLG,AFRM10 
 FKI 5,MINL=10,MAXL=10,ME,REWRT,SCHK=1
 FMEL '99999999E-99',CTR12NR(GSWBIN6) 
AFRM10
 FMEND
* 
ADM2FRM1 FRMT 
 FSL
 FBT GTSPGFLG,ADML0201
 FCOPY ='ADM  ' 
ADML0201
 FTAB 6 
 FCOPY ='BEHOLDNINGST[LLERE'
 FNL
 FCOPY ='NR'
 FILLR ' ',2
 FCOPY ='KONTONR' 
 FILLR ' ',6
 FCOPY =C'SALDO'
 FNL
 FBF GTDYFLG,AFRM220
 FKI 1,MINL=1,MAXL=2,ME,APPL=101
AFRM220 
 FMEL 'ZZ',GSWBCD1
 FTAB 5 
 FBT GTDYFLG,AFRM210
 FBT GTSPGFLG,AFRM225 
 FBT GTTESTFL,AFRM225 
 FKI 5,MAXL=10,ME,SCHK=1,REWRT
AFRM225 
 FMEL 'ZZZZZZZZE-ZZ',GTDUPF(CBIN1)
 FTAB 18
 FBT GTSPGFLG,AFRM230 
 FBT GTTESTFL,AFRM230 
 FKI 18,MAXL=14,REWRT,SCHK=4
AFRM230 
 FMEL 'TTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4) SALDO 
 FLINK FMTFKI 
AFRM210 
 FMEND
* 
ADM17FRM FRMT 
 FSL
 FBT GTSPGFLG,ADML1705
 FCOPY ='ADM  ' 
ADML1705
 FTAB 6 
 FCOPY ='KASSE-KONTO '
 FNL
 FCOPY ='KONTONR' 
 FILLR ' ',6
 FCOPY ='SALD0' 
 FNL
 FBT GTSPGFLG,ADM1701 
 FKI 1,MINL=10,MAXL=10,ME,SCHK=1
ADM1701 
 FMEL '99999999E-99',GTDUPF(CBIN1)
 FKI 14,MAXL=14,REWRT,SCHK=4
 FMEL 'TTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4) 
 FBF GTSPGFLG,ADM1702 
 FLINK FMTFKI 
ADM1702 
 FMEND
* 
ADM18FRM FRMT 
 FSL
 FCOPY ='ADM  ' 
 FCOPY ='VERSUR KONTONR REMIT ' 
 FNL
 FCOPY =C'KONTONR'
 FNL
 FKI 1,MINL=10,MAXL=10,ME,SCHK=1
 FMEL '99999999E-99',TVERSUR
 FMEND
* 
ADM12FRM FRMT 
 FSL
 FCOPY ='DISKETTE SKIFT ' 
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
CLFRM01 FRMT
 FSL
 FCOPY =C'KASSELUKNING' 
 FILLR X'07',1
 FLINK FMTFKI 
 FMEND
* 
CLFRM02 FRMT
 FILLR '1',2
 FCOPY =C'KASSELUKNING' 
 FNL
 FCOPY GSWSTR20 TEXT
 FMEL 'ZZ',GTWBCD1 COUNTER NR 
 FILLR ' ',4
 FCOPY GTDBKRC DEB-KRE
 FNL
 FCOPY =C'KONTONR'
 FILLR ' ',5
 FLINK FBELOB 
 FNL
 FMEL '99999999E-99',GTDUPF(CBIN1)
 FMEL 'BTTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4)
 FMEND
* 
CLFRM03 FRMT
 FILLR '1',2
 FBT GTSPGFLG,CLF0301 
 FCOPY =C'KASSELUKNING' 
CLF0301 
 FNL
 FCOPY GSWSTR20 
 FMEND
* 
CLFRM04	FRMT
	FSL
 FBT GTSPGFLG,CLF0401 
	FCOPY	='KASSELUKNING'
CLF0401 
	FNL
	FCOPY	='BEHOLDNINGST[LLERE'
	FNL
	FNL
 FBT GTSPGFLG,CLF0402 
	FCOPY	='SLET PERIODE ' 
	FTAB	15
	FCOPY	=' DEB'
	FNL
	FCOPY	='SLET SALDO ' 
	FTAB	15
	FCOPY	=' KRE'
CLF0402 
	FNL
 FCOPY ='SUBTOTAL ' 
	FTAB	16
 FCOPY ='KVIT'
	FNL
 FNL
	FNL
 FILLR ' ',1
	FCOPY	='BILAG' 
 FLINK FMTFKI 
	FMEND
* 
SPGFM00 FRMT
 FSL
 FCOPY ='KLAR ' 
 FLINK SPGFMSPG 
 FKI 13,MINL=1,MAXL=2 
 FMEL 'ZZ',GSWBCD3
 FMEND
* 
SPGFMSPG FRMT 
 FTEXT 'SP' 
 FILLR X'5C',1
 FTEXT 'RGE'
 FMEND
* 
SPGFM04 FRMT
 FSL
 FNL
 FMEL '99',GSWBCD3
 FCOPY ='  ]BNE KASSER' 
 FNL
 FMEL 'BBZZZ-',CMASK(CBIN1) 
 FMEL 'BBZZZ-',CMASK(CBIN2) 
 FMEL 'BBZZZ-',CMASK(CBIN3) 
 FMEL 'BBZZZ-',CMASK(CBIN4) 
 FNL
 FMEL 'BBZZZ-',CMASK(CBIN5) 
 FMEL 'BBZZZ-',CMASK(CBIN6) 
 FMEL 'BBZZZ-',CMASK(CBIN7) 
 FMEL 'BBZZZ-',CMASK(CBIN8) 
 FNL
 FMEL 'BBZZZ-',CMASK(CBIN9) 
 FMEL 'BBZZZ-',CMASK(CBIN10)
 FMEL 'BBZZZ-',CMASK(CBIN11)
 FMEL 'BBZZZ-',CMASK(CBIN12)
 FLINK FMTFKI 
 FMEND
* 
* 
SPGFM08 FRMT
 FSL
 FLINK SPGFMSPG 
 FBF GTGLSPG,SPGL081
 FILLR '*',1
SPGL081 
 FNL
 FCOPY =C' EKS.LBNR'
 FKI 14,MAXL=5
 FMEL 'XXXXX',GTLBNRIN
 FNL
 FCOPY =C'REGKONTONR' 
 FKI 14,MINL=10,MAXL=10,SCHK=1,REWRT,APPL=108 
 FMEL 'XXXXXXXXE-XX',GSWBCD7
 FNL
 FCOPY =C'CPR/CIR/NR' 
 FKI 14,MINL=7,MAXL=10,SCHK=1,REWRT,APPL=109
 FMEL 'XXXXXXE-XXXX',GSWBCD7
 FNL
 FLINK FBELOB 
 FKI 14,MAXL=12,SCHK=4,REWRT,APPL=110 
 FMEL 'TTTTTTTVTTX,XX-',GSWBCD7 
 FNL
 FCOPY =C' DIVERSE' 
 FKI 14,MAXL=2,APPL=111 
 FMEL 'XX',GSWBCD6
 FKI 18,MAXL=13,SCHK=4,REWRT
 FMEL 'TTTTTTTTTTTTX-',GSWBCD7
 FNL
 FLINK FMTEND 
 FMEND
* 
SPGFM10 FRMT
 FSL
 FLINK SPGFMSPG 
 FBF GTGLSPG,SPGL101
 FILLR '*',1
SPGL101 
 FNL
 FCOPY =C'BILAG'
 FCOPY =C' EKS.LBNR'
 FILLR ' ',1
 FTEXT C'FRA' 
 FKI 20,MAXL=5,ME 
 FMEL 'XXXXX',GSWBCD7 
 FNL
 FTAB 16
 FTEXT C'TIL' 
 FKI 20,MAXL=5,ME 
 FMEL 'XXXXX',GTLBNRIN
 FNL
 FLINK FMTEND 
 FMEND
* 
* 
FBELOB FRMT 
 FCOPY =C'BEL'
 FILLR X'5C',1
 FILLR 'B',1
 FMEND
* 
FMTEND FRMT 
 FNL
 FKI 1,MAXL=1,APPL=90,VERIF 
 FMEL 'B',TSWBCD2 
 FMEND
* 
* 
SPGFM17 FRMT
 FSL
 FTAB 6 
 FCOPY ='KASSE-KONTO '
 FNL
 FCOPY ='KONTONR' 
 FILLR ' ',6
 FCOPY ='SALDO' 
 FNL
 FMEL '99999999E-99',TTCASHAC 
 FTAB 14
 FMEL 'ZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH
 FNL
 FCOPY ='EJ EDB'
 FTAB 14
 FMEL 'ZZZ.ZZZ.ZZZ.ZZ9.99-',TTEJEDB 
 FNL
 FTAB 14
 FMEL 'ZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 
 FLINK FMTFKI 
 FMEND
* 
*           CALCULATION-FORMATS 
* 
* 
CALFRM02  FRMT
  FSL 
 FCOPY =C'REGNEFUNKTION'
 FNL
 FNL
 FKI 1,MINL=1,MAXL=11,SCHK=4,APPL=91,DUPL=GSWBCD1 
 FMEL 'TTT.TTT.TTX.XX-',GSWBCD1 
 FMEND
* 

CALFRM05 FRMT 
 FSL
 FCOPY  =C'REGNEFUNKTION' 
 FNL
 FNL
 FCOPY =C'TOTAL   ' 
 FNL
 FMEL  'ZZZ.ZZZ.ZZ9.99-',GSWBCD2
 FLINK FMTFKI 
  FMEND 
* 
* 
*        CONTROLDIGIT-FORMATS 
* 
* 
CCDFRM01  FRMT
  FSL 
  FCOPY =C'CHECKCIFFER' 
  FCOPY  ='BEREGNING' 
 FNL
 FNL
 FCOPY =C'BEREGNING'
 FTEXT 'SGRUNDLAG'
 FNL
  FKI  1,MINL=1,MAXL=10,REWRT,APPL=105
 FMEL  'ZZZZZZZZZE-9',GSWBCD6 
 FMEND
* 
CCDFRM02 FRMT 
  FSL 
 FCOPY  =C'CHECKCIFFER' 
  FCOPY  ='BEREGNING' 
 FBT GTDYFLG,CCDLAB02 
 FLINK CCDFRM03 
 FB CCDLAB03
CCDLAB02
 FNL
 FNL
 FCOPY ='CHECKCIFFER' 
 FILLR ' ',1
 FCOPY ='FEJL ' 
CCDLAB03
 FLINK FMTFKI 
 FMEND
* 
CCDFRM03 FRMT 
 FNL
 FNL
 FMEL 'ZZZZZZZZZE-9',GSWBCD6
 FILLR ' ',1
 FNL
 FCOPY =C'CHECKCIFFER'
  FILLR  '=',1
 FMEL 'B9B',GSWBCD5 
 FNL
 FMEL 'ZZZZZZZZZE-9',GSWBCD6
 FMEL  '9B',GSWBCD5 
 FMEND
* 
ADM22FRM FRMT 
 FSL
 FCOPY ='LBNR  '
 FMEL '***99',TTLBNR
 FILLR '-',3
 FKI 15,MAXL=5
 FMEL '***99',GSWBCD5 
 FMEND
* 
 END

HexDump

0x0000…0022 (0, 0, 400)   Head {h00=0x001e, h01=0x0050, text=» IDENT RGADM  02.01.XXX.1 «, t00=0x0000, t01=0x0004}
0x0022…0036               Head {h00=0x0010, h01=0x000b, text=» DDUM KMD08 «, t00=0x0000, t01=0x0026}
0x0036…0044               Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x003a}
0x0044…0058               Head {h00=0x0010, h01=0x000c, text=» ENTRY RGADM«, t00=0x0000, t01=0x0048}
0x0058…006a               Head {h00=0x000e, h01=0x0050, text=» ENTRY ADM«, t00=0x0000, t01=0x005c}
0x006a…007e               Head {h00=0x0010, h01=0x0050, text=» ENTRY CLEJ «, t00=0x0000, t01=0x006e}
0x007e…0092               Head {h00=0x0010, h01=0x0050, text=» ENTRY CLEDB«, t00=0x0000, t01=0x0082}
0x0092…00a6               Head {h00=0x0010, h01=0x0050, text=» ENTRY CLBEH«, t00=0x0000, t01=0x0096}
0x00a6…00bc               Head {h00=0x0012, h01=0x0050, text=» ENTRY RGA120 «, t00=0x0000, t01=0x00aa}
0x00bc…00d0               Head {h00=0x0010, h01=0x0050, text=» ENTRY ZERO «, t00=0x0000, t01=0x00c0}
0x00d0…00e4               Head {h00=0x0010, h01=0x0050, text=» ENTRY SKIFT«, t00=0x0000, t01=0x00d4}
0x00e4…00fa               Head {h00=0x0012, h01=0x0050, text=» ENTRY STRTWR «, t00=0x0000, t01=0x00e8}
0x00fa…0110               Head {h00=0x0012, h01=0x0050, text=» ENTRY STRTID «, t00=0x0000, t01=0x00fe}
0x0110…0126               Head {h00=0x0012, h01=0x0050, text=» ENTRY SLUTID «, t00=0x0000, t01=0x0114}
0x0126…013a               Head {h00=0x0010, h01=0x0050, text=» ENTRY SOPRD«, t00=0x0000, t01=0x012a}
0x013a…0150               Head {h00=0x0012, h01=0x0050, text=» ENTRY LAMPOF «, t00=0x0000, t01=0x013e}
0x0150…0166               Head {h00=0x0012, h01=0x0050, text=» ENTRY LAMPON «, t00=0x0000, t01=0x0154}
0x0166…017c               Head {h00=0x0012, h01=0x0050, text=» ENTRY ADMRET «, t00=0x0000, t01=0x016a}
0x017c…0186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…019c               Head {h00=0x0012, h01=0x0050, text=» ENTRY TCLOSE «, t00=0x0000, t01=0x018a}
0x019c…01b2               Head {h00=0x0012, h01=0x0050, text=» ENTRY TR2GEN «, t00=0x0001, t01=0x0010}
0x01b2…01c8               Head {h00=0x0012, h01=0x0050, text=» ENTRY WAHEAD «, t00=0x0001, t01=0x0026}
0x01c8…01de               Head {h00=0x0012, h01=0x0050, text=» ENTRY WALINE «, t00=0x0001, t01=0x003c}
0x01de…01f2               Head {h00=0x0010, h01=0x0050, text=» ENTRY BCKUP«, t00=0x0001, t01=0x0052}
0x01f2…01fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0066}
0x01fc…0210               Head {h00=0x0010, h01=0x0050, text=» EXT ADM600 «, t00=0x0001, t01=0x0070}
0x0210…0224               Head {h00=0x0010, h01=0x0050, text=» EXT CNFWRT «, t00=0x0001, t01=0x0084}
0x0224…0236               Head {h00=0x000e, h01=0x0050, text=» EXT RADEL«, t00=0x0001, t01=0x0098}
0x0236…0248               Head {h00=0x000e, h01=0x0050, text=» EXT ABORT«, t00=0x0001, t01=0x00aa}
0x0248…025c               Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0001, t01=0x00bc}
0x025c…0270               Head {h00=0x0010, h01=0x0050, text=» EXT RGREAD «, t00=0x0001, t01=0x00d0}
0x0270…0284               Head {h00=0x0010, h01=0x0050, text=» EXT TRPAGE «, t00=0x0001, t01=0x00e4}
0x0284…0298               Head {h00=0x0010, h01=0x0050, text=» EXT SETKRE «, t00=0x0001, t01=0x00f8}
0x0298…02ac               Head {h00=0x0010, h01=0x0050, text=» EXT SETDEB «, t00=0x0001, t01=0x010c}
0x02ac…02c0               Head {h00=0x0010, h01=0x0050, text=» EXT WRITJT «, t00=0x0001, t01=0x0120}
0x02c0…02d4               Head {h00=0x0010, h01=0x0050, text=» EXT INITRG «, t00=0x0001, t01=0x0134}
0x02d4…02e8               Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0001, t01=0x0148}
0x02e8…02fc               Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRS «, t00=0x0001, t01=0x015c}
0x02fc…0310               Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0001, t01=0x0170}
0x0310…0324               Head {h00=0x0010, h01=0x0050, text=» EXT SPINF1 «, t00=0x0001, t01=0x0184}
0x0324…0338               Head {h00=0x0010, h01=0x0050, text=» EXT FRMXTA «, t00=0x0002, t01=0x0008}
0x0338…034c               Head {h00=0x0010, h01=0x0050, text=» EXT WTALLY «, t00=0x0002, t01=0x001c}
0x034c…0360               Head {h00=0x0010, h01=0x0050, text=» EXT FRMTKV «, t00=0x0002, t01=0x0030}
0x0360…0372               Head {h00=0x000e, h01=0x0050, text=» EXT CRVO «, t00=0x0002, t01=0x0044}
0x0372…0386               Head {h00=0x0010, h01=0x0050, text=» EXT TCONFR «, t00=0x0002, t01=0x0056}
0x0386…039a               Head {h00=0x0010, h01=0x0050, text=» EXT FRMXSP «, t00=0x0002, t01=0x006a}
0x039a…03ae               Head {h00=0x0010, h01=0x0050, text=» EXT SPCHK5 «, t00=0x0002, t01=0x007e}
0x03ae…03be               Head {h00=0x000c, h01=0x0050, text=» EXT SUM«, t00=0x0002, t01=0x0092}
0x03be…03d2               Head {h00=0x0010, h01=0x0050, text=» EXT PACKCL «, t00=0x0002, t01=0x00a2}
0x03d2…03e6               Head {h00=0x0010, h01=0x0050, text=» EXT CLEAR8 «, t00=0x0002, t01=0x00b6}
0x03e6…03fa               Head {h00=0x0010, h01=0x0050, text=» EXT SPLIN8 «, t00=0x0002, t01=0x00ca}
0x03fa…040c               Head {h00=0x000e, h01=0x0050, text=» EXT SLUT «, t00=0x0002, t01=0x00de}
0x040c…0420               Head {h00=0x0010, h01=0x0050, text=» EXT GRASPV «, t00=0x0002, t01=0x00f0}
0x0420…0434               Head {h00=0x0010, h01=0x0050, text=» EXT FRMXVO «, t00=0x0002, t01=0x0104}
0x0434…0448               Head {h00=0x0010, h01=0x0050, text=» EXT FRMXJT «, t00=0x0002, t01=0x0118}
0x0448…045a               Head {h00=0x000e, h01=0x0050, text=» EXT KORT «, t00=0x0002, t01=0x012c}
0x045a…046c               Head {h00=0x000e, h01=0x0050, text=» EXT MODP «, t00=0x0002, t01=0x013e}
0x046c…047e               Head {h00=0x000e, h01=0x0050, text=» EXT KVIT «, t00=0x0002, t01=0x0150}
0x047e…0492               Head {h00=0x0010, h01=0x0050, text=» EXT LSTINT «, t00=0x0002, t01=0x0162}
0x0492…04a6               Head {h00=0x0010, h01=0x0050, text=» EXT SUBTOT «, t00=0x0002, t01=0x0176}
0x04a6…04b6               Head {h00=0x000c, h01=0x0050, text=» EXT CYK«, t00=0x0002, t01=0x018a}
0x04b6…04c8               Head {h00=0x000e, h01=0x0050, text=» EXT DIVTR«, t00=0x0003, t01=0x000a}
0x04c8…04dc               Head {h00=0x0010, h01=0x0050, text=» EXT TCONFW «, t00=0x0003, t01=0x001c}
0x04dc…04f0               Head {h00=0x0010, h01=0x0050, text=» EXT CONFWR «, t00=0x0003, t01=0x0030}
0x04f0…0504               Head {h00=0x0010, h01=0x0050, text=» EXT WRITFD «, t00=0x0003, t01=0x0044}
0x0504…0518               Head {h00=0x0010, h01=0x0050, text=» EXT SQWRIT «, t00=0x0003, t01=0x0058}
0x0518…052c               Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0003, t01=0x006c}
0x052c…0540               Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0003, t01=0x0080}
0x0540…0554               Head {h00=0x0010, h01=0x0050, text=» EXT ASGVOL «, t00=0x0003, t01=0x0094}
0x0554…0568               Head {h00=0x0010, h01=0x0050, text=» EXT CLSVOL «, t00=0x0003, t01=0x00a8}
0x0568…057a               Head {h00=0x000e, h01=0x0050, text=» EXT CRKJ «, t00=0x0003, t01=0x00bc}
0x057a…058e               Head {h00=0x0010, h01=0x0050, text=» EXT BACKUP «, t00=0x0003, t01=0x00ce}
0x058e…05a2               Head {h00=0x0010, h01=0x0050, text=» EXT CONRDX «, t00=0x0003, t01=0x00e2}
0x05a2…05b6               Head {h00=0x0010, h01=0x0050, text=» EXT RSTORE «, t00=0x0003, t01=0x00f6}
0x05b6…05c8               Head {h00=0x000e, h01=0x0050, text=» EXT SETMK«, t00=0x0003, t01=0x010a}
0x05c8…05dc               Head {h00=0x0010, h01=0x0050, text=» EXT WRITID «, t00=0x0003, t01=0x011c}
0x05dc…05ee               Head {h00=0x000e, h01=0x0050, text=» EXT KTOPR«, t00=0x0003, t01=0x0130}
0x05ee…0600               Head {h00=0x000e, h01=0x0050, text=» EXT KTPRT«, t00=0x0003, t01=0x0142}
0x0600…0614               Head {h00=0x0010, h01=0x0050, text=» EXT ONLINE «, t00=0x0003, t01=0x0154}
0x0614…061e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0168}
0x061e…0636               Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0003, t01=0x0172}
0x0636…0640               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x018a}
0x0640…064e (4, 0, 400)   Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0004}
0x064e…065c               Head {h00=0x000a, h01=0x0005, text=»RGADM «, t00=0x0004, t01=0x0012}
0x065c…0672               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0004, t01=0x0020}
0x0672…068c               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0004, t01=0x0036}
0x068c…06a4               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADFRM01 «, t00=0x0004, t01=0x0050}
0x06a4…06b8               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0004, t01=0x0068}
0x06b8…06fc               Head {h00=0x0040, h01=0x0050, text=» IB SPBINW2,RGADM,RGADM,RGADM,RGADM,RGA100,RGA200,RGA300,  C«, t00=0x0004, t01=0x007c}
0x06fc…0718               Head {h00=0x0018, h01=0x0050, text=»  RGADM,RGADM,RGA007«, t00=0x0004, t01=0x00c0}
0x0718…0728               Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0004, t01=0x00dc}
0x0728…0732               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ec}
0x0732…074c               Head {h00=0x0016, h01=0x0050, text=»RGA007   GO ONLINE«, t00=0x0004, t01=0x00f6}
0x074c…0764               Head {h00=0x0014, h01=0x0050, text=» PERF ADM,CBIN7 «, t00=0x0004, t01=0x0110}
0x0764…0774               Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0004, t01=0x0128}
0x0774…077e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0138}
0x077e…078c               Head {h00=0x000a, h01=0x0050, text=»RGA100«, t00=0x0004, t01=0x0142}
0x078c…0796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0150}
0x0796…07d6               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0004, t01=0x015a}
0x07d6…07e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000a}
0x07e0…0808               Head {h00=0x0024, h01=0x0050, text=»*                   OPEN ROUTINE«, t00=0x0005, t01=0x0014}
0x0808…0812               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003c}
0x0812…0852               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0005, t01=0x0046}
0x0852…085c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0086}
0x085c…0878               Head {h00=0x0018, h01=0x0050, text=» TBT CCONVFLG,RGADM «, t00=0x0005, t01=0x0090}
0x0878…088e               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x0005, t01=0x00ac}
0x088e…08a4               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0005, t01=0x00c2}
0x08a4…08b6               Head {h00=0x000e, h01=0x0050, text=» SET SPME «, t00=0x0005, t01=0x00d8}
0x08b6…08d8               Head {h00=0x001e, h01=0x0050, text=» MOVE GSWBCD3,=X'FF' ERASE«, t00=0x0005, t01=0x00ea}
0x08d8…08e6               Head {h00=0x000a, h01=0x0050, text=»RGA105«, t00=0x0005, t01=0x010c}
0x08e6…08fe               Head {h00=0x0014, h01=0x0050, text=» ATTFMT OPENFRM «, t00=0x0005, t01=0x011a}
0x08fe…0912               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x0005, t01=0x0132}
0x0912…0938               Head {h00=0x0022, h01=0x0050, text=» IB SPBINW2,RGADM,RGADM,RGA110«, t00=0x0005, t01=0x0146}
0x0938…0948               Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0005, t01=0x016c}
0x0948…0956               Head {h00=0x000a, h01=0x0050, text=»RGA110«, t00=0x0005, t01=0x017c}
0x0956…0972               Head {h00=0x0018, h01=0x0050, text=» MOVE TTEJEDB,=D'0' «, t00=0x0005, t01=0x018a}
0x0972…09a2               Head {h00=0x002c, h01=0x0050, text=» MUL TTSTLBNR,=D'-1' SET POSITIVE (OPEN)«, t00=0x0006, t01=0x0016}
0x09a2…09d8               Head {h00=0x0032, h01=0x0050, text=» MUL CMASK(TTASKNR),=D'-1' SET CMASK >0, OPEN «, t00=0x0006, t01=0x0046}
0x09d8…09f6               Head {h00=0x001a, h01=0x0050, text=» MOVE TTCASH,TTSTCASH «, t00=0x0006, t01=0x007c}
0x09f6…0a1a               Head {h00=0x0020, h01=0x0050, text=» CBNE TTSTLBNR,=D'0',RGA115 «, t00=0x0006, t01=0x009a}
0x0a1a…0a36               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTLBNR,=D'1'«, t00=0x0006, t01=0x00be}
0x0a36…0a44               Head {h00=0x000a, h01=0x0050, text=»RGA115«, t00=0x0006, t01=0x00da}
0x0a44…0a62               Head {h00=0x001a, h01=0x0050, text=» MOVE TTLBNR,TTSTLBNR «, t00=0x0006, t01=0x00e8}
0x0a62…0a7c               Head {h00=0x0016, h01=0x0050, text=» SUB TTLBNR,=D'1' «, t00=0x0006, t01=0x0106}
0x0a7c…0a9a               Head {h00=0x001a, h01=0x0050, text=» MOVE TTRECOPN,CRECBCD«, t00=0x0006, t01=0x0120}
0x0a9a…0aac               Head {h00=0x000e, h01=0x0050, text=» PERF ZERO«, t00=0x0006, t01=0x013e}
0x0aac…0ae2               Head {h00=0x0032, h01=0x0050, text=» PERF TCONFW,TTASKNR STORE INF FROM ADM FUNC. «, t00=0x0006, t01=0x0150}
0x0ae2…0af6               Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x0006, t01=0x0186}
0x0af6…0b20               Head {h00=0x0026, h01=0x0050, text=» PERF WRITJT,=W'5' OPEN MES ON JT «, t00=0x0007, t01=0x000a}
0x0b20…0b34               Head {h00=0x0010, h01=0x0050, text=» SET GTKASSE«, t00=0x0007, t01=0x0034}
0x0b34…0b4e               Head {h00=0x0016, h01=0x0050, text=» ADD CTASKNR,CBIN1«, t00=0x0007, t01=0x0048}
0x0b4e…0b5c               Head {h00=0x000a, h01=0x0050, text=»RGA120«, t00=0x0007, t01=0x0062}
0x0b5c…0b84               Head {h00=0x0024, h01=0x0050, text=» PERF INITRG START REGISTRATION «, t00=0x0007, t01=0x0070}
0x0b84…0b9e               Head {h00=0x0016, h01=0x0050, text=» PERF TCLOSE CLOSE«, t00=0x0007, t01=0x0098}
0x0b9e…0bb2               Head {h00=0x0010, h01=0x0050, text=» BNOK RGA120«, t00=0x0007, t01=0x00b2}
0x0bb2…0bcc               Head {h00=0x0016, h01=0x0050, text=» SUB CTASKNR,CBIN1«, t00=0x0007, t01=0x00c6}
0x0bcc…0bdc               Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0007, t01=0x00e0}
0x0bdc…0bea               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00f0}
0x0bea…0bfe               Head {h00=0x0010, h01=0x0050, text=»TCLOSE PROC «, t00=0x0007, t01=0x00fe}
0x0bfe…0c18               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0007, t01=0x0112}
0x0c18…0c26               Head {h00=0x000a, h01=0x0050, text=»TCL000«, t00=0x0007, t01=0x012c}
0x0c26…0c3c               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0007, t01=0x013a}
0x0c3c…0c54               Head {h00=0x0014, h01=0x0050, text=» ATTFMT CLFRM01 «, t00=0x0007, t01=0x0150}
0x0c54…0c68               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0007, t01=0x0168}
0x0c68…0c90               Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,TCLMAK,TCLMAK,TCL010«, t00=0x0007, t01=0x017c}
0x0c90…0ca2               Head {h00=0x000e, h01=0x0050, text=» B TCL000 «, t00=0x0008, t01=0x0014}
0x0ca2…0cb0               Head {h00=0x000a, h01=0x0050, text=»TCL010«, t00=0x0008, t01=0x0026}
0x0cb0…0cca               Head {h00=0x0016, h01=0x0050, text=»*     CLEAR FLAGS «, t00=0x0008, t01=0x0034}
0x0cca…0ce2               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSUMKEY «, t00=0x0008, t01=0x004e}
0x0ce2…0cfa               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTTSTFLG «, t00=0x0008, t01=0x0066}
0x0cfa…0d12               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY1FLG «, t00=0x0008, t01=0x007e}
0x0d12…0d2a               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTCY2FLG «, t00=0x0008, t01=0x0096}
0x0d2a…0d42               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTLSTFLG «, t00=0x0008, t01=0x00ae}
0x0d42…0d5a               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTPSEFLG «, t00=0x0008, t01=0x00c6}
0x0d5a…0d72               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUMFLG «, t00=0x0008, t01=0x00de}
0x0d72…0d8a               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x0008, t01=0x00f6}
0x0d8a…0da0               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTCYFLG«, t00=0x0008, t01=0x010e}
0x0da0…0db8               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSUBFLG «, t00=0x0008, t01=0x0124}
0x0db8…0dd4               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x0008, t01=0x013c}
0x0dd4…0df0               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUMMRK,=C' '«, t00=0x0008, t01=0x0158}
0x0df0…0e0a               Head {h00=0x0016, h01=0x0050, text=» MOVE GTTEXT,=C' '«, t00=0x0008, t01=0x0174}
0x0e0a…0e24               Head {h00=0x0016, h01=0x0050, text=» MOVE GTSUM,=D'0' «, t00=0x0008, t01=0x018e}
0x0e24…0e38               Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0009, t01=0x0018}
0x0e38…0e52               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0009, t01=0x002c}
0x0e52…0e7e               Head {h00=0x0028, h01=0x0050, text=»*                  TR12 ACCUMULATORS«, t00=0x0009, t01=0x0046}
0x0e7e…0e9a               Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGNR,=D'2' «, t00=0x0009, t01=0x0072}
0x0e9a…0eb6               Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGDEX,CBIN2«, t00=0x0009, t01=0x008e}
0x0eb6…0eca               Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x0009, t01=0x00aa}
0x0eca…0ee6               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0009, t01=0x00be}
0x0ee6…0ef4               Head {h00=0x000a, h01=0x0050, text=»TCL025«, t00=0x0009, t01=0x00da}
0x0ef4…0f18               Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(GSWBIN1),=X'FF'«, t00=0x0009, t01=0x00e8}
0x0f18…0f32               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0009, t01=0x010c}
0x0f32…0f56               Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBINMAX,TCL025 «, t00=0x0009, t01=0x0126}
0x0f56…0f72               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'0' «, t00=0x0009, t01=0x014a}
0x0f72…0f80               Head {h00=0x000a, h01=0x0050, text=»TCL030«, t00=0x0009, t01=0x0166}
0x0f80…0fa2               Head {h00=0x001e, h01=0x0050, text=» ADD GSWBCD5,=D'1' ACC NR «, t00=0x0009, t01=0x0174}
0x0fa2…0fb0               Head {h00=0x000a, h01=0x0050, text=»TCL035«, t00=0x000a, t01=0x0008}
0x0fb0…0fd6               Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 CONVERT «, t00=0x000a, t01=0x0016}
0x0fd6…1006               Head {h00=0x002c, h01=0x0050, text=» CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL100«, t00=0x000a, t01=0x003c}
0x1006…1030               Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN5,CTR12(TTASKNR,CBIN1) «, t00=0x000a, t01=0x006c}
0x1030…105c               Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5)«, t00=0x000a, t01=0x0096}
0x105c…1084               Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN1),=D'0',TCL030 «, t00=0x000a, t01=0x00c2}
0x1084…10b6               Head {h00=0x002e, h01=0x0050, text=» MOVE GTUSED(CBIN1),CBIN5 INDICATE UPDATED«, t00=0x000a, t01=0x00ea}
0x10b6…10e8               Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) «, t00=0x000a, t01=0x011c}
0x10e8…1110               Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN4),=D'0',TCL040 «, t00=0x000a, t01=0x014e}
0x1110…1132               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000a, t01=0x0176}
0x1132…115c               Head {h00=0x0026, h01=0x0050, text=» MOVE GSWSTR20,=C'EJ-EDB T[LLER ' «, t00=0x000b, t01=0x0008}
0x115c…117a               Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD1,GSWBCD5 «, t00=0x000b, t01=0x0032}
0x117a…11ae               Head {h00=0x0030, h01=0x0050, text=» PERF TR2GEN,CBIN1 GENERATE TR2 WITH KREDIT «, t00=0x000b, t01=0x0050}
0x11ae…11c2               Head {h00=0x0010, h01=0x0050, text=» BNOK TCL035«, t00=0x000b, t01=0x0084}
0x11c2…11d0               Head {h00=0x000a, h01=0x0050, text=»TCL040«, t00=0x000b, t01=0x0098}
0x11d0…11ee               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 «, t00=0x000b, t01=0x00a6}
0x11ee…1218               Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN5,CTR12(TTASKNR,CBIN1) «, t00=0x000b, t01=0x00c4}
0x1218…124a               Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2) «, t00=0x000b, t01=0x00ee}
0x124a…1272               Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN4),=D'0',TCL030 «, t00=0x000b, t01=0x0120}
0x1272…1294               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000b, t01=0x0148}
0x1294…12be               Head {h00=0x0026, h01=0x0050, text=» MOVE GSWSTR20,=C'EJ-EDB T[LLER ' «, t00=0x000b, t01=0x016a}
0x12be…12dc (12, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD1,GSWBCD5 «, t00=0x000c, t01=0x0004}
0x12dc…130e               Head {h00=0x002e, h01=0x0050, text=» PERF TR2GEN,CBIN2 GENERATE TR2 WITH DEBET«, t00=0x000c, t01=0x0022}
0x130e…1322               Head {h00=0x0010, h01=0x0050, text=» BNOK TCL040«, t00=0x000c, t01=0x0054}
0x1322…1334               Head {h00=0x000e, h01=0x0050, text=» B TCL030 «, t00=0x000c, t01=0x0068}
0x1334…1342               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x007a}
0x1342…1350               Head {h00=0x000a, h01=0x0050, text=»TCL100«, t00=0x000c, t01=0x0088}
0x1350…1372               Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL   '«, t00=0x000c, t01=0x0096}
0x1372…138c               Head {h00=0x0016, h01=0x0050, text=» PERF CLEJ EJ EDB «, t00=0x000c, t01=0x00b8}
0x138c…13a8               Head {h00=0x0018, h01=0x0050, text=» MOVE TTEJEDB,=D'0' «, t00=0x000c, t01=0x00d2}
0x13a8…13b6               Head {h00=0x000a, h01=0x0050, text=»TCL205«, t00=0x000c, t01=0x00ee}
0x13b6…13ce               Head {h00=0x0014, h01=0x0050, text=»   CASH MOVEMENT«, t00=0x000c, t01=0x00fc}
0x13ce…13fc               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN1),TTCASHAC ACCOUNTNR«, t00=0x000c, t01=0x0114}
0x13fc…142c               Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTCASH CURRENT CASH «, t00=0x000c, t01=0x0142}
0x142c…145c               Head {h00=0x002c, h01=0x0050, text=» SUB GTDUPF(CBIN4),TTSTCASH INITIAL CASH«, t00=0x000c, t01=0x0172}
0x145c…147e               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN1),CBIN5 «, t00=0x000d, t01=0x0012}
0x147e…14a0               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000d, t01=0x0034}
0x14a0…14c8               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'KASSE-KONTO ' «, t00=0x000d, t01=0x0056}
0x14c8…14e4               Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x000d, t01=0x007e}
0x14e4…14f8               Head {h00=0x0010, h01=0x0050, text=» SET GTTFLG «, t00=0x000d, t01=0x009a}
0x14f8…1512               Head {h00=0x0016, h01=0x0050, text=» PERF TR2GEN,CBIN0«, t00=0x000d, t01=0x00ae}
0x1512…1526               Head {h00=0x0010, h01=0x0050, text=» BNOK TCL205«, t00=0x000d, t01=0x00c8}
0x1526…1542               Head {h00=0x0018, h01=0x0050, text=» TBF CCLKTFLG,TCL230«, t00=0x000d, t01=0x00dc}
0x1542…1566               Head {h00=0x0020, h01=0x0050, text=» PERF KORT ASK FOR KONTOKORT«, t00=0x000d, t01=0x00f8}
0x1566…1574               Head {h00=0x000a, h01=0x0050, text=»TCL230«, t00=0x000d, t01=0x011c}
0x1574…1596               Head {h00=0x001e, h01=0x0050, text=» CBE TVERSUR,=D'0',TCL235 «, t00=0x000d, t01=0x012a}
0x1596…15c4               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN1),TVERSUR REMIT ACC «, t00=0x000d, t01=0x014c}
0x15c4…15f2               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTACC(CBIN6,CBIN1)«, t00=0x000d, t01=0x017a}
0x15f2…1620               Head {h00=0x002a, h01=0x0050, text=» ADD GTDUPF(CBIN4),TTACC(CBIN6,CBIN2) «, t00=0x000e, t01=0x0018}
0x1620…1648               Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN4),=D'0',TCL235 «, t00=0x000e, t01=0x0046}
0x1648…166a               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN1),CBIN5 «, t00=0x000e, t01=0x006e}
0x166a…168c               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),=W'-8'«, t00=0x000e, t01=0x0090}
0x168c…16ae               Head {h00=0x001e, h01=0x0050, text=» MUL GTDUPF(CBIN4),=D'-1' «, t00=0x000e, t01=0x00b2}
0x16ae…16de               Head {h00=0x002c, h01=0x0050, text=» MOVE GSWSTR20,=C'VERSUR KONTONR REMIT '«, t00=0x000e, t01=0x00d4}
0x16de…16fa               Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x000e, t01=0x0104}
0x16fa…1714               Head {h00=0x0016, h01=0x0050, text=» PERF TR2GEN,CBIN0«, t00=0x000e, t01=0x0120}
0x1714…1728               Head {h00=0x0010, h01=0x0050, text=» BNOK TCL230«, t00=0x000e, t01=0x013a}
0x1728…1744               Head {h00=0x0018, h01=0x0050, text=» TBF CCLKTFLG,TCL235«, t00=0x000e, t01=0x014e}
0x1744…1756               Head {h00=0x000e, h01=0x0050, text=» PERF KORT«, t00=0x000e, t01=0x016a}
0x1756…1760               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x017c}
0x1760…1794               Head {h00=0x0030, h01=0x0050, text=»*       WRITING OF DISC JOURNAL AND VOUCHER «, t00=0x000e, t01=0x0186}
0x1794…179e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x002a}
0x179e…17ac               Head {h00=0x000a, h01=0x0050, text=»TCL235«, t00=0x000f, t01=0x0034}
0x17ac…17ce               Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL   '«, t00=0x000f, t01=0x0042}
0x17ce…17e2               Head {h00=0x0010, h01=0x0050, text=» PERF CLEDB «, t00=0x000f, t01=0x0064}
0x17e2…17ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0078}
0x17ec…180a               Head {h00=0x001a, h01=0x0050, text=»*  BEHOLDNINGST[LLERE «, t00=0x000f, t01=0x0082}
0x180a…1814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a0}
0x1814…1828               Head {h00=0x0010, h01=0x0050, text=» PERF CLBEH «, t00=0x000f, t01=0x00aa}
0x1828…1832               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00be}
0x1832…1840               Head {h00=0x000a, h01=0x0050, text=»TCL500«, t00=0x000f, t01=0x00c8}
0x1840…185e               Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTCASH,TTCASH «, t00=0x000f, t01=0x00d6}
0x185e…187c               Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTLBNR,TTLBNR «, t00=0x000f, t01=0x00f4}
0x187c…1898               Head {h00=0x0018, h01=0x0050, text=» ADD TTSTLBNR,=D'1' «, t00=0x000f, t01=0x0112}
0x1898…18ca               Head {h00=0x002e, h01=0x0050, text=» MUL TTSTLBNR,=D'-1' SET NEGATIVE (CLOSE) «, t00=0x000f, t01=0x012e}
0x18ca…1902               Head {h00=0x0034, h01=0x0050, text=» MUL CMASK(TTASKNR),=D'-1' SET CMASK < 0, CLOSE «, t00=0x000f, t01=0x0160}
0x1902…1918               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTFLG «, t00=0x0010, t01=0x0008}
0x1918…1926               Head {h00=0x000a, h01=0x0050, text=»TCL550«, t00=0x0010, t01=0x001e}
0x1926…1944               Head {h00=0x001a, h01=0x0050, text=» MOVE TTRECOPN,CRECBCD«, t00=0x0010, t01=0x002c}
0x1944…1956               Head {h00=0x000e, h01=0x0050, text=» PERF ZERO«, t00=0x0010, t01=0x004a}
0x1956…198c               Head {h00=0x0032, h01=0x0050, text=» PERF TCONFW,TTASKNR STORE NEW INITIAL VALUES «, t00=0x0010, t01=0x005c}
0x198c…19a0               Head {h00=0x0010, h01=0x0050, text=» PERF CONFWR«, t00=0x0010, t01=0x0092}
0x19a0…19b4               Head {h00=0x0010, h01=0x0050, text=» BNOK TCL550«, t00=0x0010, t01=0x00a6}
0x19b4…19ca               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTKASSE«, t00=0x0010, t01=0x00ba}
0x19ca…19d8               Head {h00=0x000a, h01=0x0050, text=»TCLRET«, t00=0x0010, t01=0x00d0}
0x19d8…19f6               Head {h00=0x001a, h01=0x0050, text=»*   ZERONIZE COUNTERS «, t00=0x0010, t01=0x00de}
0x19f6…1a14               Head {h00=0x001a, h01=0x0050, text=»*   TRANS 12 COUNTERS «, t00=0x0010, t01=0x00fc}
0x1a14…1a30               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR20,=C'*'«, t00=0x0010, t01=0x011a}
0x1a30…1a4c               Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'12' «, t00=0x0010, t01=0x0136}
0x1a4c…1a6a               Head {h00=0x001a, h01=0x0050, text=» CMP CBIN0,CBIN0 DUMMY«, t00=0x0010, t01=0x0152}
0x1a6a…1a76               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0170}
0x1a76…1a86               Head {h00=0x000c, h01=0x0050, text=»TCLNOK10«, t00=0x0010, t01=0x017c}
0x1a86…1a94               Head {h00=0x000a, h01=0x0050, text=»TCLMAK«, t00=0x0010, t01=0x018c}
0x1a94…1aac               Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0011, t01=0x000a}
0x1aac…1ab8               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x0022}
0x1ab8…1ac6               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0011, t01=0x002e}
0x1ac6…1ad4               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x003c}
0x1ad4…1ae2               Head {h00=0x000a, h01=0x0050, text=»RGA200«, t00=0x0011, t01=0x004a}
0x1ae2…1b1a               Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0011, t01=0x0058}
0x1b1a…1b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0090}
0x1b24…1b5c               Head {h00=0x0034, h01=0x0050, text=»*                PERFORM OF SELECTED ADM ROUTINE«, t00=0x0011, t01=0x009a}
0x1b5c…1b66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00d2}
0x1b66…1ba0               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0011, t01=0x00dc}
0x1ba0…1baa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0116}
0x1baa…1bc8               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0011, t01=0x0120}
0x1bc8…1be2               Head {h00=0x0016, h01=0x0050, text=» PERF ADM,GSWBIN1 «, t00=0x0011, t01=0x013e}
0x1be2…1bf2               Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0011, t01=0x0158}
0x1bf2…1c00               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0168}
0x1c00…1c12               Head {h00=0x000e, h01=0x0050, text=»ZERO PROC «, t00=0x0011, t01=0x0176}
0x1c12…1c1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0188}
0x1c1c…1c3a (18, 0, 400)  Head {h00=0x001a, h01=0x0050, text=»*   ZERONIZE COUNTERS «, t00=0x0012, t01=0x0004}
0x1c3a…1c58               Head {h00=0x001a, h01=0x0050, text=»*   TRANS 12 COUNTERS «, t00=0x0012, t01=0x0022}
0x1c58…1c82               Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,CTR12(TTASKNR,CBIN1)«, t00=0x0012, t01=0x0040}
0x1c82…1ca0               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN1 «, t00=0x0012, t01=0x006a}
0x1ca0…1cca               Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN2,CTR12(TTASKNR,CBIN2) «, t00=0x0012, t01=0x0088}
0x1cca…1cd8               Head {h00=0x000a, h01=0x0050, text=»TCL610«, t00=0x0012, t01=0x00b2}
0x1cd8…1cf2               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0012, t01=0x00c0}
0x1cf2…1d16               Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN1,GSWBIN2,TCL615 «, t00=0x0012, t01=0x00da}
0x1d16…1d40               Head {h00=0x0026, h01=0x0050, text=» MOVE C12ACC(GSWBIN1,CBIN1),=D'0' «, t00=0x0012, t01=0x00fe}
0x1d40…1d6a               Head {h00=0x0026, h01=0x0050, text=» MOVE C12ACC(GSWBIN1,CBIN2),=D'0' «, t00=0x0012, t01=0x0128}
0x1d6a…1d7c               Head {h00=0x000e, h01=0x0050, text=» B TCL610 «, t00=0x0012, t01=0x0152}
0x1d7c…1d8a               Head {h00=0x000a, h01=0x0050, text=»TCL615«, t00=0x0012, t01=0x0164}
0x1d8a…1da2               Head {h00=0x0014, h01=0x0050, text=»*   ACCUMULATORS«, t00=0x0012, t01=0x0172}
0x1da2…1dbe               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0012, t01=0x018a}
0x1dbe…1dcc               Head {h00=0x000a, h01=0x0050, text=»TCL620«, t00=0x0013, t01=0x0016}
0x1dcc…1de6               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x0013, t01=0x0024}
0x1de6…1e0e               Head {h00=0x0024, h01=0x0050, text=» MOVE TTACC(GSWBIN1,CBIN1),=D'0'«, t00=0x0013, t01=0x003e}
0x1e0e…1e36               Head {h00=0x0024, h01=0x0050, text=» MOVE TTACC(GSWBIN1,CBIN2),=D'0'«, t00=0x0013, t01=0x0066}
0x1e36…1e58               Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN1,CBIN8,TCL620 «, t00=0x0013, t01=0x008e}
0x1e58…1e64               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0013, t01=0x00b0}
0x1e64…1e72               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0013, t01=0x00bc}
0x1e72…1e80               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x00ca}
0x1e80…1e92               Head {h00=0x000e, h01=0x0050, text=»CLEJ PROC «, t00=0x0013, t01=0x00d8}
0x1e92…1ed0               Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x0013, t01=0x00ea}
0x1ed0…1eda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0128}
0x1eda…1f0c               Head {h00=0x002e, h01=0x0050, text=»*             NOW ALL ACCUMULATORS NOT = 0«, t00=0x0013, t01=0x0132}
0x1f0c…1f36               Head {h00=0x0026, h01=0x0050, text=»*             HAS BEEN REGISTRATED«, t00=0x0013, t01=0x0164}
0x1f36…1f6c               Head {h00=0x0032, h01=0x0050, text=»*             A VOUCHER PRINT OF ALL TR12 ACC «, t00=0x0013, t01=0x018e}
0x1f6c…1f92               Head {h00=0x0022, h01=0x0050, text=»*             IS NOW PERFORMED«, t00=0x0014, t01=0x0034}
0x1f92…1f9c               Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0014, t01=0x005a}
0x1f9c…1fdc               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0014, t01=0x0064}
0x1fdc…1ff8               Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x0014, t01=0x00a4}
0x1ff8…2020               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,='EJ-EDB T[LLER '«, t00=0x0014, t01=0x00c0}
0x2020…2050               Head {h00=0x002c, h01=0x0050, text=» CBE CTR12(TTASKNR,CBIN2),CBIN0,TCLEJRET«, t00=0x0014, t01=0x00e8}
0x2050…206a               Head {h00=0x0016, h01=0x0050, text=» PERF WAHEAD,CBIN8«, t00=0x0014, t01=0x0118}
0x206a…2086               Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x0014, t01=0x0132}
0x2086…2094               Head {h00=0x000a, h01=0x0050, text=»TCL110«, t00=0x0014, t01=0x014e}
0x2094…20ae               Head {h00=0x0016, h01=0x0050, text=» ADD GTWBCD1,=D'1'«, t00=0x0014, t01=0x015c}
0x20ae…20d4               Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN5,GTWBCD1 CONVERT «, t00=0x0014, t01=0x0176}
0x20d4…2104               Head {h00=0x002c, h01=0x0050, text=» CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL200«, t00=0x0015, t01=0x000c}
0x2104…212e               Head {h00=0x0026, h01=0x0050, text=» ADD GSWBIN5,CTR12(TTASKNR,CBIN1) «, t00=0x0015, t01=0x003c}
0x212e…2160               Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) «, t00=0x0015, t01=0x0066}
0x2160…2190               Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2)«, t00=0x0015, t01=0x0098}
0x2190…21bc               Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5)«, t00=0x0015, t01=0x00c8}
0x21bc…21e4               Head {h00=0x0024, h01=0x0050, text=» CBE GTDUPF(CBIN1),=D'0',TCL110 «, t00=0x0015, t01=0x00f4}
0x21e4…2206               Head {h00=0x001e, h01=0x0050, text=» CBG TTLINNR,=D'0',TCL190 «, t00=0x0015, t01=0x011c}
0x2206…2220               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0015, t01=0x013e}
0x2220…223c               Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x0015, t01=0x0158}
0x223c…2256               Head {h00=0x0016, h01=0x0050, text=» PERF WAHEAD,CBIN8«, t00=0x0015, t01=0x0174}
0x2256…2264               Head {h00=0x000a, h01=0x0050, text=»TCL190«, t00=0x0015, t01=0x018e}
0x2264…227e               Head {h00=0x0016, h01=0x0050, text=» PERF WALINE,CBIN9«, t00=0x0016, t01=0x000c}
0x227e…2290               Head {h00=0x000e, h01=0x0050, text=» B TCL110 «, t00=0x0016, t01=0x0026}
0x2290…229e               Head {h00=0x000a, h01=0x0050, text=»TCL200«, t00=0x0016, t01=0x0038}
0x229e…22b8               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0016, t01=0x0046}
0x22b8…22c8               Head {h00=0x000c, h01=0x0050, text=»TCLEJRET«, t00=0x0016, t01=0x0060}
0x22c8…22d4               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x0070}
0x22d4…22e2               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x007c}
0x22e2…22f0               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x008a}
0x22f0…2302               Head {h00=0x000e, h01=0x0050, text=»CLEDB PROC«, t00=0x0016, t01=0x0098}
0x2302…230c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00aa}
0x230c…2340               Head {h00=0x0030, h01=0x0050, text=»*       WRITING OF DISC JOURNAL AND VOUCHER «, t00=0x0016, t01=0x00b4}
0x2340…234a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00e8}
0x234a…2372               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'EDB-T[LLERE ' «, t00=0x0016, t01=0x00f2}
0x2372…238c               Head {h00=0x0016, h01=0x0050, text=» PERF WRITJT,=W'6'«, t00=0x0016, t01=0x011a}
0x238c…23a6               Head {h00=0x0016, h01=0x0050, text=» PERF WAHEAD,CBIN8«, t00=0x0016, t01=0x0134}
0x23a6…23c2               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'0' «, t00=0x0016, t01=0x014e}
0x23c2…23ea               Head {h00=0x0024, h01=0x0050, text=» MOVE GTREGF(CBIN1),=D'0' TOTAL «, t00=0x0016, t01=0x016a}
0x23ea…240c (23, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN2),=D'0' «, t00=0x0017, t01=0x0004}
0x240c…241a               Head {h00=0x000a, h01=0x0050, text=»TCL240«, t00=0x0017, t01=0x0026}
0x241a…2436               Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL242«, t00=0x0017, t01=0x0034}
0x2436…2452               Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGNR,=D'11'«, t00=0x0017, t01=0x0050}
0x2452…2460               Head {h00=0x000a, h01=0x0050, text=»TCL242«, t00=0x0017, t01=0x006c}
0x2460…247a               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD5,=D'1'«, t00=0x0017, t01=0x007a}
0x247a…2488               Head {h00=0x000a, h01=0x0050, text=»TCL245«, t00=0x0017, t01=0x0094}
0x2488…24a6               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 «, t00=0x0017, t01=0x00a2}
0x24a6…24c8               Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN5,CBIN6,TCL300 «, t00=0x0017, t01=0x00c0}
0x24c8…24f8               Head {h00=0x002c, h01=0x0050, text=» ADD GTREGF(CBIN1),TTACC(GSWBIN5,CBIN1) «, t00=0x0017, t01=0x00e2}
0x24f8…2528               Head {h00=0x002c, h01=0x0050, text=» ADD GTREGF(CBIN2),TTACC(GSWBIN5,CBIN2) «, t00=0x0017, t01=0x0112}
0x2528…254a               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN4),CBIN0 «, t00=0x0017, t01=0x0142}
0x254a…257a               Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN1)«, t00=0x0017, t01=0x0164}
0x257a…25aa (24, 0, 398)  Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN2) «, t00=0x0018, t01=0x0004}
0x25aa…25da               Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN6),TTACC(GSWBIN5,CBIN1)«, t00=0x0018, t01=0x0034}
0x25da…2610               Head {h00=0x0032, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTACC(GSWBIN5,CBIN2) DEBET«, t00=0x0018, t01=0x0064}
0x2610…262c               Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL290«, t00=0x0018, t01=0x009a}
0x262c…2650               Head {h00=0x0020, h01=0x0050, text=» MOVE GTUSED(CBIN6),=W'-53' «, t00=0x0018, t01=0x00b6}
0x2650…2674               Head {h00=0x0020, h01=0x0050, text=» MOVE GTUSED(CBIN5),=W'-52' «, t00=0x0018, t01=0x00da}
0x2674…2698               Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN1),GSWBCD5 «, t00=0x0018, t01=0x00fe}
0x2698…26ba               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN1),=W'50'«, t00=0x0018, t01=0x0122}
0x26ba…26ea               Head {h00=0x002c, h01=0x0050, text=» MOVE GTDUPF(CBIN2),=D'2' MARK FOR TOTAL«, t00=0x0018, t01=0x0144}
0x26ea…270c               Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN2),=W'51'«, t00=0x0018, t01=0x0174}
0x270c…271e               Head {h00=0x000e, h01=0x0050, text=» PERF CRKJ«, t00=0x0019, t01=0x0008}
0x271e…2732               Head {h00=0x0010, h01=0x0050, text=» PERF WRITFD«, t00=0x0019, t01=0x001a}
0x2732…2746               Head {h00=0x0010, h01=0x0050, text=» BNOK TCL245«, t00=0x0019, t01=0x002e}
0x2746…2754               Head {h00=0x000a, h01=0x0050, text=»TCL290«, t00=0x0019, t01=0x0042}
0x2754…277a               Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBIN5,GSWBCD5 RESTORE «, t00=0x0019, t01=0x0050}
0x277a…2798               Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD1,GSWBCD5 «, t00=0x0019, t01=0x0076}
0x2798…27b2               Head {h00=0x0016, h01=0x0050, text=» PERF WRITJT,=W'7'«, t00=0x0019, t01=0x0094}
0x27b2…27ce               Head {h00=0x0018, h01=0x0050, text=» PERF WALINE,CBIN10 «, t00=0x0019, t01=0x00ae}
0x27ce…27e0               Head {h00=0x000e, h01=0x0050, text=» B TCL240 «, t00=0x0019, t01=0x00ca}
0x27e0…27ee               Head {h00=0x000a, h01=0x0050, text=»TCL300«, t00=0x0019, t01=0x00dc}
0x27ee…2802               Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x0019, t01=0x00ea}
0x2802…282c               Head {h00=0x0026, h01=0x0050, text=» MOVE GTDUPF(CBIN4),GTREGF(CBIN1) «, t00=0x0019, t01=0x00fe}
0x282c…2854               Head {h00=0x0024, h01=0x0050, text=» ADD GTDUPF(CBIN4),GTREGF(CBIN2)«, t00=0x0019, t01=0x0128}
0x2854…2882               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTACC(CBIN8,CBIN1)«, t00=0x0019, t01=0x0150}
0x2882…28b0               Head {h00=0x002a, h01=0x0050, text=» ADD GTDUPF(CBIN5),TTACC(CBIN8,CBIN2) «, t00=0x0019, t01=0x017e}
0x28b0…28cc               Head {h00=0x0018, h01=0x0050, text=» PERF WALINE,CBIN11 «, t00=0x001a, t01=0x001c}
0x28cc…28fa               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN5),TTACC(CBIN1,CBIN1)«, t00=0x001a, t01=0x0038}
0x28fa…2928               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN6),TTACC(CBIN1,CBIN2)«, t00=0x001a, t01=0x0066}
0x2928…2944               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x001a, t01=0x0094}
0x2944…2952               Head {h00=0x000a, h01=0x0050, text=»TCL310«, t00=0x001a, t01=0x00b0}
0x2952…296c               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN1,CBIN1«, t00=0x001a, t01=0x00be}
0x296c…298e               Head {h00=0x001e, h01=0x0050, text=» CBG GSWBIN1,CBIN4,TCL320 «, t00=0x001a, t01=0x00d8}
0x298e…29be               Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN5),TTACC(GSWBIN1,CBIN1) «, t00=0x001a, t01=0x00fa}
0x29be…29ee               Head {h00=0x002c, h01=0x0050, text=» ADD GTDUPF(CBIN6),TTACC(GSWBIN1,CBIN2) «, t00=0x001a, t01=0x012a}
0x29ee…2a00               Head {h00=0x000e, h01=0x0050, text=» B TCL310 «, t00=0x001a, t01=0x015a}
0x2a00…2a0e               Head {h00=0x000a, h01=0x0050, text=»TCL320«, t00=0x001a, t01=0x016c}
0x2a0e…2a2a               Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL329«, t00=0x001a, t01=0x017a}
0x2a2a…2a56               Head {h00=0x0028, h01=0x0050, text=»*   ADJUST FOR 'KASSE INDBERETNING' «, t00=0x001b, t01=0x0008}
0x2a56…2a72               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD1,TTCASH«, t00=0x001b, t01=0x0034}
0x2a72…2a90               Head {h00=0x001a, h01=0x0050, text=» SUB GSWBCD1,TTSTCASH «, t00=0x001b, t01=0x0050}
0x2a90…2ab2               Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD1,=D'0',TCL323 «, t00=0x001b, t01=0x006e}
0x2ab2…2ad4               Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN6),GSWBCD1«, t00=0x001b, t01=0x0090}
0x2ad4…2ae6               Head {h00=0x000e, h01=0x0050, text=» B TCL325 «, t00=0x001b, t01=0x00b2}
0x2ae6…2af4               Head {h00=0x000a, h01=0x0050, text=»TCL323«, t00=0x001b, t01=0x00c4}
0x2af4…2b16               Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN5),GSWBCD1«, t00=0x001b, t01=0x00d2}
0x2b16…2b24               Head {h00=0x000a, h01=0x0050, text=»TCL325«, t00=0x001b, t01=0x00f4}
0x2b24…2b50               Head {h00=0x0028, h01=0x0050, text=»*   ADJUST FOR 'VERSUR INDBERETNING'«, t00=0x001b, t01=0x0102}
0x2b50…2b78               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBCD1,TTACC(CBIN6,CBIN1)«, t00=0x001b, t01=0x012e}
0x2b78…2ba0               Head {h00=0x0024, h01=0x0050, text=» ADD GSWBCD1,TTACC(CBIN6,CBIN2) «, t00=0x001b, t01=0x0156}
0x2ba0…2bc2               Head {h00=0x001e, h01=0x0050, text=» MUL GSWBCD1,=D'-1' 'VEND'«, t00=0x001b, t01=0x017e}
0x2bc2…2be4               Head {h00=0x001e, h01=0x0050, text=» CBL GSWBCD1,=D'0',TCL328 «, t00=0x001c, t01=0x0010}
0x2be4…2c06               Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN6),GSWBCD1«, t00=0x001c, t01=0x0032}
0x2c06…2c18               Head {h00=0x000e, h01=0x0050, text=» B TCL329 «, t00=0x001c, t01=0x0054}
0x2c18…2c26               Head {h00=0x000a, h01=0x0050, text=»TCL328«, t00=0x001c, t01=0x0066}
0x2c26…2c48               Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN5),GSWBCD1«, t00=0x001c, t01=0x0074}
0x2c48…2c56               Head {h00=0x000a, h01=0x0050, text=»TCL329«, t00=0x001c, t01=0x0096}
0x2c56…2c78               Head {h00=0x001e, h01=0x0050, text=» MUL GTDUPF(CBIN5),=D'-1' «, t00=0x001c, t01=0x00a4}
0x2c78…2c9a               Head {h00=0x001e, h01=0x0050, text=» MUL GTDUPF(CBIN6),=D'-1' «, t00=0x001c, t01=0x00c6}
0x2c9a…2cb6               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD1,TTCASH«, t00=0x001c, t01=0x00e8}
0x2cb6…2cd4               Head {h00=0x001a, h01=0x0050, text=» SUB GSWBCD1,TTSTCASH «, t00=0x001c, t01=0x0104}
0x2cd4…2cf8               Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN4),GSWBCD1 «, t00=0x001c, t01=0x0122}
0x2cf8…2d14               Head {h00=0x0018, h01=0x0050, text=» PERF WALINE,CBIN12 «, t00=0x001c, t01=0x0146}
0x2d14…2d2e               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x001c, t01=0x0162}
0x2d2e…2d3a               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x017c}
0x2d3a…2d48               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001c, t01=0x0188}
0x2d48…2d56               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0008}
0x2d56…2d68               Head {h00=0x000e, h01=0x0050, text=»CLBEH PROC«, t00=0x001d, t01=0x0016}
0x2d68…2d72               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0028}
0x2d72…2d90               Head {h00=0x001a, h01=0x0050, text=»*  BEHOLDNINGST[LLERE «, t00=0x001d, t01=0x0032}
0x2d90…2d9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0050}
0x2d9a…2da8               Head {h00=0x000a, h01=0x0050, text=»TCL400«, t00=0x001d, t01=0x005a}
0x2da8…2dc4               Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x001d, t01=0x0068}
0x2dc4…2dee               Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN2,CBEH(TTASKNR,CBIN2) «, t00=0x001d, t01=0x0084}
0x2dee…2e08               Head {h00=0x0016, h01=0x0050, text=» CMP GSWBIN2,CBIN0«, t00=0x001d, t01=0x00ae}
0x2e08…2e1c               Head {h00=0x0010, h01=0x0050, text=» BE CLBEHRET«, t00=0x001d, t01=0x00c8}
0x2e1c…2e44               Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN2,CBEH(TTASKNR,CBIN1)«, t00=0x001d, t01=0x00dc}
0x2e44…2e62               Head {h00=0x001a, h01=0x0050, text=» MOVE GTWBCD2,GSWBIN2 «, t00=0x001d, t01=0x0104}
0x2e62…2e70               Head {h00=0x000a, h01=0x0050, text=»TCL405«, t00=0x001d, t01=0x0122}
0x2e70…2e88               Head {h00=0x0014, h01=0x0050, text=» ATTFMT CLFRM04 «, t00=0x001d, t01=0x0130}
0x2e88…2e9e               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x001d, t01=0x0148}
0x2e9e…2eb2               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x001d, t01=0x015e}
0x2eb2…2eca               Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2,  C «, t00=0x001d, t01=0x0172}
0x2eca…2efa               Head {h00=0x002c, h01=0x0050, text=»  TCL415,TCL415,TCL412,TCL411,TCL415,  C«, t00=0x001d, t01=0x018a}
0x2efa…2f2a               Head {h00=0x002c, h01=0x0050, text=»  TCL415,TCL415,TCL415,TCL413,TCL415,  C«, t00=0x001e, t01=0x002a}
0x2f2a…2f48               Head {h00=0x001a, h01=0x0050, text=»  TCL415,TCL415,TCL413«, t00=0x001e, t01=0x005a}
0x2f48…2f56               Head {h00=0x000a, h01=0x0050, text=»TCL415«, t00=0x001e, t01=0x0078}
0x2f56…2f68               Head {h00=0x000e, h01=0x0050, text=» B TCL400 «, t00=0x001e, t01=0x0086}
0x2f68…2f76               Head {h00=0x000a, h01=0x0050, text=»TCL411«, t00=0x001e, t01=0x0098}
0x2f76…2f92               Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL400«, t00=0x001e, t01=0x00a6}
0x2f92…2fb8               Head {h00=0x0022, h01=0x0050, text=» MOVE GSWSTR20,=C'SLET SALDO '«, t00=0x001e, t01=0x00c2}
0x2fb8…2fd4               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x001e, t01=0x00e8}
0x2fd4…2fe6               Head {h00=0x000e, h01=0x0050, text=» B TCL420 «, t00=0x001e, t01=0x0104}
0x2fe6…2ff4               Head {h00=0x000a, h01=0x0050, text=»TCL412«, t00=0x001e, t01=0x0116}
0x2ff4…3010               Head {h00=0x0018, h01=0x0050, text=» TBT GTSPGFLG,TCL400«, t00=0x001e, t01=0x0124}
0x3010…3038               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,=C'SLET PERIODE '«, t00=0x001e, t01=0x0140}
0x3038…3054               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN2 «, t00=0x001e, t01=0x0168}
0x3054…3066               Head {h00=0x000e, h01=0x0050, text=» B TCL420 «, t00=0x001e, t01=0x0184}
0x3066…3074               Head {h00=0x000a, h01=0x0050, text=»TCL413«, t00=0x001f, t01=0x0008}
0x3074…3098               Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,=C'SUBTOTAL '«, t00=0x001f, t01=0x0016}
0x3098…30b4               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN3 «, t00=0x001f, t01=0x003a}
0x30b4…30c6               Head {h00=0x000e, h01=0x0050, text=» B TCL420 «, t00=0x001f, t01=0x0056}
0x30c6…30d4               Head {h00=0x000a, h01=0x0050, text=»TCL420«, t00=0x001f, t01=0x0068}
0x30d4…30f0               Head {h00=0x0018, h01=0x0050, text=» MOVE GTWBCD1,=D'0' «, t00=0x001f, t01=0x0076}
0x30f0…310c               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,=D'0' «, t00=0x001f, t01=0x0092}
0x310c…3128               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD7,=D'0' «, t00=0x001f, t01=0x00ae}
0x3128…3136               Head {h00=0x000a, h01=0x0050, text=»TCL425«, t00=0x001f, t01=0x00ca}
0x3136…314a               Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x001f, t01=0x00d8}
0x314a…3168               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN3,CVOUTOP «, t00=0x001f, t01=0x00ec}
0x3168…3182               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN3,CBIN6«, t00=0x001f, t01=0x010a}
0x3182…31a2               Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN3«, t00=0x001f, t01=0x0124}
0x31a2…31b6               Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x001f, t01=0x0144}
0x31b6…31e2               Head {h00=0x0028, h01=0x0050, text=» PERF FRMXVO,CBIN13 HEAD ON VOUCHER «, t00=0x001f, t01=0x0158}
0x31e2…3200               Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x001f, t01=0x0184}
0x3200…320e               Head {h00=0x000a, h01=0x0050, text=»TCL430«, t00=0x0020, t01=0x0012}
0x320e…3228               Head {h00=0x0016, h01=0x0050, text=» ADD GTWBCD1,=D'1'«, t00=0x0020, t01=0x0020}
0x3228…3246               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN3,GTWBCD1 «, t00=0x0020, t01=0x003a}
0x3246…326e               Head {h00=0x0024, h01=0x0050, text=» ADD GSWBIN3,CBEH(TTASKNR,CBIN1)«, t00=0x0020, t01=0x0058}
0x326e…328c               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN4,GTWBCD2 «, t00=0x0020, t01=0x0080}
0x328c…32b0               Head {h00=0x0020, h01=0x0050, text=» CBG GSWBIN3,GSWBIN4,TCL490 «, t00=0x0020, t01=0x009e}
0x32b0…32de               Head {h00=0x002a, h01=0x0050, text=» CBE CBACC(GSWBIN3,CBIN1),=D'0',TCL430«, t00=0x0020, t01=0x00c2}
0x32de…330c               Head {h00=0x002a, h01=0x0050, text=»*     ADD TO TOTAL, PERIODE AND SALDO «, t00=0x0020, t01=0x00f0}
0x330c…333e               Head {h00=0x002e, h01=0x0050, text=» ADD GSWBCD6,CBACC(GSWBIN3,CBIN2) PERIODE «, t00=0x0020, t01=0x011e}
0x333e…336e               Head {h00=0x002c, h01=0x0050, text=» ADD GSWBCD7,CBACC(GSWBIN3,CBIN3) SALDO «, t00=0x0020, t01=0x0150}
0x336e…338a               Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,CBIN14 «, t00=0x0020, t01=0x0180}
0x338a…33a8               Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0021, t01=0x000c}
0x33a8…33c4               Head {h00=0x0018, h01=0x0050, text=» TBT GTTESTFL,TCL433«, t00=0x0021, t01=0x002a}
0x33c4…33ec               Head {h00=0x0024, h01=0x0050, text=» IB GSWBIN6,TCL431,TCL432,TCL433«, t00=0x0021, t01=0x0046}
0x33ec…33fe               Head {h00=0x000e, h01=0x0050, text=» B TCL433 «, t00=0x0021, t01=0x006e}
0x33fe…340c               Head {h00=0x000a, h01=0x0050, text=»TCL431«, t00=0x0021, t01=0x0080}
0x340c…343a               Head {h00=0x002a, h01=0x0050, text=» MOVE CBACC(GSWBIN3,CBIN3),=D'0' SALDO«, t00=0x0021, t01=0x008e}
0x343a…3448               Head {h00=0x000a, h01=0x0050, text=»TCL432«, t00=0x0021, t01=0x00bc}
0x3448…3478               Head {h00=0x002c, h01=0x0050, text=» MOVE CBACC(GSWBIN3,CBIN2),=D'0' PERIODE«, t00=0x0021, t01=0x00ca}
0x3478…3486               Head {h00=0x000a, h01=0x0050, text=»TCL433«, t00=0x0021, t01=0x00fa}
0x3486…34a0               Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'1'«, t00=0x0021, t01=0x0108}
0x34a0…34c2               Head {h00=0x001e, h01=0x0050, text=» CBG TTLINNR,=D'0',TCL430 «, t00=0x0021, t01=0x0122}
0x34c2…34dc               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0021, t01=0x0144}
0x34dc…34f8               Head {h00=0x0018, h01=0x0050, text=» MOVE TTLINNR,=D'25'«, t00=0x0021, t01=0x015e}
0x34f8…350a               Head {h00=0x000e, h01=0x0050, text=» B TCL425 «, t00=0x0021, t01=0x017a}
0x350a…3518               Head {h00=0x000a, h01=0x0050, text=»TCL490«, t00=0x0021, t01=0x018c}
0x3518…3536               Head {h00=0x001a, h01=0x0050, text=»*     WRITE TOTAL LINE«, t00=0x0022, t01=0x000a}
0x3536…3552               Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,CBIN18 «, t00=0x0022, t01=0x0028}
0x3552…3570               Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x0022, t01=0x0044}
0x3570…358a               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0022, t01=0x0062}
0x358a…359a               Head {h00=0x000c, h01=0x0050, text=»CLBEHRET«, t00=0x0022, t01=0x007c}
0x359a…35a6               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0022, t01=0x008c}
0x35a6…35b4               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0022, t01=0x0098}
0x35b4…35c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x00a6}
0x35c2…35e2               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0022, t01=0x00b4}
0x35e2…35ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00d4}
0x35ec…35f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00de}
0x35f6…3622               Head {h00=0x0028, h01=0x0050, text=»*          ADM FUNCTIONS          * «, t00=0x0022, t01=0x00e8}
0x3622…362c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0114}
0x362c…3654               Head {h00=0x0024, h01=0x0050, text=»*     ADM  1     EJ EDB T[LLERE «, t00=0x0022, t01=0x011e}
0x3654…3680               Head {h00=0x0028, h01=0x0050, text=»*     ADM  2     BEHOLDNINGST[LLERE «, t00=0x0022, t01=0x0146}
0x3680…36ae               Head {h00=0x002a, h01=0x0050, text=»*     ADM  3     OPRETTELSE KONTOPLAN «, t00=0x0022, t01=0x0172}
0x36ae…36c2               Head {h00=0x0010, h01=0x0050, text=»*     ADM  4«, t00=0x0023, t01=0x0010}
0x36c2…36e8               Head {h00=0x0022, h01=0x0050, text=»*     ADM  5     KONVERTERING «, t00=0x0023, t01=0x0024}
0x36e8…3712               Head {h00=0x0026, h01=0x0050, text=»*     ADM  6     DATATRANSMISSION «, t00=0x0023, t01=0x004a}
0x3712…3736               Head {h00=0x0020, h01=0x0050, text=»*     ADM  7     3270 ONLINE«, t00=0x0023, t01=0x0074}
0x3736…374a               Head {h00=0x0010, h01=0x0050, text=»*     ADM  8«, t00=0x0023, t01=0x0098}
0x374a…3774               Head {h00=0x0026, h01=0x0050, text=»*     ADM  9     DEFAULT LINE NO. «, t00=0x0023, t01=0x00ac}
0x3774…379c               Head {h00=0x0024, h01=0x0050, text=»*     ADM 10     SUPPLEMENT POST«, t00=0x0023, t01=0x00d6}
0x379c…37bc               Head {h00=0x001c, h01=0x0050, text=»*     ADM 11     SPOERGE«, t00=0x0023, t01=0x00fe}
0x37bc…37e8               Head {h00=0x0028, h01=0x0050, text=»*          SPG  1     BILAG  EJ EDB «, t00=0x0023, t01=0x011e}
0x37e8…3820               Head {h00=0x0034, h01=0x0050, text=»*          SPG  2     BILAG  BEHOLDNINGST[LLERE «, t00=0x0023, t01=0x014a}
0x3820…3850               Head {h00=0x002c, h01=0x0050, text=»*          SPG  3     BILAG  EDB T[LLERE«, t00=0x0023, t01=0x0182}
0x3850…387a               Head {h00=0x0026, h01=0x0050, text=»*          SPG  4     AABNE KASSER«, t00=0x0024, t01=0x0022}
0x387a…38aa               Head {h00=0x002c, h01=0x0050, text=»*          SPG  5     UDSKRIFT KONTOPLAN«, t00=0x0024, t01=0x004c}
0x38aa…38e0               Head {h00=0x0032, h01=0x0050, text=»*          SPG  6     ENKELT BEHOLDNINGST[LLER«, t00=0x0024, t01=0x007c}
0x38e0…390e               Head {h00=0x002a, h01=0x0050, text=»*          SPG  7     KASSEBEHOLDNING «, t00=0x0024, t01=0x00b2}
0x390e…3940               Head {h00=0x002e, h01=0x0050, text=»*          SPG  8     SPG. P] POSTERINGER «, t00=0x0024, t01=0x00e0}
0x3940…396e               Head {h00=0x002a, h01=0x0050, text=»*          SPG  9     -"-  GL. REGSET «, t00=0x0024, t01=0x0112}
0x396e…39a0               Head {h00=0x002e, h01=0x0050, text=»*          SPG 10     SPG. PRINT INTERVAL «, t00=0x0024, t01=0x0140}
0x39a0…39ce               Head {h00=0x002a, h01=0x0050, text=»*          SPG 11     -"-  GL. REGSET «, t00=0x0024, t01=0x0172}
0x39ce…39f6               Head {h00=0x0024, h01=0x0050, text=»*     ADM 12     DISKETTE SKIFT «, t00=0x0025, t01=0x0010}
0x39f6…3a16               Head {h00=0x001c, h01=0x0050, text=»*     ADM 13     AUTOSUM«, t00=0x0025, t01=0x0038}
0x3a16…3a38               Head {h00=0x001e, h01=0x0050, text=»*     ADM 14     DAGS DATO«, t00=0x0025, t01=0x0058}
0x3a38…3a4c               Head {h00=0x0010, h01=0x0050, text=»*     ADM 15«, t00=0x0025, t01=0x007a}
0x3a4c…3a60               Head {h00=0x0010, h01=0x0050, text=»*     ADM 16«, t00=0x0025, t01=0x008e}
0x3a60…3a88               Head {h00=0x0024, h01=0x0050, text=»*     ADM 17     NEW KASSEKONTO «, t00=0x0025, t01=0x00a2}
0x3a88…3ab0               Head {h00=0x0024, h01=0x0050, text=»*     ADM 18     NEW VERSURKONTO«, t00=0x0025, t01=0x00ca}
0x3ab0…3ad6               Head {h00=0x0022, h01=0x0050, text=»*     ADM 19     REGNEFUNKTION«, t00=0x0025, t01=0x00f2}
0x3ad6…3afa               Head {h00=0x0020, h01=0x0050, text=»*     ADM 20     CHECKCIFFER«, t00=0x0025, t01=0x0118}
0x3afa…3b1c               Head {h00=0x001e, h01=0x0050, text=»*     ADM 21     TEST MODE«, t00=0x0025, t01=0x013c}
0x3b1c…3b52               Head {h00=0x0032, h01=0x0050, text=»*     ADM 22     [NDRE EKSP LBNR (NOT IN USE) «, t00=0x0025, t01=0x015e}
0x3b52…3b72 (38, 0, 400)  Head {h00=0x001c, h01=0x0050, text=»*     ADM 23     MODPOST«, t00=0x0026, t01=0x0004}
0x3b72…3b94               Head {h00=0x001e, h01=0x0050, text=»*     ADM 24     KONTOKORT«, t00=0x0026, t01=0x0024}
0x3b94…3bb8               Head {h00=0x0020, h01=0x0050, text=»*     ADM 25     KVITTERING «, t00=0x0026, t01=0x0046}
0x3bb8…3bde               Head {h00=0x0022, h01=0x0050, text=»*     ADM 26     SUM FUNKTION «, t00=0x0026, t01=0x006a}
0x3bde…3c06               Head {h00=0x0024, h01=0x0050, text=»*     ADM 27     LISTE FUNCTION «, t00=0x0026, t01=0x0090}
0x3c06…3c28               Head {h00=0x001e, h01=0x0050, text=»*     ADM 28     SUBTOTAL «, t00=0x0026, t01=0x00b8}
0x3c28…3c50               Head {h00=0x0024, h01=0x0050, text=»*     ADM 29     TEST AF VOUCHER«, t00=0x0026, t01=0x00da}
0x3c50…3c74               Head {h00=0x0020, h01=0x0050, text=»*     ADM 30     CYCLE SLUT «, t00=0x0026, t01=0x0102}
0x3c74…3ca2               Head {h00=0x002a, h01=0x0050, text=»*     ADM 31     CYCLE 1 START (CYCLE)«, t00=0x0026, t01=0x0126}
0x3ca2…3cd2               Head {h00=0x002c, h01=0x0050, text=»*     ADM 32     CYCLE 2 START (STABEL) «, t00=0x0026, t01=0x0154}
0x3cd2…3ce6               Head {h00=0x0010, h01=0x0050, text=»*     ADM 33«, t00=0x0026, t01=0x0184}
0x3ce6…3d1e               Head {h00=0x0034, h01=0x0050, text=»*     ADM 34     4 CYCLE, PAUSE IN CYCLE/STABEL «, t00=0x0027, t01=0x0008}
0x3d1e…3d44               Head {h00=0x0022, h01=0x0050, text=»*     ADM 35     DIVERSE TRANS«, t00=0x0027, t01=0x0040}
0x3d44…3d4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0066}
0x3d4e…3d58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0070}
0x3d58…3d74               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0027, t01=0x007a}
0x3d74…3d82               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0096}
0x3d82…3d98               Head {h00=0x0012, h01=0x0050, text=»ADM PROC ADMNO«, t00=0x0027, t01=0x00a4}
0x3d98…3db4               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0027, t01=0x00ba}
0x3db4…3dbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d6}
0x3dbe…3dee               Head {h00=0x002c, h01=0x0050, text=»*         BRANCH TO SELECTED ADM ROUTINE«, t00=0x0027, t01=0x00e0}
0x3dee…3df8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0110}
0x3df8…3e14               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0027, t01=0x011a}
0x3e14…3e30               Head {h00=0x0018, h01=0x0050, text=» TBT GTLOKSPG,ADM002«, t00=0x0027, t01=0x0136}
0x3e30…3e52               Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL   '«, t00=0x0027, t01=0x0152}
0x3e52…3e6e               Head {h00=0x0018, h01=0x0050, text=» TBF GTSPGFLG,ADM001«, t00=0x0027, t01=0x0174}
0x3e6e…3e92               Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'SUBTOTAL ' «, t00=0x0027, t01=0x0190}
0x3e92…3ea0               Head {h00=0x000a, h01=0x0050, text=»ADM001«, t00=0x0028, t01=0x0024}
0x3ea0…3ebc               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,ADMNO «, t00=0x0028, t01=0x0032}
0x3ebc…3ef6               Head {h00=0x0036, h01=0x0050, text=» IB GSWBIN1,ADM1,ADM2,ADM3,ADM4,ADM5,ADM6,ADM7,  C«, t00=0x0028, t01=0x004e}
0x3ef6…3f38               Head {h00=0x003e, h01=0x0050, text=»  ADM8,ADM9,ADM10,ADM11,ADM12,ADM13,ADM14,ADM15,ADM16,  C «, t00=0x0028, t01=0x0088}
0x3f38…3f76               Head {h00=0x003a, h01=0x0050, text=»  ADM17,ADM18,ADM19,ADM20,ADM21,ADM22,ADM23,ADM24,  C «, t00=0x0028, t01=0x00ca}
0x3f76…3fb4               Head {h00=0x003a, h01=0x0050, text=»  ADM25,ADM26,ADM27,ADM28,ADM29,ADM30,ADM31,ADM32,  C «, t00=0x0028, t01=0x0108}
0x3fb4…3fd0               Head {h00=0x0018, h01=0x0050, text=»  ADM33,ADM34,ADM35 «, t00=0x0028, t01=0x0146}
0x3fd0…3fe0               Head {h00=0x000c, h01=0x0050, text=» B ADM00«, t00=0x0028, t01=0x0162}
0x3fe0…3fea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0172}
0x3fea…400a               Head {h00=0x001c, h01=0x0050, text=»ADM002   LOCAL INQUIRIES«, t00=0x0028, t01=0x017c}
0x400a…4026               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,ADMNO «, t00=0x0029, t01=0x000c}
0x4026…4054               Head {h00=0x002a, h01=0x0050, text=» CMP GSWBIN1,CBIN11 TEST IF INQUIRIES «, t00=0x0029, t01=0x0028}
0x4054…4066               Head {h00=0x000e, h01=0x0050, text=» BE ADM11 «, t00=0x0029, t01=0x0056}
0x4066…4088               Head {h00=0x001e, h01=0x0050, text=» SUB GSWBIN1,=W'22' ADJUST«, t00=0x0029, t01=0x0068}
0x4088…40ae               Head {h00=0x0022, h01=0x0050, text=» IB GSWBIN1,ADM23,ADM24,ADM25 «, t00=0x0029, t01=0x008a}
0x40ae…40bc               Head {h00=0x000a, h01=0x0050, text=»ADM00 «, t00=0x0029, t01=0x00b0}
0x40bc…40ce               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0029, t01=0x00be}
0x40ce…40dc               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00d0}
0x40dc…40e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00de}
0x40e6…40f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00e8}
0x40f0…40fc               Head {h00=0x0008, h01=0x0050, text=»ADM1«, t00=0x0029, t01=0x00f2}
0x40fc…4118               Head {h00=0x0018, h01=0x0050, text=»* EJ-EDB TAELLERE * «, t00=0x0029, t01=0x00fe}
0x4118…4128               Head {h00=0x000c, h01=0x0050, text=»ADM1000 «, t00=0x0029, t01=0x011a}
0x4128…413e               Head {h00=0x0012, h01=0x0050, text=» SET GTADMFLG «, t00=0x0029, t01=0x012a}
0x413e…415a               Head {h00=0x0018, h01=0x0050, text=» TBT GTKASSE,ADM1RET«, t00=0x0029, t01=0x0140}
0x415a…4174               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0029, t01=0x015c}
0x4174…418a               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0029, t01=0x0176}
0x418a…419e               Head {h00=0x0010, h01=0x0050, text=» SET GTDYFLG«, t00=0x0029, t01=0x018c}
0x419e…41ae               Head {h00=0x000c, h01=0x0050, text=»ADM1010 «, t00=0x002a, t01=0x0010}
0x41ae…41c6               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADMFRM1 «, t00=0x002a, t01=0x0020}
0x41c6…41da               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x002a, t01=0x0038}
0x41da…4206               Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,ADM1RET,ADM1RET,ADM1020 «, t00=0x002a, t01=0x004c}
0x4206…4218               Head {h00=0x000e, h01=0x0050, text=» B ADM1000«, t00=0x002a, t01=0x0078}
0x4218…4228               Head {h00=0x000c, h01=0x0050, text=»ADM1020 «, t00=0x002a, t01=0x008a}
0x4228…4244               Head {h00=0x0018, h01=0x0050, text=» TBF GTDYFLG,ADM1RET«, t00=0x002a, t01=0x009a}
0x4244…425a               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x002a, t01=0x00b6}
0x425a…426c               Head {h00=0x000e, h01=0x0050, text=» B ADM1010«, t00=0x002a, t01=0x00cc}
0x426c…427c               Head {h00=0x000c, h01=0x0050, text=»ADM1RET «, t00=0x002a, t01=0x00de}
0x427c…4294               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTADMFLG «, t00=0x002a, t01=0x00ee}
0x4294…42aa               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x002a, t01=0x0106}
0x42aa…42bc               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x002a, t01=0x011c}
0x42bc…42c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x012e}
0x42c6…42d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0138}
0x42d0…42dc               Head {h00=0x0008, h01=0x0050, text=»ADM2«, t00=0x002a, t01=0x0142}
0x42dc…42fc               Head {h00=0x001c, h01=0x0050, text=»* BEHOLDNINGSTAELLERE * «, t00=0x002a, t01=0x014e}
0x42fc…430c               Head {h00=0x000c, h01=0x0050, text=»ADM2000 «, t00=0x002a, t01=0x016e}
0x430c…4322               Head {h00=0x0012, h01=0x0050, text=» SET GTADMFLG «, t00=0x002a, t01=0x017e}
0x4322…4340 (43, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» TBT GTSPGFLG,ADM2001 «, t00=0x002b, t01=0x0004}
0x4340…435c               Head {h00=0x0018, h01=0x0050, text=» TBT GTKASSE,ADM2RET«, t00=0x002b, t01=0x0022}
0x435c…437a               Head {h00=0x001a, h01=0x0050, text=» TBT GTTESTFL,ADM2RET «, t00=0x002b, t01=0x003e}
0x437a…438a               Head {h00=0x000c, h01=0x0050, text=»ADM2001 «, t00=0x002b, t01=0x005c}
0x438a…43a0               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x002b, t01=0x006c}
0x43a0…43b4               Head {h00=0x0010, h01=0x0050, text=» SET GTDYFLG«, t00=0x002b, t01=0x0082}
0x43b4…43cc               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADM2FRM1«, t00=0x002b, t01=0x0096}
0x43cc…43e0               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x002b, t01=0x00ae}
0x43e0…440c               Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,ADM2RET,ADM2RET,ADM2020 «, t00=0x002b, t01=0x00c2}
0x440c…441e               Head {h00=0x000e, h01=0x0050, text=» B ADM2000«, t00=0x002b, t01=0x00ee}
0x441e…442e               Head {h00=0x000c, h01=0x0050, text=»ADM2020 «, t00=0x002b, t01=0x0100}
0x442e…4442               Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x002b, t01=0x0110}
0x4442…4474               Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN5),=D'2' ADM FUNCTION NO «, t00=0x002b, t01=0x0124}
0x4474…44a2               Head {h00=0x002a, h01=0x0050, text=» MOVE GTDUPF(CBIN2),GSWBCD1 COUNTER NO«, t00=0x002b, t01=0x0156}
0x44a2…44e0               Head {h00=0x003a, h01=0x0050, text=» MOVE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1) REG. KNT. NO «, t00=0x002b, t01=0x0184}
0x44e0…4516               Head {h00=0x0032, h01=0x0050, text=» MOVE GTDUPF(CBIN4),CBACC(GSWBIN6,CBIN3) SALDO«, t00=0x002c, t01=0x0032}
0x4516…452c               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x002c, t01=0x0068}
0x452c…4542               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x002c, t01=0x007e}
0x4542…455a               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADM2FRM1«, t00=0x002c, t01=0x0094}
0x455a…456e               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x002c, t01=0x00ac}
0x456e…459a               Head {h00=0x0028, h01=0x0050, text=» IB SPBINW2,ADM2RET,ADM2RET,ADM2030 «, t00=0x002c, t01=0x00c0}
0x459a…45ac               Head {h00=0x000e, h01=0x0050, text=» B ADM2000«, t00=0x002c, t01=0x00ec}
0x45ac…45bc               Head {h00=0x000c, h01=0x0050, text=»ADM2030 «, t00=0x002c, t01=0x00fe}
0x45bc…45f4               Head {h00=0x0034, h01=0x0050, text=» CBE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1),ADM2040 «, t00=0x002c, t01=0x010e}
0x45f4…462a               Head {h00=0x0032, h01=0x0050, text=» MOVE CBACC(GSWBIN6,CBIN2),=D'0' CLEAR PERIODE«, t00=0x002c, t01=0x0146}
0x462a…463a               Head {h00=0x000c, h01=0x0050, text=»ADM2040 «, t00=0x002c, t01=0x017c}
0x463a…466a               Head {h00=0x002c, h01=0x0050, text=» MOVE CBACC(GSWBIN6,CBIN1),GTDUPF(CBIN1)«, t00=0x002c, t01=0x018c}
0x466a…469a               Head {h00=0x002c, h01=0x0050, text=» MOVE CBACC(GSWBIN6,CBIN3),GTDUPF(CBIN4)«, t00=0x002d, t01=0x002c}
0x469a…46b6               Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'13' «, t00=0x002d, t01=0x005c}
0x46b6…46c6               Head {h00=0x000c, h01=0x0050, text=»ADM2RET «, t00=0x002d, t01=0x0078}
0x46c6…46de               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTADMFLG «, t00=0x002d, t01=0x0088}
0x46de…46f4               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x002d, t01=0x00a0}
0x46f4…4706               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x002d, t01=0x00b6}
0x4706…4710               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00c8}
0x4710…471a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00d2}
0x471a…4726               Head {h00=0x0008, h01=0x0050, text=»ADM3«, t00=0x002d, t01=0x00dc}
0x4726…4748               Head {h00=0x001e, h01=0x0050, text=»*     OPRETTELSE KONTOPLAN«, t00=0x002d, t01=0x00e8}
0x4748…4770               Head {h00=0x0024, h01=0x0050, text=» B KTOPR BRANCH TO OTHER MODULE «, t00=0x002d, t01=0x010a}
0x4770…477a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0132}
0x477a…4784               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x013c}
0x4784…4790               Head {h00=0x0008, h01=0x0050, text=»ADM4«, t00=0x002d, t01=0x0146}
0x4790…47a2               Head {h00=0x000e, h01=0x0050, text=»* DUMMY * «, t00=0x002d, t01=0x0152}
0x47a2…47b4               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x002d, t01=0x0164}
0x47b4…47c2               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0176}
0x47c2…47ce               Head {h00=0x0008, h01=0x0050, text=»ADM5«, t00=0x002d, t01=0x0184}
0x47ce…47e6               Head {h00=0x0014, h01=0x0050, text=»* KONVERTERING *«, t00=0x002d, t01=0x0190}
0x47e6…47f6               Head {h00=0x000c, h01=0x0050, text=»ADM0500 «, t00=0x002e, t01=0x0018}
0x47f6…480c               Head {h00=0x0012, h01=0x0050, text=» SET CCONVFLG «, t00=0x002e, t01=0x0028}
0x480c…4824               Head {h00=0x0014, h01=0x0050, text=» CLEAR SPKEYFLG «, t00=0x002e, t01=0x003e}
0x4824…483a               Head {h00=0x0012, h01=0x0050, text=» TEST GTKASSE «, t00=0x002e, t01=0x0056}
0x483a…485e               Head {h00=0x0020, h01=0x0050, text=» BNZ ADM05RET BRANCH IF TRUE«, t00=0x002e, t01=0x006c}
0x485e…4878               Head {h00=0x0016, h01=0x0050, text=» CMP TTASKNR,CBIN1«, t00=0x002e, t01=0x0090}
0x4878…488e               Head {h00=0x0012, h01=0x0050, text=» BNE ADM05RET «, t00=0x002e, t01=0x00aa}
0x488e…48a8               Head {h00=0x0016, h01=0x0050, text=» CMP CTASKNR,CBIN0«, t00=0x002e, t01=0x00c0}
0x48a8…48be               Head {h00=0x0012, h01=0x0050, text=» BNE ADM05RET «, t00=0x002e, t01=0x00da}
0x48be…48d4               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x002e, t01=0x00f0}
0x48d4…48ee               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x002e, t01=0x0106}
0x48ee…4906               Head {h00=0x0014, h01=0x0050, text=» ATTFMT KONFRMT «, t00=0x002e, t01=0x0120}
0x4906…491a               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x002e, t01=0x0138}
0x491a…4948               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM05RET,ADM05RET,ADM0510 «, t00=0x002e, t01=0x014c}
0x4948…495a               Head {h00=0x000e, h01=0x0050, text=» B ADM0500«, t00=0x002e, t01=0x017a}
0x495a…4976               Head {h00=0x0018, h01=0x0050, text=»   WRITE EOF RECORD «, t00=0x002e, t01=0x018c}
0x4976…4994               Head {h00=0x001a, h01=0x0050, text=»   AND CLOSE ALL FILES«, t00=0x002f, t01=0x0018}
0x4994…49a4               Head {h00=0x000c, h01=0x0050, text=»ADM0510 «, t00=0x002f, t01=0x0036}
0x49a4…49d6               Head {h00=0x002e, h01=0x0050, text=» TBT CCONVERT,ADM0513 NO WRITE IF CONVERT «, t00=0x002f, t01=0x0046}
0x49d6…49f0               Head {h00=0x0016, h01=0x0050, text=» SUB CRECBCD,=D'1'«, t00=0x002f, t01=0x0078}
0x49f0…4a0c               Head {h00=0x0018, h01=0x0050, text=» PERF SLUTID,CRECBCD«, t00=0x002f, t01=0x0092}
0x4a0c…4a26               Head {h00=0x0016, h01=0x0050, text=» ADD CRECBCD,=D'1'«, t00=0x002f, t01=0x00ae}
0x4a26…4a54               Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x002f, t01=0x00c8}
0x4a54…4a6a               Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0500 «, t00=0x002f, t01=0x00f6}
0x4a6a…4a8a               Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN2,CBIN2«, t00=0x002f, t01=0x010c}
0x4a8a…4a9a               Head {h00=0x000c, h01=0x0050, text=»ADM0513 «, t00=0x002f, t01=0x012c}
0x4a9a…4ab4               Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN1«, t00=0x002f, t01=0x013c}
0x4ab4…4ace               Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN2«, t00=0x002f, t01=0x0156}
0x4ace…4ae8               Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x002f, t01=0x0170}
0x4ae8…4b04               Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x002f, t01=0x018a}
0x4b04…4b22               Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x0030, t01=0x0016}
0x4b22…4b3e               Head {h00=0x0018, h01=0x0050, text=» TBT C5MDISK,ADM0514«, t00=0x0030, t01=0x0034}
0x4b3e…4b60               Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5«, t00=0x0030, t01=0x0050}
0x4b60…4b70               Head {h00=0x000c, h01=0x0050, text=»ADM0514 «, t00=0x0030, t01=0x0072}
0x4b70…4b92               Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'32' LAMP 6«, t00=0x0030, t01=0x0082}
0x4b92…4bb4               Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'16' LAMP 7«, t00=0x0030, t01=0x00a4}
0x4bb4…4bd6               Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x0030, t01=0x00c6}
0x4bd6…4be6               Head {h00=0x000c, h01=0x0050, text=»ADM0515 «, t00=0x0030, t01=0x00e8}
0x4be6…4bfa               Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x0030, t01=0x00f8}
0x4bfa…4c12               Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN2,  C «, t00=0x0030, t01=0x010c}
0x4c12…4c4c               Head {h00=0x0036, h01=0x0050, text=»  ADM05010,ADM05009,ADM05008,ADM05007,ADM05006,  C«, t00=0x0030, t01=0x0124}
0x4c4c…4c82               Head {h00=0x0032, h01=0x0050, text=»  ADM05005,ADM05004,ADM05003,ADM05002,ADM05001«, t00=0x0030, t01=0x015e}
0x4c82…4c92 (49, 0, 398)  Head {h00=0x000c, h01=0x0050, text=»ADM05001«, t00=0x0031, t01=0x0004}
0x4c92…4ca2               Head {h00=0x000c, h01=0x0050, text=»ADM05002«, t00=0x0031, t01=0x0014}
0x4ca2…4cb2               Head {h00=0x000c, h01=0x0050, text=»ADM05003«, t00=0x0031, t01=0x0024}
0x4cb2…4cc2               Head {h00=0x000c, h01=0x0050, text=»ADM05004«, t00=0x0031, t01=0x0034}
0x4cc2…4cd2               Head {h00=0x000c, h01=0x0050, text=»ADM05008«, t00=0x0031, t01=0x0044}
0x4cd2…4ce2               Head {h00=0x000c, h01=0x0050, text=»ADM05009«, t00=0x0031, t01=0x0054}
0x4ce2…4cf4               Head {h00=0x000e, h01=0x0050, text=» B ADM0515«, t00=0x0031, t01=0x0064}
0x4cf4…4cfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0076}
0x4cfe…4d18               Head {h00=0x0016, h01=0x0050, text=»ADM05010   LAMP 10«, t00=0x0031, t01=0x0080}
0x4d18…4d3a               Head {h00=0x001e, h01=0x0050, text=» B ADM0513 CLOSE AND SOPRD«, t00=0x0031, t01=0x009a}
0x4d3a…4d44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00bc}
0x4d44…4d4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00c6}
0x4d4e…4d58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00d0}
0x4d58…4d62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00da}
0x4d62…4d6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00e4}
0x4d6c…4d84               Head {h00=0x0014, h01=0x0050, text=»ADM05005   SOP 5«, t00=0x0031, t01=0x00ee}
0x4d84…4db8               Head {h00=0x0030, h01=0x0050, text=» TBT C5MDISK,ADM0515 CONVERSION NOT ALLOWED «, t00=0x0031, t01=0x0106}
0x4db8…4de8               Head {h00=0x002c, h01=0x0050, text=»*     EQUIVALENT TO START OF ADM5 MODULE«, t00=0x0031, t01=0x013a}
0x4de8…4e10               Head {h00=0x0024, h01=0x0050, text=» PERF LAMPON,=W'1024' LAMP 1 ON «, t00=0x0031, t01=0x016a}
0x4e10…4e36 (50, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» DSC1 FD01,LOAD,CBIN7 LOAD IBM«, t00=0x0032, t01=0x0004}
0x4e36…4e4c               Head {h00=0x0012, h01=0x0050, text=» BBEOD ADM0535«, t00=0x0032, t01=0x002a}
0x4e4c…4e62               Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0513 «, t00=0x0032, t01=0x0040}
0x4e62…4e72               Head {h00=0x000c, h01=0x0050, text=»ADM0535 «, t00=0x0032, t01=0x0056}
0x4e72…4e8a               Head {h00=0x0014, h01=0x0050, text=» DSC0 FD01,RWIND«, t00=0x0032, t01=0x0066}
0x4e8a…4eb2               Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'1024' LAMP 1 OFF«, t00=0x0032, t01=0x007e}
0x4eb2…4ed8               Head {h00=0x0022, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 ON«, t00=0x0032, t01=0x00a6}
0x4ed8…4ef2               Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x0032, t01=0x00cc}
0x4ef2…4f08               Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0513 «, t00=0x0032, t01=0x00e6}
0x4f08…4f30               Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'512' LAMP 2 OFF «, t00=0x0032, t01=0x00fc}
0x4f30…4f58               Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0032, t01=0x0124}
0x4f58…4f7e               Head {h00=0x0022, h01=0x0050, text=» PERF LAMPON,=W'64' LAMP 5 ON «, t00=0x0032, t01=0x014c}
0x4f7e…4f9a               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN1 «, t00=0x0032, t01=0x0172}
0x4f9a…4fc4               Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBIN1,=W'128' READ HEADER «, t00=0x0032, t01=0x018e}
0x4fc4…4ffc               Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 «, t00=0x0033, t01=0x0028}
0x4ffc…5010               Head {h00=0x0010, h01=0x0050, text=» BOK ADM0536«, t00=0x0033, t01=0x0060}
0x5010…503a               Head {h00=0x0026, h01=0x0050, text=» PERF STRTID,CVOLNO SET UP STRTID «, t00=0x0033, t01=0x0074}
0x503a…505a               Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN3,CBIN1«, t00=0x0033, t01=0x009e}
0x505a…506c               Head {h00=0x000e, h01=0x0050, text=» B ADM0540«, t00=0x0033, t01=0x00be}
0x506c…507c               Head {h00=0x000c, h01=0x0050, text=»ADM0536 «, t00=0x0033, t01=0x00d0}
0x507c…50aa               Head {h00=0x002a, h01=0x0050, text=» PERF WRITID,CBIN3,CBIN1 PRINT HEADER «, t00=0x0033, t01=0x00e0}
0x50aa…50c6               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN0 «, t00=0x0033, t01=0x010e}
0x50c6…50fa               Head {h00=0x0030, h01=0x0050, text=» MOVE GSWBIN1,=W'40' DELETE AND WRITE HEADER«, t00=0x0033, t01=0x012a}
0x50fa…5118               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CBLANKS«, t00=0x0033, t01=0x015e}
0x5118…514e               Head {h00=0x0032, h01=0x0050, text=» COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 «, t00=0x0033, t01=0x017c}
0x514e…515e               Head {h00=0x000c, h01=0x0050, text=»ADM0540 «, t00=0x0034, t01=0x0022}
0x515e…5186               Head {h00=0x0024, h01=0x0050, text=» PERF SQWRIT,FD01,=D'1',CPCKBUF «, t00=0x0034, t01=0x0032}
0x5186…519c               Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0568 «, t00=0x0034, t01=0x005a}
0x519c…51b4               Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0034, t01=0x0070}
0x51b4…51e0               Head {h00=0x0028, h01=0x0050, text=» MOVE GSWBCD6,=D'0' FOR TEST PURPOSE«, t00=0x0034, t01=0x0088}
0x51e0…51fa               Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x0034, t01=0x00b4}
0x51fa…5216               Head {h00=0x0018, h01=0x0050, text=»ADM0550   START LOOP«, t00=0x0034, t01=0x00ce}
0x5216…5230               Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0034, t01=0x00ea}
0x5230…524e               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0034, t01=0x0104}
0x524e…5284               Head {h00=0x0032, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR«, t00=0x0034, t01=0x0122}
0x5284…52a0               Head {h00=0x0018, h01=0x0050, text=» BNOK ADM0560 NOT OK«, t00=0x0034, t01=0x0158}
0x52a0…52be               Head {h00=0x001a, h01=0x0050, text=» TBT CERRORFL,ADM0560 «, t00=0x0034, t01=0x0174}
0x52be…52ec (53, 0, 400)  Head {h00=0x002a, h01=0x0050, text=» CBE GTWBCD1,=D'4',ADM0565 END OF DATA«, t00=0x0035, t01=0x0004}
0x52ec…530c               Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x0035, t01=0x0032}
0x530c…5328               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x0035, t01=0x0052}
0x5328…5362               Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x0035, t01=0x006e}
0x5362…538c               Head {h00=0x0026, h01=0x0050, text=» BE ADM0570 SLUTD: END OF CONVERT «, t00=0x0035, t01=0x00a8}
0x538c…53aa               Head {h00=0x001a, h01=0x0050, text=» TBF CTESTFLG,ADM0578 «, t00=0x0035, t01=0x00d2}
0x53aa…53d8               Head {h00=0x002a, h01=0x0050, text=»*     THIS PART CAN BE USED TO CHANGE «, t00=0x0035, t01=0x00f0}
0x53d8…5400               Head {h00=0x0024, h01=0x0050, text=»*     TTLBNR  DURING CONVERSION.«, t00=0x0035, t01=0x011e}
0x5400…5430               Head {h00=0x002c, h01=0x0050, text=»*     CAN ONLY BE USED IN DEBUGGER MODE «, t00=0x0035, t01=0x0146}
0x5430…544e               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,=C'&04'«, t00=0x0035, t01=0x0176}
0x544e…546a (54, 0, 398)  Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,=W'30'«, t00=0x0036, t01=0x0004}
0x546a…5486               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN0 «, t00=0x0036, t01=0x0020}
0x5486…54c2               Head {h00=0x0038, h01=0x0050, text=» MATCH CPCKBUF,GSWBIN5,CBIN20,GSWSTR20,GSWBIN2,CBIN3«, t00=0x0036, t01=0x003c}
0x54c2…54d8               Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0578 «, t00=0x0036, t01=0x0078}
0x54d8…54f2               Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN5,CBIN3«, t00=0x0036, t01=0x008e}
0x54f2…5510               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,=X'00' «, t00=0x0036, t01=0x00a8}
0x5510…5542               Head {h00=0x002e, h01=0x0050, text=» COPY GSWSTR20,CBIN0,CBIN5,CPCKBUF,GSWBIN5«, t00=0x0036, t01=0x00c6}
0x5542…5560               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD5,GSWSTR20«, t00=0x0036, t01=0x00f8}
0x5560…557c               Head {h00=0x0018, h01=0x0050, text=» ADD GSWBCD5,GSWBCD6«, t00=0x0036, t01=0x0116}
0x557c…559a               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,GSWBCD5«, t00=0x0036, t01=0x0132}
0x559a…55cc               Head {h00=0x002e, h01=0x0050, text=» COPY CPCKBUF,GSWBIN5,CBIN5,GSWSTR20,CBIN1«, t00=0x0036, t01=0x0150}
0x55cc…55dc               Head {h00=0x000c, h01=0x0050, text=»ADM0578 «, t00=0x0036, t01=0x0182}
0x55dc…5604 (55, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» PERF SQWRIT,FD01,=D'1',CPCKBUF «, t00=0x0037, t01=0x0004}
0x5604…5618               Head {h00=0x0010, h01=0x0050, text=» BOK ADM0550«, t00=0x0037, t01=0x002c}
0x5618…5628               Head {h00=0x000c, h01=0x0050, text=»ADM0568 «, t00=0x0037, t01=0x0040}
0x5628…5656               Head {h00=0x002a, h01=0x0050, text=» PERF LAMPOF,=W'2047' SWITCH OFF LAMPS«, t00=0x0037, t01=0x0050}
0x5656…567c               Head {h00=0x0022, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10 ON «, t00=0x0037, t01=0x007e}
0x567c…5698               Head {h00=0x0018, h01=0x0050, text=» B ADM0515 READ SOP «, t00=0x0037, t01=0x00a4}
0x5698…56a8               Head {h00=0x000c, h01=0x0050, text=»ADM0570 «, t00=0x0037, t01=0x00c0}
0x56a8…56dc               Head {h00=0x0030, h01=0x0050, text=» PERF SQWRIT,FD01,=D'1',CPCKBUF WRITE SLUTD «, t00=0x0037, t01=0x00d0}
0x56dc…56f2               Head {h00=0x0012, h01=0x0050, text=» BNOK ADM0568 «, t00=0x0037, t01=0x0104}
0x56f2…5712               Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN3,CBIN2«, t00=0x0037, t01=0x011a}
0x5712…572e               Head {h00=0x0018, h01=0x0050, text=» B ADM0513 LAMPS ON «, t00=0x0037, t01=0x013a}
0x572e…5746               Head {h00=0x0014, h01=0x0050, text=»ADM0560   NOT OK«, t00=0x0037, t01=0x0156}
0x5746…577a               Head {h00=0x0030, h01=0x0050, text=» PERF WRITID,CBIN4,CBIN2 PRINT FIRST PART OF«, t00=0x0037, t01=0x016e}
0x577a…5798               Head {h00=0x001a, h01=0x0050, text=»   LAST CORRECT RECORD«, t00=0x0038, t01=0x0012}
0x5798…57ae               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0038, t01=0x0030}
0x57ae…57c6               Head {h00=0x0014, h01=0x0050, text=» ATTFMT KONV4FMT«, t00=0x0038, t01=0x0046}
0x57c6…57e6               Head {h00=0x001c, h01=0x0050, text=» PERF SPCLRA CONTINUE ? «, t00=0x0038, t01=0x005e}
0x57e6…581c               Head {h00=0x0032, h01=0x0050, text=» IB SPBINW2,A0561,A0561,A0562,A0563,A0561,  C «, t00=0x0038, t01=0x007e}
0x581c…583e               Head {h00=0x001e, h01=0x0050, text=»  A0561,A0561,A0561,A0564 «, t00=0x0038, t01=0x00b4}
0x583e…5850               Head {h00=0x000e, h01=0x0050, text=» B ADM0560«, t00=0x0038, t01=0x00d6}
0x5850…5864               Head {h00=0x0010, h01=0x0050, text=»A0561   MAK «, t00=0x0038, t01=0x00e8}
0x5864…5876               Head {h00=0x000e, h01=0x0050, text=» B ADM0560«, t00=0x0038, t01=0x00fc}
0x5876…5880               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x010e}
0x5880…589e               Head {h00=0x001a, h01=0x0050, text=»A0562   SLUT, CONTINUE«, t00=0x0038, t01=0x0118}
0x589e…58b4               Head {h00=0x0012, h01=0x0050, text=»   READ AGAIN «, t00=0x0038, t01=0x0136}
0x58b4…58ce               Head {h00=0x0016, h01=0x0050, text=» SUB CRECNR,CBIN1 «, t00=0x0038, t01=0x014c}
0x58ce…58e6               Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0038, t01=0x0166}
0x58e6…58f8               Head {h00=0x000e, h01=0x0050, text=» B ADM0550«, t00=0x0038, t01=0x017e}
0x58f8…5902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0190}
0x5902…5920               Head {h00=0x001a, h01=0x0050, text=»A0563   KRE, TRY NEXT «, t00=0x0039, t01=0x000a}
0x5920…5936               Head {h00=0x0012, h01=0x0050, text=» SET CERRORFL «, t00=0x0039, t01=0x0028}
0x5936…5948               Head {h00=0x000e, h01=0x0050, text=» B ADM0550«, t00=0x0039, t01=0x003e}
0x5948…5952               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0050}
0x5952…5966               Head {h00=0x0010, h01=0x0050, text=»A0564   KVIT«, t00=0x0039, t01=0x005a}
0x5966…597e               Head {h00=0x0014, h01=0x0050, text=» CLEAR CERRORFL «, t00=0x0039, t01=0x006e}
0x597e…599c               Head {h00=0x001a, h01=0x0050, text=» B ADM0565 WRITE SLUTD«, t00=0x0039, t01=0x0086}
0x599c…59a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00a4}
0x59a6…59b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00ae}
0x59b0…59ce               Head {h00=0x001a, h01=0x0050, text=»ADM0565   END OF DATA «, t00=0x0039, t01=0x00b8}
0x59ce…59ea               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,CRECNR«, t00=0x0039, t01=0x00d6}
0x59ea…5a12               Head {h00=0x0024, h01=0x0050, text=» SUB GSWBCD3,=D'2' SET UP SLUTD «, t00=0x0039, t01=0x00f2}
0x5a12…5a2e               Head {h00=0x0018, h01=0x0050, text=» PERF SLUTID,GSWBCD3«, t00=0x0039, t01=0x011a}
0x5a2e…5a40               Head {h00=0x000e, h01=0x0050, text=» B ADM0570«, t00=0x0039, t01=0x0136}
0x5a40…5a4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0148}
0x5a4a…5a54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0152}
0x5a54…5a5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x015c}
0x5a5e…5a8c               Head {h00=0x002a, h01=0x0050, text=»*     EQUVALENT TO END OF ADM5 MODULE «, t00=0x0039, t01=0x0166}
0x5a8c…5a96 (58, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0004}
0x5a96…5aa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x000e}
0x5aa0…5ab8               Head {h00=0x0014, h01=0x0010, text=»ADM05006   SOP 6«, t00=0x003a, t01=0x0018}
0x5ab8…5ae6               Head {h00=0x002a, h01=0x0025, text=» PERF ASGVOL,CBIN1 ASSIGN SYSTEM DISK «, t00=0x003a, t01=0x0030}
0x5ae6…5afc               Head {h00=0x0012, h01=0x000d, text=» BNOK ADM0513 «, t00=0x003a, t01=0x005e}
0x5afc…5b24               Head {h00=0x0024, h01=0x0020, text=» PERF BCKUP,=W'1' WITHOUT BACKUP«, t00=0x003a, t01=0x0074}
0x5b24…5b3a               Head {h00=0x0012, h01=0x000d, text=» BNOK ADM0513 «, t00=0x003a, t01=0x009c}
0x5b3a…5b4e               Head {h00=0x0010, h01=0x000b, text=» B ADM05RET «, t00=0x003a, t01=0x00b2}
0x5b4e…5b58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00c6}
0x5b58…5b62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00d0}
0x5b62…5b6c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00da}
0x5b6c…5b76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00e4}
0x5b76…5b80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x00ee}
0x5b80…5b98               Head {h00=0x0014, h01=0x0010, text=»ADM05007   SOP 7«, t00=0x003a, t01=0x00f8}
0x5b98…5bb2               Head {h00=0x0016, h01=0x0012, text=» PERF ASGVOL,CBIN1«, t00=0x003a, t01=0x0110}
0x5bb2…5bc8               Head {h00=0x0012, h01=0x000d, text=» BNOK ADM0513 «, t00=0x003a, t01=0x012a}
0x5bc8…5bee               Head {h00=0x0022, h01=0x001d, text=» PERF BCKUP,=W'2' WITH BACKUP «, t00=0x003a, t01=0x0140}
0x5bee…5c04               Head {h00=0x0012, h01=0x000d, text=» BNOK ADM0513 «, t00=0x003a, t01=0x0166}
0x5c04…5c18               Head {h00=0x0010, h01=0x000b, text=» B ADM05RET «, t00=0x003a, t01=0x017c}
0x5c18…5c22               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x003a, t01=0x0190}
0x5c22…5c2c               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x003b, t01=0x000a}
0x5c2c…5c36               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x003b, t01=0x0014}
0x5c36…5c40               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x003b, t01=0x001e}
0x5c40…5c4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0028}
0x5c4a…5c5a               Head {h00=0x000c, h01=0x0050, text=»ADM05RET«, t00=0x003b, t01=0x0032}
0x5c5a…5c78               Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x003b, t01=0x0042}
0x5c78…5c8e               Head {h00=0x0012, h01=0x0050, text=» SET SPKEYFLG «, t00=0x003b, t01=0x0060}
0x5c8e…5ca6               Head {h00=0x0014, h01=0x0050, text=» CLEAR CCONVFLG «, t00=0x003b, t01=0x0076}
0x5ca6…5cb8               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x003b, t01=0x008e}
0x5cb8…5cc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00a0}
0x5cc2…5ccc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00aa}
0x5ccc…5cd8               Head {h00=0x0008, h01=0x0050, text=»ADM6«, t00=0x003b, t01=0x00b4}
0x5cd8…5cf4               Head {h00=0x0018, h01=0x0050, text=»* DATATRANSMISSION *«, t00=0x003b, t01=0x00c0}
0x5cf4…5d06               Head {h00=0x000e, h01=0x0050, text=» B ADM600 «, t00=0x003b, t01=0x00dc}
0x5d06…5d10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00ee}
0x5d10…5d1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00f8}
0x5d1a…5d26               Head {h00=0x0008, h01=0x0050, text=»ADM7«, t00=0x003b, t01=0x0102}
0x5d26…5d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x010e}
0x5d30…5d52               Head {h00=0x001e, h01=0x0050, text=»*     JUMP TO 3270 ONLINE «, t00=0x003b, t01=0x0118}
0x5d52…5d66               Head {h00=0x0010, h01=0x0050, text=» PERF ONLINE«, t00=0x003b, t01=0x013a}
0x5d66…5d78               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x003b, t01=0x014e}
0x5d78…5d82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0160}
0x5d82…5d8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x016a}
0x5d8c…5d98               Head {h00=0x0008, h01=0x0050, text=»ADM8«, t00=0x003b, t01=0x0174}
0x5d98…5da2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0180}
0x5da2…5dbe               Head {h00=0x0018, h01=0x0050, text=»*     DUMMY     *** «, t00=0x003b, t01=0x018a}
0x5dbe…5dd0               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x003c, t01=0x0016}
0x5dd0…5dda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0028}
0x5dda…5de4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0032}
0x5de4…5df0               Head {h00=0x0008, h01=0x0050, text=»ADM9«, t00=0x003c, t01=0x003c}
0x5df0…5e0c               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003c, t01=0x0048}
0x5e0c…5e16               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0064}
0x5e16…5e40               Head {h00=0x0026, h01=0x0050, text=»*          SET DEFAULT LINE NUMBER«, t00=0x003c, t01=0x006e}
0x5e40…5e4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0098}
0x5e4a…5e66               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003c, t01=0x00a2}
0x5e66…5e76               Head {h00=0x000c, h01=0x0050, text=»ADM0900 «, t00=0x003c, t01=0x00be}
0x5e76…5e94               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD5,GTDFLIN «, t00=0x003c, t01=0x00ce}
0x5e94…5ec4               Head {h00=0x002c, h01=0x0050, text=» PERF FRMXSP,CBIN13 ASK FOR DEFAULT LINE«, t00=0x003c, t01=0x00ec}
0x5ec4…5eda               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x003c, t01=0x011c}
0x5eda…5eee               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x003c, t01=0x0132}
0x5eee…5f1c               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM09RET,ADM09RET,ADM0910 «, t00=0x003c, t01=0x0146}
0x5f1c…5f2e               Head {h00=0x000e, h01=0x0050, text=» B ADM0900«, t00=0x003c, t01=0x0174}
0x5f2e…5f3e               Head {h00=0x000c, h01=0x0050, text=»ADM0910 «, t00=0x003c, t01=0x0186}
0x5f3e…5f56               Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x003d, t01=0x0008}
0x5f56…5f74               Head {h00=0x001a, h01=0x0050, text=» MOVE GTDFLIN,GSWBCD5 «, t00=0x003d, t01=0x0020}
0x5f74…5f84               Head {h00=0x000c, h01=0x0050, text=»ADM09RET«, t00=0x003d, t01=0x003e}
0x5f84…5fa8               Head {h00=0x0020, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR = 0 «, t00=0x003d, t01=0x004e}
0x5fa8…5fba               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x003d, t01=0x0072}
0x5fba…5fc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0084}
0x5fc4…5fce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x008e}
0x5fce…5fdc               Head {h00=0x000a, h01=0x0050, text=»ADM10 «, t00=0x003d, t01=0x0098}
0x5fdc…5ffa               Head {h00=0x001a, h01=0x0050, text=» TBF GTKASSE,ADM10RET «, t00=0x003d, t01=0x00a6}
0x5ffa…6016               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003d, t01=0x00c4}
0x6016…6020               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00e0}
0x6020…6056               Head {h00=0x0032, h01=0x0050, text=»*          SET OR CLEAR SUPPLEMENT INFORMATION«, t00=0x003d, t01=0x00ea}
0x6056…6060               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0120}
0x6060…607c               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x003d, t01=0x012a}
0x607c…6098               Head {h00=0x0018, h01=0x0050, text=» TBT TTSUPFLG,SUPL10«, t00=0x003d, t01=0x0146}
0x6098…60ae               Head {h00=0x0012, h01=0x0050, text=» SET TTSUPFLG «, t00=0x003d, t01=0x0162}
0x60ae…60ca               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C'S'«, t00=0x003d, t01=0x0178}
0x60ca…60dc (62, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» B SUPLOK «, t00=0x003e, t01=0x0004}
0x60dc…60ea               Head {h00=0x000a, h01=0x0050, text=»SUPL10«, t00=0x003e, t01=0x0016}
0x60ea…6106               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x003e, t01=0x0024}
0x6106…611e               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x003e, t01=0x0040}
0x611e…612c               Head {h00=0x000a, h01=0x0050, text=»SUPLOK«, t00=0x003e, t01=0x0058}
0x612c…6142               Head {h00=0x0012, h01=0x0050, text=» SET GTREGFLG «, t00=0x003e, t01=0x0066}
0x6142…6156               Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x003e, t01=0x007c}
0x6156…6166               Head {h00=0x000c, h01=0x0050, text=»ADM10RET«, t00=0x003e, t01=0x0090}
0x6166…618e               Head {h00=0x0024, h01=0x0050, text=» CMP CBIN0,CBIN0 SET CR = 0, OK «, t00=0x003e, t01=0x00a0}
0x618e…61a0               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x003e, t01=0x00c8}
0x61a0…61aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00da}
0x61aa…61b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00e4}
0x61b4…61c2               Head {h00=0x000a, h01=0x0050, text=»ADM11 «, t00=0x003e, t01=0x00ee}
0x61c2…61de               Head {h00=0x0018, h01=0x0050, text=»* LOCAL INQUIRIES * «, t00=0x003e, t01=0x00fc}
0x61de…61fa               Head {h00=0x0018, h01=0x0050, text=» TBT GTLOKSPG,SPGL08«, t00=0x003e, t01=0x0118}
0x61fa…620a               Head {h00=0x000c, h01=0x0050, text=»ADM1100 «, t00=0x003e, t01=0x0134}
0x620a…6222               Head {h00=0x0014, h01=0x0050, text=» ATTFMT SPGFM00 «, t00=0x003e, t01=0x0144}
0x6222…6238               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x003e, t01=0x015c}
0x6238…624e               Head {h00=0x0012, h01=0x0050, text=» SET GTSPGFLG «, t00=0x003e, t01=0x0172}
0x624e…6272               Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'SUBTOTAL ' «, t00=0x003e, t01=0x0188}
0x6272…6286               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x003f, t01=0x001c}
0x6286…62b4               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM11RET,ADM11RET,ADM1110 «, t00=0x003f, t01=0x0030}
0x62b4…62c8               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x003f, t01=0x005e}
0x62c8…62d8               Head {h00=0x000c, h01=0x0050, text=»ADM1110 «, t00=0x003f, t01=0x0072}
0x62d8…62f6               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x003f, t01=0x0082}
0x62f6…632a               Head {h00=0x0030, h01=0x0050, text=» IB GSWBIN1,SPGL01,SPGL02,SPGL03,SPGL04,  C «, t00=0x003f, t01=0x00a0}
0x632a…635a               Head {h00=0x002c, h01=0x0050, text=»  SPGL05,SPGL06,SPGL07,SPGL08,SPGL09,  C«, t00=0x003f, t01=0x00d4}
0x635a…6372               Head {h00=0x0014, h01=0x0050, text=»  SPGL10,SPGL11 «, t00=0x003f, t01=0x0104}
0x6372…6384               Head {h00=0x000e, h01=0x0050, text=» B ADM1100«, t00=0x003f, t01=0x011c}
0x6384…6392               Head {h00=0x000a, h01=0x0050, text=»SPGL01«, t00=0x003f, t01=0x012e}
0x6392…63a4               Head {h00=0x000e, h01=0x0050, text=» PERF CLEJ«, t00=0x003f, t01=0x013c}
0x63a4…63b8               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x003f, t01=0x014e}
0x63b8…63c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0162}
0x63c2…63d0               Head {h00=0x000a, h01=0x0050, text=»SPGL02«, t00=0x003f, t01=0x016c}
0x63d0…63e4               Head {h00=0x0010, h01=0x0050, text=» PERF CLBEH «, t00=0x003f, t01=0x017a}
0x63e4…63f8               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x003f, t01=0x018e}
0x63f8…6402               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0012}
0x6402…6410               Head {h00=0x000a, h01=0x0050, text=»SPGL03«, t00=0x0040, t01=0x001c}
0x6410…6424               Head {h00=0x0010, h01=0x0050, text=» PERF CLEDB «, t00=0x0040, t01=0x002a}
0x6424…6438               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0040, t01=0x003e}
0x6438…6442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0052}
0x6442…6450               Head {h00=0x000a, h01=0x0050, text=»SPGL04«, t00=0x0040, t01=0x005c}
0x6450…646e               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD3,CTASKNR «, t00=0x0040, t01=0x006a}
0x646e…6484               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0040, t01=0x0088}
0x6484…649c               Head {h00=0x0014, h01=0x0050, text=» ATTFMT SPGFM04 «, t00=0x0040, t01=0x009e}
0x649c…64b0               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0040, t01=0x00b6}
0x64b0…64c4               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0040, t01=0x00ca}
0x64c4…64d2               Head {h00=0x000a, h01=0x0050, text=»SPGL05«, t00=0x0040, t01=0x00de}
0x64d2…64f8               Head {h00=0x0022, h01=0x0050, text=» PERF KTPRT UDSKRIV KONTOPLAN «, t00=0x0040, t01=0x00ec}
0x64f8…650c               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0040, t01=0x0112}
0x650c…651a               Head {h00=0x000a, h01=0x0050, text=»SPGL06«, t00=0x0040, t01=0x0126}
0x651a…6544               Head {h00=0x0026, h01=0x0050, text=» PERF ADM,CBIN2 BEHOLDNINGST[LLERE«, t00=0x0040, t01=0x0134}
0x6544…6558               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0040, t01=0x015e}
0x6558…6566               Head {h00=0x000a, h01=0x0050, text=»SPGL07«, t00=0x0040, t01=0x0172}
0x6566…6586               Head {h00=0x001c, h01=0x0050, text=» MUL TTEJEDB,=D'-1' VEND«, t00=0x0040, t01=0x0180}
0x6586…65a2               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD6,TTCASH«, t00=0x0041, t01=0x0010}
0x65a2…65be               Head {h00=0x0018, h01=0x0050, text=» ADD GSWBCD6,TTEJEDB«, t00=0x0041, t01=0x002c}
0x65be…65d4               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0041, t01=0x0048}
0x65d4…65ec               Head {h00=0x0014, h01=0x0050, text=» ATTFMT SPGFM17 «, t00=0x0041, t01=0x005e}
0x65ec…6600               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0041, t01=0x0076}
0x6600…6628               Head {h00=0x0024, h01=0x0050, text=» MUL TTEJEDB,=D'-1' VEND TILBAGE«, t00=0x0041, t01=0x008a}
0x6628…663c               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0041, t01=0x00b2}
0x663c…6646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00c6}
0x6646…6650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00d0}
0x6650…6670               Head {h00=0x001c, h01=0x0018, text=»SPGL08   LOCAL INQUIRIES«, t00=0x0041, t01=0x00da}
0x6670…66a6               Head {h00=0x0032, h01=0x002e, text=» TBT GTLOKSPG,SPG0820 ALREADY ACTIVE, CONTINUE«, t00=0x0041, t01=0x00fa}
0x66a6…66bc               Head {h00=0x0012, h01=0x0050, text=» TEST GTKASSE «, t00=0x0041, t01=0x0130}
0x66bc…66ea               Head {h00=0x002a, h01=0x0050, text=» BZ SPG08MAK ONLY IF 'KASSE FUNCTIONS «, t00=0x0041, t01=0x0146}
0x66ea…6700               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTGLSPG«, t00=0x0041, t01=0x0174}
0x6700…6710               Head {h00=0x000c, h01=0x0050, text=»SPG0805 «, t00=0x0041, t01=0x018a}
0x6710…6726               Head {h00=0x0012, h01=0x000d, text=» SET SPPROMPT «, t00=0x0042, t01=0x000a}
0x6726…674c               Head {h00=0x0022, h01=0x001e, text=» ATTFMT SPGFM08 INQUIRY FORMAT«, t00=0x0042, t01=0x0020}
0x674c…6760               Head {h00=0x0010, h01=0x000c, text=» PERF SPCLRA«, t00=0x0042, t01=0x0046}
0x6760…67a0               Head {h00=0x003c, h01=0x0037, text=»*     GTLBNRIN     CONTAINS FIRST (OR ONLY) TRANSACTION «, t00=0x0042, t01=0x005a}
0x67a0…67d6               Head {h00=0x0032, h01=0x002d, text=»*                  OF INTEREST (EKSP. LB.NR.) «, t00=0x0042, t01=0x009a}
0x67d6…6814               Head {h00=0x003a, h01=0x0035, text=»*     GSWBCD6      CONTAINS FIELD NO. OF WANTED FIELD «, t00=0x0042, t01=0x00d0}
0x6814…6856               Head {h00=0x003e, h01=0x0039, text=»*     GSWBCD7      CONTAINS FIELD CONTENT OF WANTED FIELD «, t00=0x0042, t01=0x010e}
0x6856…6860               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0042, t01=0x0150}
0x6860…688e               Head {h00=0x002a, h01=0x0025, text=» IB SPBINW2,SPG08MAK,SPG08MAK,SPG0810 «, t00=0x0042, t01=0x015a}
0x688e…68a0               Head {h00=0x000e, h01=0x0050, text=» B SPG0805«, t00=0x0042, t01=0x0188}
0x68a0…68aa               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0043, t01=0x000a}
0x68aa…68d2               Head {h00=0x0024, h01=0x001f, text=»SPG0810   SPG-CONDITION ENTERED «, t00=0x0043, t01=0x0014}
0x68d2…68ec               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN3 «, t00=0x0043, t01=0x003c}
0x68ec…6902               Head {h00=0x0012, h01=0x000d, text=» SET GTLOKSPG «, t00=0x0043, t01=0x0056}
0x6902…691e               Head {h00=0x0018, h01=0x0050, text=» TBT GTGLSPG,SPG0815«, t00=0x0043, t01=0x006c}
0x691e…6952               Head {h00=0x0030, h01=0x0050, text=» MOVE GTRECNR,CRECNR POINT TO START OF DSET «, t00=0x0043, t01=0x0088}
0x6952…6964               Head {h00=0x000e, h01=0x0050, text=» B SPG0820«, t00=0x0043, t01=0x00bc}
0x6964…6974               Head {h00=0x000c, h01=0x0050, text=»SPG0815 «, t00=0x0043, t01=0x00ce}
0x6974…6992               Head {h00=0x001a, h01=0x0050, text=» MOVE GTRECNR,CGLRECNR«, t00=0x0043, t01=0x00de}
0x6992…699c               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0043, t01=0x00fc}
0x699c…69ac               Head {h00=0x000c, h01=0x0007, text=»SPG0820 «, t00=0x0043, t01=0x0106}
0x69ac…69d2               Head {h00=0x0022, h01=0x0050, text=» SUB GTRECNR,CBIN1 NEXT RECORD«, t00=0x0043, t01=0x0116}
0x69d2…69e2               Head {h00=0x000c, h01=0x0050, text=»SPG0822 «, t00=0x0043, t01=0x013c}
0x69e2…6a06               Head {h00=0x0020, h01=0x0050, text=» CBNG GTRECNR,CBIN1,SPG08RET«, t00=0x0043, t01=0x014c}
0x6a06…6a22               Head {h00=0x0018, h01=0x0050, text=» TBT GTGLSPG,SPG0825«, t00=0x0043, t01=0x0170}
0x6a22…6a38               Head {h00=0x0012, h01=0x0050, text=»   NEW REGSET «, t00=0x0043, t01=0x018c}
0x6a38…6a5e               Head {h00=0x0022, h01=0x0050, text=» CBNL GTRECNR,CRECNR,SPG08RET «, t00=0x0044, t01=0x0012}
0x6a5e…6a8a               Head {h00=0x0028, h01=0x0050, text=» PERF RGREAD,DK02,=D'2' READ RECORD «, t00=0x0044, t01=0x0038}
0x6a8a…6ab0               Head {h00=0x0022, h01=0x0050, text=» BNOK SPG0820 IF TRANS 11, OR «, t00=0x0044, t01=0x0064}
0x6ab0…6ad0               Head {h00=0x001c, h01=0x0050, text=»   NOT SAME MACHINE, OR «, t00=0x0044, t01=0x008a}
0x6ad0…6ae6               Head {h00=0x0012, h01=0x0050, text=»   DISK ERROR «, t00=0x0044, t01=0x00aa}
0x6ae6…6af8               Head {h00=0x000e, h01=0x0050, text=» B SPG0828«, t00=0x0044, t01=0x00c0}
0x6af8…6b08               Head {h00=0x000c, h01=0x0050, text=»SPG0825 «, t00=0x0044, t01=0x00d2}
0x6b08…6b1e               Head {h00=0x0012, h01=0x0050, text=»   OLD REGSET «, t00=0x0044, t01=0x00e2}
0x6b1e…6b46               Head {h00=0x0024, h01=0x0050, text=» CBNL GTRECNR,CGLRECNR,SPG08RET «, t00=0x0044, t01=0x00f8}
0x6b46…6b72               Head {h00=0x0028, h01=0x0050, text=» PERF RGREAD,DK05,=D'5' READ RECORD «, t00=0x0044, t01=0x0120}
0x6b72…6b98               Head {h00=0x0022, h01=0x0050, text=» BNOK SPG0820 IF TRANS 11, OR «, t00=0x0044, t01=0x014c}
0x6b98…6bb8               Head {h00=0x001c, h01=0x0050, text=»   NOT SAME MACHINE, OR «, t00=0x0044, t01=0x0172}
0x6bb8…6bce (69, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»   DISK ERROR «, t00=0x0045, t01=0x0004}
0x6bce…6bde               Head {h00=0x000c, h01=0x0050, text=»SPG0828 «, t00=0x0045, t01=0x001a}
0x6bde…6c08               Head {h00=0x0026, h01=0x0050, text=» CBE GTREGNR,=D'12',SPG0820 TR 12 «, t00=0x0045, t01=0x002a}
0x6c08…6c12               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0045, t01=0x0054}
0x6c12…6c2e               Head {h00=0x0018, h01=0x0013, text=»*     SAME MACHINE: «, t00=0x0045, t01=0x005e}
0x6c2e…6c52               Head {h00=0x0020, h01=0x001c, text=»*     GTREGNR      TRANSTYPE«, t00=0x0045, t01=0x007a}
0x6c52…6c7e               Head {h00=0x0028, h01=0x0024, text=»*     GTREGDEX     TRANSTYPE - INDEX«, t00=0x0045, t01=0x009e}
0x6c7e…6c9e               Head {h00=0x001c, h01=0x0017, text=»*     CEORFLG      TRUE «, t00=0x0045, t01=0x00ca}
0x6c9e…6cbe               Head {h00=0x001c, h01=0x0017, text=»*     TTEORFLG     TRUE «, t00=0x0045, t01=0x00ea}
0x6cbe…6cf0               Head {h00=0x002e, h01=0x002a, text=»*     GTLBNR       EKSP. OF CURRENT RECORD«, t00=0x0045, t01=0x010a}
0x6cf0…6d22               Head {h00=0x002e, h01=0x0029, text=»*     GTUSED       SAT FOR PRESENT FIELDS «, t00=0x0045, t01=0x013c}
0x6d22…6d50               Head {h00=0x002a, h01=0x0026, text=»*     GTDUPF       -     -     -     -«, t00=0x0045, t01=0x016e}
0x6d50…6d7e               Head {h00=0x002a, h01=0x0026, text=»*     GTREGF       -     -     -     -«, t00=0x0046, t01=0x000c}
0x6d7e…6db4               Head {h00=0x0032, h01=0x002d, text=»*     DEB/KRE      RELEVANT ROUTINE PERFORMED «, t00=0x0046, t01=0x003a}
0x6db4…6dcc               Head {h00=0x0014, h01=0x0010, text=»*        GTDBKRC«, t00=0x0046, t01=0x0070}
0x6dcc…6de4               Head {h00=0x0014, h01=0x0010, text=»*        GTDBKRS«, t00=0x0046, t01=0x0088}
0x6de4…6dfc               Head {h00=0x0014, h01=0x0010, text=»*        TTDKBCD«, t00=0x0046, t01=0x00a0}
0x6dfc…6e14               Head {h00=0x0014, h01=0x0010, text=»*        TTDKDEX«, t00=0x0046, t01=0x00b8}
0x6e14…6e1e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0046, t01=0x00d0}
0x6e1e…6e3c               Head {h00=0x001a, h01=0x0015, text=» CALL EMPTYT,GTLBNRIN «, t00=0x0046, t01=0x00da}
0x6e3c…6e66               Head {h00=0x0026, h01=0x0022, text=» BNOK SPG0830 IF NO SPECIFIC EKSP.«, t00=0x0046, t01=0x00f8}
0x6e66…6e98               Head {h00=0x002e, h01=0x0050, text=» CMP GTLBNR,GTLBNRIN ACTUAL - WANTED EKSP.«, t00=0x0046, t01=0x0122}
0x6e98…6ec0               Head {h00=0x0024, h01=0x0050, text=» BL SPG0830 WANTED EKSP. PASSED «, t00=0x0046, t01=0x0154}
0x6ec0…6eda               Head {h00=0x0016, h01=0x0011, text=» BE SPG0840 FOUND «, t00=0x0046, t01=0x017c}
0x6eda…6ef6               Head {h00=0x0018, h01=0x0050, text=»*     NOT YET FOUND «, t00=0x0047, t01=0x0008}
0x6ef6…6f18               Head {h00=0x001e, h01=0x0050, text=»*     JUMP TO FIND RECORD «, t00=0x0047, t01=0x0024}
0x6f18…6f34               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,GTLBNR«, t00=0x0047, t01=0x0046}
0x6f34…6f5a               Head {h00=0x0022, h01=0x0050, text=» SUB GTRECNR,GSWBIN1 GTRECNR= «, t00=0x0047, t01=0x0062}
0x6f5a…6f82               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,GTLBNRIN GTRECNR -«, t00=0x0047, t01=0x0088}
0x6f82…6fb4               Head {h00=0x002e, h01=0x0050, text=» ADD GTRECNR,GSWBIN1 ( GTLBNR - GTLBNRIN )«, t00=0x0047, t01=0x00b0}
0x6fb4…6fc6               Head {h00=0x000e, h01=0x0050, text=» B SPG0822«, t00=0x0047, t01=0x00e2}
0x6fc6…6fd0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0047, t01=0x00f4}
0x6fd0…6fe0               Head {h00=0x000c, h01=0x0007, text=»SPG0830 «, t00=0x0047, t01=0x00fe}
0x6fe0…7014               Head {h00=0x0030, h01=0x0050, text=» CBE GSWBCD6,=D'0',SPG08RET NO FIELDS WANTED«, t00=0x0047, t01=0x010e}
0x7014…7034               Head {h00=0x001c, h01=0x0017, text=» B SPG0850 SEARCH FIELD «, t00=0x0047, t01=0x0142}
0x7034…703e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0047, t01=0x0162}
0x703e…704e               Head {h00=0x000c, h01=0x0007, text=»SPG0840 «, t00=0x0047, t01=0x016c}
0x704e…707e               Head {h00=0x002c, h01=0x0028, text=» CBE GSWBCD6,=D'0',SPGFOUND RECORD FOUND«, t00=0x0047, t01=0x017c}
0x707e…7088               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0048, t01=0x001c}
0x7088…70a6               Head {h00=0x001a, h01=0x0015, text=»SPG0850   CHECK FIELD «, t00=0x0048, t01=0x0026}
0x70a6…70d4               Head {h00=0x002a, h01=0x0025, text=» MOVE GSWBIN1,GSWBCD6 GET FIELD INDEX «, t00=0x0048, t01=0x0044}
0x70d4…70fa               Head {h00=0x0022, h01=0x001e, text=» MOVE GSWBIN2,CFLTDEX(GSWBIN1)«, t00=0x0048, t01=0x0072}
0x70fa…7120               Head {h00=0x0022, h01=0x001d, text=» MOVE GSWBIN2,GTUSED(GSWBIN2) «, t00=0x0048, t01=0x0098}
0x7120…7152               Head {h00=0x002e, h01=0x002a, text=» CBE GSWBIN1,GSWBIN2,SPG0860 FIELD PRESENT«, t00=0x0048, t01=0x00be}
0x7152…716e               Head {h00=0x0018, h01=0x0013, text=» MUL GSWBIN2,=W'-1' «, t00=0x0048, t01=0x00f0}
0x716e…71a0               Head {h00=0x002e, h01=0x002a, text=» CBE GSWBIN1,GSWBIN2,SPG0860 FIELD PRESENT«, t00=0x0048, t01=0x010c}
0x71a0…71c4               Head {h00=0x0020, h01=0x001c, text=» B SPG0820 FIELD NOT PRESENT«, t00=0x0048, t01=0x013e}
0x71c4…71ce               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0048, t01=0x0162}
0x71ce…71f4               Head {h00=0x0022, h01=0x001d, text=»SPG0860   CHECK FIELD CONTENT «, t00=0x0048, t01=0x016c}
0x71f4…721a (73, 0, 400)  Head {h00=0x0022, h01=0x001e, text=» MOVE GSWBIN2,CFLTDEX(GSWBIN1)«, t00=0x0049, t01=0x0004}
0x721a…7248               Head {h00=0x002a, h01=0x0025, text=» CBNE GSWBCD7,GTDUPF(GSWBIN2),SPG0820 «, t00=0x0049, t01=0x002a}
0x7248…7252               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0049, t01=0x0058}
0x7252…725c               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0049, t01=0x0062}
0x725c…7284               Head {h00=0x0024, h01=0x0020, text=»SPGFOUND   A WANTED RECORD FOUND«, t00=0x0049, t01=0x006c}
0x7284…728e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0049, t01=0x0094}
0x728e…72aa               Head {h00=0x0018, h01=0x0050, text=» MOVE TTDBKRM,=C'K' «, t00=0x0049, t01=0x009e}
0x72aa…72cc               Head {h00=0x001e, h01=0x0050, text=» CBE TTDKDEX,CBIN1,SPG0870«, t00=0x0049, t01=0x00ba}
0x72cc…72e8               Head {h00=0x0018, h01=0x0050, text=» MOVE TTDBKRM,=C'D' «, t00=0x0049, t01=0x00dc}
0x72e8…72f8               Head {h00=0x000c, h01=0x0050, text=»SPG0870 «, t00=0x0049, t01=0x00f8}
0x72f8…7302               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0108}
0x7302…7318               Head {h00=0x0012, h01=0x0050, text=» SET TTSUPFLG «, t00=0x0049, t01=0x0112}
0x7318…7334               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C'S'«, t00=0x0049, t01=0x0128}
0x7334…735e               Head {h00=0x0026, h01=0x0050, text=» CBNE GTUSED(CBIN6),CBIN0,SPG0880 «, t00=0x0049, t01=0x0144}
0x735e…7376               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x0049, t01=0x016e}
0x7376…7392               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x0049, t01=0x0186}
0x7392…73a2               Head {h00=0x000c, h01=0x0050, text=»SPG0880 «, t00=0x004a, t01=0x0012}
0x73a2…73ac               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x004a, t01=0x0022}
0x73ac…73c0               Head {h00=0x0010, h01=0x000c, text=» PERF TRPAGE«, t00=0x004a, t01=0x002c}
0x73c0…73e6               Head {h00=0x0022, h01=0x001e, text=» SET GTDIVTR SET DIVERSE TRANS«, t00=0x004a, t01=0x0040}
0x73e6…73fe               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTREGFLG «, t00=0x004a, t01=0x0066}
0x73fe…7408               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x004a, t01=0x007e}
0x7408…741c               Head {h00=0x0010, h01=0x000b, text=» B ADM11RET «, t00=0x004a, t01=0x0088}
0x741c…7426               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x004a, t01=0x009c}
0x7426…7436               Head {h00=0x000c, h01=0x0050, text=»SPG08RET«, t00=0x004a, t01=0x00a6}
0x7436…7450               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN1 «, t00=0x004a, t01=0x00b6}
0x7450…7468               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTLOKSPG «, t00=0x004a, t01=0x00d0}
0x7468…7480               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x004a, t01=0x00e8}
0x7480…749c               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x004a, t01=0x0100}
0x749c…74ac               Head {h00=0x000c, h01=0x0008, text=»SPG08MAK«, t00=0x004a, t01=0x011c}
0x74ac…74c0               Head {h00=0x0010, h01=0x000b, text=» B ADM11RET «, t00=0x004a, t01=0x012c}
0x74c0…74ca               Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x004a, t01=0x0140}
0x74ca…74d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x014a}
0x74d4…74de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0154}
0x74de…74fe               Head {h00=0x001c, h01=0x0050, text=»SPGL09   INQ. OLD REGSET«, t00=0x004a, t01=0x015e}
0x74fe…7526               Head {h00=0x0024, h01=0x0050, text=» TBF CGLREGFL,SPG09MAK ALLOWED? «, t00=0x004a, t01=0x017e}
0x7526…7554               Head {h00=0x002a, h01=0x0050, text=» TBF GTKASSE,SPG09MAK ONLY IF 'KASSE' «, t00=0x004b, t01=0x0016}
0x7554…757c               Head {h00=0x0024, h01=0x0050, text=» SET GTGLSPG INDICATE OLD REGSET«, t00=0x004b, t01=0x0044}
0x757c…758e               Head {h00=0x000e, h01=0x0050, text=» B SPG0805«, t00=0x004b, t01=0x006c}
0x758e…759e               Head {h00=0x000c, h01=0x0050, text=»SPG09MAK«, t00=0x004b, t01=0x007e}
0x759e…75b2               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x004b, t01=0x008e}
0x75b2…75bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00a2}
0x75bc…75c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00ac}
0x75c6…75d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00b6}
0x75d0…7606               Head {h00=0x0032, h01=0x0050, text=»*          PRINT OUT OF SPECIFIED TRANSACTIONS«, t00=0x004b, t01=0x00c0}
0x7606…7610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00f6}
0x7610…7632               Head {h00=0x001e, h01=0x0050, text=»SPGL10   PRINT A INTERVAL «, t00=0x004b, t01=0x0100}
0x7632…7648               Head {h00=0x0012, h01=0x0050, text=» TEST GTCYFLG «, t00=0x004b, t01=0x0122}
0x7648…766a               Head {h00=0x001e, h01=0x0050, text=» BNZ SPG10MAK NOT IN CYCLE«, t00=0x004b, t01=0x0138}
0x766a…7680               Head {h00=0x0012, h01=0x0050, text=» TEST TTLSTFLG«, t00=0x004b, t01=0x015a}
0x7680…76a2               Head {h00=0x001e, h01=0x0050, text=» BNZ SPG10MAK NOT IN LISTE«, t00=0x004b, t01=0x0170}
0x76a2…76b8 (76, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» TEST GTKASSE «, t00=0x004c, t01=0x0004}
0x76b8…76e6               Head {h00=0x002a, h01=0x0050, text=» BZ SPG10MAK ONLY IF 'KASSE FUNCTIONS «, t00=0x004c, t01=0x001a}
0x76e6…7714               Head {h00=0x002a, h01=0x0050, text=» CLEAR GTGLSPG INDICATE CURRENT REGSET«, t00=0x004c, t01=0x0048}
0x7714…7724               Head {h00=0x000c, h01=0x0050, text=»SPG1005 «, t00=0x004c, t01=0x0076}
0x7724…773a               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x004c, t01=0x0086}
0x773a…7760               Head {h00=0x0022, h01=0x0050, text=» ATTFMT SPGFM10 SCREEN FORMAT «, t00=0x004c, t01=0x009c}
0x7760…7774               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x004c, t01=0x00c2}
0x7774…77b4               Head {h00=0x003c, h01=0x0050, text=»*     GTLBNRIN   HIGHEST EKS.LBNR WANTED (FIRST PRINTED)«, t00=0x004c, t01=0x00d6}
0x77b4…77e4               Head {h00=0x002c, h01=0x0050, text=»*     GSWBCD7    LOWEST EKS.LBNR WANTED «, t00=0x004c, t01=0x0116}
0x77e4…7812               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,SPG10MAK,SPG10MAK,SPG1010 «, t00=0x004c, t01=0x0146}
0x7812…7824               Head {h00=0x000e, h01=0x0050, text=» B SPG1005«, t00=0x004c, t01=0x0174}
0x7824…782e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0186}
0x782e…783e               Head {h00=0x000c, h01=0x0050, text=»SPG1010 «, t00=0x004c, t01=0x0190}
0x783e…7854               Head {h00=0x0012, h01=0x0050, text=» SET GTLOKSPG «, t00=0x004d, t01=0x0010}
0x7854…7880               Head {h00=0x0028, h01=0x0050, text=» CLEAR TTTSTFLG INITIATE FIRST TIME «, t00=0x004d, t01=0x0026}
0x7880…789c               Head {h00=0x0018, h01=0x0050, text=» TBT GTGLSPG,SPG1015«, t00=0x004d, t01=0x0052}
0x789c…78ce               Head {h00=0x002e, h01=0x0050, text=» MOVE GTRECNR,CRECNR POINT TO LAST RECORD «, t00=0x004d, t01=0x006e}
0x78ce…78e0               Head {h00=0x000e, h01=0x0050, text=» B SPG1020«, t00=0x004d, t01=0x00a0}
0x78e0…78f0               Head {h00=0x000c, h01=0x0050, text=»SPG1015 «, t00=0x004d, t01=0x00b2}
0x78f0…790e               Head {h00=0x001a, h01=0x0050, text=» MOVE GTRECNR,CGLRECNR«, t00=0x004d, t01=0x00c2}
0x790e…791e               Head {h00=0x000c, h01=0x0050, text=»SPG1020 «, t00=0x004d, t01=0x00e0}
0x791e…7948               Head {h00=0x0026, h01=0x0050, text=» SUB GTRECNR,CBIN1 PREVIOUS RECORD«, t00=0x004d, t01=0x00f0}
0x7948…7958               Head {h00=0x000c, h01=0x0050, text=»SPG1022 «, t00=0x004d, t01=0x011a}
0x7958…797c               Head {h00=0x0020, h01=0x0050, text=» CBNG GTRECNR,CBIN1,SPG1090 «, t00=0x004d, t01=0x012a}
0x797c…7998               Head {h00=0x0018, h01=0x0050, text=» TBT GTGLSPG,SPG1025«, t00=0x004d, t01=0x014e}
0x7998…79ae               Head {h00=0x0012, h01=0x0050, text=»   NEW REGSET «, t00=0x004d, t01=0x016a}
0x79ae…79d2               Head {h00=0x0020, h01=0x0050, text=» CBNL GTRECNR,CRECNR,SPG1090«, t00=0x004d, t01=0x0180}
0x79d2…79fe               Head {h00=0x0028, h01=0x0050, text=» PERF RGREAD,DK02,=D'2' READ RECORD «, t00=0x004e, t01=0x0014}
0x79fe…7a20               Head {h00=0x001e, h01=0x0050, text=» BNOK SPG1020 IF TR 11, OR«, t00=0x004e, t01=0x0040}
0x7a20…7a40               Head {h00=0x001c, h01=0x0050, text=»   NOT SAME MACHINE, OR «, t00=0x004e, t01=0x0062}
0x7a40…7a56               Head {h00=0x0012, h01=0x0050, text=»   DISK ERROR «, t00=0x004e, t01=0x0082}
0x7a56…7a68               Head {h00=0x000e, h01=0x0050, text=» B SPG1028«, t00=0x004e, t01=0x0098}
0x7a68…7a78               Head {h00=0x000c, h01=0x0050, text=»SPG1025 «, t00=0x004e, t01=0x00aa}
0x7a78…7a8e               Head {h00=0x0012, h01=0x0050, text=»   OLD REGSET «, t00=0x004e, t01=0x00ba}
0x7a8e…7ab4               Head {h00=0x0022, h01=0x0050, text=» CBNL GTRECNR,CGLRECNR,SPG1090«, t00=0x004e, t01=0x00d0}
0x7ab4…7ae0               Head {h00=0x0028, h01=0x0050, text=» PERF RGREAD,DK05,=D'5' READ RECORD «, t00=0x004e, t01=0x00f6}
0x7ae0…7b02               Head {h00=0x001e, h01=0x0050, text=» BNOK SPG1020 IF TR 11, OR«, t00=0x004e, t01=0x0122}
0x7b02…7b22               Head {h00=0x001c, h01=0x0050, text=»   NOT SAME MACHINE, OR «, t00=0x004e, t01=0x0144}
0x7b22…7b38               Head {h00=0x0012, h01=0x0050, text=»   DISK ERROR «, t00=0x004e, t01=0x0164}
0x7b38…7b48               Head {h00=0x000c, h01=0x0050, text=»SPG1028 «, t00=0x004e, t01=0x017a}
0x7b48…7b72               Head {h00=0x0026, h01=0x0050, text=» CBE GTREGNR,=D'12',SPG1020 TR 12 «, t00=0x004e, t01=0x018a}
0x7b72…7b9e               Head {h00=0x0028, h01=0x0050, text=» CBL GTLBNR,GSWBCD7,SPG1090 TOO FAR «, t00=0x004f, t01=0x0024}
0x7b9e…7bd0               Head {h00=0x002e, h01=0x0050, text=» CMP GTLBNR,GTLBNRIN ACTUAL - WANTED EKSP.«, t00=0x004f, t01=0x0050}
0x7bd0…7bf8               Head {h00=0x0024, h01=0x0050, text=» BL SPG1040 WANTED EKSP. PASSED «, t00=0x004f, t01=0x0082}
0x7bf8…7c12               Head {h00=0x0016, h01=0x0050, text=» BE SPG1040 FOUND «, t00=0x004f, t01=0x00aa}
0x7c12…7c2e               Head {h00=0x0018, h01=0x0050, text=»*     NOT YET FOUND «, t00=0x004f, t01=0x00c4}
0x7c2e…7c4a               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,GTLBNR«, t00=0x004f, t01=0x00e0}
0x7c4a…7c70               Head {h00=0x0022, h01=0x0050, text=» SUB GTRECNR,GSWBIN1 GTRECNR =«, t00=0x004f, t01=0x00fc}
0x7c70…7c98               Head {h00=0x0024, h01=0x0050, text=» MOVE GSWBIN1,GTLBNRIN GTRECNR -«, t00=0x004f, t01=0x0122}
0x7c98…7cca               Head {h00=0x002e, h01=0x0050, text=» ADD GTRECNR,GSWBIN1 ( GTLBNR - GTLBNRIN )«, t00=0x004f, t01=0x014a}
0x7cca…7cdc               Head {h00=0x000e, h01=0x0050, text=» B SPG1022«, t00=0x004f, t01=0x017c}
0x7cdc…7ce6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x018e}
0x7ce6…7cf6               Head {h00=0x000c, h01=0x0050, text=»SPG1040 «, t00=0x0050, t01=0x0008}
0x7cf6…7d12               Head {h00=0x0018, h01=0x0050, text=» MOVE TTDBKRM,=C'K' «, t00=0x0050, t01=0x0018}
0x7d12…7d34               Head {h00=0x001e, h01=0x0050, text=» CBE TTDKDEX,CBIN1,SPG1060«, t00=0x0050, t01=0x0034}
0x7d34…7d50               Head {h00=0x0018, h01=0x0050, text=» MOVE TTDBKRM,=C'D' «, t00=0x0050, t01=0x0056}
0x7d50…7d60               Head {h00=0x000c, h01=0x0050, text=»SPG1060 «, t00=0x0050, t01=0x0072}
0x7d60…7d76               Head {h00=0x0012, h01=0x0050, text=» SET TTSUPFLG «, t00=0x0050, t01=0x0082}
0x7d76…7d92               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C'S'«, t00=0x0050, t01=0x0098}
0x7d92…7dbc               Head {h00=0x0026, h01=0x0050, text=» CBNE GTUSED(CBIN6),CBIN0,SPG1070 «, t00=0x0050, t01=0x00b4}
0x7dbc…7dd4               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x0050, t01=0x00de}
0x7dd4…7df0               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x0050, t01=0x00f6}
0x7df0…7e00               Head {h00=0x000c, h01=0x0050, text=»SPG1070 «, t00=0x0050, t01=0x0112}
0x7e00…7e1e               Head {h00=0x001a, h01=0x0050, text=» TBT TTTSTFLG,SPG1080 «, t00=0x0050, t01=0x0122}
0x7e1e…7e34               Head {h00=0x0012, h01=0x0050, text=» SET TTTSTFLG «, t00=0x0050, t01=0x0140}
0x7e34…7e62               Head {h00=0x002a, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2 WRITE 'BILAG'«, t00=0x0050, t01=0x0156}
0x7e62…7e76               Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x0050, t01=0x0184}
0x7e76…7e8a               Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x0051, t01=0x0008}
0x7e8a…7eae               Head {h00=0x0020, h01=0x0050, text=» MOVE TTLINNR,=D'6' LINE 25 «, t00=0x0051, t01=0x001c}
0x7eae…7ecc               Head {h00=0x001a, h01=0x0050, text=» MOVE TTCYM,=C'K' KVIT«, t00=0x0051, t01=0x0040}
0x7ecc…7edc               Head {h00=0x000c, h01=0x0050, text=»SPG1080 «, t00=0x0051, t01=0x005e}
0x7edc…7efa               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0051, t01=0x006e}
0x7efa…7f2c               Head {h00=0x002e, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER «, t00=0x0051, t01=0x008c}
0x7f2c…7f4c               Head {h00=0x001c, h01=0x0050, text=» PERF FRMTKV GET FORMAT «, t00=0x0051, t01=0x00be}
0x7f4c…7f70               Head {h00=0x0020, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT WRITE«, t00=0x0051, t01=0x00de}
0x7f70…7f82               Head {h00=0x000e, h01=0x0050, text=» PERF CRVO«, t00=0x0051, t01=0x0102}
0x7f82…7fa8               Head {h00=0x0022, h01=0x0050, text=» ADD TTLINNR,=D'2' ONE LINE UP«, t00=0x0051, t01=0x0114}
0x7fa8…7fc6               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,TTLINNR «, t00=0x0051, t01=0x013a}
0x7fc6…7ff8               Head {h00=0x002e, h01=0x0050, text=» CBG GSWBIN1,CMAXLIN,SPG1090 NO MORE LINES«, t00=0x0051, t01=0x0158}
0x7ff8…801e               Head {h00=0x0022, h01=0x0050, text=» SUB GTLBNRIN,=D'1' NEXT LBNR «, t00=0x0051, t01=0x018a}
0x801e…8030               Head {h00=0x000e, h01=0x0050, text=» B SPG1020«, t00=0x0052, t01=0x0020}
0x8030…8040               Head {h00=0x000c, h01=0x0050, text=»SPG1090 «, t00=0x0052, t01=0x0032}
0x8040…805e               Head {h00=0x001a, h01=0x0050, text=» TBF TTTSTFLG,SPG10RET«, t00=0x0052, t01=0x0042}
0x805e…8076               Head {h00=0x0014, h01=0x0050, text=» CLEAR TTSUPFLG «, t00=0x0052, t01=0x0060}
0x8076…8092               Head {h00=0x0018, h01=0x0050, text=» MOVE TTSUPMRK,=C' '«, t00=0x0052, t01=0x0078}
0x8092…80ac               Head {h00=0x0016, h01=0x0050, text=» MOVE TTCYM,=C' ' «, t00=0x0052, t01=0x0094}
0x80ac…80c0               Head {h00=0x0010, h01=0x0050, text=» WAIT KVOUCH«, t00=0x0052, t01=0x00ae}
0x80c0…80da               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0052, t01=0x00c2}
0x80da…80ea               Head {h00=0x000c, h01=0x0050, text=»SPG10RET«, t00=0x0052, t01=0x00dc}
0x80ea…8102               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTLOKSPG «, t00=0x0052, t01=0x00ec}
0x8102…8112               Head {h00=0x000c, h01=0x0050, text=»SPG10MAK«, t00=0x0052, t01=0x0104}
0x8112…8126               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0052, t01=0x0114}
0x8126…8130               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0128}
0x8130…813a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0132}
0x813a…8166               Head {h00=0x0028, h01=0x0050, text=»SPGL11   PRINT INTERVAL, OLD REGSET «, t00=0x0052, t01=0x013c}
0x8166…818e               Head {h00=0x0024, h01=0x0050, text=» TBF CGLREGFL,SPG11MAK ALLOWED? «, t00=0x0052, t01=0x0168}
0x818e…81b8               Head {h00=0x0026, h01=0x0050, text=» TBT GTCYFLG,SPG11MAK NOT IN CYCLE«, t00=0x0052, t01=0x0190}
0x81b8…81e4               Head {h00=0x0028, h01=0x0050, text=» TBT TTLSTFLG,SPG11MAK NOT IN LISTE «, t00=0x0053, t01=0x002a}
0x81e4…8212               Head {h00=0x002a, h01=0x0050, text=» TBF GTKASSE,SPG11MAK ONLY IF 'KASSE' «, t00=0x0053, t01=0x0056}
0x8212…8226               Head {h00=0x0010, h01=0x0050, text=» SET GTGLSPG«, t00=0x0053, t01=0x0084}
0x8226…8238               Head {h00=0x000e, h01=0x0050, text=» B SPG1005«, t00=0x0053, t01=0x0098}
0x8238…8248               Head {h00=0x000c, h01=0x0050, text=»SPG11MAK«, t00=0x0053, t01=0x00aa}
0x8248…825c               Head {h00=0x0010, h01=0x0050, text=» B ADM11RET «, t00=0x0053, t01=0x00ba}
0x825c…8266               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00ce}
0x8266…8270               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00d8}
0x8270…827a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00e2}
0x827a…8284               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00ec}
0x8284…8294               Head {h00=0x000c, h01=0x0050, text=»ADM11RET«, t00=0x0053, t01=0x00f6}
0x8294…82ac               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSPGFLG «, t00=0x0053, t01=0x0106}
0x82ac…82c8               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=C' ' «, t00=0x0053, t01=0x011e}
0x82c8…82da               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0053, t01=0x013a}
0x82da…82e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x014c}
0x82e4…82ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0156}
0x82ee…82fc               Head {h00=0x000a, h01=0x0050, text=»ADM12 «, t00=0x0053, t01=0x0160}
0x82fc…831c               Head {h00=0x001c, h01=0x0050, text=»* FLOPPY DISC EXCHANGE *«, t00=0x0053, t01=0x016e}
0x831c…833a               Head {h00=0x001a, h01=0x0050, text=» TBT GTTESTFL,ADM12RET«, t00=0x0053, t01=0x018e}
0x833a…8366               Head {h00=0x0028, h01=0x0050, text=» TBF GTMASTFL,ADM1250 DISKETTE SKIFT«, t00=0x0054, t01=0x001c}
0x8366…837c               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0054, t01=0x0048}
0x837c…8394               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADM12FRM«, t00=0x0054, t01=0x005e}
0x8394…83a8               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0054, t01=0x0076}
0x83a8…83d6               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM12RET,ADM12RET,ADM1210 «, t00=0x0054, t01=0x008a}
0x83d6…83ea               Head {h00=0x0010, h01=0x0050, text=» B ADM12RET «, t00=0x0054, t01=0x00b8}
0x83ea…83fa               Head {h00=0x000c, h01=0x0050, text=»ADM1210 «, t00=0x0054, t01=0x00cc}
0x83fa…8410               Head {h00=0x0012, h01=0x0050, text=» SET CSKIFTFL «, t00=0x0054, t01=0x00dc}
0x8410…8424               Head {h00=0x0010, h01=0x0050, text=» PERF SKIFT «, t00=0x0054, t01=0x00f2}
0x8424…8438               Head {h00=0x0010, h01=0x0050, text=» B ADM12RET «, t00=0x0054, t01=0x0106}
0x8438…8442               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x011a}
0x8442…844c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0124}
0x844c…846e               Head {h00=0x001e, h01=0x0050, text=»*          FOR NON MASTER «, t00=0x0054, t01=0x012e}
0x846e…8478               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x0150}
0x8478…8488               Head {h00=0x000c, h01=0x0050, text=»ADM1250 «, t00=0x0054, t01=0x015a}
0x8488…84b2               Head {h00=0x0026, h01=0x0050, text=» TBF CSKIFTFL,FDEXIT T=CHANGE DISK«, t00=0x0054, t01=0x016a}
0x84b2…84cc (85, 0, 400)  Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,FDEXIT«, t00=0x0055, t01=0x0004}
0x84cc…84fe               Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' «, t00=0x0055, t01=0x001e}
0x84fe…850a               Head {h00=0x0008, h01=0x0050, text=»FD10«, t00=0x0055, t01=0x0050}
0x850a…852e               Head {h00=0x0020, h01=0x0050, text=» DELAY CBIN20 WAIT A SECOND «, t00=0x0055, t01=0x005c}
0x852e…8552               Head {h00=0x0020, h01=0x0050, text=» TBT CSKIFTFL,FD10 FINISHED?«, t00=0x0055, t01=0x0080}
0x8552…8560               Head {h00=0x000a, h01=0x0050, text=»   YES«, t00=0x0055, t01=0x00a4}
0x8560…857c               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN11«, t00=0x0055, t01=0x00b2}
0x857c…8598               Head {h00=0x0018, h01=0x0050, text=» PERF FRMXJT,GSWBIN1«, t00=0x0055, t01=0x00ce}
0x8598…85ba               Head {h00=0x001e, h01=0x0050, text=» EDWRT .NW,KJTAPE,GTSTRFMT«, t00=0x0055, t01=0x00ea}
0x85ba…85d2               Head {h00=0x0014, h01=0x0050, text=» CALL ABORT,KEYB«, t00=0x0055, t01=0x010c}
0x85d2…85ea               Head {h00=0x0014, h01=0x0050, text=» DSC0 KEYB,SKIB «, t00=0x0055, t01=0x0124}
0x85ea…85fe               Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x0055, t01=0x013c}
0x85fe…8614               Head {h00=0x0012, h01=0x0050, text=» DELAY CBIN20 «, t00=0x0055, t01=0x0150}
0x8614…862e               Head {h00=0x0016, h01=0x0050, text=» CALL ABORT,KJTAPE«, t00=0x0055, t01=0x0166}
0x862e…8638               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0180}
0x8638…8646               Head {h00=0x000a, h01=0x0050, text=»FDEXIT«, t00=0x0055, t01=0x018a}
0x8646…8656               Head {h00=0x000c, h01=0x0050, text=»ADM12RET«, t00=0x0056, t01=0x0008}
0x8656…8668               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0056, t01=0x0018}
0x8668…8672               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x002a}
0x8672…867c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0034}
0x867c…868a               Head {h00=0x000a, h01=0x0050, text=»ADM13 «, t00=0x0056, t01=0x003e}
0x868a…86c0               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0056, t01=0x004c}
0x86c0…86ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0082}
0x86ca…86f4               Head {h00=0x0026, h01=0x0050, text=»*          SET CLEAR AUTOSUM FLAG «, t00=0x0056, t01=0x008c}
0x86f4…86fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00b6}
0x86fe…8736               Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0056, t01=0x00c0}
0x8736…8740               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00f8}
0x8740…875e               Head {h00=0x001a, h01=0x0050, text=» TBT GTASUMFL,ADM13CL «, t00=0x0056, t01=0x0102}
0x875e…8780               Head {h00=0x001e, h01=0x0050, text=» SET GTASUMFL SET AUTOSUM «, t00=0x0056, t01=0x0120}
0x8780…879e               Head {h00=0x001a, h01=0x0050, text=» PERF SUM INITIATE SUM«, t00=0x0056, t01=0x0142}
0x879e…87b0               Head {h00=0x000e, h01=0x0050, text=» B ADM13OK«, t00=0x0056, t01=0x0160}
0x87b0…87c0               Head {h00=0x000c, h01=0x0050, text=»ADM13CL «, t00=0x0056, t01=0x0172}
0x87c0…87e6               Head {h00=0x0022, h01=0x0050, text=» CLEAR GTASUMFL CLEAR AUTOSUM «, t00=0x0056, t01=0x0182}
0x87e6…87f6               Head {h00=0x000c, h01=0x0050, text=»ADM13OK «, t00=0x0057, t01=0x0018}
0x87f6…880e               Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0057, t01=0x0028}
0x880e…8820               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0057, t01=0x0040}
0x8820…882a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0052}
0x882a…8834               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x005c}
0x8834…8842               Head {h00=0x000a, h01=0x0050, text=»ADM14 «, t00=0x0057, t01=0x0066}
0x8842…887a               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0057, t01=0x0074}
0x887a…8884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00ac}
0x8884…88aa               Head {h00=0x0022, h01=0x0050, text=»*              SET 'DAGS DATO'«, t00=0x0057, t01=0x00b6}
0x88aa…88b4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00dc}
0x88b4…88ec               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0057, t01=0x00e6}
0x88ec…88f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x011e}
0x88f6…8906               Head {h00=0x000c, h01=0x0050, text=»ADM14000«, t00=0x0057, t01=0x0128}
0x8906…891a               Head {h00=0x0010, h01=0x0050, text=» SET GTDYFLG«, t00=0x0057, t01=0x0138}
0x891a…8930               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0057, t01=0x014c}
0x8930…8942               Head {h00=0x000e, h01=0x0050, text=» SET SPME «, t00=0x0057, t01=0x0162}
0x8942…895e               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,=X'FF'«, t00=0x0057, t01=0x0174}
0x895e…896e               Head {h00=0x000c, h01=0x0050, text=»ADM1410 «, t00=0x0057, t01=0x0190}
0x896e…8986               Head {h00=0x0014, h01=0x0050, text=» ATTFMT OPENFRM «, t00=0x0058, t01=0x0010}
0x8986…899a               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x0058, t01=0x0028}
0x899a…89c8               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM14000,ADM14000,ADM14RET«, t00=0x0058, t01=0x003c}
0x89c8…89dc               Head {h00=0x0010, h01=0x0050, text=» B ADM14000 «, t00=0x0058, t01=0x006a}
0x89dc…89ec               Head {h00=0x000c, h01=0x0050, text=»ADM14RET«, t00=0x0058, t01=0x007e}
0x89ec…8a00               Head {h00=0x0010, h01=0x0050, text=» CLEAR SPME «, t00=0x0058, t01=0x008e}
0x8a00…8a16               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x0058, t01=0x00a2}
0x8a16…8a28               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0058, t01=0x00b8}
0x8a28…8a32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00ca}
0x8a32…8a3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00d4}
0x8a3c…8a4a               Head {h00=0x000a, h01=0x0050, text=»ADM15 «, t00=0x0058, t01=0x00de}
0x8a4a…8a5a               Head {h00=0x000c, h01=0x0050, text=»* DUMMY «, t00=0x0058, t01=0x00ec}
0x8a5a…8a6c               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0058, t01=0x00fc}
0x8a6c…8a76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x010e}
0x8a76…8a80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0118}
0x8a80…8a8e               Head {h00=0x000a, h01=0x0050, text=»ADM16 «, t00=0x0058, t01=0x0122}
0x8a8e…8aa0               Head {h00=0x000e, h01=0x0050, text=»* DUMMY * «, t00=0x0058, t01=0x0130}
0x8aa0…8ab2               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0058, t01=0x0142}
0x8ab2…8abc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0154}
0x8abc…8ac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x015e}
0x8ac6…8ad4               Head {h00=0x000a, h01=0x0050, text=»ADM17 «, t00=0x0058, t01=0x0168}
0x8ad4…8b08               Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0058, t01=0x0176}
0x8b08…8b12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x001a}
0x8b12…8b3e               Head {h00=0x0028, h01=0x0050, text=»*            SET NEW 'KASSEKONTONR' «, t00=0x0059, t01=0x0024}
0x8b3e…8b48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0050}
0x8b48…8b7c               Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0059, t01=0x005a}
0x8b7c…8b86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x008e}
0x8b86…8b96               Head {h00=0x000c, h01=0x0050, text=»ADM17000«, t00=0x0059, t01=0x0098}
0x8b96…8bb4               Head {h00=0x001a, h01=0x0050, text=» TBT GTKASSE,ADM17RET «, t00=0x0059, t01=0x00a8}
0x8bb4…8bce               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0059, t01=0x00c6}
0x8bce…8be4               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0059, t01=0x00e0}
0x8be4…8bf8               Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x0059, t01=0x00f6}
0x8bf8…8c1a               Head {h00=0x001e, h01=0x0050, text=» MOVE GTDUPF(CBIN2),=D'0' «, t00=0x0059, t01=0x010a}
0x8c1a…8c4c               Head {h00=0x002e, h01=0x0050, text=» MOVE GTDUPF(CBIN5),=D'17' ADM FUNCTION NO«, t00=0x0059, t01=0x012c}
0x8c4c…8c70               Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN1),TTCASHAC«, t00=0x0059, t01=0x015e}
0x8c70…8c94               Head {h00=0x0020, h01=0x0050, text=» MOVE GTDUPF(CBIN4),TTSTCASH«, t00=0x0059, t01=0x0182}
0x8c94…8cac               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADM17FRM«, t00=0x005a, t01=0x0016}
0x8cac…8cc0               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x005a, t01=0x002e}
0x8cc0…8cea               Head {h00=0x0026, h01=0x0050, text=» CBE GTDUPF(CBIN1),=D'0',ADM17000 «, t00=0x005a, t01=0x0042}
0x8cea…8d18               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM17RET,ADM17RET,ADM1730 «, t00=0x005a, t01=0x006c}
0x8d18…8d2c               Head {h00=0x0010, h01=0x0050, text=» B ADM17000 «, t00=0x005a, t01=0x009a}
0x8d2c…8d3c               Head {h00=0x000c, h01=0x0050, text=»ADM1730 «, t00=0x005a, t01=0x00ae}
0x8d3c…8d60               Head {h00=0x0020, h01=0x0050, text=» MOVE TTCASHAC,GTDUPF(CBIN1)«, t00=0x005a, t01=0x00be}
0x8d60…8d84               Head {h00=0x0020, h01=0x0050, text=» MOVE TTSTCASH,GTDUPF(CBIN4)«, t00=0x005a, t01=0x00e2}
0x8d84…8da0               Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'13' «, t00=0x005a, t01=0x0106}
0x8da0…8db0               Head {h00=0x000c, h01=0x0050, text=»ADM17RET«, t00=0x005a, t01=0x0122}
0x8db0…8dc2               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x005a, t01=0x0132}
0x8dc2…8dcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0144}
0x8dcc…8dd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x014e}
0x8dd6…8de4               Head {h00=0x000a, h01=0x0050, text=»ADM18 «, t00=0x005a, t01=0x0158}
0x8de4…8e04               Head {h00=0x001c, h01=0x0050, text=»* SET NEW VERSURKONTONR «, t00=0x005a, t01=0x0166}
0x8e04…8e14               Head {h00=0x000c, h01=0x0050, text=»ADM18000«, t00=0x005a, t01=0x0186}
0x8e14…8e2e               Head {h00=0x0016, h01=0x0050, text=»   VERSUR KONTONR «, t00=0x005b, t01=0x0008}
0x8e2e…8e4c               Head {h00=0x001a, h01=0x0050, text=» TBT GTKASSE,ADM18RET «, t00=0x005b, t01=0x0022}
0x8e4c…8e66               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x005b, t01=0x0040}
0x8e66…8e7c               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x005b, t01=0x005a}
0x8e7c…8e94               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADM18FRM«, t00=0x005b, t01=0x0070}
0x8e94…8ea8               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x005b, t01=0x0088}
0x8ea8…8ecc               Head {h00=0x0020, h01=0x0050, text=» CBE TVERSUR,=D'0',ADM18000 «, t00=0x005b, t01=0x009c}
0x8ecc…8efa               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM18RET,ADM18RET,ADM18RET«, t00=0x005b, t01=0x00c0}
0x8efa…8f0e               Head {h00=0x0010, h01=0x0050, text=» B ADM18000 «, t00=0x005b, t01=0x00ee}
0x8f0e…8f1e               Head {h00=0x000c, h01=0x0050, text=»ADM18RET«, t00=0x005b, t01=0x0102}
0x8f1e…8f30               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x005b, t01=0x0112}
0x8f30…8f3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0124}
0x8f3a…8f44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x012e}
0x8f44…8f52               Head {h00=0x000a, h01=0x0050, text=»ADM19 «, t00=0x005b, t01=0x0138}
0x8f52…8f6e               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x005b, t01=0x0146}
0x8f6e…8f78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0162}
0x8f78…8f9a               Head {h00=0x001e, h01=0x0050, text=»*      CALCULATOR FUNCTION«, t00=0x005b, t01=0x016c}
0x8f9a…8fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x018e}
0x8fa4…8fc0               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x005c, t01=0x0008}
0x8fc0…8fd0               Head {h00=0x000c, h01=0x0050, text=»CALCBEG «, t00=0x005c, t01=0x0024}
0x8fd0…8fea               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN1 «, t00=0x005c, t01=0x0034}
0x8fea…9018               Head {h00=0x002a, h01=0x0050, text=»  MOVE GSWBCD2,=D'0'          TOTAL=0 «, t00=0x005c, t01=0x004e}
0x9018…9042               Head {h00=0x0026, h01=0x0050, text=»  MOVE GSWBCD1,=D'0'     NUMBER=0 «, t00=0x005c, t01=0x007c}
0x9042…906e               Head {h00=0x0028, h01=0x0050, text=» PERF FRMXTA,CBIN1    '* ' ON TALLY «, t00=0x005c, t01=0x00a6}
0x906e…9082               Head {h00=0x0010, h01=0x0050, text=» PERF WTALLY«, t00=0x005c, t01=0x00d2}
0x9082…909a               Head {h00=0x0014, h01=0x0050, text=» ATTFMT CALFRM02«, t00=0x005c, t01=0x00e6}
0x909a…90b0               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x005c, t01=0x00fe}
0x90b0…90c4               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x005c, t01=0x0114}
0x90c4…90d8               Head {h00=0x0010, h01=0x0050, text=» B CALCFRST «, t00=0x005c, t01=0x0128}
0x90d8…90e8               Head {h00=0x000c, h01=0x0050, text=»CALCNEXT«, t00=0x005c, t01=0x013c}
0x90e8…9100               Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x005c, t01=0x014c}
0x9100…9114               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x005c, t01=0x0164}
0x9114…9124               Head {h00=0x000c, h01=0x0050, text=»CALCFRST«, t00=0x005c, t01=0x0178}
0x9124…915a               Head {h00=0x0032, h01=0x0050, text=» IB SPBINW2,CALCNEXT,CALCNEXT,CALCADD,CALCNEG «, t00=0x005c, t01=0x0188}
0x915a…917c               Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,=W'7',CALCSUB«, t00=0x005d, t01=0x002e}
0x917c…91a0               Head {h00=0x0020, h01=0x0050, text=»  CBE SPBINW2,=W'15',CALCTOT«, t00=0x005d, t01=0x0050}
0x91a0…91b4               Head {h00=0x0010, h01=0x0050, text=» B  CALCNEXT«, t00=0x005d, t01=0x0074}
0x91b4…91c4               Head {h00=0x000c, h01=0x0050, text=»CALCNEG «, t00=0x005d, t01=0x0088}
0x91c4…91e2               Head {h00=0x001a, h01=0x0050, text=»  MUL  GSWBCD1,=D'-1' «, t00=0x005d, t01=0x0098}
0x91e2…91f2               Head {h00=0x000c, h01=0x0050, text=»CALCADD «, t00=0x005d, t01=0x00b6}
0x91f2…9210               Head {h00=0x001a, h01=0x0050, text=» ADD  GSWBCD2,GSWBCD1 «, t00=0x005d, t01=0x00c6}
0x9210…922e               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,GSWBCD1 «, t00=0x005d, t01=0x00e4}
0x922e…9248               Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN5«, t00=0x005d, t01=0x0102}
0x9248…9270               Head {h00=0x0024, h01=0x0050, text=» PERF WTALLY    NUMBER ON TALLY «, t00=0x005d, t01=0x011c}
0x9270…9284               Head {h00=0x0010, h01=0x0050, text=» B CALCNEXT «, t00=0x005d, t01=0x0144}
0x9284…9294               Head {h00=0x000c, h01=0x0050, text=»CALCSUB «, t00=0x005d, t01=0x0158}
0x9294…92b2               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,GSWBCD2 «, t00=0x005d, t01=0x0168}
0x92b2…92d6               Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR9,=C'SUBTOTAL ' «, t00=0x005d, t01=0x0186}
0x92d6…92f0               Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN3«, t00=0x005e, t01=0x001a}
0x92f0…931a               Head {h00=0x0026, h01=0x0050, text=» PERF WTALLY     SUBTOTAL ON TALLY«, t00=0x005e, t01=0x0034}
0x931a…932e               Head {h00=0x0010, h01=0x0050, text=» B CALCNEXT «, t00=0x005e, t01=0x005e}
0x932e…933e               Head {h00=0x000c, h01=0x0050, text=»CALCTOT «, t00=0x005e, t01=0x0072}
0x933e…935c               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD6,GSWBCD2 «, t00=0x005e, t01=0x0082}
0x935c…937e               Head {h00=0x001e, h01=0x0050, text=» MOVE GSWSTR9,=C'TOTAL   '«, t00=0x005e, t01=0x00a0}
0x937e…9398               Head {h00=0x0016, h01=0x0050, text=» PERF FRMXTA,CBIN2«, t00=0x005e, t01=0x00c2}
0x9398…93c0               Head {h00=0x0024, h01=0x0050, text=» PERF  WTALLY     TOTAL ON TALLY«, t00=0x005e, t01=0x00dc}
0x93c0…93d6               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x005e, t01=0x0104}
0x93d6…93ee               Head {h00=0x0014, h01=0x0050, text=» ATTFMT CALFRM05«, t00=0x005e, t01=0x011a}
0x93ee…9414               Head {h00=0x0022, h01=0x0050, text=» PERF SPCLRA   TOTAL ON SCREEN«, t00=0x005e, t01=0x0132}
0x9414…9436               Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,=W'3',CALCBEG«, t00=0x005e, t01=0x0158}
0x9436…9448               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x005e, t01=0x017a}
0x9448…9452               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x018c}
0x9452…945c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0008}
0x945c…946a               Head {h00=0x000a, h01=0x0050, text=»ADM20 «, t00=0x005f, t01=0x0012}
0x946a…94a6               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x005f, t01=0x0020}
0x94a6…94b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x005c}
0x94b0…94e4               Head {h00=0x0030, h01=0x0050, text=»*            CONTROLDIGIT-VALUE CALCULATION «, t00=0x005f, t01=0x0066}
0x94e4…94ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x009a}
0x94ee…952a               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x005f, t01=0x00a4}
0x952a…9534               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00e0}
0x9534…954a               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x005f, t01=0x00ea}
0x954a…955a               Head {h00=0x000c, h01=0x0050, text=»CALCD00 «, t00=0x005f, t01=0x0100}
0x955a…9570               Head {h00=0x0012, h01=0x0050, text=» WAIT  KTALLY «, t00=0x005f, t01=0x0110}
0x9570…958a               Head {h00=0x0016, h01=0x0050, text=» ATTFMT  CCDFRM01 «, t00=0x005f, t01=0x0126}
0x958a…95ac               Head {h00=0x001e, h01=0x0050, text=» PERF SPCLRA    GET NUMBER«, t00=0x005f, t01=0x0140}
0x95ac…95d2               Head {h00=0x0022, h01=0x0050, text=»  CBNE  SPBINW2,=W'3',CALCDRET«, t00=0x005f, t01=0x0162}
0x95d2…95f6               Head {h00=0x0020, h01=0x0050, text=» CBE GSWBCD5,=D'10',CALCD06 «, t00=0x005f, t01=0x0188}
0x95f6…9630               Head {h00=0x0036, h01=0x0050, text=» EDWRT .NW,KTALLY,CCDFRM03  CONTROLDIGIT ON TALLY «, t00=0x0060, t01=0x001c}
0x9630…9646               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x0060, t01=0x0056}
0x9646…9656               Head {h00=0x000c, h01=0x0050, text=»CALCD05 «, t00=0x0060, t01=0x006c}
0x9656…966e               Head {h00=0x0014, h01=0x0050, text=» ATTFMT CCDFRM02«, t00=0x0060, t01=0x007c}
0x966e…969c               Head {h00=0x002a, h01=0x0050, text=» PERF SPCLRA    CONTROLDIGIT ON SCREEN«, t00=0x0060, t01=0x0094}
0x969c…96be               Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,=W'3',CALCD00«, t00=0x0060, t01=0x00c2}
0x96be…96d2               Head {h00=0x0010, h01=0x0050, text=» B CALCDRET «, t00=0x0060, t01=0x00e4}
0x96d2…96e2               Head {h00=0x000c, h01=0x0050, text=»CALCD06 «, t00=0x0060, t01=0x00f8}
0x96e2…970e               Head {h00=0x0028, h01=0x0050, text=» SET GTDYFLG ERROR  (CONTR.DIGIT=10)«, t00=0x0060, t01=0x0108}
0x970e…9720               Head {h00=0x000e, h01=0x0050, text=» B CALCD05«, t00=0x0060, t01=0x0134}
0x9720…972a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0146}
0x972a…973a               Head {h00=0x000c, h01=0x0050, text=»CALCDRET«, t00=0x0060, t01=0x0150}
0x973a…9750               Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDYFLG«, t00=0x0060, t01=0x0160}
0x9750…9762               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0060, t01=0x0176}
0x9762…976c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0188}
0x976c…9776 (97, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0004}
0x9776…9784               Head {h00=0x000a, h01=0x0050, text=»ADM21 «, t00=0x0061, t01=0x000e}
0x9784…97a0               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0061, t01=0x001c}
0x97a0…97aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0038}
0x97aa…97d0               Head {h00=0x0022, h01=0x0050, text=»*          SET/CLEAR TEST MODE«, t00=0x0061, t01=0x0042}
0x97d0…97f6               Head {h00=0x0022, h01=0x0050, text=»*          (NO WRITE ON DISKS «, t00=0x0061, t01=0x0068}
0x97f6…9828               Head {h00=0x002e, h01=0x0050, text=»*           T ON JOURNAL, VOUCHER, SCREEN «, t00=0x0061, t01=0x008e}
0x9828…9854               Head {h00=0x0028, h01=0x0050, text=»*           NO 'BEHOLDNINGST[LLERE' «, t00=0x0061, t01=0x00c0}
0x9854…985e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00ec}
0x985e…987a               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0061, t01=0x00f6}
0x987a…989a               Head {h00=0x001c, h01=0x0050, text=» TBT GTMASTFLG,ADM21RET «, t00=0x0061, t01=0x0112}
0x989a…98b8               Head {h00=0x001a, h01=0x0050, text=» TBT GTKASSE,ADM21RET «, t00=0x0061, t01=0x0132}
0x98b8…98d6               Head {h00=0x001a, h01=0x0050, text=» TBT GTTESTFL,ADM2150 «, t00=0x0061, t01=0x0150}
0x98d6…98f0               Head {h00=0x0016, h01=0x0050, text=» PERF WRITJT,=W'9'«, t00=0x0061, t01=0x016e}
0x98f0…990c               Head {h00=0x0018, h01=0x0050, text=» PERF TCONFW,TTASKNR«, t00=0x0061, t01=0x0188}
0x990c…9928               Head {h00=0x0018, h01=0x0050, text=» MOVE GTTESTMK,=C'T'«, t00=0x0062, t01=0x0014}
0x9928…993e               Head {h00=0x0012, h01=0x0050, text=» SET GTTESTFL «, t00=0x0062, t01=0x0030}
0x993e…9952               Head {h00=0x0010, h01=0x0050, text=» B ADM21RET «, t00=0x0062, t01=0x0046}
0x9952…9962               Head {h00=0x000c, h01=0x0050, text=»ADM2150 «, t00=0x0062, t01=0x005a}
0x9962…997e               Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'10' «, t00=0x0062, t01=0x006a}
0x997e…9996               Head {h00=0x0014, h01=0x0050, text=» CLEAR GTTESTFL «, t00=0x0062, t01=0x0086}
0x9996…99b2               Head {h00=0x0018, h01=0x0050, text=» MOVE GTTESTMK,=C' '«, t00=0x0062, t01=0x009e}
0x99b2…99ce               Head {h00=0x0018, h01=0x0050, text=» PERF TCONFR,TTASKNR«, t00=0x0062, t01=0x00ba}
0x99ce…99de               Head {h00=0x000c, h01=0x0050, text=»ADM21RET«, t00=0x0062, t01=0x00d6}
0x99de…99f0               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0062, t01=0x00e6}
0x99f0…99fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x00f8}
0x99fa…9a04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0102}
0x9a04…9a12               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0062, t01=0x010c}
0x9a12…9a20               Head {h00=0x000a, h01=0x0050, text=»ADM22 «, t00=0x0062, t01=0x011a}
0x9a20…9a32               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0062, t01=0x0128}
0x9a32…9a3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x013a}
0x9a3c…9a46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x0144}
0x9a46…9a58               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0062, t01=0x014e}
0x9a58…9a88               Head {h00=0x002c, h01=0x0050, text=» TBF CADM22F,ADM22RET FUNCTION ALLOWED? «, t00=0x0062, t01=0x0160}
0x9a88…9ab4               Head {h00=0x0028, h01=0x0050, text=» TBT GTKASSE,ADM22RET KASSE CLOSED? «, t00=0x0062, t01=0x0190}
0x9ab4…9ace               Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN2 «, t00=0x0063, t01=0x002c}
0x9ace…9aec               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD5,TTSTLBNR«, t00=0x0063, t01=0x0046}
0x9aec…9b08               Head {h00=0x0018, h01=0x0050, text=» MUL GSWBCD5,=D'-1' «, t00=0x0063, t01=0x0064}
0x9b08…9b18               Head {h00=0x000c, h01=0x0050, text=»ADM2200 «, t00=0x0063, t01=0x0080}
0x9b18…9b2e               Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0063, t01=0x0090}
0x9b2e…9b46               Head {h00=0x0014, h01=0x0050, text=» ATTFMT ADM22FRM«, t00=0x0063, t01=0x00a6}
0x9b46…9b5a               Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x0063, t01=0x00be}
0x9b5a…9b88               Head {h00=0x002a, h01=0x0050, text=» IB SPBINW2,ADM22RET,ADM22RET,ADM2210 «, t00=0x0063, t01=0x00d2}
0x9b88…9b9a               Head {h00=0x000e, h01=0x0050, text=» B ADM2200«, t00=0x0063, t01=0x0100}
0x9b9a…9baa               Head {h00=0x000c, h01=0x0050, text=»ADM2210 «, t00=0x0063, t01=0x0112}
0x9baa…9bc6               Head {h00=0x0018, h01=0x0050, text=» MUL GSWBCD5,=D'-1' «, t00=0x0063, t01=0x0122}
0x9bc6…9be4               Head {h00=0x001a, h01=0x0050, text=» MOVE TTSTLBNR,GSWBCD5«, t00=0x0063, t01=0x013e}
0x9be4…9bf4               Head {h00=0x000c, h01=0x0050, text=»ADM22RET«, t00=0x0063, t01=0x015c}
0x9bf4…9c06               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0063, t01=0x016c}
0x9c06…9c10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x017e}
0x9c10…9c1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0188}
0x9c1a…9c28 (100, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0064, t01=0x0004}
0x9c28…9c36               Head {h00=0x000a, h01=0x0050, text=»ADM23 «, t00=0x0064, t01=0x0012}
0x9c36…9c4e               Head {h00=0x0014, h01=0x0050, text=»* MODPOSTERING *«, t00=0x0064, t01=0x0020}
0x9c4e…9c60               Head {h00=0x000e, h01=0x0050, text=» PERF MODP«, t00=0x0064, t01=0x0038}
0x9c60…9c72               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0064, t01=0x004a}
0x9c72…9c7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x005c}
0x9c7c…9c8a               Head {h00=0x000a, h01=0x0050, text=»ADM24 «, t00=0x0064, t01=0x0066}
0x9c8a…9ca0               Head {h00=0x0012, h01=0x0050, text=»* KONTOKORT * «, t00=0x0064, t01=0x0074}
0x9ca0…9cb2               Head {h00=0x000e, h01=0x0050, text=» PERF KORT«, t00=0x0064, t01=0x008a}
0x9cb2…9cc4               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0064, t01=0x009c}
0x9cc4…9cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00ae}
0x9cce…9cdc               Head {h00=0x000a, h01=0x0050, text=»ADM25 «, t00=0x0064, t01=0x00b8}
0x9cdc…9cf0               Head {h00=0x0010, h01=0x0050, text=»* RECEIPT * «, t00=0x0064, t01=0x00c6}
0x9cf0…9d02               Head {h00=0x000e, h01=0x0050, text=» PERF KVIT«, t00=0x0064, t01=0x00da}
0x9d02…9d14               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0064, t01=0x00ec}
0x9d14…9d1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00fe}
0x9d1e…9d2c               Head {h00=0x000a, h01=0x0050, text=»ADM26 «, t00=0x0064, t01=0x0108}
0x9d2c…9d42               Head {h00=0x0012, h01=0x0050, text=»* SUMMARIZE * «, t00=0x0064, t01=0x0116}
0x9d42…9d54               Head {h00=0x000e, h01=0x0050, text=» PERF SUM «, t00=0x0064, t01=0x012c}
0x9d54…9d66               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0064, t01=0x013e}
0x9d66…9d70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x0150}
0x9d70…9d7e               Head {h00=0x000a, h01=0x0050, text=»ADM27 «, t00=0x0064, t01=0x015a}
0x9d7e…9d90               Head {h00=0x000e, h01=0x0050, text=»* LISTE * «, t00=0x0064, t01=0x0168}
0x9d90…9da4               Head {h00=0x0010, h01=0x0050, text=» PERF LSTINT«, t00=0x0064, t01=0x017a}
0x9da4…9db6               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0064, t01=0x018e}
0x9db6…9dc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0010}
0x9dc0…9dce               Head {h00=0x000a, h01=0x0050, text=»ADM28 «, t00=0x0065, t01=0x001a}
0x9dce…9de2               Head {h00=0x0010, h01=0x0050, text=»* SUBTOTAL *«, t00=0x0065, t01=0x0028}
0x9de2…9df6               Head {h00=0x0010, h01=0x0050, text=» PERF SUBTOT«, t00=0x0065, t01=0x003c}
0x9df6…9e08               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0065, t01=0x0050}
0x9e08…9e12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x0062}
0x9e12…9e20               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0065, t01=0x006c}
0x9e20…9e2e               Head {h00=0x000a, h01=0x0050, text=»ADM29 «, t00=0x0065, t01=0x007a}
0x9e2e…9e4a               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0065, t01=0x0088}
0x9e4a…9e54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00a4}
0x9e54…9e7c               Head {h00=0x0024, h01=0x0050, text=»*          TEST PRINT ON VOUCHER«, t00=0x0065, t01=0x00ae}
0x9e7c…9e86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00d6}
0x9e86…9ea2               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0065, t01=0x00e0}
0x9ea2…9ec4               Head {h00=0x001e, h01=0x0050, text=» DSC0 KVOUCH,RLEAS RLEASE «, t00=0x0065, t01=0x00fc}
0x9ec4…9ef4               Head {h00=0x002c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2 ASK FOR 'BILAG'«, t00=0x0065, t01=0x011e}
0x9ef4…9f12               Head {h00=0x001a, h01=0x0050, text=» PERF GRASPV AND GRASP«, t00=0x0065, t01=0x014e}
0x9f12…9f26               Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x0065, t01=0x016c}
0x9f26…9f44               Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,CVOUTOP «, t00=0x0065, t01=0x0180}
0x9f44…9f54               Head {h00=0x000c, h01=0x0050, text=»ADM2910 «, t00=0x0066, t01=0x000e}
0x9f54…9f78               Head {h00=0x0020, h01=0x0050, text=» CBL GSWBIN1,CBIN6,ADM29RET «, t00=0x0066, t01=0x001e}
0x9f78…9faa               Head {h00=0x002e, h01=0x0050, text=» DSC1 KVOUCH,POS,GSWBIN1 POSITION ON LINE «, t00=0x0066, t01=0x0042}
0x9faa…9fd0               Head {h00=0x0022, h01=0x0050, text=» PERF FRMXVO,CBIN16 GET FORMAT«, t00=0x0066, t01=0x0074}
0x9fd0…9ff4               Head {h00=0x0020, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT PRINT«, t00=0x0066, t01=0x009a}
0x9ff4…a00e               Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN8«, t00=0x0066, t01=0x00be}
0xa00e…a020               Head {h00=0x000e, h01=0x0050, text=» B ADM2910«, t00=0x0066, t01=0x00d8}
0xa020…a030               Head {h00=0x000c, h01=0x0050, text=»ADM29RET«, t00=0x0066, t01=0x00ea}
0xa030…a04a               Head {h00=0x0016, h01=0x0050, text=» DSC0 KVOUCH,RLEAS«, t00=0x0066, t01=0x00fa}
0xa04a…a05c               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0066, t01=0x0114}
0xa05c…a066               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0126}
0xa066…a074               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0066, t01=0x0130}
0xa074…a082               Head {h00=0x000a, h01=0x0050, text=»ADM30 «, t00=0x0066, t01=0x013e}
0xa082…a096               Head {h00=0x0010, h01=0x0050, text=»* CYCLE END «, t00=0x0066, t01=0x014c}
0xa096…a0ae               Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN10«, t00=0x0066, t01=0x0160}
0xa0ae…a0c0               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0066, t01=0x0178}
0xa0c0…a0ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x018a}
0xa0ca…a0d8 (103, 0, 400) Head {h00=0x000a, h01=0x0050, text=»ADM31 «, t00=0x0067, t01=0x0004}
0xa0d8…a0f0               Head {h00=0x0014, h01=0x0050, text=»* CYCLE START * «, t00=0x0067, t01=0x0012}
0xa0f0…a108               Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN1 «, t00=0x0067, t01=0x002a}
0xa108…a11a               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0067, t01=0x0042}
0xa11a…a124               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0054}
0xa124…a132               Head {h00=0x000a, h01=0x0050, text=»ADM32 «, t00=0x0067, t01=0x005e}
0xa132…a14a               Head {h00=0x0014, h01=0x0050, text=»* STABEL START *«, t00=0x0067, t01=0x006c}
0xa14a…a162               Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN2 «, t00=0x0067, t01=0x0084}
0xa162…a174               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0067, t01=0x009c}
0xa174…a17e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ae}
0xa17e…a18c               Head {h00=0x000a, h01=0x0050, text=»ADM33 «, t00=0x0067, t01=0x00b8}
0xa18c…a19e               Head {h00=0x000e, h01=0x0050, text=»* DUMMY * «, t00=0x0067, t01=0x00c6}
0xa19e…a1b0               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0067, t01=0x00d8}
0xa1b0…a1ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00ea}
0xa1ba…a1c8               Head {h00=0x000a, h01=0x0050, text=»ADM34 «, t00=0x0067, t01=0x00f4}
0xa1c8…a1f0               Head {h00=0x0024, h01=0x0050, text=»* 4-CYCLE, PAUSE IN CYCLE,STABEL«, t00=0x0067, t01=0x0102}
0xa1f0…a208               Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN4 «, t00=0x0067, t01=0x012a}
0xa208…a21a               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0067, t01=0x0142}
0xa21a…a224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0154}
0xa224…a232               Head {h00=0x000a, h01=0x0050, text=»ADM35 «, t00=0x0067, t01=0x015e}
0xa232…a252               Head {h00=0x001c, h01=0x0050, text=»* VARIOUS TRANSACTIONS *«, t00=0x0067, t01=0x016c}
0xa252…a266               Head {h00=0x0010, h01=0x0050, text=» PERF DIVTR «, t00=0x0067, t01=0x018c}
0xa266…a278               Head {h00=0x000e, h01=0x0050, text=» B ADMRET «, t00=0x0068, t01=0x0010}
0xa278…a282               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0022}
0xa282…a290               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x002c}
0xa290…a29a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x003a}
0xa29a…a2a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0044}
0xa2a4…a2ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x004e}
0xa2ae…a2d0               Head {h00=0x001e, h01=0x0050, text=»*     END OF ADM FUNCTIONS«, t00=0x0068, t01=0x0058}
0xa2d0…a2da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x007a}
0xa2da…a2e8               Head {h00=0x000a, h01=0x0050, text=»ADMRET«, t00=0x0068, t01=0x0084}
0xa2e8…a2f4               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0068, t01=0x0092}
0xa2f4…a302               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0068, t01=0x009e}
0xa302…a310               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x00ac}
0xa310…a31e               Head {h00=0x000a, h01=0x0050, text=»RGA300«, t00=0x0068, t01=0x00ba}
0xa31e…a33a               Head {h00=0x0018, h01=0x0050, text=» PERF ADM,CBIN11 SPG«, t00=0x0068, t01=0x00c8}
0xa33a…a34a               Head {h00=0x000c, h01=0x0050, text=» B RGADM«, t00=0x0068, t01=0x00e4}
0xa34a…a358               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0068, t01=0x00f4}
0xa358…a392               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0068, t01=0x0102}
0xa392…a39c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x013c}
0xa39c…a3ce               Head {h00=0x002e, h01=0x0050, text=»*      TR2GEN    GENERATES A TRANSACTION 2«, t00=0x0068, t01=0x0146}
0xa3ce…a3d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0178}
0xa3d8…a414               Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0068, t01=0x0182}
0xa414…a42c               Head {h00=0x0014, h01=0x0050, text=»TR2GEN PROC DBKR«, t00=0x0069, t01=0x002e}
0xa42c…a446               Head {h00=0x0016, h01=0x0050, text=» MOVE TTDKDEX,DBKR«, t00=0x0069, t01=0x0046}
0xa446…a46a               Head {h00=0x0020, h01=0x0050, text=» CBNE TTDKDEX,=W'0',TR2DBKR «, t00=0x0069, t01=0x0060}
0xa46a…a486               Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKDEX,CBIN1 «, t00=0x0069, t01=0x0084}
0xa486…a4ae               Head {h00=0x0024, h01=0x0050, text=» CBL GTDUPF(CBIN4),=D'0',TR2DBKR«, t00=0x0069, t01=0x00a0}
0xa4ae…a4ca               Head {h00=0x0018, h01=0x0050, text=» MOVE TTDKDEX,CBIN2 «, t00=0x0069, t01=0x00c8}
0xa4ca…a4da               Head {h00=0x000c, h01=0x0050, text=»TR2DBKR «, t00=0x0069, t01=0x00e4}
0xa4da…a4fe               Head {h00=0x0020, h01=0x0050, text=» PERFI TTDKDEX,SETKRE,SETDEB«, t00=0x0069, t01=0x00f4}
0xa4fe…a51c               Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,CLFRM02 «, t00=0x0069, t01=0x0118}
0xa51c…a52e               Head {h00=0x000e, h01=0x0050, text=» PERF SLUT«, t00=0x0069, t01=0x0136}
0xa52e…a53a               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0069, t01=0x0148}
0xa53a…a548               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0069, t01=0x0154}
0xa548…a556               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0069, t01=0x0162}
0xa556…a596               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0069, t01=0x0170}
0xa596…a5a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0020}
0xa5a0…a5e0               Head {h00=0x003c, h01=0x0050, text=»*         WAHEAD - GRASP  AND WRITE HEADLINE ON VOUCHER «, t00=0x006a, t01=0x002a}
0xa5e0…a5ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x006a}
0xa5ea…a62a               Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x006a, t01=0x0074}
0xa62a…a644               Head {h00=0x0016, h01=0x0050, text=»WAHEAD PROC VOXDEX«, t00=0x006a, t01=0x00b4}
0xa644…a662               Head {h00=0x001a, h01=0x0050, text=» EDWRT SCREEN,CLFRM03 «, t00=0x006a, t01=0x00ce}
0xa662…a682               Head {h00=0x001c, h01=0x0050, text=» PERF SPLIN8,CBIN5,CBIN2«, t00=0x006a, t01=0x00ec}
0xa682…a696               Head {h00=0x0010, h01=0x0050, text=» PERF GRASPV«, t00=0x006a, t01=0x010c}
0xa696…a6b6               Head {h00=0x001c, h01=0x0050, text=» DSC1 KVOUCH,POS,CVOUTOP«, t00=0x006a, t01=0x0120}
0xa6b6…a6ca               Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x006a, t01=0x0140}
0xa6ca…a6e6               Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,VOXDEX «, t00=0x006a, t01=0x0154}
0xa6e6…a704               Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x006a, t01=0x0170}
0xa704…a710               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x006a, t01=0x018e}
0xa710…a71e               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x006b, t01=0x000a}
0xa71e…a72c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x0018}
0xa72c…a76e               Head {h00=0x003e, h01=0x0050, text=»********************************************************* «, t00=0x006b, t01=0x0026}
0xa76e…a778               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0068}
0xa778…a7a4               Head {h00=0x0028, h01=0x0050, text=»*     WALINE   WRITE ACCUMULATORLINE«, t00=0x006b, t01=0x0072}
0xa7a4…a7ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x009e}
0xa7ae…a7f0               Head {h00=0x003e, h01=0x0050, text=»**********************************************************«, t00=0x006b, t01=0x00a8}
0xa7f0…a80a               Head {h00=0x0016, h01=0x0050, text=»WALINE PROC LINDEX«, t00=0x006b, t01=0x00ea}
0xa80a…a826               Head {h00=0x0018, h01=0x0050, text=» PERF FRMXVO,LINDEX «, t00=0x006b, t01=0x0104}
0xa826…a844               Head {h00=0x001a, h01=0x0050, text=» EDWRT KVOUCH,GTSTRFMT«, t00=0x006b, t01=0x0120}
0xa844…a85e               Head {h00=0x0016, h01=0x0050, text=» SUB TTLINNR,=D'1'«, t00=0x006b, t01=0x013e}
0xa85e…a86a               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x006b, t01=0x0158}
0xa86a…a878               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x006b, t01=0x0164}
0xa878…a882               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0172}
0xa882…a890               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006b, t01=0x017c}
0xa890…a8a2               Head {h00=0x000e, h01=0x0050, text=»SKIFT PROC«, t00=0x006b, t01=0x018a}
0xa8a2…a8c4               Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x006c, t01=0x000c}
0xa8c4…a8ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x002e}
0xa8ce…a90c               Head {h00=0x003a, h01=0x0050, text=»*          SKIFT - THIS  PROCEDURE TAKES HAND OF SHIFT«, t00=0x006c, t01=0x0038}
0xa90c…a93c               Head {h00=0x002c, h01=0x0050, text=»*          OF DISKS, IS ACTIVATED AFTER «, t00=0x006c, t01=0x0076}
0xa93c…a956               Head {h00=0x0016, h01=0x0050, text=»*          12 ADM «, t00=0x006c, t01=0x00a6}
0xa956…a960               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00c0}
0xa960…a980               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x006c, t01=0x00ca}
0xa980…a98c               Head {h00=0x0008, h01=0x0050, text=»SK00«, t00=0x006c, t01=0x00ea}
0xa98c…a9b2               Head {h00=0x0022, h01=0x0050, text=» TBF CPFLG,SK10 DISC OCCUPIED?«, t00=0x006c, t01=0x00f6}
0xa9b2…a9d8               Head {h00=0x0022, h01=0x0050, text=» DELAY CBIN2 YES DELAY 200 MS «, t00=0x006c, t01=0x011c}
0xa9d8…a9e8               Head {h00=0x000c, h01=0x0050, text=» B SK00 «, t00=0x006c, t01=0x0142}
0xa9e8…a9f4               Head {h00=0x0008, h01=0x0050, text=»SK10«, t00=0x006c, t01=0x0152}
0xa9f4…aa12               Head {h00=0x001a, h01=0x0050, text=» SET CPFLG  DIUSC FREE«, t00=0x006c, t01=0x015e}
0xaa12…aa28               Head {h00=0x0012, h01=0x0050, text=» SET CSKIFTWN «, t00=0x006c, t01=0x017c}
0xaa28…aa5a (109, 0, 400) Head {h00=0x002e, h01=0x0050, text=» PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' «, t00=0x006d, t01=0x0004}
0xaa5a…aa72               Head {h00=0x0014, h01=0x0050, text=» TBF CWFLAG,SK15«, t00=0x006d, t01=0x0036}
0xaa72…aa8c               Head {h00=0x0016, h01=0x0050, text=» SUB CRECBCD,=D'1'«, t00=0x006d, t01=0x004e}
0xaa8c…aab6               Head {h00=0x0026, h01=0x0050, text=» PERF SLUTID,CRECBCD WRITE 'SLUTD'«, t00=0x006d, t01=0x0068}
0xaab6…aae4               Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x006d, t01=0x0092}
0xaae4…aaf0               Head {h00=0x0008, h01=0x0050, text=»SK15«, t00=0x006d, t01=0x00c0}
0xaaf0…ab10               Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN2,CBIN2«, t00=0x006d, t01=0x00cc}
0xab10…ab2a               Head {h00=0x0016, h01=0x0050, text=» PERF CLSVOL,CBIN2«, t00=0x006d, t01=0x00ec}
0xab2a…ab48               Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x006d, t01=0x0106}
0xab48…ab62               Head {h00=0x0016, h01=0x0050, text=» ADD CVOLNO,=D'1' «, t00=0x006d, t01=0x0124}
0xab62…ab70               Head {h00=0x000a, h01=0x0050, text=»SK120 «, t00=0x006d, t01=0x013e}
0xab70…ab94               Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 «, t00=0x006d, t01=0x014c}
0xab94…aba8               Head {h00=0x0010, h01=0x0050, text=» PERF SOPRD «, t00=0x006d, t01=0x0170}
0xaba8…abca               Head {h00=0x001e, h01=0x0050, text=» CBNE GSWBIN2,CBIN9,SK120 «, t00=0x006d, t01=0x0184}
0xabca…abe4               Head {h00=0x0016, h01=0x0050, text=» PERF ASGVOL,CBIN2«, t00=0x006e, t01=0x0016}
0xabe4…abf8               Head {h00=0x0010, h01=0x0050, text=» BNOK SK120 «, t00=0x006e, t01=0x0030}
0xabf8…ac16               Head {h00=0x001a, h01=0x0050, text=» PERF LAMPOF,=W'2047' «, t00=0x006e, t01=0x0044}
0xac16…ac30               Head {h00=0x0016, h01=0x0050, text=» MOVE CRECNR,CBIN1«, t00=0x006e, t01=0x0062}
0xac30…ac4c               Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'0' «, t00=0x006e, t01=0x007c}
0xac4c…ac66               Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,SK130 «, t00=0x006e, t01=0x0098}
0xac66…ac7a               Head {h00=0x0010, h01=0x0050, text=» PERF STRTWR«, t00=0x006e, t01=0x00b2}
0xac7a…ac8e               Head {h00=0x0010, h01=0x0050, text=» BNOK SK120 «, t00=0x006e, t01=0x00c6}
0xac8e…ac9c               Head {h00=0x000a, h01=0x0050, text=»SK130 «, t00=0x006e, t01=0x00da}
0xac9c…acc2               Head {h00=0x0022, h01=0x0050, text=» PERF CNFWRT REWRITE CONFDATA «, t00=0x006e, t01=0x00e8}
0xacc2…acdc               Head {h00=0x0016, h01=0x0050, text=» TBF CWFLAG,SK150 «, t00=0x006e, t01=0x010e}
0xacdc…acf8               Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,=D'1' «, t00=0x006e, t01=0x0128}
0xacf8…ad18               Head {h00=0x001c, h01=0x0050, text=» PERF WRITID,CBIN2,CBIN1«, t00=0x006e, t01=0x0144}
0xad18…ad26               Head {h00=0x000a, h01=0x0050, text=»SK150 «, t00=0x006e, t01=0x0164}
0xad26…ad3a               Head {h00=0x0010, h01=0x0050, text=» PERF CLEAR8«, t00=0x006e, t01=0x0172}
0xad3a…ad56               Head {h00=0x0018, h01=0x0050, text=» PERF WRITJT,=W'11' «, t00=0x006e, t01=0x0186}
0xad56…ad6e               Head {h00=0x0014, h01=0x0050, text=» CLEAR CSKIFTFL «, t00=0x006f, t01=0x0012}
0xad6e…ad86               Head {h00=0x0014, h01=0x0050, text=» CLEAR CSKIFTWN «, t00=0x006f, t01=0x002a}
0xad86…ada6               Head {h00=0x001c, h01=0x0050, text=» CLEAR CPFLG  DISC FREE «, t00=0x006f, t01=0x0042}
0xada6…adb2               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x006f, t01=0x0062}
0xadb2…adc0               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x006f, t01=0x006e}
0xadc0…adce               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x006f, t01=0x007c}
0xadce…add8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x008a}
0xadd8…adf0               Head {h00=0x0014, h01=0x0050, text=»LAMPON PROC $NR «, t00=0x006f, t01=0x0094}
0xadf0…ae02               Head {h00=0x000e, h01=0x0050, text=» PLIT $NR «, t00=0x006f, t01=0x00ac}
0xae02…ae30               Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x006f, t01=0x00be}
0xae30…ae3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x00ec}
0xae3a…ae66               Head {h00=0x0028, h01=0x0050, text=»* LAMPON - FIRE LAMPS ON OPR. PANEL.«, t00=0x006f, t01=0x00f6}
0xae66…ae88               Head {h00=0x001e, h01=0x0050, text=»* CALL - PERF LAMPON,<$NR>«, t00=0x006f, t01=0x0122}
0xae88…ae92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0144}
0xae92…aed0               Head {h00=0x003a, h01=0x0050, text=»* THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM«, t00=0x006f, t01=0x014e}
0xaed0…aeda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x018c}
0xaeda…af0c               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0070, t01=0x0008}
0xaf0c…af26               Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN2,$NR «, t00=0x0070, t01=0x003a}
0xaf26…af46               Head {h00=0x001c, h01=0x0050, text=» DSC1 DSSOPO,ON,GSWBIN2 «, t00=0x0070, t01=0x0054}
0xaf46…af52               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0070, t01=0x0074}
0xaf52…af60               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0070, t01=0x0080}
0xaf60…af6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x008e}
0xaf6a…af82               Head {h00=0x0014, h01=0x0050, text=»LAMPOF PROC $NR «, t00=0x0070, t01=0x0098}
0xaf82…af94               Head {h00=0x000e, h01=0x0050, text=» PLIT $NR «, t00=0x0070, t01=0x00b0}
0xaf94…afc6               Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0070, t01=0x00c2}
0xafc6…afd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x00f4}
0xafd0…b002               Head {h00=0x002e, h01=0x0050, text=»* LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL «, t00=0x0070, t01=0x00fe}
0xb002…b024               Head {h00=0x001e, h01=0x0050, text=»* CALL - PERF LAMPOF,<$NR>«, t00=0x0070, t01=0x0130}
0xb024…b02e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0152}
0xb02e…b074               Head {h00=0x0042, h01=0x0050, text=»* THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM«, t00=0x0070, t01=0x015c}
0xb074…b07e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0012}
0xb07e…b0b2               Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0071, t01=0x001c}
0xb0b2…b0cc               Head {h00=0x0016, h01=0x0050, text=» MOVE GSWBIN2,$NR «, t00=0x0071, t01=0x0050}
0xb0cc…b0ec               Head {h00=0x001c, h01=0x0050, text=» DSC1 DSSOPO,OFF,GSWBIN2«, t00=0x0071, t01=0x006a}
0xb0ec…b0f8               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0071, t01=0x008a}
0xb0f8…b106               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0071, t01=0x0096}
0xb106…b110               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00a4}
0xb110…b122               Head {h00=0x000e, h01=0x0050, text=»SOPRD PROC«, t00=0x0071, t01=0x00ae}
0xb122…b158               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0071, t01=0x00c0}
0xb158…b162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x00f6}
0xb162…b190               Head {h00=0x002a, h01=0x0050, text=»* SOPRD - READ SYSTEMS OPERATOR PANEL «, t00=0x0071, t01=0x0100}
0xb190…b19a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x012e}
0xb19a…b1d0               Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0071, t01=0x0138}
0xb1d0…b1de               Head {h00=0x000a, h01=0x0050, text=»SOPR10«, t00=0x0071, t01=0x016e}
0xb1de…b1fa               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN1 «, t00=0x0071, t01=0x017c}
0xb1fa…b22a               Head {h00=0x002c, h01=0x0050, text=» KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2«, t00=0x0072, t01=0x0008}
0xb22a…b23e               Head {h00=0x0010, h01=0x0050, text=» BNOK SOPR10«, t00=0x0072, t01=0x0038}
0xb23e…b24a               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0072, t01=0x004c}
0xb24a…b258               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0072, t01=0x0058}
0xb258…b262               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0066}
0xb262…b270               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0072, t01=0x0070}
0xb270…b284               Head {h00=0x0010, h01=0x0050, text=»STRTWR PROC «, t00=0x0072, t01=0x007e}
0xb284…b2a2               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0072, t01=0x0092}
0xb2a2…b2ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00b0}
0xb2ac…b2e6               Head {h00=0x0036, h01=0x0050, text=»*          STRTWR - SET UP AND WRITE START RECORD «, t00=0x0072, t01=0x00ba}
0xb2e6…b2f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00f4}
0xb2f0…b2fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00fe}
0xb2fa…b31a               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0072, t01=0x0108}
0xb31a…b336               Head {h00=0x0018, h01=0x0050, text=» PERF STRTID,CVOLNO «, t00=0x0072, t01=0x0128}
0xb336…b364               Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR«, t00=0x0072, t01=0x0144}
0xb364…b37a               Head {h00=0x0012, h01=0x0050, text=» BNOK STRTNOK «, t00=0x0072, t01=0x0172}
0xb37a…b394               Head {h00=0x0016, h01=0x0050, text=» ADD CRECNR,CBIN1 «, t00=0x0072, t01=0x0188}
0xb394…b3b4               Head {h00=0x001c, h01=0x0050, text=» PERF RADEL,DK02,CRECNR «, t00=0x0073, t01=0x0012}
0xb3b4…b3ca               Head {h00=0x0012, h01=0x0050, text=» BNOK STRTNOK «, t00=0x0073, t01=0x0032}
0xb3ca…b3e6               Head {h00=0x0018, h01=0x0050, text=» CMP CBIN0,CBIN0 OK «, t00=0x0073, t01=0x0048}
0xb3e6…b3f2               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0073, t01=0x0064}
0xb3f2…b402               Head {h00=0x000c, h01=0x0050, text=»STRTNOK «, t00=0x0073, t01=0x0070}
0xb402…b41a               Head {h00=0x0014, h01=0x0050, text=» CMP CBIN1,CBIN0«, t00=0x0073, t01=0x0080}
0xb41a…b426               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0073, t01=0x0098}
0xb426…b434               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0073, t01=0x00a4}
0xb434…b442               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0073, t01=0x00b2}
0xb442…b45c               Head {h00=0x0016, h01=0x0050, text=»STRTID PROC VOLID «, t00=0x0073, t01=0x00c0}
0xb45c…b478               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0073, t01=0x00da}
0xb478…b482               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00f6}
0xb482…b4c0               Head {h00=0x003a, h01=0x0050, text=»*          STRTID - SETS  UP A START ID IN PACK BUFFER«, t00=0x0073, t01=0x0100}
0xb4c0…b4ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x013e}
0xb4ca…b4ee               Head {h00=0x0020, h01=0x0050, text=»* CALL - PERF STRTID,<VOLID>«, t00=0x0073, t01=0x0148}
0xb4ee…b4f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x016c}
0xb4f8…b514               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0073, t01=0x0176}
0xb514…b528 (116, 0, 400) Head {h00=0x0010, h01=0x0050, text=» SET CSWFLAG«, t00=0x0074, t01=0x0004}
0xb528…b54c               Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',STRT10 «, t00=0x0074, t01=0x0018}
0xb54c…b562               Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0074, t01=0x003c}
0xb562…b570               Head {h00=0x000a, h01=0x0050, text=»STRT10«, t00=0x0074, t01=0x0052}
0xb570…b58c               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN6,CBIN2 «, t00=0x0074, t01=0x0060}
0xb58c…b5aa               Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0074, t01=0x007c}
0xb5aa…b5c8               Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,STARTFR «, t00=0x0074, t01=0x009a}
0xb5c8…b5e4               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD3,VOLID «, t00=0x0074, t01=0x00b8}
0xb5e4…b602               Head {h00=0x001a, h01=0x0050, text=» EDIT GSWSTR20,FRVOLID«, t00=0x0074, t01=0x00d4}
0xb602…b61e               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,=W'40'«, t00=0x0074, t01=0x00f2}
0xb61e…b652               Head {h00=0x0030, h01=0x0050, text=» COPY CPCKBUF,GSWBIN1,CBIN12,GSWSTR20,CBIN0 «, t00=0x0074, t01=0x010e}
0xb652…b662               Head {h00=0x000c, h01=0x0050, text=»STRTRET «, t00=0x0074, t01=0x0142}
0xb662…b66e               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0074, t01=0x0152}
0xb66e…b67c               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0074, t01=0x015e}
0xb67c…b68a               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0074, t01=0x016c}
0xb68a…b6a4               Head {h00=0x0016, h01=0x0050, text=»SLUTID PROC SLUTNO«, t00=0x0074, t01=0x017a}
0xb6a4…b6c0 (117, 0, 398) Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0075, t01=0x0004}
0xb6c0…b6ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0020}
0xb6ca…b700               Head {h00=0x0032, h01=0x0050, text=»*          SLUTID - SETS UP A SLUTD IN CPCKBUF«, t00=0x0075, t01=0x002a}
0xb700…b70a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0060}
0xb70a…b714               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x006a}
0xb714…b730               Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0075, t01=0x0074}
0xb730…b744               Head {h00=0x0010, h01=0x0050, text=» SET CSWFLAG«, t00=0x0075, t01=0x0090}
0xb744…b768               Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',SLUT10 «, t00=0x0075, t01=0x00a4}
0xb768…b77e               Head {h00=0x0012, h01=0x0050, text=» CLEAR CSWFLAG«, t00=0x0075, t01=0x00c8}
0xb77e…b78c               Head {h00=0x000a, h01=0x0050, text=»SLUT10«, t00=0x0075, t01=0x00de}
0xb78c…b7aa               Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0075, t01=0x00ec}
0xb7aa…b7c6               Head {h00=0x0018, h01=0x0050, text=» MOVE CRECBCD,SLUTNO«, t00=0x0075, t01=0x010a}
0xb7c6…b7e4               Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,SLUTFRM «, t00=0x0075, t01=0x0126}
0xb7e4…b7f0               Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0075, t01=0x0144}
0xb7f0…b7fe               Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0075, t01=0x0150}
0xb7fe…b80c               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0075, t01=0x015e}
0xb80c…b824               Head {h00=0x0014, h01=0x0050, text=»BCKUP PROC $OPT «, t00=0x0075, t01=0x016c}
0xb824…b836               Head {h00=0x000e, h01=0x0050, text=» PLIT $OPT«, t00=0x0075, t01=0x0184}
0xb836…b852               Head {h00=0x0018, h01=0x0014, text=»********************«, t00=0x0076, t01=0x0008}
0xb852…b85c               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0076, t01=0x0024}
0xb85c…b89a               Head {h00=0x003a, h01=0x0036, text=»*          THIS PROCEDURE TAKES CARE OF ADMINISTRATION«, t00=0x0076, t01=0x002e}
0xb89a…b8b6               Head {h00=0x0018, h01=0x0014, text=»*          OB BACKUP«, t00=0x0076, t01=0x006c}
0xb8b6…b8c0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0076, t01=0x0088}
0xb8c0…b8f4               Head {h00=0x0030, h01=0x002c, text=»*          CALL:          PERF BCKUP,<=W'X'>«, t00=0x0076, t01=0x0092}
0xb8f4…b920               Head {h00=0x0028, h01=0x0024, text=»*          $OPT = 1 : WITHOUT BACKUP«, t00=0x0076, t01=0x00c6}
0xb920…b94a               Head {h00=0x0026, h01=0x0021, text=»*          $OPT = 2 : WITH BACKUP «, t00=0x0076, t01=0x00f2}
0xb94a…b954               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0076, t01=0x011c}
0xb954…b95e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0076, t01=0x0126}
0xb95e…b97a               Head {h00=0x0018, h01=0x0014, text=»********************«, t00=0x0076, t01=0x0130}
0xb97a…b984               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0076, t01=0x014c}
0xb984…b99e               Head {h00=0x0016, h01=0x0012, text=» MOVE CRECNR,CBIN1«, t00=0x0076, t01=0x0156}
0xb99e…b9ba               Head {h00=0x0018, h01=0x0013, text=» MOVE CRECBCD,=D'1' «, t00=0x0076, t01=0x0170}
0xb9ba…b9e2               Head {h00=0x0024, h01=0x0020, text=» ADD CVOLNO,=D'1' NEXT VOLUME NO«, t00=0x0076, t01=0x018c}
0xb9e2…ba0c               Head {h00=0x0026, h01=0x0022, text=» PERF CNFWRT REWRITE CONFIGURATION«, t00=0x0077, t01=0x0024}
0xba0c…ba26               Head {h00=0x0016, h01=0x0011, text=» SUB CVOLNO,=D'1' «, t00=0x0077, t01=0x004e}
0xba26…ba4e               Head {h00=0x0024, h01=0x0020, text=» CBE CBIN1,$OPT,BCK100 NO BACKUP«, t00=0x0077, t01=0x0068}
0xba4e…ba58               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0077, t01=0x0090}
0xba58…ba62               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0077, t01=0x009a}
0xba62…ba76               Head {h00=0x0010, h01=0x000c, text=»*     BACKUP«, t00=0x0077, t01=0x00a4}
0xba76…ba80               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0077, t01=0x00b8}
0xba80…ba8e               Head {h00=0x000a, h01=0x0006, text=»BCK000«, t00=0x0077, t01=0x00c2}
0xba8e…bab6               Head {h00=0x0024, h01=0x001f, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0077, t01=0x00d0}
0xbab6…bac4               Head {h00=0x000a, h01=0x0006, text=»BCK005«, t00=0x0077, t01=0x00f8}
0xbac4…bae8               Head {h00=0x0020, h01=0x001c, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0077, t01=0x0106}
0xbae8…bb0c               Head {h00=0x0020, h01=0x001b, text=» PERF LAMPON,=W'128' LAMP 4 «, t00=0x0077, t01=0x012a}
0xbb0c…bb2e               Head {h00=0x001e, h01=0x001a, text=» PERF LAMPON,=W'16' LAMP 7«, t00=0x0077, t01=0x014e}
0xbb2e…bb4a               Head {h00=0x0018, h01=0x0050, text=» TBF CGLREGFL,BCK010«, t00=0x0077, t01=0x0170}
0xbb4a…bb6e               Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 «, t00=0x0077, t01=0x018c}
0xbb6e…bb7c               Head {h00=0x000a, h01=0x0006, text=»BCK010«, t00=0x0078, t01=0x0020}
0xbb7c…bb9e               Head {h00=0x001e, h01=0x001a, text=» PERF SOPRD READ SOP LAMPS«, t00=0x0078, t01=0x002e}
0xbb9e…bbb6               Head {h00=0x0014, h01=0x000f, text=» IB GSWBIN2,  C «, t00=0x0078, t01=0x0050}
0xbbb6…bbe6               Head {h00=0x002c, h01=0x0028, text=»  BSOP10,BSOP09,BSOP08,BSOP07,BSOP06,  C«, t00=0x0078, t01=0x0068}
0xbbe6…bc12               Head {h00=0x0028, h01=0x0024, text=»  BSOP05,BSOP04,BSOP03,BSOP02,BSOP01«, t00=0x0078, t01=0x0098}
0xbc12…bc20               Head {h00=0x000a, h01=0x0006, text=»BSOP03«, t00=0x0078, t01=0x00c4}
0xbc20…bc2e               Head {h00=0x000a, h01=0x0006, text=»BSOP05«, t00=0x0078, t01=0x00d2}
0xbc2e…bc3c               Head {h00=0x000a, h01=0x0006, text=»BSOP06«, t00=0x0078, t01=0x00e0}
0xbc3c…bc4a               Head {h00=0x000a, h01=0x0006, text=»BSOP08«, t00=0x0078, t01=0x00ee}
0xbc4a…bc58               Head {h00=0x000a, h01=0x0006, text=»BSOP09«, t00=0x0078, t01=0x00fc}
0xbc58…bc66               Head {h00=0x000a, h01=0x0006, text=»BSOP10«, t00=0x0078, t01=0x010a}
0xbc66…bc84               Head {h00=0x001a, h01=0x0015, text=» B BCK010 OTHER LAMPS «, t00=0x0078, t01=0x0118}
0xbc84…bc8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0136}
0xbc8e…bcae               Head {h00=0x001c, h01=0x0018, text=»BSOP01   BACKUP FD999001«, t00=0x0078, t01=0x0140}
0xbcae…bcd6               Head {h00=0x0024, h01=0x001f, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x0078, t01=0x0160}
0xbcd6…bcfa               Head {h00=0x0020, h01=0x001c, text=» PERF LAMPON,=W'1024' LAMP 1«, t00=0x0078, t01=0x0188}
0xbcfa…bd32               Head {h00=0x0034, h01=0x002f, text=» PERF BACKUP,DK01,=D'1',=W'32',CCONBUF0,=W'199' «, t00=0x0079, t01=0x001c}
0xbd32…bd46               Head {h00=0x0010, h01=0x000c, text=» BNOK BCK050«, t00=0x0079, t01=0x0054}
0xbd46…bd60               Head {h00=0x0016, h01=0x0050, text=» ADD CVOLNO,=D'1' «, t00=0x0079, t01=0x0068}
0xbd60…bd8a               Head {h00=0x0026, h01=0x0050, text=» PERF WRITID,CBIN6,CBIN4 BACKUP OK«, t00=0x0079, t01=0x0082}
0xbd8a…bda4               Head {h00=0x0016, h01=0x0050, text=» SUB CVOLNO,=D'1' «, t00=0x0079, t01=0x00ac}
0xbda4…bddc               Head {h00=0x0034, h01=0x002f, text=» PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA «, t00=0x0079, t01=0x00c6}
0xbddc…bdee               Head {h00=0x000e, h01=0x0009, text=» B BCK000 «, t00=0x0079, t01=0x00fe}
0xbdee…bdfc               Head {h00=0x000a, h01=0x0006, text=»BCK050«, t00=0x0079, t01=0x0110}
0xbdfc…be34               Head {h00=0x0034, h01=0x002f, text=» PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA «, t00=0x0079, t01=0x011e}
0xbe34…be46               Head {h00=0x000e, h01=0x0009, text=» B BCK005 «, t00=0x0079, t01=0x0156}
0xbe46…be50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0168}
0xbe50…be7a               Head {h00=0x0026, h01=0x0050, text=»BSOP02   COPY FD999002 TO FD999005«, t00=0x0079, t01=0x0172}
0xbe7a…bea0               Head {h00=0x0022, h01=0x0050, text=» TBF CGLREGFL,BCK010 ALLOWED? «, t00=0x007a, t01=0x000c}
0xbea0…beb0               Head {h00=0x000c, h01=0x0050, text=» B BCK02«, t00=0x007a, t01=0x0032}
0xbeb0…beba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0042}
0xbeba…bec8               Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x007a, t01=0x004c}
0xbec8…bef2               Head {h00=0x0026, h01=0x0050, text=»BCK02   COPY FD999002 TO FD999005 «, t00=0x007a, t01=0x005a}
0xbef2…bf1a               Head {h00=0x0024, h01=0x0050, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x007a, t01=0x0084}
0xbf1a…bf3e               Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'512' LAMP 2 «, t00=0x007a, t01=0x00ac}
0xbf3e…bf50               Head {h00=0x000e, h01=0x0050, text=» SET CPFLG«, t00=0x007a, t01=0x00d0}
0xbf50…bf78               Head {h00=0x0024, h01=0x0050, text=» PERF ASGVOL,CBIN2 ASSIGN REGSET«, t00=0x007a, t01=0x00e2}
0xbf78…bf8e               Head {h00=0x0012, h01=0x0050, text=» BNOK BCK0290 «, t00=0x007a, t01=0x010a}
0xbf8e…bfaa               Head {h00=0x0018, h01=0x0050, text=» MOVE CGLRECNR,CBIN0«, t00=0x007a, t01=0x0120}
0xbfaa…bfba               Head {h00=0x000c, h01=0x0050, text=»BCK0250 «, t00=0x007a, t01=0x013c}
0xbfba…bfd6               Head {h00=0x0018, h01=0x0050, text=» ADD CGLRECNR,CBIN1 «, t00=0x007a, t01=0x014c}
0xbfd6…c004               Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' LENGTH OF RECORD«, t00=0x007a, t01=0x0168}
0xc004…c03c               Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CGLRECNR«, t00=0x007b, t01=0x0008}
0xc03c…c058               Head {h00=0x0018, h01=0x0050, text=» BNOK BCK0270 ERROR «, t00=0x007b, t01=0x0040}
0xc058…c082               Head {h00=0x0026, h01=0x0050, text=» CBE GTWBCD1,=D'4',BCK0280 NO DATA«, t00=0x007b, t01=0x005c}
0xc082…c0a2               Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,=C'SLUTD'«, t00=0x007b, t01=0x0086}
0xc0a2…c0be               Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN5,CBIN0 «, t00=0x007b, t01=0x00a6}
0xc0be…c0f8               Head {h00=0x0036, h01=0x0050, text=» MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 «, t00=0x007b, t01=0x00c2}
0xc0f8…c112               Head {h00=0x0016, h01=0x0050, text=» BE BCK0280 SLUTD «, t00=0x007b, t01=0x00fc}
0xc112…c142               Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK05,=D'5',CPCKBUF,CGLRECNR«, t00=0x007b, t01=0x0116}
0xc142…c156               Head {h00=0x0010, h01=0x0050, text=» BOK BCK0250«, t00=0x007b, t01=0x0146}
0xc156…c16e               Head {h00=0x0014, h01=0x0050, text=»BCK0270   ERROR «, t00=0x007b, t01=0x015a}
0xc16e…c190               Head {h00=0x001e, h01=0x0050, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x007b, t01=0x0172}
0xc190…c1a8 (124, 0, 400) Head {h00=0x0014, h01=0x0050, text=»BCK0280   FINISH«, t00=0x007c, t01=0x0004}
0xc1a8…c1c6               Head {h00=0x001a, h01=0x0050, text=» MOVE TTGLREC,CGLRECNR«, t00=0x007c, t01=0x001c}
0xc1c6…c1f6               Head {h00=0x002c, h01=0x0050, text=» PERF TCONFW,CBIN1 SAVE LAST RECORD NO. «, t00=0x007c, t01=0x003a}
0xc1f6…c206               Head {h00=0x000c, h01=0x0050, text=»BCK0290 «, t00=0x007c, t01=0x006a}
0xc206…c21a               Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x007c, t01=0x007a}
0xc21a…c242               Head {h00=0x0024, h01=0x0050, text=» DSC0 DK02,CLOSE CLOSE VOLUME 2 «, t00=0x007c, t01=0x008e}
0xc242…c254               Head {h00=0x000e, h01=0x0050, text=» B BCK02R «, t00=0x007c, t01=0x00b6}
0xc254…c25e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00c8}
0xc25e…c26c               Head {h00=0x000a, h01=0x0050, text=»***** «, t00=0x007c, t01=0x00d2}
0xc26c…c27a               Head {h00=0x000a, h01=0x0050, text=»BCK02R«, t00=0x007c, t01=0x00e0}
0xc27a…c28c               Head {h00=0x000e, h01=0x0050, text=» B BCK000 «, t00=0x007c, t01=0x00ee}
0xc28c…c296               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x007c, t01=0x0100}
0xc296…c2b6               Head {h00=0x001c, h01=0x0018, text=»BSOP04   BACKUP FD999004«, t00=0x007c, t01=0x010a}
0xc2b6…c2de               Head {h00=0x0024, h01=0x001f, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x007c, t01=0x012a}
0xc2de…c302               Head {h00=0x0020, h01=0x0050, text=» PERF LAMPON,=W'128' LAMP 4 «, t00=0x007c, t01=0x0152}
0xc302…c338               Head {h00=0x0032, h01=0x002d, text=» PERF BACKUP,DK04,=D'4',=W'30',CKTBUF,=W'128' «, t00=0x007c, t01=0x0176}
0xc338…c350               Head {h00=0x0014, h01=0x0010, text=» BNOK BCK005 NOK«, t00=0x007d, t01=0x001c}
0xc350…c364               Head {h00=0x0010, h01=0x000c, text=» B BCK000 OK«, t00=0x007d, t01=0x0034}
0xc364…c36e               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x007d, t01=0x0048}
0xc36e…c386               Head {h00=0x0014, h01=0x000f, text=»BSOP07   FINISH «, t00=0x007d, t01=0x0052}
0xc386…c3ae               Head {h00=0x0024, h01=0x001f, text=» PERF LAMPOF,=W'2047' LAMPS OFF «, t00=0x007d, t01=0x006a}
0xc3ae…c3dc               Head {h00=0x002a, h01=0x0026, text=» PERF ASGVOL,CBIN1 ASSIGN SYSTEM FILES«, t00=0x007d, t01=0x0092}
0xc3dc…c3f0               Head {h00=0x0010, h01=0x000c, text=» BNOK BCKNOK«, t00=0x007d, t01=0x00c0}
0xc3f0…c3fe               Head {h00=0x000a, h01=0x0006, text=»BCK100«, t00=0x007d, t01=0x00d4}
0xc3fe…c418               Head {h00=0x0016, h01=0x0012, text=» PERF ASGVOL,CBIN2«, t00=0x007d, t01=0x00e2}
0xc418…c42c               Head {h00=0x0010, h01=0x000c, text=» BNOK BCKNOK«, t00=0x007d, t01=0x00fc}
0xc42c…c446               Head {h00=0x0016, h01=0x0011, text=» ADD CVOLNO,=D'1' «, t00=0x007d, t01=0x0110}
0xc446…c45a               Head {h00=0x0010, h01=0x000c, text=» PERF STRTWR«, t00=0x007d, t01=0x012a}
0xc45a…c46c               Head {h00=0x000e, h01=0x000a, text=» BOK BCKOK«, t00=0x007d, t01=0x013e}
0xc46c…c486               Head {h00=0x0016, h01=0x0011, text=» SUB CVOLNO,=D'1' «, t00=0x007d, t01=0x0150}
0xc486…c4a8               Head {h00=0x001e, h01=0x001a, text=» PERF LAMPON,=W'2' LAMP 10«, t00=0x007d, t01=0x016a}
0xc4a8…c4ba               Head {h00=0x000e, h01=0x0009, text=» B BCKNOK «, t00=0x007d, t01=0x018c}
0xc4ba…c4c4               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x007e, t01=0x000e}
0xc4c4…c4d2               Head {h00=0x000a, h01=0x0006, text=»BCKNOK«, t00=0x007e, t01=0x0018}
0xc4d2…c4ee               Head {h00=0x0018, h01=0x0014, text=» CMP CBIN1,CBIN0 NOK«, t00=0x007e, t01=0x0026}
0xc4ee…c4fa               Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x007e, t01=0x0042}
0xc4fa…c504               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x007e, t01=0x004e}
0xc504…c512               Head {h00=0x000a, h01=0x0005, text=»BCKOK «, t00=0x007e, t01=0x0058}
0xc512…c532               Head {h00=0x001c, h01=0x0018, text=» PERF WRITID,CBIN2,CBIN1«, t00=0x007e, t01=0x0066}
0xc532…c54a               Head {h00=0x0014, h01=0x0010, text=» CMP CBIN0,CBIN0«, t00=0x007e, t01=0x0086}
0xc54a…c556               Head {h00=0x0008, h01=0x0005, text=» RET«, t00=0x007e, t01=0x009e}
0xc556…c564               Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x007e, t01=0x00aa}
0xc564…c572               Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x007e, t01=0x00b8}
0xc572…c57c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00c6}
0xc57c…c586               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00d0}
0xc586…c5c0               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x007e, t01=0x00da}
0xc5c0…c5ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0114}
0xc5ca…c5e4               Head {h00=0x0016, h01=0x0050, text=»*         FORMATS «, t00=0x007e, t01=0x011e}
0xc5e4…c5ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0138}
0xc5ee…c628               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x007e, t01=0x0142}
0xc628…c642               Head {h00=0x0016, h01=0x0050, text=»DUMTAB KTAB EORKY1«, t00=0x007e, t01=0x017c}
0xc642…c64c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0008}
0xc64c…c660               Head {h00=0x0010, h01=0x0050, text=»FMTFKI FRMT «, t00=0x007f, t01=0x0012}
0xc660…c66c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x007f, t01=0x0026}
0xc66c…c67a               Head {h00=0x000a, h01=0x0050, text=» FKI 1«, t00=0x007f, t01=0x0032}
0xc67a…c694               Head {h00=0x0016, h01=0x0050, text=» FMEL 'B',TSWBCD2 «, t00=0x007f, t01=0x0040}
0xc694…c6a2               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x007f, t01=0x005a}
0xc6a2…c6ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0068}
0xc6ac…c6c0               Head {h00=0x0010, h01=0x0050, text=»PCKINIT FRMT«, t00=0x007f, t01=0x0072}
0xc6c0…c6dc               Head {h00=0x0018, h01=0x0050, text=» FBT CSWFLAG,INIT10 «, t00=0x007f, t01=0x0086}
0xc6dc…c6f2               Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x007f, t01=0x00a2}
0xc6f2…c708               Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x007f, t01=0x00b8}
0xc708…c720               Head {h00=0x0014, h01=0x0050, text=» FILLR X'00',48 «, t00=0x007f, t01=0x00ce}
0xc720…c72e               Head {h00=0x000a, h01=0x0050, text=» FEXIT«, t00=0x007f, t01=0x00e6}
0xc72e…c73c               Head {h00=0x000a, h01=0x0050, text=»INIT10«, t00=0x007f, t01=0x00f4}
0xc73c…c752               Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x007f, t01=0x0102}
0xc752…c768               Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x007f, t01=0x0118}
0xc768…c77e               Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',48 «, t00=0x007f, t01=0x012e}
0xc77e…c78c               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x007f, t01=0x0144}
0xc78c…c796               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0152}
0xc796…c7aa               Head {h00=0x0010, h01=0x0050, text=»KONFRMT FRMT«, t00=0x007f, t01=0x015c}
0xc7aa…c7b6               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x007f, t01=0x0170}
0xc7b6…c7d6               Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KONVERTERING '«, t00=0x007f, t01=0x017c}
0xc7d6…c7ec               Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0080, t01=0x000c}
0xc7ec…c802               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0080, t01=0x0022}
0xc802…c810               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0080, t01=0x0038}
0xc810…c81a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0046}
0xc81a…c830               Head {h00=0x0012, h01=0x0050, text=»KONV4FMT FRMT «, t00=0x0080, t01=0x0050}
0xc830…c83c               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0080, t01=0x0066}
0xc83c…c856               Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KORREKT' «, t00=0x0080, t01=0x0072}
0xc856…c86a               Head {h00=0x0010, h01=0x0050, text=» FILLR '?',1«, t00=0x0080, t01=0x008c}
0xc86a…c880               Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0080, t01=0x00a0}
0xc880…c896               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0080, t01=0x00b6}
0xc896…c8a4               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0080, t01=0x00cc}
0xc8a4…c8ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00da}
0xc8ae…c8c2               Head {h00=0x0010, h01=0x0050, text=»FRVOLID FRMT«, t00=0x0080, t01=0x00e4}
0xc8c2…c8e2               Head {h00=0x001c, h01=0x0050, text=» FMEL '999999',CMASKDAT «, t00=0x0080, t01=0x00f8}
0xc8e2…c900               Head {h00=0x001a, h01=0x0050, text=» FMEL 'B99999',GSWBCD3«, t00=0x0080, t01=0x0118}
0xc900…c90e               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0080, t01=0x0136}
0xc90e…c918               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0144}
0xc918…c92c               Head {h00=0x0010, h01=0x0050, text=»SLUTFRM FRMT«, t00=0x0080, t01=0x014e}
0xc92c…c944               Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'SLUTD'«, t00=0x0080, t01=0x0162}
0xc944…c962               Head {h00=0x001a, h01=0x0050, text=» FMEL '99999',CRECBCD «, t00=0x0080, t01=0x017a}
0xc962…c970               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0081, t01=0x0008}
0xc970…c97a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0016}
0xc97a…c98e               Head {h00=0x0010, h01=0x0050, text=»STARTFR FRMT«, t00=0x0081, t01=0x0020}
0xc98e…c9a6               Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'Z300 '«, t00=0x0081, t01=0x0034}
0xc9a6…c9cc               Head {h00=0x0022, h01=0x0050, text=» FMEL '9999',CKMDNR KOMMUNE NR«, t00=0x0081, t01=0x004c}
0xc9cc…c9e2               Head {h00=0x0012, h01=0x0050, text=» FILLR C'2',1 «, t00=0x0081, t01=0x0072}
0xc9e2…c9fe               Head {h00=0x0018, h01=0x0050, text=» FCOPY CVOL(GSWBIN6)«, t00=0x0081, t01=0x0088}
0xc9fe…ca20               Head {h00=0x001e, h01=0x0050, text=» FMEL '999',CRELDAY DAG NR«, t00=0x0081, t01=0x00a4}
0xca20…ca42               Head {h00=0x001e, h01=0x0050, text=» FILLR C'1',1 MIXED TRANS «, t00=0x0081, t01=0x00c6}
0xca42…ca56               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x0081, t01=0x00e8}
0xca56…ca64               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0081, t01=0x00fc}
0xca64…ca6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x010a}
0xca6e…ca82               Head {h00=0x0010, h01=0x0050, text=»ADFRM01 FRMT«, t00=0x0081, t01=0x0114}
0xca82…ca8e               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0081, t01=0x0128}
0xca8e…caa6               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='KLAR ' «, t00=0x0081, t01=0x0134}
0xcaa6…cabe               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM  ' «, t00=0x0081, t01=0x014c}
0xcabe…cadc               Head {h00=0x001a, h01=0x0050, text=» FKI 12,MINL=1,MAXL=2 «, t00=0x0081, t01=0x0164}
0xcadc…caf6               Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZ',GSWBCD3«, t00=0x0081, t01=0x0182}
0xcaf6…cb04               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0082, t01=0x000c}
0xcb04…cb0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x001a}
0xcb0e…cb18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0024}
0xcb18…cb2c               Head {h00=0x0010, h01=0x0050, text=»OPENFRM FRMT«, t00=0x0082, t01=0x002e}
0xcb2c…cb38               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0082, t01=0x0042}
0xcb38…cb50               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM  ' «, t00=0x0082, t01=0x004e}
0xcb50…cb6c               Head {h00=0x0018, h01=0x0050, text=» FBT GTDYFLG,OPFR05 «, t00=0x0082, t01=0x0066}
0xcb6c…cb7c               Head {h00=0x000c, h01=0x0050, text=» FTAB 1 «, t00=0x0082, t01=0x0082}
0xcb7c…cb9a               Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'KASSE]BNING'«, t00=0x0082, t01=0x0092}
0xcb9a…cba8               Head {h00=0x000a, h01=0x0050, text=»OPFR05«, t00=0x0082, t01=0x00b0}
0xcba8…cbb4               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0082, t01=0x00be}
0xcbb4…cbd0               Head {h00=0x0018, h01=0x0050, text=» FBF GTMASTFL,OPFR10«, t00=0x0082, t01=0x00ca}
0xcbd0…cbec               Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'DAGS-DATO'«, t00=0x0082, t01=0x00e6}
0xcbec…cc1e               Head {h00=0x002e, h01=0x0050, text=» FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR«, t00=0x0082, t01=0x0102}
0xcc1e…cc42               Head {h00=0x0020, h01=0x0050, text=» FMEL '99E-99E-99',CMASKDAT «, t00=0x0082, t01=0x0134}
0xcc42…cc4e               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0082, t01=0x0158}
0xcc4e…cc68               Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DAG NR' «, t00=0x0082, t01=0x0164}
0xcc68…cc92               Head {h00=0x0026, h01=0x0050, text=» FKI 11,MINL=1,MAXL=3,ME,APPL=102 «, t00=0x0082, t01=0x017e}
0xcc92…ccae               Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZ',CRELDAY «, t00=0x0083, t01=0x0018}
0xccae…ccba               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0083, t01=0x0034}
0xccba…ccc8               Head {h00=0x000a, h01=0x0050, text=»OPFR10«, t00=0x0083, t01=0x0040}
0xccc8…cce4               Head {h00=0x0018, h01=0x0050, text=» FCOPY ='POST-DATO' «, t00=0x0083, t01=0x004e}
0xcce4…cd12               Head {h00=0x002a, h01=0x0050, text=» FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT «, t00=0x0083, t01=0x006a}
0xcd12…cd34               Head {h00=0x001e, h01=0x0050, text=» FMEL '99E-99E-99',GTDATO «, t00=0x0083, t01=0x0098}
0xcd34…cd40               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0083, t01=0x00ba}
0xcd40…cd5a               Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DAG NR' «, t00=0x0083, t01=0x00c6}
0xcd5a…cd84               Head {h00=0x0026, h01=0x0050, text=» FKI 11,MINL=1,MAXL=3,ME,APPL=107 «, t00=0x0083, t01=0x00e0}
0xcd84…cda6               Head {h00=0x001e, h01=0x0050, text=» FMEL 'ZZZ',GSWBCD3 DUMMY «, t00=0x0083, t01=0x010a}
0xcda6…cdb4               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0083, t01=0x012c}
0xcdb4…cdc8               Head {h00=0x0010, h01=0x0050, text=»ADMFRM1 FRMT«, t00=0x0083, t01=0x013a}
0xcdc8…cdd4               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0083, t01=0x014e}
0xcdd4…cdf2               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,ADML0001«, t00=0x0083, t01=0x015a}
0xcdf2…ce0a               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM  ' «, t00=0x0083, t01=0x0178}
0xce0a…ce1a               Head {h00=0x000c, h01=0x0050, text=»ADML0001«, t00=0x0083, t01=0x0190}
0xce1a…ce2a               Head {h00=0x000c, h01=0x0050, text=» FTAB 6 «, t00=0x0084, t01=0x0010}
0xce2a…ce4a               Head {h00=0x001c, h01=0x0050, text=» FCOPY ='EJ-EDB T[LLER '«, t00=0x0084, t01=0x0020}
0xce4a…ce56               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0084, t01=0x0040}
0xce56…ce6a               Head {h00=0x0010, h01=0x0050, text=» FCOPY ='NR'«, t00=0x0084, t01=0x004c}
0xce6a…ce7e               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0084, t01=0x0060}
0xce7e…ce98               Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KONTONR' «, t00=0x0084, t01=0x0074}
0xce98…cea4               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0084, t01=0x008e}
0xcea4…cec0               Head {h00=0x0018, h01=0x0050, text=» FBF GTDYFLG,AFRM20 «, t00=0x0084, t01=0x009a}
0xcec0…cee8               Head {h00=0x0024, h01=0x0050, text=» FKI 1,MINL=3,MAXL=3,ME,APPL=100«, t00=0x0084, t01=0x00b6}
0xcee8…cef6               Head {h00=0x000a, h01=0x0050, text=»AFRM20«, t00=0x0084, t01=0x00de}
0xcef6…cf12               Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZ',GSWBCD1 «, t00=0x0084, t01=0x00ec}
0xcf12…cf2e               Head {h00=0x0018, h01=0x0050, text=» FBT GTDYFLG,AFRM10 «, t00=0x0084, t01=0x0108}
0xcf2e…cf5c               Head {h00=0x002a, h01=0x0050, text=» FKI 5,MINL=10,MAXL=10,ME,REWRT,SCHK=1«, t00=0x0084, t01=0x0124}
0xcf5c…cf8a               Head {h00=0x002a, h01=0x0050, text=» FMEL '99999999E-99',CTR12NR(GSWBIN6) «, t00=0x0084, t01=0x0152}
0xcf8a…cf98               Head {h00=0x000a, h01=0x0050, text=»AFRM10«, t00=0x0084, t01=0x0180}
0xcf98…cfa6               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0084, t01=0x018e}
0xcfa6…cfb0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0085, t01=0x000c}
0xcfb0…cfc6               Head {h00=0x0012, h01=0x0050, text=»ADM2FRM1 FRMT «, t00=0x0085, t01=0x0016}
0xcfc6…cfd2               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0085, t01=0x002c}
0xcfd2…cff0               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,ADML0201«, t00=0x0085, t01=0x0038}
0xcff0…d008               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM  ' «, t00=0x0085, t01=0x0056}
0xd008…d018               Head {h00=0x000c, h01=0x0050, text=»ADML0201«, t00=0x0085, t01=0x006e}
0xd018…d028               Head {h00=0x000c, h01=0x0050, text=» FTAB 6 «, t00=0x0085, t01=0x007e}
0xd028…d04c               Head {h00=0x0020, h01=0x0050, text=» FCOPY ='BEHOLDNINGST[LLERE'«, t00=0x0085, t01=0x008e}
0xd04c…d058               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0085, t01=0x00b2}
0xd058…d06c               Head {h00=0x0010, h01=0x0050, text=» FCOPY ='NR'«, t00=0x0085, t01=0x00be}
0xd06c…d080               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',2«, t00=0x0085, t01=0x00d2}
0xd080…d09a               Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KONTONR' «, t00=0x0085, t01=0x00e6}
0xd09a…d0ae               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x0085, t01=0x0100}
0xd0ae…d0c6               Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'SALDO'«, t00=0x0085, t01=0x0114}
0xd0c6…d0d2               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0085, t01=0x012c}
0xd0d2…d0ee               Head {h00=0x0018, h01=0x0050, text=» FBF GTDYFLG,AFRM220«, t00=0x0085, t01=0x0138}
0xd0ee…d116               Head {h00=0x0024, h01=0x0050, text=» FKI 1,MINL=1,MAXL=2,ME,APPL=101«, t00=0x0085, t01=0x0154}
0xd116…d126               Head {h00=0x000c, h01=0x0050, text=»AFRM220 «, t00=0x0085, t01=0x017c}
0xd126…d140               Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZ',GSWBCD1«, t00=0x0085, t01=0x018c}
0xd140…d150               Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x0086, t01=0x0016}
0xd150…d16c               Head {h00=0x0018, h01=0x0050, text=» FBT GTDYFLG,AFRM210«, t00=0x0086, t01=0x0026}
0xd16c…d18a               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,AFRM225 «, t00=0x0086, t01=0x0042}
0xd18a…d1a8               Head {h00=0x001a, h01=0x0050, text=» FBT GTTESTFL,AFRM225 «, t00=0x0086, t01=0x0060}
0xd1a8…d1ce               Head {h00=0x0022, h01=0x0050, text=» FKI 5,MAXL=10,ME,SCHK=1,REWRT«, t00=0x0086, t01=0x007e}
0xd1ce…d1de               Head {h00=0x000c, h01=0x0050, text=»AFRM225 «, t00=0x0086, t01=0x00a4}
0xd1de…d208               Head {h00=0x0026, h01=0x0050, text=» FMEL 'ZZZZZZZZE-ZZ',GTDUPF(CBIN1)«, t00=0x0086, t01=0x00b4}
0xd208…d218               Head {h00=0x000c, h01=0x0050, text=» FTAB 18«, t00=0x0086, t01=0x00de}
0xd218…d236               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,AFRM230 «, t00=0x0086, t01=0x00ee}
0xd236…d254               Head {h00=0x001a, h01=0x0050, text=» FBT GTTESTFL,AFRM230 «, t00=0x0086, t01=0x010c}
0xd254…d278               Head {h00=0x0020, h01=0x0050, text=» FKI 18,MAXL=14,REWRT,SCHK=4«, t00=0x0086, t01=0x012a}
0xd278…d288               Head {h00=0x000c, h01=0x0050, text=»AFRM230 «, t00=0x0086, t01=0x014e}
0xd288…d2c0               Head {h00=0x0034, h01=0x0050, text=» FMEL 'TTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4) SALDO «, t00=0x0086, t01=0x015e}
0xd2c0…d2d6               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0087, t01=0x0008}
0xd2d6…d2e6               Head {h00=0x000c, h01=0x0050, text=»AFRM210 «, t00=0x0087, t01=0x001e}
0xd2e6…d2f4               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0087, t01=0x002e}
0xd2f4…d2fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x003c}
0xd2fe…d314               Head {h00=0x0012, h01=0x0050, text=»ADM17FRM FRMT «, t00=0x0087, t01=0x0046}
0xd314…d320               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0087, t01=0x005c}
0xd320…d33e               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,ADML1705«, t00=0x0087, t01=0x0068}
0xd33e…d356               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM  ' «, t00=0x0087, t01=0x0086}
0xd356…d366               Head {h00=0x000c, h01=0x0050, text=»ADML1705«, t00=0x0087, t01=0x009e}
0xd366…d376               Head {h00=0x000c, h01=0x0050, text=» FTAB 6 «, t00=0x0087, t01=0x00ae}
0xd376…d394               Head {h00=0x001a, h01=0x0050, text=» FCOPY ='KASSE-KONTO '«, t00=0x0087, t01=0x00be}
0xd394…d3a0               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0087, t01=0x00dc}
0xd3a0…d3ba               Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KONTONR' «, t00=0x0087, t01=0x00e8}
0xd3ba…d3ce               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x0087, t01=0x0102}
0xd3ce…d3e6               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='SALD0' «, t00=0x0087, t01=0x0116}
0xd3e6…d3f2               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0087, t01=0x012e}
0xd3f2…d410               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,ADM1701 «, t00=0x0087, t01=0x013a}
0xd410…d438               Head {h00=0x0024, h01=0x0050, text=» FKI 1,MINL=10,MAXL=10,ME,SCHK=1«, t00=0x0087, t01=0x0158}
0xd438…d448               Head {h00=0x000c, h01=0x0050, text=»ADM1701 «, t00=0x0087, t01=0x0180}
0xd448…d472               Head {h00=0x0026, h01=0x0050, text=» FMEL '99999999E-99',GTDUPF(CBIN1)«, t00=0x0087, t01=0x0190}
0xd472…d496               Head {h00=0x0020, h01=0x0050, text=» FKI 14,MAXL=14,REWRT,SCHK=4«, t00=0x0088, t01=0x002a}
0xd496…d4c8               Head {h00=0x002e, h01=0x0050, text=» FMEL 'TTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4) «, t00=0x0088, t01=0x004e}
0xd4c8…d4e6               Head {h00=0x001a, h01=0x0050, text=» FBF GTSPGFLG,ADM1702 «, t00=0x0088, t01=0x0080}
0xd4e6…d4fc               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0088, t01=0x009e}
0xd4fc…d50c               Head {h00=0x000c, h01=0x0050, text=»ADM1702 «, t00=0x0088, t01=0x00b4}
0xd50c…d51a               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0088, t01=0x00c4}
0xd51a…d524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00d2}
0xd524…d53a               Head {h00=0x0012, h01=0x0050, text=»ADM18FRM FRMT «, t00=0x0088, t01=0x00dc}
0xd53a…d546               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0088, t01=0x00f2}
0xd546…d55e               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ADM  ' «, t00=0x0088, t01=0x00fe}
0xd55e…d586               Head {h00=0x0024, h01=0x0050, text=» FCOPY ='VERSUR KONTONR REMIT ' «, t00=0x0088, t01=0x0116}
0xd586…d592               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0088, t01=0x013e}
0xd592…d5ac               Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'KONTONR'«, t00=0x0088, t01=0x014a}
0xd5ac…d5b8               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0088, t01=0x0164}
0xd5b8…d5e0               Head {h00=0x0024, h01=0x0050, text=» FKI 1,MINL=10,MAXL=10,ME,SCHK=1«, t00=0x0088, t01=0x0170}
0xd5e0…d604               Head {h00=0x0020, h01=0x0050, text=» FMEL '99999999E-99',TVERSUR«, t00=0x0089, t01=0x0008}
0xd604…d612               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0089, t01=0x002c}
0xd612…d61c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x003a}
0xd61c…d632               Head {h00=0x0012, h01=0x0050, text=»ADM12FRM FRMT «, t00=0x0089, t01=0x0044}
0xd632…d63e               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0089, t01=0x005a}
0xd63e…d660               Head {h00=0x001e, h01=0x0050, text=» FCOPY ='DISKETTE SKIFT ' «, t00=0x0089, t01=0x0066}
0xd660…d676               Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0089, t01=0x0088}
0xd676…d68c               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0089, t01=0x009e}
0xd68c…d69a               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0089, t01=0x00b4}
0xd69a…d6a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00c2}
0xd6a4…d6b8               Head {h00=0x0010, h01=0x0050, text=»CLFRM01 FRMT«, t00=0x0089, t01=0x00cc}
0xd6b8…d6c4               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0089, t01=0x00e0}
0xd6c4…d6e4               Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KASSELUKNING' «, t00=0x0089, t01=0x00ec}
0xd6e4…d6fa               Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x0089, t01=0x010c}
0xd6fa…d710               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0089, t01=0x0122}
0xd710…d71e               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0089, t01=0x0138}
0xd71e…d728               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0146}
0xd728…d73c               Head {h00=0x0010, h01=0x0050, text=»CLFRM02 FRMT«, t00=0x0089, t01=0x0150}
0xd73c…d750               Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x0089, t01=0x0164}
0xd750…d770               Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KASSELUKNING' «, t00=0x0089, t01=0x0178}
0xd770…d77c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008a, t01=0x0008}
0xd77c…d798               Head {h00=0x0018, h01=0x0050, text=» FCOPY GSWSTR20 TEXT«, t00=0x008a, t01=0x0014}
0xd798…d7be               Head {h00=0x0022, h01=0x0050, text=» FMEL 'ZZ',GTWBCD1 COUNTER NR «, t00=0x008a, t01=0x0030}
0xd7be…d7d2               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x008a, t01=0x0056}
0xd7d2…d7f0               Head {h00=0x001a, h01=0x0050, text=» FCOPY GTDBKRC DEB-KRE«, t00=0x008a, t01=0x006a}
0xd7f0…d7fc               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008a, t01=0x0088}
0xd7fc…d816               Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'KONTONR'«, t00=0x008a, t01=0x0094}
0xd816…d82a               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x008a, t01=0x00ae}
0xd82a…d840               Head {h00=0x0012, h01=0x0050, text=» FLINK FBELOB «, t00=0x008a, t01=0x00c2}
0xd840…d84c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008a, t01=0x00d8}
0xd84c…d876               Head {h00=0x0026, h01=0x0050, text=» FMEL '99999999E-99',GTDUPF(CBIN1)«, t00=0x008a, t01=0x00e4}
0xd876…d8a8               Head {h00=0x002e, h01=0x0050, text=» FMEL 'BTTT.TTT.TTT.TT9.99-',GTDUPF(CBIN4)«, t00=0x008a, t01=0x010e}
0xd8a8…d8b6               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x008a, t01=0x0140}
0xd8b6…d8c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x014e}
0xd8c0…d8d4               Head {h00=0x0010, h01=0x0050, text=»CLFRM03 FRMT«, t00=0x008a, t01=0x0158}
0xd8d4…d8e8               Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x008a, t01=0x016c}
0xd8e8…d906               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,CLF0301 «, t00=0x008a, t01=0x0180}
0xd906…d926               Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'KASSELUKNING' «, t00=0x008b, t01=0x000e}
0xd926…d936               Head {h00=0x000c, h01=0x0050, text=»CLF0301 «, t00=0x008b, t01=0x002e}
0xd936…d942               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008b, t01=0x003e}
0xd942…d95a               Head {h00=0x0014, h01=0x0050, text=» FCOPY GSWSTR20 «, t00=0x008b, t01=0x004a}
0xd95a…d968               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x008b, t01=0x0062}
0xd968…d972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0070}
0xd972…d986               Head {h00=0x0010, h01=0x0050, text=»CLFRM04 FRMT«, t00=0x008b, t01=0x007a}
0xd986…d992               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x008b, t01=0x008e}
0xd992…d9b0               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,CLF0401 «, t00=0x008b, t01=0x009a}
0xd9b0…d9ce               Head {h00=0x001a, h01=0x0050, text=» FCOPY ='KASSELUKNING'«, t00=0x008b, t01=0x00b8}
0xd9ce…d9de               Head {h00=0x000c, h01=0x0050, text=»CLF0401 «, t00=0x008b, t01=0x00d6}
0xd9de…d9ea               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008b, t01=0x00e6}
0xd9ea…da0e               Head {h00=0x0020, h01=0x0050, text=» FCOPY ='BEHOLDNINGST[LLERE'«, t00=0x008b, t01=0x00f2}
0xda0e…da1a               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008b, t01=0x0116}
0xda1a…da26               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008b, t01=0x0122}
0xda26…da44               Head {h00=0x001a, h01=0x0050, text=» FBT GTSPGFLG,CLF0402 «, t00=0x008b, t01=0x012e}
0xda44…da64               Head {h00=0x001c, h01=0x0050, text=» FCOPY ='SLET PERIODE ' «, t00=0x008b, t01=0x014c}
0xda64…da74               Head {h00=0x000c, h01=0x0050, text=» FTAB 15«, t00=0x008b, t01=0x016c}
0xda74…da8a               Head {h00=0x0012, h01=0x0050, text=» FCOPY =' DEB'«, t00=0x008b, t01=0x017c}
0xda8a…da96 (140, 0, 400) Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008c, t01=0x0004}
0xda96…dab4               Head {h00=0x001a, h01=0x0050, text=» FCOPY ='SLET SALDO ' «, t00=0x008c, t01=0x0010}
0xdab4…dac4               Head {h00=0x000c, h01=0x0050, text=» FTAB 15«, t00=0x008c, t01=0x002e}
0xdac4…dada               Head {h00=0x0012, h01=0x0050, text=» FCOPY =' KRE'«, t00=0x008c, t01=0x003e}
0xdada…daea               Head {h00=0x000c, h01=0x0050, text=»CLF0402 «, t00=0x008c, t01=0x0054}
0xdaea…daf6               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008c, t01=0x0064}
0xdaf6…db12               Head {h00=0x0018, h01=0x0050, text=» FCOPY ='SUBTOTAL ' «, t00=0x008c, t01=0x0070}
0xdb12…db22               Head {h00=0x000c, h01=0x0050, text=» FTAB 16«, t00=0x008c, t01=0x008c}
0xdb22…db38               Head {h00=0x0012, h01=0x0050, text=» FCOPY ='KVIT'«, t00=0x008c, t01=0x009c}
0xdb38…db44               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008c, t01=0x00b2}
0xdb44…db50               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008c, t01=0x00be}
0xdb50…db5c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008c, t01=0x00ca}
0xdb5c…db70               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x008c, t01=0x00d6}
0xdb70…db88               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='BILAG' «, t00=0x008c, t01=0x00ea}
0xdb88…db9e               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x008c, t01=0x0102}
0xdb9e…dbac               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x008c, t01=0x0118}
0xdbac…dbb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0126}
0xdbb6…dbca               Head {h00=0x0010, h01=0x0050, text=»SPGFM00 FRMT«, t00=0x008c, t01=0x0130}
0xdbca…dbd6               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x008c, t01=0x0144}
0xdbd6…dbee               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='KLAR ' «, t00=0x008c, t01=0x0150}
0xdbee…dc06               Head {h00=0x0014, h01=0x0050, text=» FLINK SPGFMSPG «, t00=0x008c, t01=0x0168}
0xdc06…dc24               Head {h00=0x001a, h01=0x0050, text=» FKI 13,MINL=1,MAXL=2 «, t00=0x008c, t01=0x0180}
0xdc24…dc3e               Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZ',GSWBCD3«, t00=0x008d, t01=0x000e}
0xdc3e…dc4c               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x008d, t01=0x0028}
0xdc4c…dc56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0036}
0xdc56…dc6c               Head {h00=0x0012, h01=0x0050, text=»SPGFMSPG FRMT «, t00=0x008d, t01=0x0040}
0xdc6c…dc80               Head {h00=0x0010, h01=0x0050, text=» FTEXT 'SP' «, t00=0x008d, t01=0x0056}
0xdc80…dc96               Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x008d, t01=0x006a}
0xdc96…dcaa               Head {h00=0x0010, h01=0x0050, text=» FTEXT 'RGE'«, t00=0x008d, t01=0x0080}
0xdcaa…dcb8               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x008d, t01=0x0094}
0xdcb8…dcc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00a2}
0xdcc2…dcd6               Head {h00=0x0010, h01=0x0050, text=»SPGFM04 FRMT«, t00=0x008d, t01=0x00ac}
0xdcd6…dce2               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x008d, t01=0x00c0}
0xdce2…dcee               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008d, t01=0x00cc}
0xdcee…dd08               Head {h00=0x0016, h01=0x0050, text=» FMEL '99',GSWBCD3«, t00=0x008d, t01=0x00d8}
0xdd08…dd28               Head {h00=0x001c, h01=0x0050, text=» FCOPY ='  ]BNE KASSER' «, t00=0x008d, t01=0x00f2}
0xdd28…dd34               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008d, t01=0x0112}
0xdd34…dd58               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN1) «, t00=0x008d, t01=0x011e}
0xdd58…dd7c               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN2) «, t00=0x008d, t01=0x0142}
0xdd7c…dda0               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN3) «, t00=0x008d, t01=0x0166}
0xdda0…ddc4               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN4) «, t00=0x008d, t01=0x018a}
0xddc4…ddd0               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008e, t01=0x001e}
0xddd0…ddf4               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN5) «, t00=0x008e, t01=0x002a}
0xddf4…de18               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN6) «, t00=0x008e, t01=0x004e}
0xde18…de3c               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN7) «, t00=0x008e, t01=0x0072}
0xde3c…de60               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN8) «, t00=0x008e, t01=0x0096}
0xde60…de6c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x008e, t01=0x00ba}
0xde6c…de90               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN9) «, t00=0x008e, t01=0x00c6}
0xde90…deb4               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN10)«, t00=0x008e, t01=0x00ea}
0xdeb4…ded8               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN11)«, t00=0x008e, t01=0x010e}
0xded8…defc               Head {h00=0x0020, h01=0x0050, text=» FMEL 'BBZZZ-',CMASK(CBIN12)«, t00=0x008e, t01=0x0132}
0xdefc…df12               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x008e, t01=0x0156}
0xdf12…df20               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x008e, t01=0x016c}
0xdf20…df2a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x017a}
0xdf2a…df34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0184}
0xdf34…df48               Head {h00=0x0010, h01=0x000c, text=»SPGFM08 FRMT«, t00=0x008e, t01=0x018e}
0xdf48…df54               Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x008f, t01=0x0012}
0xdf54…df6c               Head {h00=0x0014, h01=0x0050, text=» FLINK SPGFMSPG «, t00=0x008f, t01=0x001e}
0xdf6c…df88               Head {h00=0x0018, h01=0x0050, text=» FBF GTGLSPG,SPGL081«, t00=0x008f, t01=0x0036}
0xdf88…df9c               Head {h00=0x0010, h01=0x0050, text=» FILLR '*',1«, t00=0x008f, t01=0x0052}
0xdf9c…dfac               Head {h00=0x000c, h01=0x0050, text=»SPGL081 «, t00=0x008f, t01=0x0066}
0xdfac…dfb8               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x008f, t01=0x0076}
0xdfb8…dfd4               Head {h00=0x0018, h01=0x0014, text=» FCOPY =C' EKS.LBNR'«, t00=0x008f, t01=0x0082}
0xdfd4…dfea               Head {h00=0x0012, h01=0x000e, text=» FKI 14,MAXL=5«, t00=0x008f, t01=0x009e}
0xdfea…e008               Head {h00=0x001a, h01=0x0016, text=» FMEL 'XXXXX',GTLBNRIN«, t00=0x008f, t01=0x00b4}
0xe008…e014               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x008f, t01=0x00d2}
0xe014…e032               Head {h00=0x001a, h01=0x0015, text=» FCOPY =C'REGKONTONR' «, t00=0x008f, t01=0x00de}
0xe032…e068               Head {h00=0x0032, h01=0x002d, text=» FKI 14,MINL=10,MAXL=10,SCHK=1,REWRT,APPL=108 «, t00=0x008f, t01=0x00fc}
0xe068…e08c               Head {h00=0x0020, h01=0x001c, text=» FMEL 'XXXXXXXXE-XX',GSWBCD7«, t00=0x008f, t01=0x0132}
0xe08c…e098               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x008f, t01=0x0156}
0xe098…e0b6               Head {h00=0x001a, h01=0x0015, text=» FCOPY =C'CPR/CIR/NR' «, t00=0x008f, t01=0x0162}
0xe0b6…e0ea               Head {h00=0x0030, h01=0x002c, text=» FKI 14,MINL=7,MAXL=10,SCHK=1,REWRT,APPL=109«, t00=0x008f, t01=0x0180}
0xe0ea…e10e               Head {h00=0x0020, h01=0x001c, text=» FMEL 'XXXXXXE-XXXX',GSWBCD7«, t00=0x0090, t01=0x0024}
0xe10e…e11a               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0090, t01=0x0048}
0xe11a…e130               Head {h00=0x0012, h01=0x000d, text=» FLINK FBELOB «, t00=0x0090, t01=0x0054}
0xe130…e15e               Head {h00=0x002a, h01=0x0025, text=» FKI 14,MAXL=12,SCHK=4,REWRT,APPL=110 «, t00=0x0090, t01=0x006a}
0xe15e…e186               Head {h00=0x0024, h01=0x001f, text=» FMEL 'TTTTTTTVTTX,XX-',GSWBCD7 «, t00=0x0090, t01=0x0098}
0xe186…e192               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0090, t01=0x00c0}
0xe192…e1ae               Head {h00=0x0018, h01=0x0013, text=» FCOPY =C' DIVERSE' «, t00=0x0090, t01=0x00cc}
0xe1ae…e1ce               Head {h00=0x001c, h01=0x0017, text=» FKI 14,MAXL=2,APPL=111 «, t00=0x0090, t01=0x00e8}
0xe1ce…e1e8               Head {h00=0x0016, h01=0x0012, text=» FMEL 'XX',GSWBCD6«, t00=0x0090, t01=0x0108}
0xe1e8…e20c               Head {h00=0x0020, h01=0x001c, text=» FKI 18,MAXL=13,SCHK=4,REWRT«, t00=0x0090, t01=0x0122}
0xe20c…e232               Head {h00=0x0022, h01=0x001e, text=» FMEL 'TTTTTTTTTTTTX-',GSWBCD7«, t00=0x0090, t01=0x0146}
0xe232…e23e               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0090, t01=0x016c}
0xe23e…e254               Head {h00=0x0012, h01=0x000d, text=» FLINK FMTEND «, t00=0x0090, t01=0x0178}
0xe254…e262               Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0090, t01=0x018e}
0xe262…e26c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0091, t01=0x000c}
0xe26c…e280               Head {h00=0x0010, h01=0x0050, text=»SPGFM10 FRMT«, t00=0x0091, t01=0x0016}
0xe280…e28c               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0091, t01=0x002a}
0xe28c…e2a4               Head {h00=0x0014, h01=0x0050, text=» FLINK SPGFMSPG «, t00=0x0091, t01=0x0036}
0xe2a4…e2c0               Head {h00=0x0018, h01=0x0050, text=» FBF GTGLSPG,SPGL101«, t00=0x0091, t01=0x004e}
0xe2c0…e2d4               Head {h00=0x0010, h01=0x0050, text=» FILLR '*',1«, t00=0x0091, t01=0x006a}
0xe2d4…e2e4               Head {h00=0x000c, h01=0x0050, text=»SPGL101 «, t00=0x0091, t01=0x007e}
0xe2e4…e2f0               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0091, t01=0x008e}
0xe2f0…e308               Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'BILAG'«, t00=0x0091, t01=0x009a}
0xe308…e324               Head {h00=0x0018, h01=0x0050, text=» FCOPY =C' EKS.LBNR'«, t00=0x0091, t01=0x00b2}
0xe324…e338               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0091, t01=0x00ce}
0xe338…e34e               Head {h00=0x0012, h01=0x0050, text=» FTEXT C'FRA' «, t00=0x0091, t01=0x00e2}
0xe34e…e368               Head {h00=0x0016, h01=0x0050, text=» FKI 20,MAXL=5,ME «, t00=0x0091, t01=0x00f8}
0xe368…e386               Head {h00=0x001a, h01=0x0050, text=» FMEL 'XXXXX',GSWBCD7 «, t00=0x0091, t01=0x0112}
0xe386…e392               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0091, t01=0x0130}
0xe392…e3a2               Head {h00=0x000c, h01=0x0050, text=» FTAB 16«, t00=0x0091, t01=0x013c}
0xe3a2…e3b8               Head {h00=0x0012, h01=0x0050, text=» FTEXT C'TIL' «, t00=0x0091, t01=0x014c}
0xe3b8…e3d2               Head {h00=0x0016, h01=0x0050, text=» FKI 20,MAXL=5,ME «, t00=0x0091, t01=0x0162}
0xe3d2…e3f0               Head {h00=0x001a, h01=0x0050, text=» FMEL 'XXXXX',GTLBNRIN«, t00=0x0091, t01=0x017c}
0xe3f0…e3fc               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0092, t01=0x000a}
0xe3fc…e412               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTEND «, t00=0x0092, t01=0x0016}
0xe412…e420               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0092, t01=0x002c}
0xe420…e42a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x003a}
0xe42a…e434               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0092, t01=0x0044}
0xe434…e448               Head {h00=0x0010, h01=0x000b, text=»FBELOB FRMT «, t00=0x0092, t01=0x004e}
0xe448…e45e               Head {h00=0x0012, h01=0x000e, text=» FCOPY =C'BEL'«, t00=0x0092, t01=0x0062}
0xe45e…e474               Head {h00=0x0012, h01=0x000e, text=» FILLR X'5C',1«, t00=0x0092, t01=0x0078}
0xe474…e488               Head {h00=0x0010, h01=0x000c, text=» FILLR 'B',1«, t00=0x0092, t01=0x008e}
0xe488…e496               Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0092, t01=0x00a2}
0xe496…e4a0               Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0092, t01=0x00b0}
0xe4a0…e4b4               Head {h00=0x0010, h01=0x000b, text=»FMTEND FRMT «, t00=0x0092, t01=0x00ba}
0xe4b4…e4c0               Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0092, t01=0x00ce}
0xe4c0…e4e4               Head {h00=0x0020, h01=0x001b, text=» FKI 1,MAXL=1,APPL=90,VERIF «, t00=0x0092, t01=0x00da}
0xe4e4…e4fe               Head {h00=0x0016, h01=0x0011, text=» FMEL 'B',TSWBCD2 «, t00=0x0092, t01=0x00fe}
0xe4fe…e50c               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0092, t01=0x0118}
0xe50c…e516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0126}
0xe516…e520               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0092, t01=0x0130}
0xe520…e534               Head {h00=0x0010, h01=0x0050, text=»SPGFM17 FRMT«, t00=0x0092, t01=0x013a}
0xe534…e540               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0092, t01=0x014e}
0xe540…e550               Head {h00=0x000c, h01=0x0050, text=» FTAB 6 «, t00=0x0092, t01=0x015a}
0xe550…e56e               Head {h00=0x001a, h01=0x0050, text=» FCOPY ='KASSE-KONTO '«, t00=0x0092, t01=0x016a}
0xe56e…e57a               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0092, t01=0x0188}
0xe57a…e594 (147, 0, 400) Head {h00=0x0016, h01=0x0050, text=» FCOPY ='KONTONR' «, t00=0x0093, t01=0x0004}
0xe594…e5a8               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x0093, t01=0x001e}
0xe5a8…e5c0               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='SALDO' «, t00=0x0093, t01=0x0032}
0xe5c0…e5cc               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0093, t01=0x004a}
0xe5cc…e5f2               Head {h00=0x0022, h01=0x0050, text=» FMEL '99999999E-99',TTCASHAC «, t00=0x0093, t01=0x0056}
0xe5f2…e602               Head {h00=0x000c, h01=0x0050, text=» FTAB 14«, t00=0x0093, t01=0x007c}
0xe602…e62c               Head {h00=0x0026, h01=0x0050, text=» FMEL 'ZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH«, t00=0x0093, t01=0x008c}
0xe62c…e638               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0093, t01=0x00b6}
0xe638…e650               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='EJ EDB'«, t00=0x0093, t01=0x00c2}
0xe650…e660               Head {h00=0x000c, h01=0x0050, text=» FTAB 14«, t00=0x0093, t01=0x00da}
0xe660…e68c               Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZ.ZZZ.ZZZ.ZZ9.99-',TTEJEDB «, t00=0x0093, t01=0x00ea}
0xe68c…e698               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0093, t01=0x0116}
0xe698…e6a8               Head {h00=0x000c, h01=0x0050, text=» FTAB 14«, t00=0x0093, t01=0x0122}
0xe6a8…e6d4               Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 «, t00=0x0093, t01=0x0132}
0xe6d4…e6ea               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0093, t01=0x015e}
0xe6ea…e6f8               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0093, t01=0x0174}
0xe6f8…e702               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0093, t01=0x0182}
0xe702…e72a               Head {h00=0x0024, h01=0x0050, text=»*           CALCULATION-FORMATS «, t00=0x0093, t01=0x018c}
0xe72a…e734               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0024}
0xe734…e73e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x002e}
0xe73e…e754               Head {h00=0x0012, h01=0x0050, text=»CALFRM02  FRMT«, t00=0x0094, t01=0x0038}
0xe754…e762               Head {h00=0x000a, h01=0x0050, text=»  FSL «, t00=0x0094, t01=0x004e}
0xe762…e782               Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'REGNEFUNKTION'«, t00=0x0094, t01=0x005c}
0xe782…e78e               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0094, t01=0x007c}
0xe78e…e79a               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0094, t01=0x0088}
0xe79a…e7d4               Head {h00=0x0036, h01=0x0050, text=» FKI 1,MINL=1,MAXL=11,SCHK=4,APPL=91,DUPL=GSWBCD1 «, t00=0x0094, t01=0x0094}
0xe7d4…e7fc               Head {h00=0x0024, h01=0x0050, text=» FMEL 'TTT.TTT.TTX.XX-',GSWBCD1 «, t00=0x0094, t01=0x00ce}
0xe7fc…e80a               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0094, t01=0x00f6}
0xe80a…e814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0094, t01=0x0104}
0xe814…e81c               Head {h00=0x0004, h01=0x0050, t00=0x0094, t01=0x010e}
0xe81c…e832               Head {h00=0x0012, h01=0x0050, text=»CALFRM05 FRMT «, t00=0x0094, t01=0x0116}
0xe832…e83e               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0094, t01=0x012c}
0xe83e…e860               Head {h00=0x001e, h01=0x0050, text=» FCOPY  =C'REGNEFUNKTION' «, t00=0x0094, t01=0x0138}
0xe860…e86c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0094, t01=0x015a}
0xe86c…e878               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0094, t01=0x0166}
0xe878…e894               Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'TOTAL   ' «, t00=0x0094, t01=0x0172}
0xe894…e8a0               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0094, t01=0x018e}
0xe8a0…e8c8               Head {h00=0x0024, h01=0x0050, text=» FMEL  'ZZZ.ZZZ.ZZ9.99-',GSWBCD2«, t00=0x0095, t01=0x000a}
0xe8c8…e8de               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0095, t01=0x0032}
0xe8de…e8ee               Head {h00=0x000c, h01=0x0050, text=»  FMEND «, t00=0x0095, t01=0x0048}
0xe8ee…e8f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0058}
0xe8f8…e902               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0062}
0xe902…e928               Head {h00=0x0022, h01=0x0050, text=»*        CONTROLDIGIT-FORMATS «, t00=0x0095, t01=0x006c}
0xe928…e932               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x0092}
0xe932…e93c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0095, t01=0x009c}
0xe93c…e952               Head {h00=0x0012, h01=0x0050, text=»CCDFRM01  FRMT«, t00=0x0095, t01=0x00a6}
0xe952…e960               Head {h00=0x000a, h01=0x0050, text=»  FSL «, t00=0x0095, t01=0x00bc}
0xe960…e980               Head {h00=0x001c, h01=0x0050, text=»  FCOPY =C'CHECKCIFFER' «, t00=0x0095, t01=0x00ca}
0xe980…e99e               Head {h00=0x001a, h01=0x0050, text=»  FCOPY  ='BEREGNING' «, t00=0x0095, t01=0x00ea}
0xe99e…e9aa               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0095, t01=0x0108}
0xe9aa…e9b6               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0095, t01=0x0114}
0xe9b6…e9d2               Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'BEREGNING'«, t00=0x0095, t01=0x0120}
0xe9d2…e9ec               Head {h00=0x0016, h01=0x0050, text=» FTEXT 'SGRUNDLAG'«, t00=0x0095, t01=0x013c}
0xe9ec…e9f8               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0095, t01=0x0156}
0xe9f8…ea26               Head {h00=0x002a, h01=0x0050, text=»  FKI  1,MINL=1,MAXL=10,REWRT,APPL=105«, t00=0x0095, t01=0x0162}
0xea26…ea4c               Head {h00=0x0022, h01=0x0050, text=» FMEL  'ZZZZZZZZZE-9',GSWBCD6 «, t00=0x0095, t01=0x0190}
0xea4c…ea5a               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0096, t01=0x0026}
0xea5a…ea64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0034}
0xea64…ea7a               Head {h00=0x0012, h01=0x0050, text=»CCDFRM02 FRMT «, t00=0x0096, t01=0x003e}
0xea7a…ea88               Head {h00=0x000a, h01=0x0050, text=»  FSL «, t00=0x0096, t01=0x0054}
0xea88…eaa8               Head {h00=0x001c, h01=0x0050, text=» FCOPY  =C'CHECKCIFFER' «, t00=0x0096, t01=0x0062}
0xeaa8…eac6               Head {h00=0x001a, h01=0x0050, text=»  FCOPY  ='BEREGNING' «, t00=0x0096, t01=0x0082}
0xeac6…eae4               Head {h00=0x001a, h01=0x0050, text=» FBT GTDYFLG,CCDLAB02 «, t00=0x0096, t01=0x00a0}
0xeae4…eafc               Head {h00=0x0014, h01=0x0050, text=» FLINK CCDFRM03 «, t00=0x0096, t01=0x00be}
0xeafc…eb10               Head {h00=0x0010, h01=0x0050, text=» FB CCDLAB03«, t00=0x0096, t01=0x00d6}
0xeb10…eb20               Head {h00=0x000c, h01=0x0050, text=»CCDLAB02«, t00=0x0096, t01=0x00ea}
0xeb20…eb2c               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0096, t01=0x00fa}
0xeb2c…eb38               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0096, t01=0x0106}
0xeb38…eb56               Head {h00=0x001a, h01=0x0050, text=» FCOPY ='CHECKCIFFER' «, t00=0x0096, t01=0x0112}
0xeb56…eb6a               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0096, t01=0x0130}
0xeb6a…eb82               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='FEJL ' «, t00=0x0096, t01=0x0144}
0xeb82…eb92               Head {h00=0x000c, h01=0x0050, text=»CCDLAB03«, t00=0x0096, t01=0x015c}
0xeb92…eba8               Head {h00=0x0012, h01=0x0050, text=» FLINK FMTFKI «, t00=0x0096, t01=0x016c}
0xeba8…ebb6               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0096, t01=0x0182}
0xebb6…ebc0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0096, t01=0x0190}
0xebc0…ebd6               Head {h00=0x0012, h01=0x0050, text=»CCDFRM03 FRMT «, t00=0x0097, t01=0x000a}
0xebd6…ebe2               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0097, t01=0x0020}
0xebe2…ebee               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0097, t01=0x002c}
0xebee…ec12               Head {h00=0x0020, h01=0x0050, text=» FMEL 'ZZZZZZZZZE-9',GSWBCD6«, t00=0x0097, t01=0x0038}
0xec12…ec26               Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x0097, t01=0x005c}
0xec26…ec32               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0097, t01=0x0070}
0xec32…ec50               Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'CHECKCIFFER'«, t00=0x0097, t01=0x007c}
0xec50…ec66               Head {h00=0x0012, h01=0x0050, text=»  FILLR  '=',1«, t00=0x0097, t01=0x009a}
0xec66…ec82               Head {h00=0x0018, h01=0x0050, text=» FMEL 'B9B',GSWBCD5 «, t00=0x0097, t01=0x00b0}
0xec82…ec8e               Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0097, t01=0x00cc}
0xec8e…ecb2               Head {h00=0x0020, h01=0x0050, text=» FMEL 'ZZZZZZZZZE-9',GSWBCD6«, t00=0x0097, t01=0x00d8}
0xecb2…ecce               Head {h00=0x0018, h01=0x0050, text=» FMEL  '9B',GSWBCD5 «, t00=0x0097, t01=0x00fc}
0xecce…ecdc               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0097, t01=0x0118}
0xecdc…ece6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0097, t01=0x0126}
0xece6…ecfc               Head {h00=0x0012, h01=0x0050, text=»ADM22FRM FRMT «, t00=0x0097, t01=0x0130}
0xecfc…ed08               Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0097, t01=0x0146}
0xed08…ed20               Head {h00=0x0014, h01=0x0050, text=» FCOPY ='LBNR  '«, t00=0x0097, t01=0x0152}
0xed20…ed3c               Head {h00=0x0018, h01=0x0050, text=» FMEL '***99',TTLBNR«, t00=0x0097, t01=0x016a}
0xed3c…ed50               Head {h00=0x0010, h01=0x0050, text=» FILLR '-',3«, t00=0x0097, t01=0x0186}
0xed50…ed66               Head {h00=0x0012, h01=0x0050, text=» FKI 15,MAXL=5«, t00=0x0098, t01=0x000a}
0xed66…ed84               Head {h00=0x001a, h01=0x0050, text=» FMEL '***99',GSWBCD5 «, t00=0x0098, t01=0x0020}
0xed84…ed92               Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0098, t01=0x003e}
0xed92…ed9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0098, t01=0x004c}
0xed9c…eda8               Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0098, t01=0x0056}
0xeda8…edac               Head {h00=0x4004, h01=0x0000}
0xedac…edb0               00 98 00 62                                                                                                                                                                                                                                       ┆   b┆
0xedb0…edb8 (153, 1, 8)   20 04 00 00 00 99 00 04                                                                                                                                                                                                                           ┆        ┆
0xedb8…ee08 (154, 0, 400) 00 3a 00 48 20 49 44 45 4e 54 20 52 47 53 55 42 31 20 20 54 52 41 20 34 2e 31 20 20 37 39 2d 31 30 2d 32 36 20 46 31 20 4f 31 31 31 31 20 20 30 32 2e 30 31 2e 58 58 58 2e 31 00 00 00 04 00 32 00 2e 01 16 a8 46 4c 44 49 4e c8 46 4c 44 54 53   ┆ : H IDENT RGSUB1  TRA 4.1  79-10-26 F1 O1111  02.01.XXX.1     2 .   FLDIN FLDTS┆
0xee08…ee58               54 00 88 53 4c 55 54 00 c8 53 55 4d 57 52 54 00 c8 55 50 44 41 31 32 00 c8 55 50 44 41 4b 4b 00 00 00 00 42 00 0e 00 0a 02 04 c8 24 24 24 54 52 41 53 00 00 00 78 00 3e 00 3a 05 1c a8 46 4c 44 49 4e 02 a9 c8 46 4c 44 54 53 54 53 01 61 88 53   ┆T  SLUT  SUMWRT  UPDA12  UPDAKK    B       $$$TRAS   x > :   FLDIN   FLDTSTS a S┆
0xee58…eea8               4c 55 54 4d 00 00 c8 53 55 4d 57 52 54 31 00 9a c8 55 50 44 41 31 32 00 01 42 c8 55 50 44 41 4b 4b 00 00 bd 00 00 00 8a 00 44 00 40 02 1f c8 46 52 4d 54 4a 54 53 c8 46 52 4d 54 56 4f 41 c8 46 52 4d 58 54 41 39 c8 4b 54 50 4c 41 4e 46 c8 50   ┆LUTM   SUMWRT1   UPDA12  B UPDAKK        D @   FRMTJTS FRMTVOA FRMXTA9 KTPLANF P┆
0xeea8…eef8               41 43 4b 53 54 20 a8 53 50 45 52 52 c8 53 50 49 4e 46 38 20 c8 57 52 49 54 46 44 20 00 00 00 cc 00 1e 00 1a 02 0c c8 57 52 49 54 4a 54 a9 c8 57 52 49 54 56 4f 53 c8 57 54 41 4c 4c 59 4d 00 00 01 14 00 0e 00 09 00 04 14 07 00 05 00 01 4b a9   ┆ACKST  SPERR SPINF8  WRITFD            WRITJT  WRITVOS WTALLYM                K ┆
0xeef8…ef48               00 00 01 36 00 0e 00 09 00 04 14 07 00 0c 00 01 44 a9 00 00 01 48 00 0e 00 09 00 04 14 07 00 25 30 01 00 a9 00 00 01 5a 00 0e 00 0a 00 04 10 08 00 31 20 02 00 0a 00 00 01 6c 00 0e 00 0a 00 04 10 08 00 35 20 02 00 03 00 00 01 7e 00 0e 00 0a   ┆   6            D    H         %0      Z         1       l         5       ~    ┆
0xef48…ef98 (155, 0, 400) 00 04 10 08 00 39 20 02 00 04 00 00 01 90 00 0e 00 0a 00 04 10 08 00 3d 20 02 00 0a 00 01 00 12 00 4a 00 46 00 22 00 44 00 00 49 c6 2c 01 db 4c 20 c0 11 03 01 db 4c 48 84 1f 49 c1 1c 20 9a 13 18 20 9a 14 14 00 de 19 c5 00 9e 19 21 29 c5 4c   ┆     9                 =         J F " D  I ,  L      LH  I                 !) L┆
0xef98…efe8               08 00 c5 de 11 00 de 19 c5 23 9a 4c 23 21 9a 4c 1f 21 9a 4c 1b 21 9a 4c 03 48 00 01 00 24 00 0e 00 09 00 04 14 07 00 49 30 01 b1 01 00 01 00 72 00 0e 00 09 00 04 14 07 00 58 30 01 b1 01 00 01 00 84 00 0c 00 08 00 03 07 06 00 5a 00 10 00 01   ┆         # L#! L ! L ! L H   $         I0      r         X0                Z    ┆
0xefe8…f038               00 96 00 0c 00 08 00 03 06 06 00 5e 00 9a 00 01 00 a6 00 0c 00 08 00 03 07 06 00 63 00 02 00 01 00 b6 00 0c 00 08 00 03 07 06 00 65 00 12 00 01 00 c6 00 0e 00 0a 00 04 11 08 00 66 20 02 00 00 00 01 00 d6 00 0c 00 08 00 03 07 06 00 68 00 04   ┆           ^               c               e               f                 h  ┆
0xf038…f088               00 01 00 e8 00 0c 00 08 00 03 07 06 00 6a 00 14 00 01 00 f8 00 0c 00 08 00 03 07 06 00 6f 00 06 00 01 01 08 00 0c 00 08 00 03 07 06 00 72 00 16 00 01 01 18 00 0c 00 08 00 03 06 06 00 74 00 bd 00 01 01 28 00 4a 00 46 00 22 00 44 00 40 c9 14   ┆             j               o               r               t     ( J F " D @  ┆
0xf088…f0d8               00 de 16 cc 05 de 16 4c 00 cd de 16 00 de 16 cd 00 9e 16 1a 03 e8 4c 80 52 54 32 80 52 48 89 05 80 52 80 52 4c 80 52 80 52 48 c2 05 80 52 14 80 52 80 52 41 a5 00 80 b6 36 80 05 00 02 02 00 01 01 38 00 0e 00 09 00 04 14 07 00 91 30 01 b1 de   ┆       L              L RT2 RH   R RL R RH   R  R RA    6        8          0   ┆
0xf0d8…f128 (156, 0, 400) 00 01 01 86 00 0e 00 0a 00 04 10 08 00 94 20 02 00 11 00 02 00 08 00 0c 00 08 00 03 07 06 00 b6 00 0e 00 02 00 1a 00 0e 00 0a 00 04 14 08 00 bf 30 02 b0 12 00 02 00 2a 00 4a 00 46 00 22 00 44 00 80 02 00 40 a5 41 c8 40 93 40 83 06 10 10 34   ┆                                                0      * J F " D    @ A @ @    4┆
0xf128…f178               00 05 e8 4c 01 93 4c 06 11 10 34 00 48 c4 1a 48 84 0d 49 c1 0a 04 a3 de 14 02 c6 de 14 57 08 02 a3 de 14 02 c6 de 14 80 52 02 a9 de 14 34 00 29 a6 4c 00 02 00 3c 00 0c 00 08 00 03 06 06 00 c2 01 42 00 02 00 8a 00 0e 00 0a 00 04 14 08 00 c7   ┆   L  L   4 H  H  I          W          R    4 ) L   <           B              ┆
0xf178…f1c8               30 02 b0 30 00 02 00 9a 00 0e 00 0a 00 04 10 08 00 f9 20 02 00 3c 00 02 00 ac 00 4a 00 46 00 22 00 44 00 c0 04 80 52 57 7b 23 a6 4c 77 20 9e 16 10 06 02 e9 18 c0 de 14 49 a6 24 00 80 11 20 63 80 11 de 13 07 28 63 80 11 de 11 0c 02 63 80 12   ┆0  0                 <     J F " D    RW{# Lw           I $    c     (c      c  ┆
0xf1c8…f218               de 14 02 63 80 13 de 14 02 80 11 1b 80 4c 21 00 80 2e 9a 02 00 02 00 be 00 0e 00 09 00 04 14 07 01 0d 30 01 00 57 00 02 01 0c 00 0e 00 09 00 04 14 07 01 1a 30 01 00 57 00 02 01 1e 00 0e 00 0a 00 04 14 08 01 38 30 02 b0 17 00 02 01 30 00 4a   ┆   c         L!  .                0  W              0  W             80      0 J┆
0xf218…f268               00 46 00 22 00 44 01 00 e9 80 c0 de 14 36 c0 02 0d 00 2d de 14 4c 13 02 e9 17 c0 de 14 57 0b 2b de 14 4c 06 02 e9 17 c0 de 14 22 80 14 1a 49 85 17 49 22 0a 20 e5 de 11 0f 20 e6 de 11 0a 23 a6 4c 06 04 e7 de 14 57 00 00 02 01 42 00 0e 00 0a   ┆ F " D       6    -  L       W +  L       "   I  I"           # L     W    B    ┆

Reduced view