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

⟦b02f75dc6⟧

    Length: 26950 (0x6946)
    Notes: pts_type(SC)
    Names: »BUDGET.SC«

Derivation

└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
    └─⟦this⟧ »NJREMIT/BUDGET.SC« 
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/BUDGET.SC« 

PTS(SC)

 IDENT BUDGET 
 DDUM KMD08 
 PDIV 
 ENTRY BUDREG 
 EXT SPCLRA 
 EXT SPCLRN 
 EXT SPERR
 EXT RAWRIT 
 EXT RAREAD 
 EXT GENWRS 
 EXT GENWRF 
 EXT SKIP 
 EXT FMOVE
 EXT FRMBUD 
 EXT PACKST 
 EXT WRITFD 
 EXT PACKCL 
 EXT NEWLIN 
 EXT FRMBUP 
 EXT SETDEB 
 EXT RGREAD 
 EXT WAITF
 EJECT
BUDREG PROC 
************************************************
* 
* THIS PROCEDURE PROCESSES TRANS 40-49
* 
*********************************************** 

 TEST CBUDGET 
 BE BUDRET
 TEST CCONVFLG
 BNZ BUDRET DATATRANSM OR CONVERSION
 ADD CTASKNR,CBIN1 INDICATE TERMINAL ACTIVE 
 PERF BUDSTRT RESTART ON 1. CALL
 BNOK BUDEND
 CLEAR GTASTFLG 
BUD000
 SET SPPROMPT 
 ATTFMT BU00FRMT
BUD010
 PERF SPCLRA
 IB SPBINW2,BUD000,BUDEND,BUD050,BUD700,BUDEND,		C
		BUDEND,BUDEND,BUDEND,BUD900 
 B BUD000 INVALID KEY 
BUD050
 PERF NULSTIL 
 MOVE GTANTAL,=D'0' 
 MOVE GSWBIN1,GTREGNR 
 SUB GSWBIN1,=W'39' 
 IB GSWBIN1,BUD400,BUD410,BUD420,BUD010,		C 
		BUD010,BUD450,BUD460,BUD470,BUD480,BUD490 
 B BUD010 INVALID TRANSACTION 

BUD400
 ATTFMT BU40FRM 
BUD401
 MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) RESTORE FIRST YEAR
 SUB GTDUPF(CBIN14),=D'1' 
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR40GEN 
 B BUD401 


BUD410
 ATTFMT BU41FRM 
BUD411
 MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) 
 SUB GTDUPF(CBIN14),=D'1' 
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR41GEN 
 B BUD411 


BUD420
 ATTFMT BU42FRM 
BUD421
 MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) 
 SUB GTDUPF(CBIN14),=D'1' 
 PERF SETDEB
 ADD GTANTAL,=D'1'
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR42GEN 
 B BUD421 


BUD450
 ATTFMT BU45FRM 
BUD451
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR45GEN 
 CLEAR SPPROMPT 
 B BUD451 


BUD460
 ATTFMT BU46FRM 
BUD461
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR46GEN 
 CLEAR SPPROMPT 
 B BUD461 


BUD470
 ATTFMT BU47FRM 
BUD471
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR47GEN 
 CLEAR SPPROMPT 
 B BUD471 


BUD480
 ATTFMT BU48FRM 
BUD481
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR48GEN 
 CLEAR SPPROMPT 
 B BUD481 


BUD490
 ATTFMT BU49FRM 
BUD491
 ADD GTANTAL,=D'1'
 PERF SETDEB
 PERF SPCLRA
 IB SPBINW2,BUD000,BUD500 
 PERF TR49GEN 
 CLEAR SPPROMPT 
 B BUD491 


BUD500
 MOVE GSWBIN1,GTREGNR 
 SUB GSWBIN1,=W'29' FIND FORMAT FOR TOTALLINE 
 PERF FRMBUD,GSWBIN1
 PERF BUWRIT
 CALL FMOVE,GTSTRFMT,STJFRM 
 PERF BUWRIT INDICATE TRANSCHANGE 
 B BUD000 


BUD700
* THE PART OF THE PROGRAM SEEKS FOR REG. TRANSACTIONS 
* THE TRANS WILL BE DISPLAYED AND CAN BE
* CORRECTED. AFTERWARDS IT WILL BE WRITTEN BACK 
 ATTFMT BUSPFRMT
 SET SPPROMPT 
 PERF SPCLRA
 IB SPBINW2,BUD700,BUD760,BUD710
 B BUD700 
BUD710
* GSWBCD6 CONTAINS TRANSCODE (40-49)
* GSWBCD7 CONTAINS REGKONTONR 
 MOVE GTRECNR,CRECNR
BUD712
 SUB GTRECNR,CBIN1 NEXT RECORD
 CBNG GTRECNR,CBIN1,BUD750 FINISHED ? 
 PERF RGREAD,DK02,=D'2',CBIN2 READ RECORD 
 BOK BUD730 
 B BUD712 
BUD730
 CBNE GTREGNR,GSWBCD6,BUD712
 CBNE GTREGF(CBIN1),GSWBCD7,BUD712
* 
 PERF NULSTIL 
 MOVE GSWBIN1,GTREGNR 
 SUB GSWBIN1,=W'39' 
 CLEAR TTEORFLG 
 IB GSWBIN1,BUD740,BUD741,BUD742,BUD743,BUD744,		C
		BUD745,BUD746,BUD747,BUD748,BUD749
BUD740
 ATTFMT BU40FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR40GEN 
 PERF DELRECS 
 B BUD750 
BUD741
 ATTFMT BU41FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR41GEN 
 PERF DELRECS 
 B BUD750 
BUD742
 ATTFMT BU42FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR42GEN 
 PERF DELRECS 
 B BUD750 
BUD743
BUD744
 B BUD750 
BUD745
 ATTFMT BU45FRM 
 PERF SETDEB
 PERF MOV56INV
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR45GEN 
 PERF DELRECS 
 B BUD750 
BUD746
 ATTFMT BU46FRM 
 PERF SETDEB
 PERF MOV56INV
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR45GEN 
 PERF DELRECS 
 B BUD750 
BUD747
 ATTFMT BU47FRM 
 PERF SETDEB
 PERF MOV56INV
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR47GEN 
 PERF DELRECS 
 B BUD750 
BUD748
 ATTFMT BU48FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR48GEN 
 PERF DELRECS 
 B BUD750 
BUD749
 ATTFMT BU49FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR49GEN 
 PERF DELRECS 
BUD750
 B BUD700 
BUD760
 CALL FMOVE,GTSTRFMT,STJFRM 
 PERF BUWRIT
 B BUD000 

BUD900
* PRINT LOGFILE, INSERT HEADERS 
 PERF WAITF,CLEVFLG 
 MOVE CBUDPT,CBIN1
PRT022
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT 
 BNOK PRT095
 MOVE GSWSTR2,CLEVBUF 
 CBE GSWSTR2,='SL',PRT080 EMPTY PRINTFILE 
 CBNE GSWSTR2,='**',PRT024
 ADD CBUDPT,CBIN1 
 B PRT022 
PRT024
 PERF OVSKR 
PRT030
 DLETE CLEVBUF,CBIN0,CBIN2
 IB GSWBIN10,PRT031,PRT031,PRT031,PRT034,PRT034,		C 
		PRT034,PRT034,PRT034,PRT034,PRT034
* THIS PIECE OF CODING SPLITS PRINTLINES FROM 
* THE PRINTFILE (DK12) INTO TWO PHYSICAL PRINTLINES.
PRT031
 MOVE GSWSTR9,='*'
 MOVE GSWBIN1,CBIN0 
 MOVE GSWBIN2,=W'128' 
 MATCH CLEVBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1
 BNOK PRT034 NOT FOUND, TRY TO PRINT
 PERF WAITF,CPFLG 
 MOVE CPCKBUF,CLEVBUF SAVE OLD BUFFER 
 MOVE GSWBIN10,GSWBIN1 SAVE POS ON '*'
 MOVE GSWBIN1,=W'128' 
 SUB GSWBIN1,GSWBIN10 
 DLETE CLEVBUF,GSWBIN10,GSWBIN1 DELETE LAST PART
 PERF GENWRF,GTHCDEV,BUSUB10 PRINT FIRST PART 
 MOVE CLEVBUF,CBLANKS 
 MOVE GSWBIN1,=W'128' 
 SUB GSWBIN1,GSWBIN10 
 SUB GSWBIN1,CBIN3
 COPY CLEVBUF,CBIN0,GSWBIN1,CPCKBUF,GSWBIN10
 CLEAR CPFLG RELEASE BUFFER 
 ADD GTLINE,CBIN2 ADJUST LINE COUNTER 
PRT034
 PERF GENWRF,GTHCDEV,BUSUB10
 ADD CBUDPT,CBIN1 
 ADD GTLINE,CBIN2 
 CLEAR CLEVFLG
 DELAY CBIN2 SWTICH TASK
 PERF WAITF,CLEVFLG 
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT 
 BNOK PRT095
 MOVE GSWSTR2,CLEVBUF 
 CBE GSWSTR2,='SL',PRT080 
 CBE GSWSTR2,='**',PRT040 NEW PAGE ?
 CBNL GTLINE,=W'43',PRT035
 MOVE GSWBCD2,GSWSTR2 
 MOVE GSWBIN10,GSWBCD2
 SUB GSWBIN10,=W'39'
 B PRT030 
PRT035
 MOVE GSWBCD5,=D'1' 
 PERF SKIP
 CBE GSWSTR2,='SL',PRT080 
 CBNE GSWSTR2,='**',PRT024
 ADD CBUDPT,CBIN1 
 B PRT022 
PRT040
 MOVE GSWBIN10,=W'43' 
 SUB GSWBIN10,GTLINE HOW MANY NEW LINES DO WE NEED? 
 PERF NEWLIN,GSWBIN10 
 B PRT035 
PRT080
* RESET VARIOUS POINTERS
 MOVE CLEVBUF,=C'SLUTD '
 PERF RAWRIT,DK12,=D'12',CLEVBUF,CBIN1
 BNOK PRT095
 MOVE CBUDPT,CBIN1
 CLEAR CLEVFLG
 CMP CBIN0,CBIN0
 B PRT099 
PRT095
 MOVE CBUDPT,CBIN0
 CLEAR CLEVFLG
 CMP CBIN0,CBIN1
PRT099
 B BUD000 


BUDEND
 SUB CTASKNR,CBIN1 REMOVE FROM ACTIVITY 
 PERF PACKCL
 CLEAR GTASTFLG 
BUDRET
 RET
 PEND 
 EJECT
BUDSTRT PROC
* 
* THE PROCEDURE HAS TWO OBJECTIVES: 
* 1. WHEN A NEW FLOPPY HAS BEEN LOADED, 
*    THE FILE WILL BE INITIATED 
*    (ONLY AFTER PROGRAM-LOAD)
* 2. WHEN THE PROGRAM IS LOADED AND 
*    THE FILE IS NOT EMPTY, THE PROC
*    WILL SCAN THE FILE IN SEARCH FOR 
*    A 'SLUTD' RECORD, AND CBUDPT 
*    WILL BE UPDATED ACCORDINGLY. 
* 3. AT LAST SOME FIELDS WILL BE
*    INITIATED WITH <YEAR-1>, <YEAR>, 
*    ......,<YEAR+6>. 
* 
 CBNE CBUDPT,CBIN0,BST090 FIRST RUN AFTER LOAD ?
 PERF WAITF,CLEVFLG 
 MOVE CLEVBUF,=C' ' 
 MOVE CBUDPT,CBIN1
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT 
 BNOK BST095
 MOVE GSWSTR20,CLEVBUF
 CBE GSWSTR20,=C' ',BST060 CLEAN DISKFILE 
 CBE GSWSTR20,=C'SLUTD ',BST080 READY FOR USE 
 MOVE CBUDPT,CBIN2
BST045
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT 
 BNOK BST095
 MOVE GSWSTR20,CLEVBUF
 CBE GSWSTR20,=C'SLUTD ',BST080 
 ADD CBUDPT,CBIN1 
 B BST045 
BST060			INITIATE 
 MOVE CLEVBUF,=C'SLUTD '
 PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT 
 BNOK BST095
BST080
 CLEAR CLEVFLG
BST090
* ISOLATE YEAR
 MOVE GSWBCD1,CMASKDAT DDMMYY 
 DIV GSWBCD1,=D'100' 	  DDMM
 MUL GSWBCD1,=D'100' DDMM00 
 MOVE GSWBCD2,CMASKDAT
 SUB GSWBCD2,GSWBCD1 	    YY
 SUB GSWBCD2,=D'2'
 MOVE GSWBIN2,CBIN13
BST092
 MOVE GTDUPF(GSWBIN2),GSWBCD2 
 ADD GSWBIN2,CBIN1
 ADD GSWBCD2,=D'1'
 CBL GSWBIN2,CBIN22,BST092
 CMP CBIN0,CBIN0
 B BST099 
BST095
 MOVE CBUDPT,CBIN0
 CLEAR CLEVFLG
 CMP CBIN0,CBIN1
BST099
 RET
 PEND 
 EJECT
TR40GEN PROC
 CBG SPBINW2,CBIN3,TR40EX 
 PERF TOTADD
 PERF TRGEN,=W'16'
 PERF BUEDIT
TR40EX
 RET
 PEND 

TR41GEN PROC
 CBG SPBINW2,CBIN3,TR41EX 
 PERF TOTADD
 PERF TRGEN,=W'17'
 PERF BUEDIT
TR41EX
 RET
 PEND 


TR42GEN PROC
 CBG SPBINW2,CBIN3,TR42EX 
 PERF TOTADD
 PERF TRGEN,=W'18'
 PERF BUEDIT
TR42EX
 RET
 PEND 

TR45GEN PROC
 CBG SPBINW2,CBIN3,TR45EX 
 PERF MOV56 
 ADD GTREGF(CBIN18),GTREGF(CBIN17)
 PERF BUEDIT
 MOVE GTDUPF(CBIN14),GTREGF(CBIN14) 
 PERF TRGEN,=W'19'
TR45EX
 RET
 PEND 


TR46GEN PROC
 CBG SPBINW2,CBIN3,TR46EX 
 PERF MOV56 
 ADD GTREGF(CBIN18),GTREGF(CBIN17)
 PERF BUEDIT
 MOVE GTDUPF(CBIN14),GTREGF(CBIN14) 
 PERF TRGEN,=W'20'
TR46EX
 RET
 PEND 


TR47GEN PROC
 CBG SPBINW2,CBIN3,TR47EX 
 PERF MOV56 
 ADD GTREGF(CBIN18),GTREGF(CBIN17)
 PERF BUEDIT
 MOVE GTDUPF(CBIN14),GTREGF(CBIN14) 
 PERF TRGEN,=W'21'
TR47EX
 RET
 PEND 


TR48GEN PROC
 CBG SPBINW2,CBIN3,TR48EX 
 ADD GTREGF(CBIN18),GTREGF(CBIN4) 
 PERF TRGEN,=W'22'
 PERF BUEDIT
TR48EX
 RET
 PEND 


TR49GEN PROC
 CBG SPBINW2,CBIN3,TR49EX 
 ADD GTREGF(CBIN18),GTREGF(CBIN4) 
 PERF TRGEN,=W'23'
 PERF BUEDIT
TR49EX
 RET
 PEND 


TOTADD PROC 
 ADD GTREGF(CBIN14),GTREGF(CBIN3) 
 ADD GTREGF(CBIN15),GTREGF(CBIN4) 
 ADD GTREGF(CBIN16),GTREGF(CBIN5) 
 ADD GTREGF(CBIN17),GTREGF(CBIN6) 
 ADD GTREGF(CBIN18),GTREGF(CBIN7) 
 ADD GTREGF(CBIN19),GTREGF(CBIN8) 
 ADD GTREGF(CBIN20),GTREGF(CBIN9) 
 ADD GTREGF(CBIN21),GTREGF(CBIN10)
 RET
 PEND 


OVSKR PROC
 MOVE GSWSTR2,CLEVBUF 
 MOVE GSWBCD2,GSWSTR2 
 MOVE GSWBIN1,GSWBCD2 
 SUB GSWBIN1,=W'39' 
 MOVE GSWSTR20,=' ' 
 MOVE GSWBIN10,GSWBIN1
 IB GSWBIN1,OVS40,OVS41,OVS42,OVSERR,OVSERR,		C 
		OVS45,OVS46,OVS47,OVS48,OVS49 
 B OVSERR 
OVS40 
 MOVE GSWSTR20,='BUDGETTAL '
 B OVSPR
OVS41 
 MOVE GSWSTR20,='BUDGETTAL '
 B OVSPR
OVS42 
 MOVE GSWSTR20,='BUDGETTAL '
 B OVSPR
OVS45 
 MOVE GSWSTR20,='TILL[GSBEV. BUDGET ' 
 B OVSPR
OVS46 
 MOVE GSWSTR20,='OMPLACERINGER '
 B OVSPR
OVS47 
 MOVE GSWSTR20,='SUM AF R]DIGHEDSB. ' 
 B OVSPR
OVS48 
 MOVE GSWSTR20,='ANL[GSUDGIFTER-TB '
 B OVSPR
OVS49 
 MOVE GSWSTR20,='ANL[GSINDT[GTER-TB ' 
OVSPR 
OVSERR
 PERF FRMBUP
 PERF GENWRS,GTHCDEV,GTSTRFMT 
 MOVE GTLINE,CBIN4
 RET
 PEND 


BUEDIT PROC 
 MOVE GSWBIN1,GTREGNR 
 SUB GSWBIN1,=W'39' 
 PERF FRMBUD,GSWBIN1
 PERF BUWRIT
 RET
 PEND 


BUWRIT PROC 
 PERF WAITF,CLEVFLG 
 EDIT CLEVBUF,GTSTRFMT
 MOVE GSWSTR2,CLEVBUF 
 CBNE GSWSTR2,='**',BUW020
 TBT GTASTFLG,BUW090
BUW020
 CLEAR GTASTFLG 
 ADD CBUDPT,CBIN1 WRITE A NEW SLUTD BEFORE
 MOVE CLEVBUF,=C'SLUTD ' CORRUPTING THE OLD ONE 
  PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT
 BNOK BUW095
 SUB CBUDPT,CBIN1 
 EDIT CLEVBUF,GTSTRFMT
 PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT 
 BNOK BUW095
 ADD CBUDPT,CBIN1 
 MOVE GSWSTR2,CLEVBUF 
 CBNE GSWSTR2,='**',BUW090
 SET GTASTFLG 
BUW090
 CLEAR CLEVFLG
 CMP CBIN0,CBIN0
 B BUW099 
BUW095
 CLEAR CLEVFLG
 CMP CBIN0,CBIN1
BUW099
 RET
 PEND 


MOV56 PROC
* THE AMOUNT MUST BE MOVED TO FIELD 
* 55,56,57, DEPENING ON WHICH YEAR
* IT BELONGS TO.
* THE FORMEL IS:
* FIELDNR := REGYEAR + 4 - ACTYEAR
 MOVE GTUSED(CBIN5),CBIN0 
 MOVE GSWBCD1,GTREGF(CBIN14)
 ADD GSWBCD1,=D'4'
 SUB GSWBCD1,GTDUPF(CBIN15) 
 MOVE GSWBIN1,GSWBCD1 
 MOVE GTREGF(GSWBIN1),GTREGF(CBIN17)
 MOVE GSWBIN2,GSWBIN1 
 ADD GSWBIN2,=W'52' 
 MUL GSWBIN2,=W'-1' 
 MOVE GTUSED(GSWBIN1),GSWBIN2 
 MOVE GTPRTDAT,GTREGF(CBIN14) 
 RET
 PEND 


MOV56INV PROC 
 CBE GTUSED(CBIN3),CBIN0,MOV561 
 MOVE GSWBIN1,CBIN3 
 B MOV563 
MOV561
 CBE GTUSED(CBIN4),CBIN0,MOV562 
 MOVE GSWBIN1,CBIN4 
 B MOV563 
MOV562
 MOVE GSWBIN1,CBIN5 
MOV563
 MOVE GTREGF(CBIN17),GTREGF(GSWBIN1)
 MOVE GSWBIN2,GTDUPF(CBIN15)
 ADD GSWBIN2,GSWBIN1
 SUB GSWBIN2,CBIN4
 MOVE GTPRTDAT,GSWBIN2 YEEAR
 MOVE GTREGF(CBIN14),GSWBIN2
 RET
 PEND 


DELRECS PROC
 PERF WAITF,CPFLG 
 MOVE GSWBIN1,=W'128' 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 
 BNOK DELREC2 
 MOVE GSWSTR20,CPCKBUF
DELREC1 
 SET GTSWFLAG 
 CBE CRECLGD,=W'128',DELREC3
 CLEAR GTSWFLAG 
DELREC3 
 EDIT CPCKBUF,PCKINIT 
 COPY CPCKBUF,CBIN0,CBIN20,GSWSTR20,CBIN0 
 MOVE GSWSTR9,=X'7F'
 COPY CPCKBUF,CBIN20,CBIN1,GSWSTR9,CBIN0
 PERF RAWRIT,DK02,=D'2',CPCKBUF,GSWBIN9 
 BNOK DELREC2 
DELREC2 
 CBNL GSWBIN9,GSWBIN10,DELREC9
 ADD GSWBIN9,CBIN1
 MOVE GSWBIN1,=W'128' 
 PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 
 BNOK DELREC2 
 COPY GSWSTR20,CBIN6,CBIN5,CPCKBUF,CBIN6 MOVE LOBENR ONLY 
 B DELREC1 AND DELETE CONT.RECORD 
DELREC9 
 CLEAR CPFLG
 RET
 PEND 


TRGEN PROC $W 
 MOVE GTUSED(CBIN14),CBIN0
 MOVE GTUSED(CBIN15),CBIN0
 MOVE GTUSED(CBIN16),CBIN0
 MOVE GTUSED(CBIN17),CBIN0
 MOVE GTUSED(CBIN18),CBIN0
 MOVE GTUSED(CBIN19),CBIN0
 MOVE GTUSED(CBIN20),CBIN0
 MOVE GTUSED(CBIN21),CBIN0
 MOVE GTREGDEX,$W 
 CBG SPBINW2,CBIN3,TRGEN1 
 PERF PACKST,CBIN15 
 PERF WRITFD
 BOK TRGEN1 
 MOVE SPBINW4,CBIN17
 PERF SPERR 
 B TRGEN9 
TRGEN1
 PERF PACKCL
TRGEN9
 RET
 PEND 


NULSTIL PROC
 MOVE GTREGF(CBIN14),=D'0'
 MOVE GTREGF(CBIN15),=D'0'
 MOVE GTREGF(CBIN16),=D'0'
 MOVE GTREGF(CBIN17),=D'0'
 MOVE GTREGF(CBIN18),=D'0'
 MOVE GTREGF(CBIN19),=D'0'
 MOVE GTREGF(CBIN20),=D'0'
 MOVE GTREGF(CBIN21),=D'0'
 RET
 PEND 
 EJECT

BU00FRMT FRMT		MENU 
 FSL
 FCOPY =X'5C343020' 
 FCOPY ='BUDGETTAL '
 FCOPY ='UDEN ' 
 FCOPY ='BUDGETTERINGSKODE' 
 FNL
 FCOPY =X'5C343120' 
 FCOPY ='BUDGETTAL '
 FCOPY ='MED '
 FCOPY ='BUDGETTERINGSKODE' 
 FNL
 FCOPY =X'5C343220' 
 FCOPY ='[NDRING/SLETNING AF '
 FCOPY ='BUDGETTAL '
 FCOPY ='MED '
 FCOPY ='BUDGETTERINGSKODE' 
 FNL
 FCOPY =X'5C343520' 
 FCOPY ='TILL[GSBEV. BUDGET ' 
 FNL
 FCOPY =X'5C343620' 
 FCOPY ='OMPLACERINGER '
 FNL
 FCOPY =X'5C343720' 
 FCOPY ='SUM AF R]DIGHEDSB. ' 
 FNL
 FCOPY =X'5C343820' 
 FCOPY ='ANL[GSUDGIFTER-TB '
 FNL
 FCOPY =X'5C343920' 
 FCOPY ='ANL[GSINDT[GTER-TB ' 
 FNL
 FNL
 FCOPY ='INDTAST TRANSAKTIONSKODE:  ' 
 FILLR X'5C',1
 FKI 29,MINL=2,MAXL=2,NUM 

 FMEL 'XX',GTREGNR
 FNL
 FCOPY ='ELLER TRYK "KVIT" ELLER "KRE"' 
 FMEND


BUSPFRMT FRMT 
 FSL
 FCOPY ='INDTAST TRANSKODE: ' 
 FILLR X'5C',1
 FKI 21,MINL=2,MAXL=2,ME,NUM
 FMEL 'ZZ',GSWBCD6
 FTAB 25

 FCOPY ='PLUS REGKONTONR '
 FKI 41,MINL=4,MAXL=10,ME,NUM,REWRT 
 FMEL 'ZZZE-ZZZE-ZZE-ZZ',GSWBCD7
 FMEND



BU40FRM FRMT
 FSL
 FCOPY =X'5C343020' 
 FLINK BUSUB1 
 FLINK BUSUB2 
 FMEND


BU41FRM FRMT
 FSL
 FCOPY =X'5C343120' 
 FLINK BUSUB1 
 FLINK BUSUB3 
 FLINK BUSUB2 
 FMEND



BU42FRM FRMT
 FSL
 FCOPY =X'5C343220' 
 FLINK BUSUB1 
 FLINK BUSUB3 
 FLINK BUSUB2 
 FMEND


BU45FRM FRMT
 FSL
 FCOPY =X'5C343520' 
 FCOPY ='TILL[GSBEV. BUDGET ' 
 FLINK BUSUB4 
 FLINK BUSUB5 
 FMEND


BU46FRM FRMT
 FSL
 FCOPY =X'5C343620' 
 FCOPY ='OMPLACERINGER '
 FLINK BUSUB4 
 FILLR ' ',5
 FCOPY ='DET.KODE/LBNR: ' 
 FLINK BUSUB7 
 FLINK BUSUB5 
 FMEND


BU47FRM FRMT
 FSL
 FCOPY =X'5C343720' 
 FCOPY ='SUM AF R]DIGHEDSB. ' 
 FNL
 FLINK BUBEL1 
 FLINK BUSUB8 
 FLINK BUSUB5 
 FMEND


BU48FRM FRMT
 FSL
 FCOPY =X'5C343820' 
 FCOPY ='ANL[GSUDGIFTER-TB '
 FLINK BUSUB6 
 FLINK BUSUB9 
 FMEND


BU49FRM FRMT
 FSL
 FCOPY =X'5C343920' 
 FCOPY ='ANL[GSINDT[GTER-TB ' 
 FLINK BUSUB6 
 FLINK BUSUB9 
 FMEND



BUBEL1 FRMT 
 FCOPY ='BUDGETBEL' 
 FILLR X'5C',1
 FCOPY ='B ]R: '
 FMEND


BUBEL2 FRMT 
 FCOPY ='BUDG.BEL'
 FILLR X'5C',1
 FILLR 'B',1
 FMEND




BUSUB1 FRMT 
 FCOPY ='INDBERETNING LOKAL'
 FILLR ' ',18 
 FCOPY ='PRISREG.KODE: '
 FKI 55,APPL=64,MINL=1,MAXL=1,ME,DUPL=GTDUPF(CBIN12)
 FMEL 'X',GTREGF(CBIN12)
 FNL
 FNL
 FCOPY ='LINNR: ' 
 FMEL 'ZZZ9',GTANTAL
 FILLR ' ',5
 FCOPY ='REGKONTONR: '
 FKI 33,APPL=5,MINL=10,MAXL=10,ME,SCHK=1,REWRT,		C
		DUPL=GTDUPF(CBIN1)
 FMEL 'XXXE-XXXE-XXE-XX',GTREGF(CBIN1)
 FMEND


BUSUB2 FRMT 
 FNL
 FNL
 FCOPY ='BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN14)
 FCOPY ='  BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN15)
 FNL
 FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=55
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN3) 
 FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=56,		C 
		DUPL=GTREGF(CBIN3)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN4) 
 FNL
 FNL
 FCOPY ='BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN16)
 FCOPY ='  BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN17)
 FCOPY ='  BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN18)
 FCOPY ='  BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN19)
 FCOPY ='  BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN20)
 FCOPY ='  BUDGET]R'
 FMEL 'B99',GTDUPF(CBIN21)
 FNL
 FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=57,		C
		DUPL=GTREGF(CBIN4)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN5) 
 FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=58,		C 
		DUPL=GTREGF(CBIN5)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN6) 
 FKI 27,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=59,		C 
		DUPL=GTREGF(CBIN6)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN7) 
 FKI 40,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=60,		C 
		DUPL=GTREGF(CBIN7)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN8) 
 FKI 53,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=61,		C 
		DUPL=GTREGF(CBIN8)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN9) 
 FKI 66,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=62,		C 
		DUPL=GTREGF(CBIN9)
 FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN10)
 FNL
 FNL
 FNL
 FNL
 FCOPY ='TOTAL:'
 FNL
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN14)
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN15)
 FNL
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN16)
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN17)
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN18)
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN19)
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN20)
 FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN21)
 FMEND


BUSUB3 FRMT 
 FILLR ' ',3
 FCOPY ='BUDGETTERINGSKODE: ' 
 FKI 67,APPL=54,MINL=1,MAXL=10,ME,REWRT,		C 
		DUPL=GTDUPF(CBIN2)
 FMEL 'XBXXXXBXXXBXX',GTREGF(CBIN2) 
 FMEND


BUSUB4 FRMT 
 FLINK BUSUB6 
 FILLR ' ',5
 FLINK BUBEL1 
 FKI 52,MINL=2,MAXL=2,ME,NUM,APPL=120,		C 
		DUPL=GTPRTDAT 
 FMEL 'XX',GTREGF(CBIN14) 
 FMEND


BUSUB5 FRMT 
 FNL
 FCOPY ='REGKONTONR ' 
 FILLR ' ',4
 FLINK BUBEL2 
 FNL
 FKI 1,MINL=10,MAXL=10,ME,SCHK=1,NUM,REWRT,APPL=5 
 FMEL 'XXXE-XXXE-XXE-XX',GTREGF(CBIN1)
 FKI 16,MINL=1,MAXL=11,ME,APPL=57,NUM,SCHK=4,REWRT
 FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN17) 
 FMEND


BUSUB6 FRMT 
 FNL
 FNL
 FCOPY ='TILL[GSBEV.DATO: ' 
 FKI 18,MINL=6,MAXL=6,APPL=63,		C 
		ME,NUM,REWRT,SCHK=2,DUPL=GTDUPF(CBIN11) 
 FMEL 'XXVXXVXX',GTREGF(CBIN11) 
 FMEND


BUSUB7 FRMT 
 FKI 75,NUM,MINL=1,MAXL=4,APPL=65,ME,DUPL=GTDUPF(CBIN13)
 FMEL 'XXXX',GTREGF(CBIN13) 
 FMEND


BUSUB8 FRMT 
 FKI 18,MINL=2,MAXL=2,NUM,ME,APPL=120,DUPL=GTPRTDAT 
 FMEL 'XX',GTREGF(CBIN14) 
 FMEND


BUSUB9 FRMT 
 FNL
 FCOPY ='PROJEKT NR ' 
 FILLR ' ',4
 FLINK BUBEL2 
 FNL
 FKI 1,MINL=4,MAXL=4,ME,NUM,REWRT,		C 
		APPL=5,DUPL=GTDUPF(CBIN1) 
 FMEL 'XXXX',GTREGF(CBIN1)
 FKI 16,MINL=1,MAXL=11,ME,APPL=56,NUM,SCHK=4,REWRT
 FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN4)
 FMEND


BUSUB10 FRMT
 FILLR '0',2
 FCOPY CLEVBUF
 FEOR 
 FMEND


STJFRM FRMT 
 FILLR '*',5
 FMEND


PCKINIT FRMT
 FILLR ' ',40 
 FILLR ' ',40 
 FBT GTSWFLAG,PCKI10
 FILLR X'00',48 
 FEXIT
PCKI10
 FILLR ' ',48 
 FMEND


 END

HexDump

0x0000…0016 (0, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IDENT BUDGET «, t00=0x0000, t01=0x0004}
0x0016…002a              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x001a}
0x002a…0038              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x002e}
0x0038…004e              Head {h00=0x0012, h01=0x0050, text=» ENTRY BUDREG «, t00=0x0000, t01=0x003c}
0x004e…0062              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0000, t01=0x0052}
0x0062…0076              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0000, t01=0x0066}
0x0076…0088              Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0000, t01=0x007a}
0x0088…009c              Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x008c}
0x009c…00b0              Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0000, t01=0x00a0}
0x00b0…00c4              Head {h00=0x0010, h01=0x0050, text=» EXT GENWRS «, t00=0x0000, t01=0x00b4}
0x00c4…00d8              Head {h00=0x0010, h01=0x0050, text=» EXT GENWRF «, t00=0x0000, t01=0x00c8}
0x00d8…00ea              Head {h00=0x000e, h01=0x0050, text=» EXT SKIP «, t00=0x0000, t01=0x00dc}
0x00ea…00fc              Head {h00=0x000e, h01=0x0050, text=» EXT FMOVE«, t00=0x0000, t01=0x00ee}
0x00fc…0110              Head {h00=0x0010, h01=0x0050, text=» EXT FRMBUD «, t00=0x0000, t01=0x0100}
0x0110…0124              Head {h00=0x0010, h01=0x0050, text=» EXT PACKST «, t00=0x0000, t01=0x0114}
0x0124…0138              Head {h00=0x0010, h01=0x0050, text=» EXT WRITFD «, t00=0x0000, t01=0x0128}
0x0138…014c              Head {h00=0x0010, h01=0x0050, text=» EXT PACKCL «, t00=0x0000, t01=0x013c}
0x014c…0160              Head {h00=0x0010, h01=0x0050, text=» EXT NEWLIN «, t00=0x0000, t01=0x0150}
0x0160…0174              Head {h00=0x0010, h01=0x0050, text=» EXT FRMBUP «, t00=0x0000, t01=0x0164}
0x0174…0188              Head {h00=0x0010, h01=0x0050, text=» EXT SETDEB «, t00=0x0000, t01=0x0178}
0x0188…019c              Head {h00=0x0010, h01=0x0050, text=» EXT RGREAD «, t00=0x0000, t01=0x018c}
0x019c…01ae              Head {h00=0x000e, h01=0x0050, text=» EXT WAITF«, t00=0x0001, t01=0x0010}
0x01ae…01bc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0022}
0x01bc…01d0              Head {h00=0x0010, h01=0x0050, text=»BUDREG PROC «, t00=0x0001, t01=0x0030}
0x01d0…0208              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0001, t01=0x0044}
0x0208…0212              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007c}
0x0212…0240              Head {h00=0x002a, h01=0x0050, text=»* THIS PROCEDURE PROCESSES TRANS 40-49«, t00=0x0001, t01=0x0086}
0x0240…024a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b4}
0x024a…0282              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0001, t01=0x00be}
0x0282…028a              Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x00f6}
0x028a…02a0              Head {h00=0x0012, h01=0x0050, text=» TEST CBUDGET «, t00=0x0001, t01=0x00fe}
0x02a0…02b2              Head {h00=0x000e, h01=0x0050, text=» BE BUDRET«, t00=0x0001, t01=0x0114}
0x02b2…02c8              Head {h00=0x0012, h01=0x0050, text=» TEST CCONVFLG«, t00=0x0001, t01=0x0126}
0x02c8…02f4              Head {h00=0x0028, h01=0x0050, text=» BNZ BUDRET DATATRANSM OR CONVERSION«, t00=0x0001, t01=0x013c}
0x02f4…0328              Head {h00=0x0030, h01=0x0050, text=» ADD CTASKNR,CBIN1 INDICATE TERMINAL ACTIVE «, t00=0x0001, t01=0x0168}
0x0328…0350              Head {h00=0x0024, h01=0x0050, text=» PERF BUDSTRT RESTART ON 1. CALL«, t00=0x0002, t01=0x000c}
0x0350…0364              Head {h00=0x0010, h01=0x0050, text=» BNOK BUDEND«, t00=0x0002, t01=0x0034}
0x0364…037c              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTASTFLG «, t00=0x0002, t01=0x0048}
0x037c…038a              Head {h00=0x000a, h01=0x0050, text=»BUD000«, t00=0x0002, t01=0x0060}
0x038a…03a0              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0002, t01=0x006e}
0x03a0…03b8              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU00FRMT«, t00=0x0002, t01=0x0084}
0x03b8…03c6              Head {h00=0x000a, h01=0x0050, text=»BUD010«, t00=0x0002, t01=0x009c}
0x03c6…03da              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0002, t01=0x00aa}
0x03da…0414              Head {h00=0x0036, h01=0x0050, text=» IB SPBINW2,BUD000,BUDEND,BUD050,BUD700,BUDEND,  C«, t00=0x0002, t01=0x00be}
0x0414…043a              Head {h00=0x0022, h01=0x0050, text=»  BUDEND,BUDEND,BUDEND,BUD900 «, t00=0x0002, t01=0x00f8}
0x043a…0458              Head {h00=0x001a, h01=0x0050, text=» B BUD000 INVALID KEY «, t00=0x0002, t01=0x011e}
0x0458…0466              Head {h00=0x000a, h01=0x0050, text=»BUD050«, t00=0x0002, t01=0x013c}
0x0466…047c              Head {h00=0x0012, h01=0x0050, text=» PERF NULSTIL «, t00=0x0002, t01=0x014a}
0x047c…0498              Head {h00=0x0018, h01=0x0050, text=» MOVE GTANTAL,=D'0' «, t00=0x0002, t01=0x0160}
0x0498…04b6              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x0002, t01=0x017c}
0x04b6…04d2              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x0003, t01=0x000a}
0x04d2…0506              Head {h00=0x0030, h01=0x0050, text=» IB GSWBIN1,BUD400,BUD410,BUD420,BUD010,  C «, t00=0x0003, t01=0x0026}
0x0506…053a              Head {h00=0x0030, h01=0x0050, text=»  BUD010,BUD450,BUD460,BUD470,BUD480,BUD490 «, t00=0x0003, t01=0x005a}
0x053a…0560              Head {h00=0x0022, h01=0x0050, text=» B BUD010 INVALID TRANSACTION «, t00=0x0003, t01=0x008e}
0x0560…0568              Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x00b4}
0x0568…0576              Head {h00=0x000a, h01=0x0050, text=»BUD400«, t00=0x0003, t01=0x00bc}
0x0576…058e              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU40FRM «, t00=0x0003, t01=0x00ca}
0x058e…059c              Head {h00=0x000a, h01=0x0050, text=»BUD401«, t00=0x0003, t01=0x00e2}
0x059c…05da              Head {h00=0x003a, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) RESTORE FIRST YEAR«, t00=0x0003, t01=0x00f0}
0x05da…05fc              Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN14),=D'1' «, t00=0x0003, t01=0x012e}
0x05fc…0616              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0003, t01=0x0150}
0x0616…062a              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0003, t01=0x016a}
0x062a…063e              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0003, t01=0x017e}
0x063e…0660 (4, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0004, t01=0x0004}
0x0660…0676              Head {h00=0x0012, h01=0x0050, text=» PERF TR40GEN «, t00=0x0004, t01=0x0026}
0x0676…0688              Head {h00=0x000e, h01=0x0050, text=» B BUD401 «, t00=0x0004, t01=0x003c}
0x0688…0690              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x004e}
0x0690…0698              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0056}
0x0698…06a6              Head {h00=0x000a, h01=0x0050, text=»BUD410«, t00=0x0004, t01=0x005e}
0x06a6…06be              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU41FRM «, t00=0x0004, t01=0x006c}
0x06be…06cc              Head {h00=0x000a, h01=0x0050, text=»BUD411«, t00=0x0004, t01=0x0084}
0x06cc…06f8              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) «, t00=0x0004, t01=0x0092}
0x06f8…071a              Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN14),=D'1' «, t00=0x0004, t01=0x00be}
0x071a…0734              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0004, t01=0x00e0}
0x0734…0748              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0004, t01=0x00fa}
0x0748…075c              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0004, t01=0x010e}
0x075c…077e              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0004, t01=0x0122}
0x077e…0794              Head {h00=0x0012, h01=0x0050, text=» PERF TR41GEN «, t00=0x0004, t01=0x0144}
0x0794…07a6              Head {h00=0x000e, h01=0x0050, text=» B BUD411 «, t00=0x0004, t01=0x015a}
0x07a6…07ae              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x016c}
0x07ae…07b6              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0174}
0x07b6…07c4              Head {h00=0x000a, h01=0x0050, text=»BUD420«, t00=0x0004, t01=0x017c}
0x07c4…07dc              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU42FRM «, t00=0x0004, t01=0x018a}
0x07dc…07ea              Head {h00=0x000a, h01=0x0050, text=»BUD421«, t00=0x0005, t01=0x0012}
0x07ea…0816              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) «, t00=0x0005, t01=0x0020}
0x0816…0838              Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN14),=D'1' «, t00=0x0005, t01=0x004c}
0x0838…084c              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0005, t01=0x006e}
0x084c…0866              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0005, t01=0x0082}
0x0866…087a              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0005, t01=0x009c}
0x087a…089c              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0005, t01=0x00b0}
0x089c…08b2              Head {h00=0x0012, h01=0x0050, text=» PERF TR42GEN «, t00=0x0005, t01=0x00d2}
0x08b2…08c4              Head {h00=0x000e, h01=0x0050, text=» B BUD421 «, t00=0x0005, t01=0x00e8}
0x08c4…08cc              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x00fa}
0x08cc…08d4              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x0102}
0x08d4…08e2              Head {h00=0x000a, h01=0x0050, text=»BUD450«, t00=0x0005, t01=0x010a}
0x08e2…08fa              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU45FRM «, t00=0x0005, t01=0x0118}
0x08fa…0908              Head {h00=0x000a, h01=0x0050, text=»BUD451«, t00=0x0005, t01=0x0130}
0x0908…0922              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0005, t01=0x013e}
0x0922…0936              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0005, t01=0x0158}
0x0936…094a              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0005, t01=0x016c}
0x094a…096c              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0005, t01=0x0180}
0x096c…0982              Head {h00=0x0012, h01=0x0050, text=» PERF TR45GEN «, t00=0x0006, t01=0x0012}
0x0982…099a              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0006, t01=0x0028}
0x099a…09ac              Head {h00=0x000e, h01=0x0050, text=» B BUD451 «, t00=0x0006, t01=0x0040}
0x09ac…09b4              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x0052}
0x09b4…09bc              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x005a}
0x09bc…09ca              Head {h00=0x000a, h01=0x0050, text=»BUD460«, t00=0x0006, t01=0x0062}
0x09ca…09e2              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU46FRM «, t00=0x0006, t01=0x0070}
0x09e2…09f0              Head {h00=0x000a, h01=0x0050, text=»BUD461«, t00=0x0006, t01=0x0088}
0x09f0…0a0a              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0006, t01=0x0096}
0x0a0a…0a1e              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0006, t01=0x00b0}
0x0a1e…0a32              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0006, t01=0x00c4}
0x0a32…0a54              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0006, t01=0x00d8}
0x0a54…0a6a              Head {h00=0x0012, h01=0x0050, text=» PERF TR46GEN «, t00=0x0006, t01=0x00fa}
0x0a6a…0a82              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0006, t01=0x0110}
0x0a82…0a94              Head {h00=0x000e, h01=0x0050, text=» B BUD461 «, t00=0x0006, t01=0x0128}
0x0a94…0a9c              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x013a}
0x0a9c…0aa4              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x0142}
0x0aa4…0ab2              Head {h00=0x000a, h01=0x0050, text=»BUD470«, t00=0x0006, t01=0x014a}
0x0ab2…0aca              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU47FRM «, t00=0x0006, t01=0x0158}
0x0aca…0ad8              Head {h00=0x000a, h01=0x0050, text=»BUD471«, t00=0x0006, t01=0x0170}
0x0ad8…0af2              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0006, t01=0x017e}
0x0af2…0b06              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0007, t01=0x0008}
0x0b06…0b1a              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0007, t01=0x001c}
0x0b1a…0b3c              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0007, t01=0x0030}
0x0b3c…0b52              Head {h00=0x0012, h01=0x0050, text=» PERF TR47GEN «, t00=0x0007, t01=0x0052}
0x0b52…0b6a              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0007, t01=0x0068}
0x0b6a…0b7c              Head {h00=0x000e, h01=0x0050, text=» B BUD471 «, t00=0x0007, t01=0x0080}
0x0b7c…0b84              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x0092}
0x0b84…0b8c              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x009a}
0x0b8c…0b9a              Head {h00=0x000a, h01=0x0050, text=»BUD480«, t00=0x0007, t01=0x00a2}
0x0b9a…0bb2              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU48FRM «, t00=0x0007, t01=0x00b0}
0x0bb2…0bc0              Head {h00=0x000a, h01=0x0050, text=»BUD481«, t00=0x0007, t01=0x00c8}
0x0bc0…0bda              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0007, t01=0x00d6}
0x0bda…0bee              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0007, t01=0x00f0}
0x0bee…0c02              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0007, t01=0x0104}
0x0c02…0c24              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0007, t01=0x0118}
0x0c24…0c3a              Head {h00=0x0012, h01=0x0050, text=» PERF TR48GEN «, t00=0x0007, t01=0x013a}
0x0c3a…0c52              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0007, t01=0x0150}
0x0c52…0c64              Head {h00=0x000e, h01=0x0050, text=» B BUD481 «, t00=0x0007, t01=0x0168}
0x0c64…0c6c              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x017a}
0x0c6c…0c74              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x0182}
0x0c74…0c82              Head {h00=0x000a, h01=0x0050, text=»BUD490«, t00=0x0007, t01=0x018a}
0x0c82…0c9a              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU49FRM «, t00=0x0008, t01=0x0008}
0x0c9a…0ca8              Head {h00=0x000a, h01=0x0050, text=»BUD491«, t00=0x0008, t01=0x0020}
0x0ca8…0cc2              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0008, t01=0x002e}
0x0cc2…0cd6              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0008, t01=0x0048}
0x0cd6…0cea              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0008, t01=0x005c}
0x0cea…0d0c              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0008, t01=0x0070}
0x0d0c…0d22              Head {h00=0x0012, h01=0x0050, text=» PERF TR49GEN «, t00=0x0008, t01=0x0092}
0x0d22…0d3a              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0008, t01=0x00a8}
0x0d3a…0d4c              Head {h00=0x000e, h01=0x0050, text=» B BUD491 «, t00=0x0008, t01=0x00c0}
0x0d4c…0d54              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00d2}
0x0d54…0d5c              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00da}
0x0d5c…0d6a              Head {h00=0x000a, h01=0x0050, text=»BUD500«, t00=0x0008, t01=0x00e2}
0x0d6a…0d88              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x0008, t01=0x00f0}
0x0d88…0dbe              Head {h00=0x0032, h01=0x0050, text=» SUB GSWBIN1,=W'29' FIND FORMAT FOR TOTALLINE «, t00=0x0008, t01=0x010e}
0x0dbe…0dda              Head {h00=0x0018, h01=0x0050, text=» PERF FRMBUD,GSWBIN1«, t00=0x0008, t01=0x0144}
0x0dda…0dee              Head {h00=0x0010, h01=0x0050, text=» PERF BUWRIT«, t00=0x0008, t01=0x0160}
0x0dee…0e12              Head {h00=0x0020, h01=0x0050, text=» CALL FMOVE,GTSTRFMT,STJFRM «, t00=0x0008, t01=0x0174}
0x0e12…0e3c              Head {h00=0x0026, h01=0x0050, text=» PERF BUWRIT INDICATE TRANSCHANGE «, t00=0x0009, t01=0x0008}
0x0e3c…0e4e              Head {h00=0x000e, h01=0x0050, text=» B BUD000 «, t00=0x0009, t01=0x0032}
0x0e4e…0e56              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0044}
0x0e56…0e5e              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x004c}
0x0e5e…0e6c              Head {h00=0x000a, h01=0x0050, text=»BUD700«, t00=0x0009, t01=0x0054}
0x0e6c…0eaa              Head {h00=0x003a, h01=0x0050, text=»* THE PART OF THE PROGRAM SEEKS FOR REG. TRANSACTIONS «, t00=0x0009, t01=0x0062}
0x0eaa…0eda              Head {h00=0x002c, h01=0x0050, text=»* THE TRANS WILL BE DISPLAYED AND CAN BE«, t00=0x0009, t01=0x00a0}
0x0eda…0f12              Head {h00=0x0034, h01=0x0050, text=»* CORRECTED. AFTERWARDS IT WILL BE WRITTEN BACK «, t00=0x0009, t01=0x00d0}
0x0f12…0f2a              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BUSPFRMT«, t00=0x0009, t01=0x0108}
0x0f2a…0f40              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0009, t01=0x0120}
0x0f40…0f54              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0009, t01=0x0136}
0x0f54…0f7c              Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,BUD700,BUD760,BUD710«, t00=0x0009, t01=0x014a}
0x0f7c…0f8e              Head {h00=0x000e, h01=0x0050, text=» B BUD700 «, t00=0x0009, t01=0x0172}
0x0f8e…0f9c              Head {h00=0x000a, h01=0x0050, text=»BUD710«, t00=0x0009, t01=0x0184}
0x0f9c…0fc8 (10, 0, 398) Head {h00=0x0028, h01=0x0050, text=»* GSWBCD6 CONTAINS TRANSCODE (40-49)«, t00=0x000a, t01=0x0004}
0x0fc8…0fee              Head {h00=0x0022, h01=0x0050, text=»* GSWBCD7 CONTAINS REGKONTONR «, t00=0x000a, t01=0x0030}
0x0fee…100a              Head {h00=0x0018, h01=0x0050, text=» MOVE GTRECNR,CRECNR«, t00=0x000a, t01=0x0056}
0x100a…1018              Head {h00=0x000a, h01=0x0050, text=»BUD712«, t00=0x000a, t01=0x0072}
0x1018…103e              Head {h00=0x0022, h01=0x0050, text=» SUB GTRECNR,CBIN1 NEXT RECORD«, t00=0x000a, t01=0x0080}
0x103e…106c              Head {h00=0x002a, h01=0x0050, text=» CBNG GTRECNR,CBIN1,BUD750 FINISHED ? «, t00=0x000a, t01=0x00a6}
0x106c…109e              Head {h00=0x002e, h01=0x0050, text=» PERF RGREAD,DK02,=D'2',CBIN2 READ RECORD «, t00=0x000a, t01=0x00d4}
0x109e…10b2              Head {h00=0x0010, h01=0x0050, text=» BOK BUD730 «, t00=0x000a, t01=0x0106}
0x10b2…10c4              Head {h00=0x000e, h01=0x0050, text=» B BUD712 «, t00=0x000a, t01=0x011a}
0x10c4…10d2              Head {h00=0x000a, h01=0x0050, text=»BUD730«, t00=0x000a, t01=0x012c}
0x10d2…10f6              Head {h00=0x0020, h01=0x0050, text=» CBNE GTREGNR,GSWBCD6,BUD712«, t00=0x000a, t01=0x013a}
0x10f6…1120              Head {h00=0x0026, h01=0x0050, text=» CBNE GTREGF(CBIN1),GSWBCD7,BUD712«, t00=0x000a, t01=0x015e}
0x1120…112a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0188}
0x112a…1140 (11, 0, 400) Head {h00=0x0012, h01=0x0050, text=» PERF NULSTIL «, t00=0x000b, t01=0x0004}
0x1140…115e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x000b, t01=0x001a}
0x115e…117a              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x000b, t01=0x0038}
0x117a…1192              Head {h00=0x0014, h01=0x0050, text=» CLEAR TTEORFLG «, t00=0x000b, t01=0x0054}
0x1192…11cc              Head {h00=0x0036, h01=0x0050, text=» IB GSWBIN1,BUD740,BUD741,BUD742,BUD743,BUD744,  C«, t00=0x000b, t01=0x006c}
0x11cc…11f8              Head {h00=0x0028, h01=0x0050, text=»  BUD745,BUD746,BUD747,BUD748,BUD749«, t00=0x000b, t01=0x00a6}
0x11f8…1206              Head {h00=0x000a, h01=0x0050, text=»BUD740«, t00=0x000b, t01=0x00d2}
0x1206…121e              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU40FRM «, t00=0x000b, t01=0x00e0}
0x121e…1232              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000b, t01=0x00f8}
0x1232…1246              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000b, t01=0x010c}
0x1246…1268              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000b, t01=0x0120}
0x1268…127e              Head {h00=0x0012, h01=0x0050, text=» PERF TR40GEN «, t00=0x000b, t01=0x0142}
0x127e…1294              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000b, t01=0x0158}
0x1294…12a6              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000b, t01=0x016e}
0x12a6…12b4              Head {h00=0x000a, h01=0x0050, text=»BUD741«, t00=0x000b, t01=0x0180}
0x12b4…12cc              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU41FRM «, t00=0x000b, t01=0x018e}
0x12cc…12e0              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000c, t01=0x0016}
0x12e0…12f4              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000c, t01=0x002a}
0x12f4…1316              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000c, t01=0x003e}
0x1316…132c              Head {h00=0x0012, h01=0x0050, text=» PERF TR41GEN «, t00=0x000c, t01=0x0060}
0x132c…1342              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000c, t01=0x0076}
0x1342…1354              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000c, t01=0x008c}
0x1354…1362              Head {h00=0x000a, h01=0x0050, text=»BUD742«, t00=0x000c, t01=0x009e}
0x1362…137a              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU42FRM «, t00=0x000c, t01=0x00ac}
0x137a…138e              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000c, t01=0x00c4}
0x138e…13a2              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000c, t01=0x00d8}
0x13a2…13c4              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000c, t01=0x00ec}
0x13c4…13da              Head {h00=0x0012, h01=0x0050, text=» PERF TR42GEN «, t00=0x000c, t01=0x010e}
0x13da…13f0              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000c, t01=0x0124}
0x13f0…1402              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000c, t01=0x013a}
0x1402…1410              Head {h00=0x000a, h01=0x0050, text=»BUD743«, t00=0x000c, t01=0x014c}
0x1410…141e              Head {h00=0x000a, h01=0x0050, text=»BUD744«, t00=0x000c, t01=0x015a}
0x141e…1430              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000c, t01=0x0168}
0x1430…143e              Head {h00=0x000a, h01=0x0050, text=»BUD745«, t00=0x000c, t01=0x017a}
0x143e…1456              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU45FRM «, t00=0x000c, t01=0x0188}
0x1456…146a              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000d, t01=0x0010}
0x146a…1480              Head {h00=0x0012, h01=0x0050, text=» PERF MOV56INV«, t00=0x000d, t01=0x0024}
0x1480…1494              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000d, t01=0x003a}
0x1494…14b6              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000d, t01=0x004e}
0x14b6…14cc              Head {h00=0x0012, h01=0x0050, text=» PERF TR45GEN «, t00=0x000d, t01=0x0070}
0x14cc…14e2              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000d, t01=0x0086}
0x14e2…14f4              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000d, t01=0x009c}
0x14f4…1502              Head {h00=0x000a, h01=0x0050, text=»BUD746«, t00=0x000d, t01=0x00ae}
0x1502…151a              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU46FRM «, t00=0x000d, t01=0x00bc}
0x151a…152e              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000d, t01=0x00d4}
0x152e…1544              Head {h00=0x0012, h01=0x0050, text=» PERF MOV56INV«, t00=0x000d, t01=0x00e8}
0x1544…1558              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000d, t01=0x00fe}
0x1558…157a              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000d, t01=0x0112}
0x157a…1590              Head {h00=0x0012, h01=0x0050, text=» PERF TR45GEN «, t00=0x000d, t01=0x0134}
0x1590…15a6              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000d, t01=0x014a}
0x15a6…15b8              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000d, t01=0x0160}
0x15b8…15c6              Head {h00=0x000a, h01=0x0050, text=»BUD747«, t00=0x000d, t01=0x0172}
0x15c6…15de              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU47FRM «, t00=0x000d, t01=0x0180}
0x15de…15f2              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x0008}
0x15f2…1608              Head {h00=0x0012, h01=0x0050, text=» PERF MOV56INV«, t00=0x000e, t01=0x001c}
0x1608…161c              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000e, t01=0x0032}
0x161c…163e              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000e, t01=0x0046}
0x163e…1654              Head {h00=0x0012, h01=0x0050, text=» PERF TR47GEN «, t00=0x000e, t01=0x0068}
0x1654…166a              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000e, t01=0x007e}
0x166a…167c              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000e, t01=0x0094}
0x167c…168a              Head {h00=0x000a, h01=0x0050, text=»BUD748«, t00=0x000e, t01=0x00a6}
0x168a…16a2              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU48FRM «, t00=0x000e, t01=0x00b4}
0x16a2…16b6              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x00cc}
0x16b6…16ca              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000e, t01=0x00e0}
0x16ca…16ec              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000e, t01=0x00f4}
0x16ec…1702              Head {h00=0x0012, h01=0x0050, text=» PERF TR48GEN «, t00=0x000e, t01=0x0116}
0x1702…1718              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000e, t01=0x012c}
0x1718…172a              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000e, t01=0x0142}
0x172a…1738              Head {h00=0x000a, h01=0x0050, text=»BUD749«, t00=0x000e, t01=0x0154}
0x1738…1750              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU49FRM «, t00=0x000e, t01=0x0162}
0x1750…1764              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x017a}
0x1764…1778              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000e, t01=0x018e}
0x1778…179a              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000f, t01=0x0012}
0x179a…17b0              Head {h00=0x0012, h01=0x0050, text=» PERF TR49GEN «, t00=0x000f, t01=0x0034}
0x17b0…17c6              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000f, t01=0x004a}
0x17c6…17d4              Head {h00=0x000a, h01=0x0050, text=»BUD750«, t00=0x000f, t01=0x0060}
0x17d4…17e6              Head {h00=0x000e, h01=0x0050, text=» B BUD700 «, t00=0x000f, t01=0x006e}
0x17e6…17f4              Head {h00=0x000a, h01=0x0050, text=»BUD760«, t00=0x000f, t01=0x0080}
0x17f4…1818              Head {h00=0x0020, h01=0x0050, text=» CALL FMOVE,GTSTRFMT,STJFRM «, t00=0x000f, t01=0x008e}
0x1818…182c              Head {h00=0x0010, h01=0x0050, text=» PERF BUWRIT«, t00=0x000f, t01=0x00b2}
0x182c…183e              Head {h00=0x000e, h01=0x0050, text=» B BUD000 «, t00=0x000f, t01=0x00c6}
0x183e…1846              Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x00d8}
0x1846…1854              Head {h00=0x000a, h01=0x0050, text=»BUD900«, t00=0x000f, t01=0x00e0}
0x1854…187c              Head {h00=0x0024, h01=0x0050, text=»* PRINT LOGFILE, INSERT HEADERS «, t00=0x000f, t01=0x00ee}
0x187c…1898              Head {h00=0x0018, h01=0x0050, text=» PERF WAITF,CLEVFLG «, t00=0x000f, t01=0x0116}
0x1898…18b2              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN1«, t00=0x000f, t01=0x0132}
0x18b2…18c0              Head {h00=0x000a, h01=0x0050, text=»PRT022«, t00=0x000f, t01=0x014c}
0x18c0…18de              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x000f, t01=0x015a}
0x18de…1916              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT «, t00=0x000f, t01=0x0178}
0x1916…192a              Head {h00=0x0010, h01=0x0050, text=» BNOK PRT095«, t00=0x0010, t01=0x0020}
0x192a…1948              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,CLEVBUF «, t00=0x0010, t01=0x0034}
0x1948…197a              Head {h00=0x002e, h01=0x0050, text=» CBE GSWSTR2,='SL',PRT080 EMPTY PRINTFILE «, t00=0x0010, t01=0x0052}
0x197a…199c              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',PRT024«, t00=0x0010, t01=0x0084}
0x199c…19b6              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0010, t01=0x00a6}
0x19b6…19c8              Head {h00=0x000e, h01=0x0050, text=» B PRT022 «, t00=0x0010, t01=0x00c0}
0x19c8…19d6              Head {h00=0x000a, h01=0x0050, text=»PRT024«, t00=0x0010, t01=0x00d2}
0x19d6…19ea              Head {h00=0x0010, h01=0x0050, text=» PERF OVSKR «, t00=0x0010, t01=0x00e0}
0x19ea…19f8              Head {h00=0x000a, h01=0x0050, text=»PRT030«, t00=0x0010, t01=0x00f4}
0x19f8…1a1a              Head {h00=0x001e, h01=0x0050, text=» DLETE CLEVBUF,CBIN0,CBIN2«, t00=0x0010, t01=0x0102}
0x1a1a…1a56              Head {h00=0x0038, h01=0x0050, text=» IB GSWBIN10,PRT031,PRT031,PRT031,PRT034,PRT034,  C «, t00=0x0010, t01=0x0124}
0x1a56…1a82              Head {h00=0x0028, h01=0x0050, text=»  PRT034,PRT034,PRT034,PRT034,PRT034«, t00=0x0010, t01=0x0160}
0x1a82…1ab8              Head {h00=0x0032, h01=0x0050, text=»* THIS PIECE OF CODING SPLITS PRINTLINES FROM «, t00=0x0010, t01=0x018c}
0x1ab8…1af4              Head {h00=0x0038, h01=0x0050, text=»* THE PRINTFILE (DK12) INTO TWO PHYSICAL PRINTLINES.«, t00=0x0011, t01=0x0032}
0x1af4…1b02              Head {h00=0x000a, h01=0x0050, text=»PRT031«, t00=0x0011, t01=0x006e}
0x1b02…1b1c              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWSTR9,='*'«, t00=0x0011, t01=0x007c}
0x1b1c…1b38              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0011, t01=0x0096}
0x1b38…1b56              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,=W'128' «, t00=0x0011, t01=0x00b2}
0x1b56…1b90              Head {h00=0x0036, h01=0x0050, text=» MATCH CLEVBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1«, t00=0x0011, t01=0x00d0}
0x1b90…1bbc              Head {h00=0x0028, h01=0x0050, text=» BNOK PRT034 NOT FOUND, TRY TO PRINT«, t00=0x0011, t01=0x010a}
0x1bbc…1bd6              Head {h00=0x0016, h01=0x0050, text=» PERF WAITF,CPFLG «, t00=0x0011, t01=0x0136}
0x1bd6…1c04              Head {h00=0x002a, h01=0x0050, text=» MOVE CPCKBUF,CLEVBUF SAVE OLD BUFFER «, t00=0x0011, t01=0x0150}
0x1c04…1c32              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBIN10,GSWBIN1 SAVE POS ON '*'«, t00=0x0011, t01=0x017e}
0x1c32…1c50              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0012, t01=0x001c}
0x1c50…1c6e              Head {h00=0x001a, h01=0x0050, text=» SUB GSWBIN1,GSWBIN10 «, t00=0x0012, t01=0x003a}
0x1c6e…1ca6              Head {h00=0x0034, h01=0x0050, text=» DLETE CLEVBUF,GSWBIN10,GSWBIN1 DELETE LAST PART«, t00=0x0012, t01=0x0058}
0x1ca6…1cdc              Head {h00=0x0032, h01=0x0050, text=» PERF GENWRF,GTHCDEV,BUSUB10 PRINT FIRST PART «, t00=0x0012, t01=0x0090}
0x1cdc…1cfa              Head {h00=0x001a, h01=0x0050, text=» MOVE CLEVBUF,CBLANKS «, t00=0x0012, t01=0x00c6}
0x1cfa…1d18              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0012, t01=0x00e4}
0x1d18…1d36              Head {h00=0x001a, h01=0x0050, text=» SUB GSWBIN1,GSWBIN10 «, t00=0x0012, t01=0x0102}
0x1d36…1d50              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN3«, t00=0x0012, t01=0x0120}
0x1d50…1d84              Head {h00=0x0030, h01=0x0050, text=» COPY CLEVBUF,CBIN0,GSWBIN1,CPCKBUF,GSWBIN10«, t00=0x0012, t01=0x013a}
0x1d84…1da8              Head {h00=0x0020, h01=0x0050, text=» CLEAR CPFLG RELEASE BUFFER «, t00=0x0012, t01=0x016e}
0x1da8…1dd6 (19, 0, 400) Head {h00=0x002a, h01=0x0050, text=» ADD GTLINE,CBIN2 ADJUST LINE COUNTER «, t00=0x0013, t01=0x0004}
0x1dd6…1de4              Head {h00=0x000a, h01=0x0050, text=»PRT034«, t00=0x0013, t01=0x0032}
0x1de4…1e08              Head {h00=0x0020, h01=0x0050, text=» PERF GENWRF,GTHCDEV,BUSUB10«, t00=0x0013, t01=0x0040}
0x1e08…1e22              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0013, t01=0x0064}
0x1e22…1e3c              Head {h00=0x0016, h01=0x0050, text=» ADD GTLINE,CBIN2 «, t00=0x0013, t01=0x007e}
0x1e3c…1e52              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x0013, t01=0x0098}
0x1e52…1e72              Head {h00=0x001c, h01=0x0050, text=» DELAY CBIN2 SWTICH TASK«, t00=0x0013, t01=0x00ae}
0x1e72…1e8e              Head {h00=0x0018, h01=0x0050, text=» PERF WAITF,CLEVFLG «, t00=0x0013, t01=0x00ce}
0x1e8e…1eac              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x0013, t01=0x00ea}
0x1eac…1ee4              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT «, t00=0x0013, t01=0x0108}
0x1ee4…1ef8              Head {h00=0x0010, h01=0x0050, text=» BNOK PRT095«, t00=0x0013, t01=0x0140}
0x1ef8…1f16              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,CLEVBUF «, t00=0x0013, t01=0x0154}
0x1f16…1f38              Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR2,='SL',PRT080 «, t00=0x0013, t01=0x0172}
0x1f38…1f64 (20, 0, 400) Head {h00=0x0028, h01=0x0050, text=» CBE GSWSTR2,='**',PRT040 NEW PAGE ?«, t00=0x0014, t01=0x0004}
0x1f64…1f86              Head {h00=0x001e, h01=0x0050, text=» CBNL GTLINE,=W'43',PRT035«, t00=0x0014, t01=0x0030}
0x1f86…1fa4              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD2,GSWSTR2 «, t00=0x0014, t01=0x0052}
0x1fa4…1fc2              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN10,GSWBCD2«, t00=0x0014, t01=0x0070}
0x1fc2…1fde              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN10,=W'39'«, t00=0x0014, t01=0x008e}
0x1fde…1ff0              Head {h00=0x000e, h01=0x0050, text=» B PRT030 «, t00=0x0014, t01=0x00aa}
0x1ff0…1ffe              Head {h00=0x000a, h01=0x0050, text=»PRT035«, t00=0x0014, t01=0x00bc}
0x1ffe…201a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'1' «, t00=0x0014, t01=0x00ca}
0x201a…202c              Head {h00=0x000e, h01=0x0050, text=» PERF SKIP«, t00=0x0014, t01=0x00e6}
0x202c…204e              Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR2,='SL',PRT080 «, t00=0x0014, t01=0x00f8}
0x204e…2070              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',PRT024«, t00=0x0014, t01=0x011a}
0x2070…208a              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0014, t01=0x013c}
0x208a…209c              Head {h00=0x000e, h01=0x0050, text=» B PRT022 «, t00=0x0014, t01=0x0156}
0x209c…20aa              Head {h00=0x000a, h01=0x0050, text=»PRT040«, t00=0x0014, t01=0x0168}
0x20aa…20c8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN10,=W'43' «, t00=0x0014, t01=0x0176}
0x20c8…2104 (21, 0, 400) Head {h00=0x0038, h01=0x0050, text=» SUB GSWBIN10,GTLINE HOW MANY NEW LINES DO WE NEED? «, t00=0x0015, t01=0x0004}
0x2104…2122              Head {h00=0x001a, h01=0x0050, text=» PERF NEWLIN,GSWBIN10 «, t00=0x0015, t01=0x0040}
0x2122…2134              Head {h00=0x000e, h01=0x0050, text=» B PRT035 «, t00=0x0015, t01=0x005e}
0x2134…2142              Head {h00=0x000a, h01=0x0050, text=»PRT080«, t00=0x0015, t01=0x0070}
0x2142…2162              Head {h00=0x001c, h01=0x0018, text=»* RESET VARIOUS POINTERS«, t00=0x0015, t01=0x007e}
0x2162…2182              Head {h00=0x001c, h01=0x0050, text=» MOVE CLEVBUF,=C'SLUTD '«, t00=0x0015, t01=0x009e}
0x2182…21b0              Head {h00=0x002a, h01=0x0050, text=» PERF RAWRIT,DK12,=D'12',CLEVBUF,CBIN1«, t00=0x0015, t01=0x00be}
0x21b0…21c4              Head {h00=0x0010, h01=0x0050, text=» BNOK PRT095«, t00=0x0015, t01=0x00ec}
0x21c4…21de              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN1«, t00=0x0015, t01=0x0100}
0x21de…21f4              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x0015, t01=0x011a}
0x21f4…220c              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0015, t01=0x0130}
0x220c…221e              Head {h00=0x000e, h01=0x0050, text=» B PRT099 «, t00=0x0015, t01=0x0148}
0x221e…222c              Head {h00=0x000a, h01=0x0050, text=»PRT095«, t00=0x0015, t01=0x015a}
0x222c…2246              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN0«, t00=0x0015, t01=0x0168}
0x2246…225c              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x0015, t01=0x0182}
0x225c…2274              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0016, t01=0x0008}
0x2274…2282              Head {h00=0x000a, h01=0x0050, text=»PRT099«, t00=0x0016, t01=0x0020}
0x2282…2294              Head {h00=0x000e, h01=0x0009, text=» B BUD000 «, t00=0x0016, t01=0x002e}
0x2294…229c              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0040}
0x229c…22a4              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0048}
0x22a4…22b2              Head {h00=0x000a, h01=0x0050, text=»BUDEND«, t00=0x0016, t01=0x0050}
0x22b2…22e2              Head {h00=0x002c, h01=0x0050, text=» SUB CTASKNR,CBIN1 REMOVE FROM ACTIVITY «, t00=0x0016, t01=0x005e}
0x22e2…22f6              Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x0016, t01=0x008e}
0x22f6…230e              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTASTFLG «, t00=0x0016, t01=0x00a2}
0x230e…231c              Head {h00=0x000a, h01=0x0050, text=»BUDRET«, t00=0x0016, t01=0x00ba}
0x231c…2328              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00c8}
0x2328…2336              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x00d4}
0x2336…2344              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x00e2}
0x2344…2358              Head {h00=0x0010, h01=0x000c, text=»BUDSTRT PROC«, t00=0x0016, t01=0x00f0}
0x2358…2362              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0104}
0x2362…238e              Head {h00=0x0028, h01=0x0050, text=»* THE PROCEDURE HAS TWO OBJECTIVES: «, t00=0x0016, t01=0x010e}
0x238e…23be              Head {h00=0x002c, h01=0x0050, text=»* 1. WHEN A NEW FLOPPY HAS BEEN LOADED, «, t00=0x0016, t01=0x013a}
0x23be…23e6              Head {h00=0x0024, h01=0x0050, text=»*    THE FILE WILL BE INITIATED «, t00=0x0016, t01=0x016a}
0x23e6…240c (23, 0, 400) Head {h00=0x0022, h01=0x0050, text=»*    (ONLY AFTER PROGRAM-LOAD)«, t00=0x0017, t01=0x0004}
0x240c…2438              Head {h00=0x0028, h01=0x0050, text=»* 2. WHEN THE PROGRAM IS LOADED AND «, t00=0x0017, t01=0x002a}
0x2438…2464              Head {h00=0x0028, h01=0x0050, text=»*    THE FILE IS NOT EMPTY, THE PROC«, t00=0x0017, t01=0x0056}
0x2464…2492              Head {h00=0x002a, h01=0x0050, text=»*    WILL SCAN THE FILE IN SEARCH FOR «, t00=0x0017, t01=0x0082}
0x2492…24bc              Head {h00=0x0026, h01=0x0050, text=»*    A 'SLUTD' RECORD, AND CBUDPT «, t00=0x0017, t01=0x00b0}
0x24bc…24e6              Head {h00=0x0026, h01=0x0050, text=»*    WILL BE UPDATED ACCORDINGLY. «, t00=0x0017, t01=0x00da}
0x24e6…250e              Head {h00=0x0024, h01=0x0050, text=»* 3. AT LAST SOME FIELDS WILL BE«, t00=0x0017, t01=0x0104}
0x250e…253c              Head {h00=0x002a, h01=0x0050, text=»*    INITIATED WITH <YEAR-1>, <YEAR>, «, t00=0x0017, t01=0x012c}
0x253c…255a              Head {h00=0x001a, h01=0x0050, text=»*    ......,<YEAR+6>. «, t00=0x0017, t01=0x015a}
0x255a…2564              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0178}
0x2564…259c              Head {h00=0x0034, h01=0x0050, text=» CBNE CBUDPT,CBIN0,BST090 FIRST RUN AFTER LOAD ?«, t00=0x0017, t01=0x0182}
0x259c…25b8              Head {h00=0x0018, h01=0x0050, text=» PERF WAITF,CLEVFLG «, t00=0x0018, t01=0x002a}
0x25b8…25d4              Head {h00=0x0018, h01=0x0050, text=» MOVE CLEVBUF,=C' ' «, t00=0x0018, t01=0x0046}
0x25d4…25ee              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN1«, t00=0x0018, t01=0x0062}
0x25ee…260c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x0018, t01=0x007c}
0x260c…2644              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT «, t00=0x0018, t01=0x009a}
0x2644…2658              Head {h00=0x0010, h01=0x0050, text=» BNOK BST095«, t00=0x0018, t01=0x00d2}
0x2658…2676              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CLEVBUF«, t00=0x0018, t01=0x00e6}
0x2676…26a8              Head {h00=0x002e, h01=0x0050, text=» CBE GSWSTR20,=C' ',BST060 CLEAN DISKFILE «, t00=0x0018, t01=0x0104}
0x26a8…26de              Head {h00=0x0032, h01=0x0050, text=» CBE GSWSTR20,=C'SLUTD ',BST080 READY FOR USE «, t00=0x0018, t01=0x0136}
0x26de…26f8              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN2«, t00=0x0018, t01=0x016c}
0x26f8…2706              Head {h00=0x000a, h01=0x0050, text=»BST045«, t00=0x0018, t01=0x0186}
0x2706…2724 (25, 0, 400) Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x0019, t01=0x0004}
0x2724…275c              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT «, t00=0x0019, t01=0x0022}
0x275c…2770              Head {h00=0x0010, h01=0x0050, text=» BNOK BST095«, t00=0x0019, t01=0x005a}
0x2770…278e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CLEVBUF«, t00=0x0019, t01=0x006e}
0x278e…27b6              Head {h00=0x0024, h01=0x0050, text=» CBE GSWSTR20,=C'SLUTD ',BST080 «, t00=0x0019, t01=0x008c}
0x27b6…27d0              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0019, t01=0x00b4}
0x27d0…27e2              Head {h00=0x000e, h01=0x0050, text=» B BST045 «, t00=0x0019, t01=0x00ce}
0x27e2…27fc              Head {h00=0x0016, h01=0x0050, text=»BST060   INITIATE «, t00=0x0019, t01=0x00e0}
0x27fc…281c              Head {h00=0x001c, h01=0x0050, text=» MOVE CLEVBUF,=C'SLUTD '«, t00=0x0019, t01=0x00fa}
0x281c…284c              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT «, t00=0x0019, t01=0x011a}
0x284c…2860              Head {h00=0x0010, h01=0x0050, text=» BNOK BST095«, t00=0x0019, t01=0x014a}
0x2860…286e              Head {h00=0x000a, h01=0x0050, text=»BST080«, t00=0x0019, t01=0x015e}
0x286e…2884              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x0019, t01=0x016c}
0x2884…2892              Head {h00=0x000a, h01=0x0050, text=»BST090«, t00=0x0019, t01=0x0182}
0x2892…28a8              Head {h00=0x0012, h01=0x0050, text=»* ISOLATE YEAR«, t00=0x0019, t01=0x0190}
0x28a8…28ce              Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBCD1,CMASKDAT DDMMYY «, t00=0x001a, t01=0x0016}
0x28ce…28f2              Head {h00=0x0020, h01=0x0050, text=» DIV GSWBCD1,=D'100'    DDMM«, t00=0x001a, t01=0x003c}
0x28f2…2916              Head {h00=0x0020, h01=0x0050, text=» MUL GSWBCD1,=D'100' DDMM00 «, t00=0x001a, t01=0x0060}
0x2916…2934              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD2,CMASKDAT«, t00=0x001a, t01=0x0084}
0x2934…2958              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBCD2,GSWBCD1      YY«, t00=0x001a, t01=0x00a2}
0x2958…2972              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBCD2,=D'2'«, t00=0x001a, t01=0x00c6}
0x2972…298e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN13«, t00=0x001a, t01=0x00e0}
0x298e…299c              Head {h00=0x000a, h01=0x0050, text=»BST092«, t00=0x001a, t01=0x00fc}
0x299c…29c2              Head {h00=0x0022, h01=0x0050, text=» MOVE GTDUPF(GSWBIN2),GSWBCD2 «, t00=0x001a, t01=0x010a}
0x29c2…29dc              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN2,CBIN1«, t00=0x001a, t01=0x0130}
0x29dc…29f6              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD2,=D'1'«, t00=0x001a, t01=0x014a}
0x29f6…2a18              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN22,BST092«, t00=0x001a, t01=0x0164}
0x2a18…2a30              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001a, t01=0x0186}
0x2a30…2a42              Head {h00=0x000e, h01=0x0050, text=» B BST099 «, t00=0x001b, t01=0x000e}
0x2a42…2a50              Head {h00=0x000a, h01=0x0050, text=»BST095«, t00=0x001b, t01=0x0020}
0x2a50…2a6a              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN0«, t00=0x001b, t01=0x002e}
0x2a6a…2a80              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x001b, t01=0x0048}
0x2a80…2a98              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x001b, t01=0x005e}
0x2a98…2aa6              Head {h00=0x000a, h01=0x0050, text=»BST099«, t00=0x001b, t01=0x0076}
0x2aa6…2ab2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0084}
0x2ab2…2ac0              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x0090}
0x2ac0…2ace              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x009e}
0x2ace…2ae2              Head {h00=0x0010, h01=0x000c, text=»TR40GEN PROC«, t00=0x001b, t01=0x00ac}
0x2ae2…2b04              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR40EX «, t00=0x001b, t01=0x00c0}
0x2b04…2b18              Head {h00=0x0010, h01=0x0050, text=» PERF TOTADD«, t00=0x001b, t01=0x00e2}
0x2b18…2b32              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'16'«, t00=0x001b, t01=0x00f6}
0x2b32…2b46              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001b, t01=0x0110}
0x2b46…2b54              Head {h00=0x000a, h01=0x0050, text=»TR40EX«, t00=0x001b, t01=0x0124}
0x2b54…2b60              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001b, t01=0x0132}
0x2b60…2b6e              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001b, t01=0x013e}
0x2b6e…2b76              Head {h00=0x0004, h01=0x0000, t00=0x001b, t01=0x014c}
0x2b76…2b8a              Head {h00=0x0010, h01=0x000c, text=»TR41GEN PROC«, t00=0x001b, t01=0x0154}
0x2b8a…2bac              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR41EX «, t00=0x001b, t01=0x0168}
0x2bac…2bc0              Head {h00=0x0010, h01=0x0050, text=» PERF TOTADD«, t00=0x001b, t01=0x018a}
0x2bc0…2bda              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'17'«, t00=0x001c, t01=0x000e}
0x2bda…2bee              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001c, t01=0x0028}
0x2bee…2bfc              Head {h00=0x000a, h01=0x0050, text=»TR41EX«, t00=0x001c, t01=0x003c}
0x2bfc…2c08              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001c, t01=0x004a}
0x2c08…2c16              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001c, t01=0x0056}
0x2c16…2c1e              Head {h00=0x0004, h01=0x0000, t00=0x001c, t01=0x0064}
0x2c1e…2c26              Head {h00=0x0004, h01=0x0000, t00=0x001c, t01=0x006c}
0x2c26…2c3a              Head {h00=0x0010, h01=0x000c, text=»TR42GEN PROC«, t00=0x001c, t01=0x0074}
0x2c3a…2c5c              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR42EX «, t00=0x001c, t01=0x0088}
0x2c5c…2c70              Head {h00=0x0010, h01=0x0050, text=» PERF TOTADD«, t00=0x001c, t01=0x00aa}
0x2c70…2c8a              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'18'«, t00=0x001c, t01=0x00be}
0x2c8a…2c9e              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001c, t01=0x00d8}
0x2c9e…2cac              Head {h00=0x000a, h01=0x0050, text=»TR42EX«, t00=0x001c, t01=0x00ec}
0x2cac…2cb8              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001c, t01=0x00fa}
0x2cb8…2cc6              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001c, t01=0x0106}
0x2cc6…2cce              Head {h00=0x0004, h01=0x0000, t00=0x001c, t01=0x0114}
0x2cce…2ce2              Head {h00=0x0010, h01=0x000c, text=»TR45GEN PROC«, t00=0x001c, t01=0x011c}
0x2ce2…2d04              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR45EX «, t00=0x001c, t01=0x0130}
0x2d04…2d18              Head {h00=0x0010, h01=0x0050, text=» PERF MOV56 «, t00=0x001c, t01=0x0152}
0x2d18…2d42              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN17)«, t00=0x001c, t01=0x0166}
0x2d42…2d56              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001c, t01=0x0190}
0x2d56…2d82              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTREGF(CBIN14) «, t00=0x001d, t01=0x0014}
0x2d82…2d9c              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'19'«, t00=0x001d, t01=0x0040}
0x2d9c…2daa              Head {h00=0x000a, h01=0x0050, text=»TR45EX«, t00=0x001d, t01=0x005a}
0x2daa…2db6              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001d, t01=0x0068}
0x2db6…2dc4              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001d, t01=0x0074}
0x2dc4…2dcc              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x0082}
0x2dcc…2dd4              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x008a}
0x2dd4…2de8              Head {h00=0x0010, h01=0x000c, text=»TR46GEN PROC«, t00=0x001d, t01=0x0092}
0x2de8…2e0a              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR46EX «, t00=0x001d, t01=0x00a6}
0x2e0a…2e1e              Head {h00=0x0010, h01=0x0050, text=» PERF MOV56 «, t00=0x001d, t01=0x00c8}
0x2e1e…2e48              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN17)«, t00=0x001d, t01=0x00dc}
0x2e48…2e5c              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001d, t01=0x0106}
0x2e5c…2e88              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTREGF(CBIN14) «, t00=0x001d, t01=0x011a}
0x2e88…2ea2              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'20'«, t00=0x001d, t01=0x0146}
0x2ea2…2eb0              Head {h00=0x000a, h01=0x0050, text=»TR46EX«, t00=0x001d, t01=0x0160}
0x2eb0…2ebc              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001d, t01=0x016e}
0x2ebc…2eca              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001d, t01=0x017a}
0x2eca…2ed2              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x0188}
0x2ed2…2eda              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x0190}
0x2eda…2eee              Head {h00=0x0010, h01=0x000c, text=»TR47GEN PROC«, t00=0x001e, t01=0x0008}
0x2eee…2f10              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR47EX «, t00=0x001e, t01=0x001c}
0x2f10…2f24              Head {h00=0x0010, h01=0x0050, text=» PERF MOV56 «, t00=0x001e, t01=0x003e}
0x2f24…2f4e              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN17)«, t00=0x001e, t01=0x0052}
0x2f4e…2f62              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001e, t01=0x007c}
0x2f62…2f8e              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTREGF(CBIN14) «, t00=0x001e, t01=0x0090}
0x2f8e…2fa8              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'21'«, t00=0x001e, t01=0x00bc}
0x2fa8…2fb6              Head {h00=0x000a, h01=0x0050, text=»TR47EX«, t00=0x001e, t01=0x00d6}
0x2fb6…2fc2              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001e, t01=0x00e4}
0x2fc2…2fd0              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001e, t01=0x00f0}
0x2fd0…2fd8              Head {h00=0x0004, h01=0x0000, t00=0x001e, t01=0x00fe}
0x2fd8…2fe0              Head {h00=0x0004, h01=0x0000, t00=0x001e, t01=0x0106}
0x2fe0…2ff4              Head {h00=0x0010, h01=0x000c, text=»TR48GEN PROC«, t00=0x001e, t01=0x010e}
0x2ff4…3016              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR48EX «, t00=0x001e, t01=0x0122}
0x3016…3040              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN4) «, t00=0x001e, t01=0x0144}
0x3040…305a              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'22'«, t00=0x001e, t01=0x016e}
0x305a…306e              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001e, t01=0x0188}
0x306e…307c              Head {h00=0x000a, h01=0x0050, text=»TR48EX«, t00=0x001f, t01=0x000c}
0x307c…3088              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001f, t01=0x001a}
0x3088…3096              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001f, t01=0x0026}
0x3096…309e              Head {h00=0x0004, h01=0x0000, t00=0x001f, t01=0x0034}
0x309e…30a6              Head {h00=0x0004, h01=0x0000, t00=0x001f, t01=0x003c}
0x30a6…30ba              Head {h00=0x0010, h01=0x000c, text=»TR49GEN PROC«, t00=0x001f, t01=0x0044}
0x30ba…30dc              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR49EX «, t00=0x001f, t01=0x0058}
0x30dc…3106              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN4) «, t00=0x001f, t01=0x007a}
0x3106…3120              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'23'«, t00=0x001f, t01=0x00a4}
0x3120…3134              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001f, t01=0x00be}
0x3134…3142              Head {h00=0x000a, h01=0x0050, text=»TR49EX«, t00=0x001f, t01=0x00d2}
0x3142…314e              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001f, t01=0x00e0}
0x314e…315c              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001f, t01=0x00ec}
0x315c…3164              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x00fa}
0x3164…316c              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0102}
0x316c…3180              Head {h00=0x0010, h01=0x0050, text=»TOTADD PROC «, t00=0x001f, t01=0x010a}
0x3180…31aa              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN14),GTREGF(CBIN3) «, t00=0x001f, t01=0x011e}
0x31aa…31d4              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN15),GTREGF(CBIN4) «, t00=0x001f, t01=0x0148}
0x31d4…31fe              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN16),GTREGF(CBIN5) «, t00=0x001f, t01=0x0172}
0x31fe…3228              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN17),GTREGF(CBIN6) «, t00=0x0020, t01=0x000c}
0x3228…3252              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN7) «, t00=0x0020, t01=0x0036}
0x3252…327c              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN19),GTREGF(CBIN8) «, t00=0x0020, t01=0x0060}
0x327c…32a6              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN20),GTREGF(CBIN9) «, t00=0x0020, t01=0x008a}
0x32a6…32d0              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN21),GTREGF(CBIN10)«, t00=0x0020, t01=0x00b4}
0x32d0…32dc              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0020, t01=0x00de}
0x32dc…32ea              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0020, t01=0x00ea}
0x32ea…32f2              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00f8}
0x32f2…32fa              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0100}
0x32fa…330c              Head {h00=0x000e, h01=0x0050, text=»OVSKR PROC«, t00=0x0020, t01=0x0108}
0x330c…332a              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,CLEVBUF «, t00=0x0020, t01=0x011a}
0x332a…3348              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD2,GSWSTR2 «, t00=0x0020, t01=0x0138}
0x3348…3366              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD2 «, t00=0x0020, t01=0x0156}
0x3366…3382              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x0020, t01=0x0174}
0x3382…339e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR20,=' ' «, t00=0x0020, t01=0x0190}
0x339e…33bc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN10,GSWBIN1«, t00=0x0021, t01=0x001c}
0x33bc…33f4              Head {h00=0x0034, h01=0x0050, text=» IB GSWBIN1,OVS40,OVS41,OVS42,OVSERR,OVSERR,  C «, t00=0x0021, t01=0x003a}
0x33f4…341c              Head {h00=0x0024, h01=0x0050, text=»  OVS45,OVS46,OVS47,OVS48,OVS49 «, t00=0x0021, t01=0x0072}
0x341c…342e              Head {h00=0x000e, h01=0x0050, text=» B OVSERR «, t00=0x0021, t01=0x009a}
0x342e…343c              Head {h00=0x000a, h01=0x0050, text=»OVS40 «, t00=0x0021, t01=0x00ac}
0x343c…3460              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,='BUDGETTAL '«, t00=0x0021, t01=0x00ba}
0x3460…3470              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x00de}
0x3470…347e              Head {h00=0x000a, h01=0x0050, text=»OVS41 «, t00=0x0021, t01=0x00ee}
0x347e…34a2              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,='BUDGETTAL '«, t00=0x0021, t01=0x00fc}
0x34a2…34b2              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x0120}
0x34b2…34c0              Head {h00=0x000a, h01=0x0050, text=»OVS42 «, t00=0x0021, t01=0x0130}
0x34c0…34e4              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,='BUDGETTAL '«, t00=0x0021, t01=0x013e}
0x34e4…34f4              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x0162}
0x34f4…3502              Head {h00=0x000a, h01=0x0050, text=»OVS45 «, t00=0x0021, t01=0x0172}
0x3502…3530              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR20,='TILL[GSBEV. BUDGET ' «, t00=0x0021, t01=0x0180}
0x3530…3540              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0022, t01=0x001e}
0x3540…354e              Head {h00=0x000a, h01=0x0050, text=»OVS46 «, t00=0x0022, t01=0x002e}
0x354e…3576              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,='OMPLACERINGER '«, t00=0x0022, t01=0x003c}
0x3576…3586              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0022, t01=0x0064}
0x3586…3594              Head {h00=0x000a, h01=0x0050, text=»OVS47 «, t00=0x0022, t01=0x0074}
0x3594…35c2              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR20,='SUM AF R]DIGHEDSB. ' «, t00=0x0022, t01=0x0082}
0x35c2…35d2              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0022, t01=0x00b0}
0x35d2…35e0              Head {h00=0x000a, h01=0x0050, text=»OVS48 «, t00=0x0022, t01=0x00c0}
0x35e0…360c              Head {h00=0x0028, h01=0x0050, text=» MOVE GSWSTR20,='ANL[GSUDGIFTER-TB '«, t00=0x0022, t01=0x00ce}
0x360c…361c              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0022, t01=0x00fa}
0x361c…362a              Head {h00=0x000a, h01=0x0050, text=»OVS49 «, t00=0x0022, t01=0x010a}
0x362a…3658              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR20,='ANL[GSINDT[GTER-TB ' «, t00=0x0022, t01=0x0118}
0x3658…3666              Head {h00=0x000a, h01=0x0050, text=»OVSPR «, t00=0x0022, t01=0x0146}
0x3666…3674              Head {h00=0x000a, h01=0x0050, text=»OVSERR«, t00=0x0022, t01=0x0154}
0x3674…3688              Head {h00=0x0010, h01=0x0050, text=» PERF FRMBUP«, t00=0x0022, t01=0x0162}
0x3688…36ae              Head {h00=0x0022, h01=0x0050, text=» PERF GENWRS,GTHCDEV,GTSTRFMT «, t00=0x0022, t01=0x0176}
0x36ae…36c8              Head {h00=0x0016, h01=0x0050, text=» MOVE GTLINE,CBIN4«, t00=0x0023, t01=0x000c}
0x36c8…36d4              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x0026}
0x36d4…36e2              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0023, t01=0x0032}
0x36e2…36ea              Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0040}
0x36ea…36f2              Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0048}
0x36f2…3706              Head {h00=0x0010, h01=0x0050, text=»BUEDIT PROC «, t00=0x0023, t01=0x0050}
0x3706…3724              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x0023, t01=0x0064}
0x3724…3740              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x0023, t01=0x0082}
0x3740…375c              Head {h00=0x0018, h01=0x0050, text=» PERF FRMBUD,GSWBIN1«, t00=0x0023, t01=0x009e}
0x375c…3770              Head {h00=0x0010, h01=0x0050, text=» PERF BUWRIT«, t00=0x0023, t01=0x00ba}
0x3770…377c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x00ce}
0x377c…378a              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0023, t01=0x00da}
0x378a…3792              Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x00e8}
0x3792…379a              Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x00f0}
0x379a…37ae              Head {h00=0x0010, h01=0x0050, text=»BUWRIT PROC «, t00=0x0023, t01=0x00f8}
0x37ae…37ca              Head {h00=0x0018, h01=0x0050, text=» PERF WAITF,CLEVFLG «, t00=0x0023, t01=0x010c}
0x37ca…37e8              Head {h00=0x001a, h01=0x0050, text=» EDIT CLEVBUF,GTSTRFMT«, t00=0x0023, t01=0x0128}
0x37e8…3806              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,CLEVBUF «, t00=0x0023, t01=0x0146}
0x3806…3828              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',BUW020«, t00=0x0023, t01=0x0164}
0x3828…3844              Head {h00=0x0018, h01=0x0050, text=» TBT GTASTFLG,BUW090«, t00=0x0023, t01=0x0186}
0x3844…3852              Head {h00=0x000a, h01=0x0050, text=»BUW020«, t00=0x0024, t01=0x0012}
0x3852…386a              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTASTFLG «, t00=0x0024, t01=0x0020}
0x386a…389c              Head {h00=0x002e, h01=0x0050, text=» ADD CBUDPT,CBIN1 WRITE A NEW SLUTD BEFORE«, t00=0x0024, t01=0x0038}
0x389c…38d4              Head {h00=0x0034, h01=0x0050, text=» MOVE CLEVBUF,=C'SLUTD ' CORRUPTING THE OLD ONE «, t00=0x0024, t01=0x006a}
0x38d4…3904              Head {h00=0x002c, h01=0x0050, text=»  PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT«, t00=0x0024, t01=0x00a2}
0x3904…3918              Head {h00=0x0010, h01=0x0050, text=» BNOK BUW095«, t00=0x0024, t01=0x00d2}
0x3918…3932              Head {h00=0x0016, h01=0x0050, text=» SUB CBUDPT,CBIN1 «, t00=0x0024, t01=0x00e6}
0x3932…3950              Head {h00=0x001a, h01=0x0050, text=» EDIT CLEVBUF,GTSTRFMT«, t00=0x0024, t01=0x0100}
0x3950…3980              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT «, t00=0x0024, t01=0x011e}
0x3980…3994              Head {h00=0x0010, h01=0x0050, text=» BNOK BUW095«, t00=0x0024, t01=0x014e}
0x3994…39ae              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0024, t01=0x0162}
0x39ae…39cc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,CLEVBUF «, t00=0x0024, t01=0x017c}
0x39cc…39ee              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',BUW090«, t00=0x0025, t01=0x000a}
0x39ee…3a04              Head {h00=0x0012, h01=0x0050, text=» SET GTASTFLG «, t00=0x0025, t01=0x002c}
0x3a04…3a12              Head {h00=0x000a, h01=0x0050, text=»BUW090«, t00=0x0025, t01=0x0042}
0x3a12…3a28              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x0025, t01=0x0050}
0x3a28…3a40              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0025, t01=0x0066}
0x3a40…3a52              Head {h00=0x000e, h01=0x0050, text=» B BUW099 «, t00=0x0025, t01=0x007e}
0x3a52…3a60              Head {h00=0x000a, h01=0x0050, text=»BUW095«, t00=0x0025, t01=0x0090}
0x3a60…3a76              Head {h00=0x0012, h01=0x0050, text=» CLEAR CLEVFLG«, t00=0x0025, t01=0x009e}
0x3a76…3a8e              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0025, t01=0x00b4}
0x3a8e…3a9c              Head {h00=0x000a, h01=0x0050, text=»BUW099«, t00=0x0025, t01=0x00cc}
0x3a9c…3aa8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0025, t01=0x00da}
0x3aa8…3ab6              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0025, t01=0x00e6}
0x3ab6…3abe              Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x00f4}
0x3abe…3ac6              Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x00fc}
0x3ac6…3ad8              Head {h00=0x000e, h01=0x0050, text=»MOV56 PROC«, t00=0x0025, t01=0x0104}
0x3ad8…3b04              Head {h00=0x0028, h01=0x0050, text=»* THE AMOUNT MUST BE MOVED TO FIELD «, t00=0x0025, t01=0x0116}
0x3b04…3b2e              Head {h00=0x0026, h01=0x0050, text=»* 55,56,57, DEPENING ON WHICH YEAR«, t00=0x0025, t01=0x0142}
0x3b2e…3b46              Head {h00=0x0014, h01=0x0050, text=»* IT BELONGS TO.«, t00=0x0025, t01=0x016c}
0x3b46…3b5e              Head {h00=0x0014, h01=0x0050, text=»* THE FORMEL IS:«, t00=0x0025, t01=0x0184}
0x3b5e…3b88              Head {h00=0x0026, h01=0x0050, text=»* FIELDNR := REGYEAR + 4 - ACTYEAR«, t00=0x0026, t01=0x000c}
0x3b88…3baa              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN5),CBIN0 «, t00=0x0026, t01=0x0036}
0x3baa…3bce              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD1,GTREGF(CBIN14)«, t00=0x0026, t01=0x0058}
0x3bce…3be8              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD1,=D'4'«, t00=0x0026, t01=0x007c}
0x3be8…3c0c              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBCD1,GTDUPF(CBIN15) «, t00=0x0026, t01=0x0096}
0x3c0c…3c2a              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD1 «, t00=0x0026, t01=0x00ba}
0x3c2a…3c56              Head {h00=0x0028, h01=0x0050, text=» MOVE GTREGF(GSWBIN1),GTREGF(CBIN17)«, t00=0x0026, t01=0x00d8}
0x3c56…3c74              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN1 «, t00=0x0026, t01=0x0104}
0x3c74…3c90              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN2,=W'52' «, t00=0x0026, t01=0x0122}
0x3c90…3cac              Head {h00=0x0018, h01=0x0050, text=» MUL GSWBIN2,=W'-1' «, t00=0x0026, t01=0x013e}
0x3cac…3cd2              Head {h00=0x0022, h01=0x0050, text=» MOVE GTUSED(GSWBIN1),GSWBIN2 «, t00=0x0026, t01=0x015a}
0x3cd2…3cf8              Head {h00=0x0022, h01=0x0050, text=» MOVE GTPRTDAT,GTREGF(CBIN14) «, t00=0x0026, t01=0x0180}
0x3cf8…3d04              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0027, t01=0x0016}
0x3d04…3d12              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0027, t01=0x0022}
0x3d12…3d1a              Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0030}
0x3d1a…3d22              Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0038}
0x3d22…3d38              Head {h00=0x0012, h01=0x0050, text=»MOV56INV PROC «, t00=0x0027, t01=0x0040}
0x3d38…3d60              Head {h00=0x0024, h01=0x0050, text=» CBE GTUSED(CBIN3),CBIN0,MOV561 «, t00=0x0027, t01=0x0056}
0x3d60…3d7c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN3 «, t00=0x0027, t01=0x007e}
0x3d7c…3d8e              Head {h00=0x000e, h01=0x0050, text=» B MOV563 «, t00=0x0027, t01=0x009a}
0x3d8e…3d9c              Head {h00=0x000a, h01=0x0050, text=»MOV561«, t00=0x0027, t01=0x00ac}
0x3d9c…3dc4              Head {h00=0x0024, h01=0x0050, text=» CBE GTUSED(CBIN4),CBIN0,MOV562 «, t00=0x0027, t01=0x00ba}
0x3dc4…3de0              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN4 «, t00=0x0027, t01=0x00e2}
0x3de0…3df2              Head {h00=0x000e, h01=0x0050, text=» B MOV563 «, t00=0x0027, t01=0x00fe}
0x3df2…3e00              Head {h00=0x000a, h01=0x0050, text=»MOV562«, t00=0x0027, t01=0x0110}
0x3e00…3e1c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN5 «, t00=0x0027, t01=0x011e}
0x3e1c…3e2a              Head {h00=0x000a, h01=0x0050, text=»MOV563«, t00=0x0027, t01=0x013a}
0x3e2a…3e56              Head {h00=0x0028, h01=0x0050, text=» MOVE GTREGF(CBIN17),GTREGF(GSWBIN1)«, t00=0x0027, t01=0x0148}
0x3e56…3e7a              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBIN2,GTDUPF(CBIN15)«, t00=0x0027, t01=0x0174}
0x3e7a…3e96              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN2,GSWBIN1«, t00=0x0028, t01=0x0008}
0x3e96…3eb0              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN2,CBIN4«, t00=0x0028, t01=0x0024}
0x3eb0…3ed4              Head {h00=0x0020, h01=0x0050, text=» MOVE GTPRTDAT,GSWBIN2 YEEAR«, t00=0x0028, t01=0x003e}
0x3ed4…3ef8              Head {h00=0x0020, h01=0x0050, text=» MOVE GTREGF(CBIN14),GSWBIN2«, t00=0x0028, t01=0x0062}
0x3ef8…3f04              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0028, t01=0x0086}
0x3f04…3f12              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0028, t01=0x0092}
0x3f12…3f1a              Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x00a0}
0x3f1a…3f22              Head {h00=0x0004, h01=0x0050, t00=0x0028, t01=0x00a8}
0x3f22…3f36              Head {h00=0x0010, h01=0x0050, text=»DELRECS PROC«, t00=0x0028, t01=0x00b0}
0x3f36…3f50              Head {h00=0x0016, h01=0x0050, text=» PERF WAITF,CPFLG «, t00=0x0028, t01=0x00c4}
0x3f50…3f6e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0028, t01=0x00de}
0x3f6e…3fa6              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 «, t00=0x0028, t01=0x00fc}
0x3fa6…3fbc              Head {h00=0x0012, h01=0x0050, text=» BNOK DELREC2 «, t00=0x0028, t01=0x0134}
0x3fbc…3fda              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CPCKBUF«, t00=0x0028, t01=0x014a}
0x3fda…3fea              Head {h00=0x000c, h01=0x0050, text=»DELREC1 «, t00=0x0028, t01=0x0168}
0x3fea…4000              Head {h00=0x0012, h01=0x0050, text=» SET GTSWFLAG «, t00=0x0028, t01=0x0178}
0x4000…4024              Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',DELREC3«, t00=0x0028, t01=0x018e}
0x4024…403c              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSWFLAG «, t00=0x0029, t01=0x0022}
0x403c…404c              Head {h00=0x000c, h01=0x0050, text=»DELREC3 «, t00=0x0029, t01=0x003a}
0x404c…406a              Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0029, t01=0x004a}
0x406a…409c              Head {h00=0x002e, h01=0x0050, text=» COPY CPCKBUF,CBIN0,CBIN20,GSWSTR20,CBIN0 «, t00=0x0029, t01=0x0068}
0x409c…40b8              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'7F'«, t00=0x0029, t01=0x009a}
0x40b8…40e8              Head {h00=0x002c, h01=0x0050, text=» COPY CPCKBUF,CBIN20,CBIN1,GSWSTR9,CBIN0«, t00=0x0029, t01=0x00b6}
0x40e8…4118              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,GSWBIN9 «, t00=0x0029, t01=0x00e6}
0x4118…412e              Head {h00=0x0012, h01=0x0050, text=» BNOK DELREC2 «, t00=0x0029, t01=0x0116}
0x412e…413e              Head {h00=0x000c, h01=0x0050, text=»DELREC2 «, t00=0x0029, t01=0x012c}
0x413e…4164              Head {h00=0x0022, h01=0x0050, text=» CBNL GSWBIN9,GSWBIN10,DELREC9«, t00=0x0029, t01=0x013c}
0x4164…417e              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN9,CBIN1«, t00=0x0029, t01=0x0162}
0x417e…419c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0029, t01=0x017c}
0x419c…41d4              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 «, t00=0x002a, t01=0x000a}
0x41d4…41ea              Head {h00=0x0012, h01=0x0050, text=» BNOK DELREC2 «, t00=0x002a, t01=0x0042}
0x41ea…422c              Head {h00=0x003e, h01=0x0050, text=» COPY GSWSTR20,CBIN6,CBIN5,CPCKBUF,CBIN6 MOVE LOBENR ONLY «, t00=0x002a, t01=0x0058}
0x422c…4256              Head {h00=0x0026, h01=0x0050, text=» B DELREC1 AND DELETE CONT.RECORD «, t00=0x002a, t01=0x009a}
0x4256…4266              Head {h00=0x000c, h01=0x0050, text=»DELREC9 «, t00=0x002a, t01=0x00c4}
0x4266…427a              Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x002a, t01=0x00d4}
0x427a…4286              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002a, t01=0x00e8}
0x4286…4294              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002a, t01=0x00f4}
0x4294…429c              Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0102}
0x429c…42a4              Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x010a}
0x42a4…42ba              Head {h00=0x0012, h01=0x0050, text=»TRGEN PROC $W «, t00=0x002a, t01=0x0112}
0x42ba…42dc              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN14),CBIN0«, t00=0x002a, t01=0x0128}
0x42dc…42fe              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN15),CBIN0«, t00=0x002a, t01=0x014a}
0x42fe…4320              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN16),CBIN0«, t00=0x002a, t01=0x016c}
0x4320…4342              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN17),CBIN0«, t00=0x002a, t01=0x018e}
0x4342…4364              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN18),CBIN0«, t00=0x002b, t01=0x0020}
0x4364…4386              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN19),CBIN0«, t00=0x002b, t01=0x0042}
0x4386…43a8              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN20),CBIN0«, t00=0x002b, t01=0x0064}
0x43a8…43ca              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN21),CBIN0«, t00=0x002b, t01=0x0086}
0x43ca…43e4              Head {h00=0x0016, h01=0x0050, text=» MOVE GTREGDEX,$W «, t00=0x002b, t01=0x00a8}
0x43e4…4406              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TRGEN1 «, t00=0x002b, t01=0x00c2}
0x4406…4422              Head {h00=0x0018, h01=0x0050, text=» PERF PACKST,CBIN15 «, t00=0x002b, t01=0x00e4}
0x4422…4436              Head {h00=0x0010, h01=0x0050, text=» PERF WRITFD«, t00=0x002b, t01=0x0100}
0x4436…444a              Head {h00=0x0010, h01=0x0050, text=» BOK TRGEN1 «, t00=0x002b, t01=0x0114}
0x444a…4466              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN17«, t00=0x002b, t01=0x0128}
0x4466…447a              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x002b, t01=0x0144}
0x447a…448c              Head {h00=0x000e, h01=0x0050, text=» B TRGEN9 «, t00=0x002b, t01=0x0158}
0x448c…449a              Head {h00=0x000a, h01=0x0050, text=»TRGEN1«, t00=0x002b, t01=0x016a}
0x449a…44ae              Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x002b, t01=0x0178}
0x44ae…44bc              Head {h00=0x000a, h01=0x0050, text=»TRGEN9«, t00=0x002b, t01=0x018c}
0x44bc…44c8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002c, t01=0x000a}
0x44c8…44d6              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002c, t01=0x0016}
0x44d6…44de              Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0024}
0x44de…44e6              Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x002c}
0x44e6…44fa              Head {h00=0x0010, h01=0x0050, text=»NULSTIL PROC«, t00=0x002c, t01=0x0034}
0x44fa…451c              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN14),=D'0'«, t00=0x002c, t01=0x0048}
0x451c…453e              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN15),=D'0'«, t00=0x002c, t01=0x006a}
0x453e…4560              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN16),=D'0'«, t00=0x002c, t01=0x008c}
0x4560…4582              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN17),=D'0'«, t00=0x002c, t01=0x00ae}
0x4582…45a4              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN18),=D'0'«, t00=0x002c, t01=0x00d0}
0x45a4…45c6              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN19),=D'0'«, t00=0x002c, t01=0x00f2}
0x45c6…45e8              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN20),=D'0'«, t00=0x002c, t01=0x0114}
0x45e8…460a              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN21),=D'0'«, t00=0x002c, t01=0x0136}
0x460a…4616              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002c, t01=0x0158}
0x4616…4624              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002c, t01=0x0164}
0x4624…4632              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x002c, t01=0x0172}
0x4632…463a              Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0180}
0x463a…4656              Head {h00=0x0018, h01=0x0013, text=»BU00FRMT FRMT  MENU «, t00=0x002c, t01=0x0188}
0x4656…4662              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x002d, t01=0x0014}
0x4662…467e              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343020' «, t00=0x002d, t01=0x0020}
0x467e…469a              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='BUDGETTAL '«, t00=0x002d, t01=0x003c}
0x469a…46b2              Head {h00=0x0014, h01=0x000f, text=» FCOPY ='UDEN ' «, t00=0x002d, t01=0x0058}
0x46b2…46d6              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='BUDGETTERINGSKODE' «, t00=0x002d, t01=0x0070}
0x46d6…46e2              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x0094}
0x46e2…46fe              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343120' «, t00=0x002d, t01=0x00a0}
0x46fe…471a              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='BUDGETTAL '«, t00=0x002d, t01=0x00bc}
0x471a…4730              Head {h00=0x0012, h01=0x000e, text=» FCOPY ='MED '«, t00=0x002d, t01=0x00d8}
0x4730…4754              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='BUDGETTERINGSKODE' «, t00=0x002d, t01=0x00ee}
0x4754…4760              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x0112}
0x4760…477c              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343220' «, t00=0x002d, t01=0x011e}
0x477c…47a2              Head {h00=0x0022, h01=0x001e, text=» FCOPY ='[NDRING/SLETNING AF '«, t00=0x002d, t01=0x013a}
0x47a2…47be              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='BUDGETTAL '«, t00=0x002d, t01=0x0160}
0x47be…47d4              Head {h00=0x0012, h01=0x000e, text=» FCOPY ='MED '«, t00=0x002d, t01=0x017c}
0x47d4…47f8 (46, 0, 400) Head {h00=0x0020, h01=0x001b, text=» FCOPY ='BUDGETTERINGSKODE' «, t00=0x002e, t01=0x0004}
0x47f8…4804              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x0028}
0x4804…4820              Head {h00=0x0018, h01=0x0050, text=» FCOPY =X'5C343520' «, t00=0x002e, t01=0x0034}
0x4820…4846              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='TILL[GSBEV. BUDGET ' «, t00=0x002e, t01=0x0050}
0x4846…4852              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x0076}
0x4852…486e              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343620' «, t00=0x002e, t01=0x0082}
0x486e…488e              Head {h00=0x001c, h01=0x0050, text=» FCOPY ='OMPLACERINGER '«, t00=0x002e, t01=0x009e}
0x488e…489a              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x00be}
0x489a…48b6              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343720' «, t00=0x002e, t01=0x00ca}
0x48b6…48dc              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='SUM AF R]DIGHEDSB. ' «, t00=0x002e, t01=0x00e6}
0x48dc…48e8              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x010c}
0x48e8…4904              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343820' «, t00=0x002e, t01=0x0118}
0x4904…4928              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='ANL[GSUDGIFTER-TB '«, t00=0x002e, t01=0x0134}
0x4928…4934              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x0158}
0x4934…4950              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343920' «, t00=0x002e, t01=0x0164}
0x4950…4976              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='ANL[GSINDT[GTER-TB ' «, t00=0x002e, t01=0x0180}
0x4976…4982              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002f, t01=0x0016}
0x4982…498e              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002f, t01=0x0022}
0x498e…49bc              Head {h00=0x002a, h01=0x0050, text=» FCOPY ='INDTAST TRANSAKTIONSKODE:  ' «, t00=0x002f, t01=0x002e}
0x49bc…49d2              Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x002f, t01=0x005c}
0x49d2…49f4              Head {h00=0x001e, h01=0x0050, text=» FKI 29,MINL=2,MAXL=2,NUM «, t00=0x002f, t01=0x0072}
0x49f4…49fc              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0094}
0x49fc…4a16              Head {h00=0x0016, h01=0x0050, text=» FMEL 'XX',GTREGNR«, t00=0x002f, t01=0x009c}
0x4a16…4a22              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002f, t01=0x00b6}
0x4a22…4a52              Head {h00=0x002c, h01=0x0050, text=» FCOPY ='ELLER TRYK "KVIT" ELLER "KRE"' «, t00=0x002f, t01=0x00c2}
0x4a52…4a60              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x002f, t01=0x00f2}
0x4a60…4a68              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0100}
0x4a68…4a70              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0108}
0x4a70…4a86              Head {h00=0x0012, h01=0x0050, text=»BUSPFRMT FRMT «, t00=0x002f, t01=0x0110}
0x4a86…4a92              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x002f, t01=0x0126}
0x4a92…4ab8              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='INDTAST TRANSKODE: ' «, t00=0x002f, t01=0x0132}
0x4ab8…4ace              Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x002f, t01=0x0158}
0x4ace…4af2              Head {h00=0x0020, h01=0x0050, text=» FKI 21,MINL=2,MAXL=2,ME,NUM«, t00=0x002f, t01=0x016e}
0x4af2…4b0c (48, 0, 400) Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZ',GSWBCD6«, t00=0x0030, t01=0x0004}
0x4b0c…4b1c              Head {h00=0x000c, h01=0x0050, text=» FTAB 25«, t00=0x0030, t01=0x001e}
0x4b1c…4b24              Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x002e}
0x4b24…4b46              Head {h00=0x001e, h01=0x0050, text=» FCOPY ='PLUS REGKONTONR '«, t00=0x0030, t01=0x0036}
0x4b46…4b72              Head {h00=0x0028, h01=0x0050, text=» FKI 41,MINL=4,MAXL=10,ME,NUM,REWRT «, t00=0x0030, t01=0x0058}
0x4b72…4b9a              Head {h00=0x0024, h01=0x0050, text=» FMEL 'ZZZE-ZZZE-ZZE-ZZ',GSWBCD7«, t00=0x0030, t01=0x0084}
0x4b9a…4ba8              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0030, t01=0x00ac}
0x4ba8…4bb0              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x00ba}
0x4bb0…4bb8              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x00c2}
0x4bb8…4bc0              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x00ca}
0x4bc0…4bd4              Head {h00=0x0010, h01=0x000c, text=»BU40FRM FRMT«, t00=0x0030, t01=0x00d2}
0x4bd4…4be0              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0030, t01=0x00e6}
0x4be0…4bfc              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343020' «, t00=0x0030, t01=0x00f2}
0x4bfc…4c12              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB1 «, t00=0x0030, t01=0x010e}
0x4c12…4c28              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB2 «, t00=0x0030, t01=0x0124}
0x4c28…4c36              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0030, t01=0x013a}
0x4c36…4c3e              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x0148}
0x4c3e…4c46              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x0150}
0x4c46…4c5a              Head {h00=0x0010, h01=0x000c, text=»BU41FRM FRMT«, t00=0x0030, t01=0x0158}
0x4c5a…4c66              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0030, t01=0x016c}
0x4c66…4c82              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343120' «, t00=0x0030, t01=0x0178}
0x4c82…4c98 (49, 0, 398) Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB1 «, t00=0x0031, t01=0x0004}
0x4c98…4cae              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB3 «, t00=0x0031, t01=0x001a}
0x4cae…4cc4              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB2 «, t00=0x0031, t01=0x0030}
0x4cc4…4cd2              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0031, t01=0x0046}
0x4cd2…4cda              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x0054}
0x4cda…4ce2              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x005c}
0x4ce2…4cea              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x0064}
0x4cea…4cfe              Head {h00=0x0010, h01=0x000c, text=»BU42FRM FRMT«, t00=0x0031, t01=0x006c}
0x4cfe…4d0a              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0031, t01=0x0080}
0x4d0a…4d26              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343220' «, t00=0x0031, t01=0x008c}
0x4d26…4d3c              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB1 «, t00=0x0031, t01=0x00a8}
0x4d3c…4d52              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB3 «, t00=0x0031, t01=0x00be}
0x4d52…4d68              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB2 «, t00=0x0031, t01=0x00d4}
0x4d68…4d76              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0031, t01=0x00ea}
0x4d76…4d7e              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x00f8}
0x4d7e…4d86              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x0100}
0x4d86…4d9a              Head {h00=0x0010, h01=0x000c, text=»BU45FRM FRMT«, t00=0x0031, t01=0x0108}
0x4d9a…4da6              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0031, t01=0x011c}
0x4da6…4dc2              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343520' «, t00=0x0031, t01=0x0128}
0x4dc2…4de8              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='TILL[GSBEV. BUDGET ' «, t00=0x0031, t01=0x0144}
0x4de8…4dfe              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB4 «, t00=0x0031, t01=0x016a}
0x4dfe…4e14              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB5 «, t00=0x0031, t01=0x0180}
0x4e14…4e22              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0032, t01=0x0008}
0x4e22…4e2a              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x0016}
0x4e2a…4e32              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x001e}
0x4e32…4e46              Head {h00=0x0010, h01=0x000c, text=»BU46FRM FRMT«, t00=0x0032, t01=0x0026}
0x4e46…4e52              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0032, t01=0x003a}
0x4e52…4e6e              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343620' «, t00=0x0032, t01=0x0046}
0x4e6e…4e8e              Head {h00=0x001c, h01=0x0050, text=» FCOPY ='OMPLACERINGER '«, t00=0x0032, t01=0x0062}
0x4e8e…4ea4              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB4 «, t00=0x0032, t01=0x0082}
0x4ea4…4eb8              Head {h00=0x0010, h01=0x000c, text=» FILLR ' ',5«, t00=0x0032, t01=0x0098}
0x4eb8…4eda              Head {h00=0x001e, h01=0x0050, text=» FCOPY ='DET.KODE/LBNR: ' «, t00=0x0032, t01=0x00ac}
0x4eda…4ef0              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB7 «, t00=0x0032, t01=0x00ce}
0x4ef0…4f06              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB5 «, t00=0x0032, t01=0x00e4}
0x4f06…4f14              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0032, t01=0x00fa}
0x4f14…4f1c              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x0108}
0x4f1c…4f24              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x0110}
0x4f24…4f38              Head {h00=0x0010, h01=0x000c, text=»BU47FRM FRMT«, t00=0x0032, t01=0x0118}
0x4f38…4f44              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0032, t01=0x012c}
0x4f44…4f60              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343720' «, t00=0x0032, t01=0x0138}
0x4f60…4f86              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='SUM AF R]DIGHEDSB. ' «, t00=0x0032, t01=0x0154}
0x4f86…4f92              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0032, t01=0x017a}
0x4f92…4fa8              Head {h00=0x0012, h01=0x000d, text=» FLINK BUBEL1 «, t00=0x0032, t01=0x0186}
0x4fa8…4fbe              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB8 «, t00=0x0033, t01=0x000c}
0x4fbe…4fd4              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB5 «, t00=0x0033, t01=0x0022}
0x4fd4…4fe2              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0033, t01=0x0038}
0x4fe2…4fea              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x0046}
0x4fea…4ff2              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x004e}
0x4ff2…5006              Head {h00=0x0010, h01=0x000c, text=»BU48FRM FRMT«, t00=0x0033, t01=0x0056}
0x5006…5012              Head {h00=0x0008, h01=0x0005, text=» FSL«, t00=0x0033, t01=0x006a}
0x5012…502e              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343820' «, t00=0x0033, t01=0x0076}
0x502e…5052              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='ANL[GSUDGIFTER-TB '«, t00=0x0033, t01=0x0092}
0x5052…5068              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB6 «, t00=0x0033, t01=0x00b6}
0x5068…507e              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB9 «, t00=0x0033, t01=0x00cc}
0x507e…508c              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0033, t01=0x00e2}
0x508c…5094              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x00f0}
0x5094…509c              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x00f8}
0x509c…50b0              Head {h00=0x0010, h01=0x000c, text=»BU49FRM FRMT«, t00=0x0033, t01=0x0100}
0x50b0…50bc              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0033, t01=0x0114}
0x50bc…50d8              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343920' «, t00=0x0033, t01=0x0120}
0x50d8…50fe              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='ANL[GSINDT[GTER-TB ' «, t00=0x0033, t01=0x013c}
0x50fe…5114              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB6 «, t00=0x0033, t01=0x0162}
0x5114…512a              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB9 «, t00=0x0033, t01=0x0178}
0x512a…5138              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0033, t01=0x018e}
0x5138…5140              Head {h00=0x0004, h01=0x0050, t00=0x0034, t01=0x000c}
0x5140…5148              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x0014}
0x5148…5150              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x001c}
0x5150…5164              Head {h00=0x0010, h01=0x000b, text=»BUBEL1 FRMT «, t00=0x0034, t01=0x0024}
0x5164…5180              Head {h00=0x0018, h01=0x0013, text=» FCOPY ='BUDGETBEL' «, t00=0x0034, t01=0x0038}
0x5180…5196              Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x0034, t01=0x0054}
0x5196…51ae              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='B ]R: '«, t00=0x0034, t01=0x006a}
0x51ae…51bc              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0034, t01=0x0082}
0x51bc…51c4              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x0090}
0x51c4…51cc              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x0098}
0x51cc…51e0              Head {h00=0x0010, h01=0x000b, text=»BUBEL2 FRMT «, t00=0x0034, t01=0x00a0}
0x51e0…51fa              Head {h00=0x0016, h01=0x0012, text=» FCOPY ='BUDG.BEL'«, t00=0x0034, t01=0x00b4}
0x51fa…5210              Head {h00=0x0012, h01=0x000e, text=» FILLR X'5C',1«, t00=0x0034, t01=0x00ce}
0x5210…5224              Head {h00=0x0010, h01=0x000c, text=» FILLR 'B',1«, t00=0x0034, t01=0x00e4}
0x5224…5232              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0034, t01=0x00f8}
0x5232…523a              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x0106}
0x523a…5242              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x010e}
0x5242…524a              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x0116}
0x524a…5252              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x011e}
0x5252…5266              Head {h00=0x0010, h01=0x000b, text=»BUSUB1 FRMT «, t00=0x0034, t01=0x0126}
0x5266…528a              Head {h00=0x0020, h01=0x001c, text=» FCOPY ='INDBERETNING LOKAL'«, t00=0x0034, t01=0x013a}
0x528a…52a0              Head {h00=0x0012, h01=0x000d, text=» FILLR ' ',18 «, t00=0x0034, t01=0x015e}
0x52a0…52c0              Head {h00=0x001c, h01=0x0018, text=» FCOPY ='PRISREG.KODE: '«, t00=0x0034, t01=0x0174}
0x52c0…52fc (53, 0, 398) Head {h00=0x0038, h01=0x0050, text=» FKI 55,APPL=64,MINL=1,MAXL=1,ME,DUPL=GTDUPF(CBIN12)«, t00=0x0035, t01=0x0004}
0x52fc…531c              Head {h00=0x001c, h01=0x0018, text=» FMEL 'X',GTREGF(CBIN12)«, t00=0x0035, t01=0x0040}
0x531c…5328              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0035, t01=0x0060}
0x5328…5334              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0035, t01=0x006c}
0x5334…534e              Head {h00=0x0016, h01=0x0011, text=» FCOPY ='LINNR: ' «, t00=0x0035, t01=0x0078}
0x534e…536a              Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZ9',GTANTAL«, t00=0x0035, t01=0x0092}
0x536a…537e              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x0035, t01=0x00ae}
0x537e…539c              Head {h00=0x001a, h01=0x0016, text=» FCOPY ='REGKONTONR: '«, t00=0x0035, t01=0x00c2}
0x539c…53d6              Head {h00=0x0036, h01=0x0050, text=» FKI 33,APPL=5,MINL=10,MAXL=10,ME,SCHK=1,REWRT,  C«, t00=0x0035, t01=0x00e0}
0x53d6…53f2              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTDUPF(CBIN1)«, t00=0x0035, t01=0x011a}
0x53f2…5420              Head {h00=0x002a, h01=0x0026, text=» FMEL 'XXXE-XXXE-XXE-XX',GTREGF(CBIN1)«, t00=0x0035, t01=0x0136}
0x5420…542e              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0035, t01=0x0164}
0x542e…5436              Head {h00=0x0004, h01=0x0000, t00=0x0035, t01=0x0172}
0x5436…543e              Head {h00=0x0004, h01=0x0000, t00=0x0035, t01=0x017a}
0x543e…5452              Head {h00=0x0010, h01=0x000b, text=»BUSUB2 FRMT «, t00=0x0035, t01=0x0182}
0x5452…545e              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0036, t01=0x0008}
0x545e…546a              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0036, t01=0x0014}
0x546a…5484              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BUDGET]R'«, t00=0x0036, t01=0x0020}
0x5484…54a6              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN14)«, t00=0x0036, t01=0x003a}
0x54a6…54c2              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0036, t01=0x005c}
0x54c2…54e4              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN15)«, t00=0x0036, t01=0x0078}
0x54e4…54f0              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0036, t01=0x009a}
0x54f0…5526              Head {h00=0x0032, h01=0x0050, text=» FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=55«, t00=0x0036, t01=0x00a6}
0x5526…5552              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN3) «, t00=0x0036, t01=0x00dc}
0x5552…558e              Head {h00=0x0038, h01=0x0050, text=» FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=56,  C «, t00=0x0036, t01=0x0108}
0x558e…55aa              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN3)«, t00=0x0036, t01=0x0144}
0x55aa…55d6              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN4) «, t00=0x0036, t01=0x0160}
0x55d6…55e2              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0036, t01=0x018c}
0x55e2…55ee              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0037, t01=0x0008}
0x55ee…5608              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BUDGET]R'«, t00=0x0037, t01=0x0014}
0x5608…562a              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN16)«, t00=0x0037, t01=0x002e}
0x562a…5646              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0037, t01=0x0050}
0x5646…5668              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN17)«, t00=0x0037, t01=0x006c}
0x5668…5684              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0037, t01=0x008e}
0x5684…56a6              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN18)«, t00=0x0037, t01=0x00aa}
0x56a6…56c2              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0037, t01=0x00cc}
0x56c2…56e4              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN19)«, t00=0x0037, t01=0x00e8}
0x56e4…5700              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0037, t01=0x010a}
0x5700…5722              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN20)«, t00=0x0037, t01=0x0126}
0x5722…573e              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0037, t01=0x0148}
0x573e…5760              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN21)«, t00=0x0037, t01=0x0164}
0x5760…576c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0037, t01=0x0186}
0x576c…57a6 (56, 0, 400) Head {h00=0x0036, h01=0x0050, text=» FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=57,  C«, t00=0x0038, t01=0x0004}
0x57a6…57c2              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN4)«, t00=0x0038, t01=0x003e}
0x57c2…57ee              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN5) «, t00=0x0038, t01=0x005a}
0x57ee…582a              Head {h00=0x0038, h01=0x0050, text=» FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=58,  C «, t00=0x0038, t01=0x0086}
0x582a…5846              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN5)«, t00=0x0038, t01=0x00c2}
0x5846…5872              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN6) «, t00=0x0038, t01=0x00de}
0x5872…58ae              Head {h00=0x0038, h01=0x0050, text=» FKI 27,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=59,  C «, t00=0x0038, t01=0x010a}
0x58ae…58ca              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN6)«, t00=0x0038, t01=0x0146}
0x58ca…58f6              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN7) «, t00=0x0038, t01=0x0162}
0x58f6…5932              Head {h00=0x0038, h01=0x0050, text=» FKI 40,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=60,  C «, t00=0x0038, t01=0x018e}
0x5932…594e              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN7)«, t00=0x0039, t01=0x003a}
0x594e…597a              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN8) «, t00=0x0039, t01=0x0056}
0x597a…59b6              Head {h00=0x0038, h01=0x0050, text=» FKI 53,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=61,  C «, t00=0x0039, t01=0x0082}
0x59b6…59d2              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN8)«, t00=0x0039, t01=0x00be}
0x59d2…59fe              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN9) «, t00=0x0039, t01=0x00da}
0x59fe…5a3a              Head {h00=0x0038, h01=0x0050, text=» FKI 66,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=62,  C «, t00=0x0039, t01=0x0106}
0x5a3a…5a56              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN9)«, t00=0x0039, t01=0x0142}
0x5a56…5a82              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN10)«, t00=0x0039, t01=0x015e}
0x5a82…5a8e              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0039, t01=0x018a}
0x5a8e…5a9a              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003a, t01=0x0008}
0x5a9a…5aa6              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003a, t01=0x0014}
0x5aa6…5ab2              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003a, t01=0x0020}
0x5ab2…5aca              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='TOTAL:'«, t00=0x003a, t01=0x002c}
0x5aca…5ad6              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003a, t01=0x0044}
0x5ad6…5b02              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN14)«, t00=0x003a, t01=0x0050}
0x5b02…5b2e              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN15)«, t00=0x003a, t01=0x007c}
0x5b2e…5b3a              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003a, t01=0x00a8}
0x5b3a…5b66              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN16)«, t00=0x003a, t01=0x00b4}
0x5b66…5b92              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN17)«, t00=0x003a, t01=0x00e0}
0x5b92…5bbe              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN18)«, t00=0x003a, t01=0x010c}
0x5bbe…5bea              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN19)«, t00=0x003a, t01=0x0138}
0x5bea…5c16              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN20)«, t00=0x003a, t01=0x0164}
0x5c16…5c42              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN21)«, t00=0x003a, t01=0x0190}
0x5c42…5c50              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003b, t01=0x002c}
0x5c50…5c58              Head {h00=0x0004, h01=0x0000, t00=0x003b, t01=0x003a}
0x5c58…5c60              Head {h00=0x0004, h01=0x0000, t00=0x003b, t01=0x0042}
0x5c60…5c74              Head {h00=0x0010, h01=0x000b, text=»BUSUB3 FRMT «, t00=0x003b, t01=0x004a}
0x5c74…5c88              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',3«, t00=0x003b, t01=0x005e}
0x5c88…5cae              Head {h00=0x0022, h01=0x001d, text=» FCOPY ='BUDGETTERINGSKODE: ' «, t00=0x003b, t01=0x0072}
0x5cae…5ce2              Head {h00=0x0030, h01=0x0050, text=» FKI 67,APPL=54,MINL=1,MAXL=10,ME,REWRT,  C «, t00=0x003b, t01=0x0098}
0x5ce2…5cfe              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTDUPF(CBIN2)«, t00=0x003b, t01=0x00cc}
0x5cfe…5d2a              Head {h00=0x0028, h01=0x0023, text=» FMEL 'XBXXXXBXXXBXX',GTREGF(CBIN2) «, t00=0x003b, t01=0x00e8}
0x5d2a…5d38              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003b, t01=0x0114}
0x5d38…5d40              Head {h00=0x0004, h01=0x0000, t00=0x003b, t01=0x0122}
0x5d40…5d48              Head {h00=0x0004, h01=0x0000, t00=0x003b, t01=0x012a}
0x5d48…5d5c              Head {h00=0x0010, h01=0x000b, text=»BUSUB4 FRMT «, t00=0x003b, t01=0x0132}
0x5d5c…5d72              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB6 «, t00=0x003b, t01=0x0146}
0x5d72…5d86              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x003b, t01=0x015c}
0x5d86…5d9c              Head {h00=0x0012, h01=0x000d, text=» FLINK BUBEL1 «, t00=0x003b, t01=0x0170}
0x5d9c…5dce              Head {h00=0x002e, h01=0x0050, text=» FKI 52,MINL=2,MAXL=2,ME,NUM,APPL=120,  C «, t00=0x003b, t01=0x0186}
0x5dce…5de6              Head {h00=0x0014, h01=0x0050, text=»  DUPL=GTPRTDAT «, t00=0x003c, t01=0x0028}
0x5de6…5e08              Head {h00=0x001e, h01=0x0050, text=» FMEL 'XX',GTREGF(CBIN14) «, t00=0x003c, t01=0x0040}
0x5e08…5e16              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003c, t01=0x0062}
0x5e16…5e1e              Head {h00=0x0004, h01=0x0000, t00=0x003c, t01=0x0070}
0x5e1e…5e26              Head {h00=0x0004, h01=0x0000, t00=0x003c, t01=0x0078}
0x5e26…5e3a              Head {h00=0x0010, h01=0x000b, text=»BUSUB5 FRMT «, t00=0x003c, t01=0x0080}
0x5e3a…5e46              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003c, t01=0x0094}
0x5e46…5e64              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='REGKONTONR ' «, t00=0x003c, t01=0x00a0}
0x5e64…5e78              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x003c, t01=0x00be}
0x5e78…5e8e              Head {h00=0x0012, h01=0x000d, text=» FLINK BUBEL2 «, t00=0x003c, t01=0x00d2}
0x5e8e…5e9a              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003c, t01=0x00e8}
0x5e9a…5ed4              Head {h00=0x0036, h01=0x0050, text=» FKI 1,MINL=10,MAXL=10,ME,SCHK=1,NUM,REWRT,APPL=5 «, t00=0x003c, t01=0x00f4}
0x5ed4…5f02              Head {h00=0x002a, h01=0x0026, text=» FMEL 'XXXE-XXXE-XXE-XX',GTREGF(CBIN1)«, t00=0x003c, t01=0x012e}
0x5f02…5f3c              Head {h00=0x0036, h01=0x0050, text=» FKI 16,MINL=1,MAXL=11,ME,APPL=57,NUM,SCHK=4,REWRT«, t00=0x003c, t01=0x015c}
0x5f3c…5f68              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN17) «, t00=0x003d, t01=0x0008}
0x5f68…5f76              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003d, t01=0x0034}
0x5f76…5f7e              Head {h00=0x0004, h01=0x0000, t00=0x003d, t01=0x0042}
0x5f7e…5f86              Head {h00=0x0004, h01=0x0000, t00=0x003d, t01=0x004a}
0x5f86…5f9a              Head {h00=0x0010, h01=0x000b, text=»BUSUB6 FRMT «, t00=0x003d, t01=0x0052}
0x5f9a…5fa6              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003d, t01=0x0066}
0x5fa6…5fb2              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003d, t01=0x0072}
0x5fb2…5fd6              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='TILL[GSBEV.DATO: ' «, t00=0x003d, t01=0x007e}
0x5fd6…6000              Head {h00=0x0026, h01=0x0050, text=» FKI 18,MINL=6,MAXL=6,APPL=63,  C «, t00=0x003d, t01=0x00a2}
0x6000…6032              Head {h00=0x002e, h01=0x0050, text=»  ME,NUM,REWRT,SCHK=2,DUPL=GTDUPF(CBIN11) «, t00=0x003d, t01=0x00cc}
0x6032…605a              Head {h00=0x0024, h01=0x001f, text=» FMEL 'XXVXXVXX',GTREGF(CBIN11) «, t00=0x003d, t01=0x00fe}
0x605a…6068              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003d, t01=0x0126}
0x6068…6070              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0134}
0x6070…6078              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x013c}
0x6078…608c              Head {h00=0x0010, h01=0x0050, text=»BUSUB7 FRMT «, t00=0x003d, t01=0x0144}
0x608c…60cc              Head {h00=0x003c, h01=0x0050, text=» FKI 75,NUM,MINL=1,MAXL=4,APPL=65,ME,DUPL=GTDUPF(CBIN13)«, t00=0x003d, t01=0x0158}
0x60cc…60f0              Head {h00=0x0020, h01=0x001b, text=» FMEL 'XXXX',GTREGF(CBIN13) «, t00=0x003e, t01=0x0008}
0x60f0…60fe              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x002c}
0x60fe…6106              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x003a}
0x6106…610e              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0042}
0x610e…6122              Head {h00=0x0010, h01=0x0050, text=»BUSUB8 FRMT «, t00=0x003e, t01=0x004a}
0x6122…615e              Head {h00=0x0038, h01=0x0050, text=» FKI 18,MINL=2,MAXL=2,NUM,ME,APPL=120,DUPL=GTPRTDAT «, t00=0x003e, t01=0x005e}
0x615e…6180              Head {h00=0x001e, h01=0x0050, text=» FMEL 'XX',GTREGF(CBIN14) «, t00=0x003e, t01=0x009a}
0x6180…618e              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x00bc}
0x618e…6196              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00ca}
0x6196…619e              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00d2}
0x619e…61b2              Head {h00=0x0010, h01=0x0050, text=»BUSUB9 FRMT «, t00=0x003e, t01=0x00da}
0x61b2…61be              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003e, t01=0x00ee}
0x61be…61dc              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='PROJEKT NR ' «, t00=0x003e, t01=0x00fa}
0x61dc…61f0              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x003e, t01=0x0118}
0x61f0…6206              Head {h00=0x0012, h01=0x0050, text=» FLINK BUBEL2 «, t00=0x003e, t01=0x012c}
0x6206…6212              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003e, t01=0x0142}
0x6212…6240              Head {h00=0x002a, h01=0x0050, text=» FKI 1,MINL=4,MAXL=4,ME,NUM,REWRT,  C «, t00=0x003e, t01=0x014e}
0x6240…6264              Head {h00=0x0020, h01=0x0050, text=»  APPL=5,DUPL=GTDUPF(CBIN1) «, t00=0x003e, t01=0x017c}
0x6264…6286              Head {h00=0x001e, h01=0x0050, text=» FMEL 'XXXX',GTREGF(CBIN1)«, t00=0x003f, t01=0x0010}
0x6286…62c0              Head {h00=0x0036, h01=0x0050, text=» FKI 16,MINL=1,MAXL=11,ME,APPL=56,NUM,SCHK=4,REWRT«, t00=0x003f, t01=0x0032}
0x62c0…62ea              Head {h00=0x0026, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN4)«, t00=0x003f, t01=0x006c}
0x62ea…62f8              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003f, t01=0x0096}
0x62f8…6300              Head {h00=0x0004, h01=0x0050, t00=0x003f, t01=0x00a4}
0x6300…6308              Head {h00=0x0004, h01=0x0050, t00=0x003f, t01=0x00ac}
0x6308…631c              Head {h00=0x0010, h01=0x0050, text=»BUSUB10 FRMT«, t00=0x003f, t01=0x00b4}
0x631c…6330              Head {h00=0x0010, h01=0x0050, text=» FILLR '0',2«, t00=0x003f, t01=0x00c8}
0x6330…6346              Head {h00=0x0012, h01=0x0050, text=» FCOPY CLEVBUF«, t00=0x003f, t01=0x00dc}
0x6346…6354              Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x003f, t01=0x00f2}
0x6354…6362              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003f, t01=0x0100}
0x6362…636a              Head {h00=0x0004, h01=0x0000, t00=0x003f, t01=0x010e}
0x636a…6372              Head {h00=0x0004, h01=0x0000, t00=0x003f, t01=0x0116}
0x6372…6386              Head {h00=0x0010, h01=0x0050, text=»STJFRM FRMT «, t00=0x003f, t01=0x011e}
0x6386…639a              Head {h00=0x0010, h01=0x0050, text=» FILLR '*',5«, t00=0x003f, t01=0x0132}
0x639a…63a8              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003f, t01=0x0146}
0x63a8…63b0              Head {h00=0x0004, h01=0x0050, t00=0x003f, t01=0x0154}
0x63b0…63b8              Head {h00=0x0004, h01=0x0050, t00=0x003f, t01=0x015c}
0x63b8…63cc              Head {h00=0x0010, h01=0x0050, text=»PCKINIT FRMT«, t00=0x003f, t01=0x0164}
0x63cc…63e2              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x003f, t01=0x0178}
0x63e2…63f8              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x003f, t01=0x018e}
0x63f8…6414              Head {h00=0x0018, h01=0x0050, text=» FBT GTSWFLAG,PCKI10«, t00=0x0040, t01=0x0014}
0x6414…642c              Head {h00=0x0014, h01=0x0050, text=» FILLR X'00',48 «, t00=0x0040, t01=0x0030}
0x642c…643a              Head {h00=0x000a, h01=0x0050, text=» FEXIT«, t00=0x0040, t01=0x0048}
0x643a…6448              Head {h00=0x000a, h01=0x0050, text=»PCKI10«, t00=0x0040, t01=0x0056}
0x6448…645e              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',48 «, t00=0x0040, t01=0x0064}
0x645e…646c              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0040, t01=0x007a}
0x646c…6474              Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x0088}
0x6474…647c              Head {h00=0x0004, h01=0x0050, t00=0x0040, t01=0x0090}
0x647c…6488              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0040, t01=0x0098}
0x6488…648c              Head {h00=0x4004, h01=0x0000}
0x648c…6490              00 40 00 a4                                                                                                                                                                                                                                       ┆ @  ┆
0x6490…6498 (65, 1, 8)   20 04 00 00 00 41 00 04                                                                                                                                                                                                                           ┆     A  ┆
0x6498…64e8 (66, 0, 398) 00 28 00 50 2a 20 47 53 57 42 43 44 36 20 43 4f 4e 54 41 49 4e 53 20 54 52 41 4e 53 43 4f 44 45 20 28 34 30 2d 34 39 29 00 0a 00 04 00 22 00 50 2a 20 47 53 57 42 43 44 37 20 43 4f 4e 54 41 49 4e 53 20 52 45 47 4b 4f 4e 54 4f 4e 52 20 00 0a   ┆ ( P* GSWBCD6 CONTAINS TRANSCODE (40-49)     " P* GSWBCD7 CONTAINS REGKONTONR   ┆
0x64e8…6538              00 30 00 18 00 50 20 4d 4f 56 45 20 47 54 52 45 43 4e 52 2c 43 52 45 43 4e 52 00 0a 00 56 00 0a 00 50 42 55 44 37 31 32 00 0a 00 72 00 22 00 50 20 53 55 42 20 47 54 52 45 43 4e 52 2c 43 42 49 4e 31 20 4e 45 58 54 20 52 45 43 4f 52 44 00 0a   ┆ 0   P MOVE GTRECNR,CRECNR   V   PBUD712   r " P SUB GTRECNR,CBIN1 NEXT RECORD  ┆
0x6538…6588              00 80 00 2a 00 50 20 43 42 4e 47 20 47 54 52 45 43 4e 52 2c 43 42 49 4e 31 2c 42 55 44 37 35 30 20 46 49 4e 49 53 48 45 44 20 3f 20 00 0a 00 a6 00 2e 00 50 20 50 45 52 46 20 52 47 52 45 41 44 2c 44 4b 30 32 2c 3d 44 27 32 27 2c 43 42 49 4e   ┆   * P CBNG GTRECNR,CBIN1,BUD750 FINISHED ?      . P PERF RGREAD,DK02,=D'2',CBIN┆
0x6588…65d8              32 20 52 45 41 44 20 52 45 43 4f 52 44 20 00 0a 00 d4 00 10 00 50 20 42 4f 4b 20 42 55 44 37 33 30 20 00 0a 01 06 00 0e 00 50 20 42 20 42 55 44 37 31 32 20 00 0a 01 1a 00 0a 00 50 42 55 44 37 33 30 00 0a 01 2c 00 20 00 50 20 43 42 4e 45 20   ┆2 READ RECORD        P BOK BUD730        P B BUD712        PBUD730   ,   P CBNE ┆
0x65d8…6626              47 54 52 45 47 4e 52 2c 47 53 57 42 43 44 36 2c 42 55 44 37 31 32 00 0a 01 3a 00 26 00 50 20 43 42 4e 45 20 47 54 52 45 47 46 28 43 42 49 4e 31 29 2c 47 53 57 42 43 44 37 2c 42 55 44 37 31 32 00 0a 01 5e 00 06 00 50 2a 20 00 0a 01 88         ┆GTREGNR,GSWBCD6,BUD712   : & P CBNE GTREGF(CBIN1),GSWBCD7,BUD712   ^   P*     ┆
0x6626…6676 (67, 0, 400) 00 12 00 50 20 50 45 52 46 20 4e 55 4c 53 54 49 4c 20 00 0b 00 04 00 1a 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 31 2c 47 54 52 45 47 4e 52 20 00 0b 00 1a 00 18 00 50 20 53 55 42 20 47 53 57 42 49 4e 31 2c 3d 57 27 33 39 27 20 00 0b 00 38   ┆   P PERF NULSTIL        P MOVE GSWBIN1,GTREGNR        P SUB GSWBIN1,=W'39'    8┆
0x6676…66c6              00 14 00 50 20 43 4c 45 41 52 20 54 54 45 4f 52 46 4c 47 20 00 0b 00 54 00 36 00 50 20 49 42 20 47 53 57 42 49 4e 31 2c 42 55 44 37 34 30 2c 42 55 44 37 34 31 2c 42 55 44 37 34 32 2c 42 55 44 37 34 33 2c 42 55 44 37 34 34 2c 5c 5c 43 00 0b   ┆   P CLEAR TTEORFLG    T 6 P IB GSWBIN1,BUD740,BUD741,BUD742,BUD743,BUD744,  C  ┆
0x66c6…6716              00 6c 00 28 00 50 5c 5c 42 55 44 37 34 35 2c 42 55 44 37 34 36 2c 42 55 44 37 34 37 2c 42 55 44 37 34 38 2c 42 55 44 37 34 39 00 0b 00 a6 00 0a 00 50 42 55 44 37 34 30 00 0b 00 d2 00 14 00 50 20 41 54 54 46 4d 54 20 42 55 34 30 46 52 4d 20   ┆ l ( P  BUD745,BUD746,BUD747,BUD748,BUD749       PBUD740       P ATTFMT BU40FRM ┆
0x6716…6766              00 0b 00 e0 00 10 00 50 20 50 45 52 46 20 53 45 54 44 45 42 00 0b 00 f8 00 10 00 50 20 50 45 52 46 20 53 50 43 4c 52 4e 00 0b 01 0c 00 1e 00 50 20 43 42 4e 45 20 53 50 42 49 4e 57 32 2c 43 42 49 4e 33 2c 42 55 44 37 35 30 00 0b 01 20 00 12   ┆       P PERF SETDEB       P PERF SPCLRN       P CBNE SPBINW2,CBIN3,BUD750      ┆
0x6766…67b6              00 50 20 50 45 52 46 20 54 52 34 30 47 45 4e 20 00 0b 01 42 00 12 00 50 20 50 45 52 46 20 44 45 4c 52 45 43 53 20 00 0b 01 58 00 0e 00 50 20 42 20 42 55 44 37 35 30 20 00 0b 01 6e 00 0a 00 50 42 55 44 37 34 31 00 0b 01 80 00 14 00 50 20 41   ┆ P PERF TR40GEN    B   P PERF DELRECS    X   P B BUD750    n   PBUD741       P A┆
0x67b6…6806 (68, 0, 400) 54 54 46 4d 54 20 42 55 34 31 46 52 4d 20 00 0b 01 8e 00 10 00 50 20 50 45 52 46 20 53 45 54 44 45 42 00 0c 00 16 00 10 00 50 20 50 45 52 46 20 53 50 43 4c 52 4e 00 0c 00 2a 00 1e 00 50 20 43 42 4e 45 20 53 50 42 49 4e 57 32 2c 43 42 49 4e   ┆TTFMT BU41FRM        P PERF SETDEB       P PERF SPCLRN   *   P CBNE SPBINW2,CBIN┆
0x6806…6856              33 2c 42 55 44 37 35 30 00 0c 00 3e 00 12 00 50 20 50 45 52 46 20 54 52 34 31 47 45 4e 20 00 0c 00 60 00 12 00 50 20 50 45 52 46 20 44 45 4c 52 45 43 53 20 00 0c 00 76 00 0e 00 50 20 42 20 42 55 44 37 35 30 20 00 0c 00 8c 00 0a 00 50 42 55   ┆3,BUD750   >   P PERF TR41GEN    `   P PERF DELRECS    v   P B BUD750        PBU┆
0x6856…68a6              44 37 34 32 00 0c 00 9e 00 14 00 50 20 41 54 54 46 4d 54 20 42 55 34 32 46 52 4d 20 00 0c 00 ac 00 10 00 50 20 50 45 52 46 20 53 45 54 44 45 42 00 0c 00 c4 00 10 00 50 20 50 45 52 46 20 53 50 43 4c 52 4e 00 0c 00 d8 00 1e 00 50 20 43 42 4e   ┆D742       P ATTFMT BU42FRM        P PERF SETDEB       P PERF SPCLRN       P CBN┆
0x68a6…68f6              45 20 53 50 42 49 4e 57 32 2c 43 42 49 4e 33 2c 42 55 44 37 35 30 00 0c 00 ec 00 12 00 50 20 50 45 52 46 20 54 52 34 32 47 45 4e 20 00 0c 01 0e 00 12 00 50 20 50 45 52 46 20 44 45 4c 52 45 43 53 20 00 0c 01 24 00 0e 00 50 20 42 20 42 55 44   ┆E SPBINW2,CBIN3,BUD750       P PERF TR42GEN        P PERF DELRECS    $   P B BUD┆
0x68f6…6946              37 35 30 20 00 0c 01 3a 00 0a 00 50 42 55 44 37 34 33 00 0c 01 4c 00 0a 00 50 42 55 44 37 34 34 00 0c 01 5a 00 0e 00 50 20 42 20 42 55 44 37 35 30 20 00 0c 01 68 00 0a 00 50 42 55 44 37 34 35 00 0c 01 7a 00 14 00 50 20 41 54 54 46 4d 54 20   ┆750    :   PBUD743   L   PBUD744   Z   P B BUD750    h   PBUD745   z   P ATTFMT ┆

Reduced view