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

⟦6ffbafab4⟧

    Length: 26814 (0x68be)
    Notes: pts_type(SC)
    Names: »BUDGET.SC«

Derivation

└─⟦26dca8ec8⟧ Bits:30009711 Philips computer tape "RÅKON-DIVFMT"
    └─⟦this⟧ »REMIT2/BUDGET.SC« 

PTS(SC)

 IDENT BUDGET 820804 NJ 
 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 
 B BUD749A
BUD741
 ATTFMT BU41FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR41GEN 
 B BUD749A
BUD742
 ATTFMT BU42FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR42GEN 
 B BUD749A
BUD743
BUD744
 B BUD750 
BUD745
 ATTFMT BU45FRM 
 PERF SETDEB
 PERF MOV56INV
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR45GEN 
 B BUD749A
BUD746
 ATTFMT BU46FRM 
 PERF SETDEB
 PERF MOV56INV
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR45GEN 
 B BUD749A
BUD747
 ATTFMT BU47FRM 
 PERF SETDEB
 PERF MOV56INV
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR47GEN 
 B BUD749A
BUD748
 ATTFMT BU48FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR48GEN 
 B BUD749A
BUD749
 ATTFMT BU49FRM 
 PERF SETDEB
 PERF SPCLRN
 CBNE SPBINW2,CBIN3,BUD750
 PERF TR49GEN 
BUD749A 
 PERF DELRECS 
BUD750
 B BUD700 
BUD760
 CALL FMOVE,GTSTRFMT,STJFRM 
 PERF BUWRIT
 B BUD000 

BUD900
* PRINT LOGFILE, INSERT HEADERS 
 MOVE CBUDPT,CBIN1
PRT022
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT
 BNOK PRT095
 MOVE GSWSTR2,GTREMBUF
 CBE GSWSTR2,='SL',PRT080 EMPTY PRINTFILE 
 CBNE GSWSTR2,='**',PRT024
 ADD CBUDPT,CBIN1 
 B PRT022 
PRT024
 PERF OVSKR 
PRT030
 DLETE GTREMBUF,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 GTREMBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 
 BNOK PRT034 NOT FOUND, TRY TO PRINT
 PERF WAITF,CPFLG 
 MOVE CPCKBUF,GTREMBUF SAVE OLD BUFFER
 MOVE GSWBIN10,GSWBIN1 SAVE POS ON '*'
 MOVE GSWBIN1,=W'128' 
 SUB GSWBIN1,GSWBIN10 
 DLETE GTREMBUF,GSWBIN10,GSWBIN1 DELETE LAST PART 
 PERF GENWRF,GTHCDEV,BUSUB10 PRINT FIRST PART 
 MOVE GTREMBUF,=' ' 
 MOVE GSWBIN1,=W'128' 
 SUB GSWBIN1,GSWBIN10 
 SUB GSWBIN1,CBIN3
 COPY GTREMBUF,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 
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT
 BNOK PRT095
 MOVE GSWSTR2,GTREMBUF
 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 GTREMBUF,=C'SLUTD ' 
 PERF RAWRIT,DK12,=D'12',GTREMBUF,CBIN1 
 BNOK PRT095
 MOVE CBUDPT,CBIN1
 CMP CBIN0,CBIN0
 B PRT099 
PRT095
 MOVE CBUDPT,CBIN0
 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 ?
 MOVE GTREMBUF,=' ' 
 MOVE CBUDPT,CBIN1
 MOVE GSWBIN8,=W'128' 
 PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT
 BNOK BST095
 MOVE GSWSTR20,GTREMBUF 
 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',GTREMBUF,GSWBIN8,CBUDPT
 BNOK BST095
 MOVE GSWSTR20,GTREMBUF 
 CBE GSWSTR20,=C'SLUTD ',BST080 
 ADD CBUDPT,CBIN1 
 B BST045 
BST060			INITIATE 
 MOVE GTREMBUF,=C'SLUTD ' 
 PERF RAWRIT,DK12,=D'12',GTREMBUF,CBUDPT
 BNOK BST095
BST080
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
 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,GTREMBUF
 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 
 EDIT GTREMBUF,GTSTRFMT 
 MOVE GSWSTR2,GTREMBUF
 CBNE GSWSTR2,='**',BUW020
 TBT GTASTFLG,BUW090
BUW020
 CLEAR GTASTFLG 
 ADD CBUDPT,CBIN1 WRITE A NEW SLUTD BEFORE
 MOVE GTREMBUF,=C'SLUTD ' CORRUPTING THE OLD ONE
  PERF RAWRIT,DK12,=D'12',GTREMBUF,CBUDPT 
 BNOK BUW095
 SUB CBUDPT,CBIN1 
 EDIT GTREMBUF,GTSTRFMT 
 PERF RAWRIT,DK12,=D'12',GTREMBUF,CBUDPT
 BNOK BUW095
 ADD CBUDPT,CBIN1 
 MOVE GSWSTR2,GTREMBUF
 CBNE GSWSTR2,='**',BUW090
 SET GTASTFLG 
BUW090
 CMP CBIN0,CBIN0
 B BUW099 
BUW095
 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 TRANSKODE:'
 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'
 FCOPY ='REGKONTONR:' 
 FKI 41,MINL=4,MAXL=10,ME,NUM,REWRT 
 FMEL '999E-999E-99E-99',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




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 '999E-999E-99E-99',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 BUBEL1 
 FNL
 FKI 1,MINL=10,MAXL=10,ME,SCHK=1,NUM,REWRT,APPL=5 
 FMEL '999E-999E-99E-99',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 BUBEL1 
 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 GTREMBUF 
 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…0020 (0, 0, 398)  Head {h00=0x001c, h01=0x0050, text=» IDENT BUDGET 820804 NJ «, t00=0x0000, t01=0x0004}
0x0020…0034              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0024}
0x0034…0042              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0038}
0x0042…0058              Head {h00=0x0012, h01=0x0050, text=» ENTRY BUDREG «, t00=0x0000, t01=0x0046}
0x0058…006c              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0000, t01=0x005c}
0x006c…0080              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0000, t01=0x0070}
0x0080…0092              Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0000, t01=0x0084}
0x0092…00a6              Head {h00=0x0010, h01=0x0050, text=» EXT RAWRIT «, t00=0x0000, t01=0x0096}
0x00a6…00ba              Head {h00=0x0010, h01=0x0050, text=» EXT RAREAD «, t00=0x0000, t01=0x00aa}
0x00ba…00ce              Head {h00=0x0010, h01=0x0050, text=» EXT GENWRS «, t00=0x0000, t01=0x00be}
0x00ce…00e2              Head {h00=0x0010, h01=0x0050, text=» EXT GENWRF «, t00=0x0000, t01=0x00d2}
0x00e2…00f4              Head {h00=0x000e, h01=0x0050, text=» EXT SKIP «, t00=0x0000, t01=0x00e6}
0x00f4…0106              Head {h00=0x000e, h01=0x0050, text=» EXT FMOVE«, t00=0x0000, t01=0x00f8}
0x0106…011a              Head {h00=0x0010, h01=0x0050, text=» EXT FRMBUD «, t00=0x0000, t01=0x010a}
0x011a…012e              Head {h00=0x0010, h01=0x0050, text=» EXT PACKST «, t00=0x0000, t01=0x011e}
0x012e…0142              Head {h00=0x0010, h01=0x0050, text=» EXT WRITFD «, t00=0x0000, t01=0x0132}
0x0142…0156              Head {h00=0x0010, h01=0x0050, text=» EXT PACKCL «, t00=0x0000, t01=0x0146}
0x0156…016a              Head {h00=0x0010, h01=0x0050, text=» EXT NEWLIN «, t00=0x0000, t01=0x015a}
0x016a…017e              Head {h00=0x0010, h01=0x0050, text=» EXT FRMBUP «, t00=0x0000, t01=0x016e}
0x017e…0192              Head {h00=0x0010, h01=0x0050, text=» EXT SETDEB «, t00=0x0000, t01=0x0182}
0x0192…01a6              Head {h00=0x0010, h01=0x0050, text=» EXT RGREAD «, t00=0x0001, t01=0x0008}
0x01a6…01b8              Head {h00=0x000e, h01=0x0050, text=» EXT WAITF«, t00=0x0001, t01=0x001c}
0x01b8…01c6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x002e}
0x01c6…01da              Head {h00=0x0010, h01=0x0050, text=»BUDREG PROC «, t00=0x0001, t01=0x003c}
0x01da…0212              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0001, t01=0x0050}
0x0212…021c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0088}
0x021c…024a              Head {h00=0x002a, h01=0x0050, text=»* THIS PROCEDURE PROCESSES TRANS 40-49«, t00=0x0001, t01=0x0092}
0x024a…0254              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c0}
0x0254…028c              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0001, t01=0x00ca}
0x028c…0294              Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0102}
0x0294…02aa              Head {h00=0x0012, h01=0x0050, text=» TEST CBUDGET «, t00=0x0001, t01=0x010a}
0x02aa…02bc              Head {h00=0x000e, h01=0x0050, text=» BE BUDRET«, t00=0x0001, t01=0x0120}
0x02bc…02d2              Head {h00=0x0012, h01=0x0050, text=» TEST CCONVFLG«, t00=0x0001, t01=0x0132}
0x02d2…02fe              Head {h00=0x0028, h01=0x0050, text=» BNZ BUDRET DATATRANSM OR CONVERSION«, t00=0x0001, t01=0x0148}
0x02fe…0332              Head {h00=0x0030, h01=0x0050, text=» ADD CTASKNR,CBIN1 INDICATE TERMINAL ACTIVE «, t00=0x0001, t01=0x0174}
0x0332…035a              Head {h00=0x0024, h01=0x0050, text=» PERF BUDSTRT RESTART ON 1. CALL«, t00=0x0002, t01=0x0018}
0x035a…036e              Head {h00=0x0010, h01=0x0050, text=» BNOK BUDEND«, t00=0x0002, t01=0x0040}
0x036e…0386              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTASTFLG «, t00=0x0002, t01=0x0054}
0x0386…0394              Head {h00=0x000a, h01=0x0050, text=»BUD000«, t00=0x0002, t01=0x006c}
0x0394…03aa              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0002, t01=0x007a}
0x03aa…03c2              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU00FRMT«, t00=0x0002, t01=0x0090}
0x03c2…03d0              Head {h00=0x000a, h01=0x0050, text=»BUD010«, t00=0x0002, t01=0x00a8}
0x03d0…03e4              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0002, t01=0x00b6}
0x03e4…041e              Head {h00=0x0036, h01=0x0050, text=» IB SPBINW2,BUD000,BUDEND,BUD050,BUD700,BUDEND,  C«, t00=0x0002, t01=0x00ca}
0x041e…0444              Head {h00=0x0022, h01=0x0050, text=»  BUDEND,BUDEND,BUDEND,BUD900 «, t00=0x0002, t01=0x0104}
0x0444…0462              Head {h00=0x001a, h01=0x0050, text=» B BUD000 INVALID KEY «, t00=0x0002, t01=0x012a}
0x0462…0470              Head {h00=0x000a, h01=0x0050, text=»BUD050«, t00=0x0002, t01=0x0148}
0x0470…0486              Head {h00=0x0012, h01=0x0050, text=» PERF NULSTIL «, t00=0x0002, t01=0x0156}
0x0486…04a2              Head {h00=0x0018, h01=0x0050, text=» MOVE GTANTAL,=D'0' «, t00=0x0002, t01=0x016c}
0x04a2…04c0              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x0002, t01=0x0188}
0x04c0…04dc              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x0003, t01=0x0016}
0x04dc…0510              Head {h00=0x0030, h01=0x0050, text=» IB GSWBIN1,BUD400,BUD410,BUD420,BUD010,  C «, t00=0x0003, t01=0x0032}
0x0510…0544              Head {h00=0x0030, h01=0x0050, text=»  BUD010,BUD450,BUD460,BUD470,BUD480,BUD490 «, t00=0x0003, t01=0x0066}
0x0544…056a              Head {h00=0x0022, h01=0x0050, text=» B BUD010 INVALID TRANSACTION «, t00=0x0003, t01=0x009a}
0x056a…0572              Head {h00=0x0004, h01=0x0050, t00=0x0003, t01=0x00c0}
0x0572…0580              Head {h00=0x000a, h01=0x0050, text=»BUD400«, t00=0x0003, t01=0x00c8}
0x0580…0598              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU40FRM «, t00=0x0003, t01=0x00d6}
0x0598…05a6              Head {h00=0x000a, h01=0x0050, text=»BUD401«, t00=0x0003, t01=0x00ee}
0x05a6…05e4              Head {h00=0x003a, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) RESTORE FIRST YEAR«, t00=0x0003, t01=0x00fc}
0x05e4…0606              Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN14),=D'1' «, t00=0x0003, t01=0x013a}
0x0606…0620              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0003, t01=0x015c}
0x0620…0634              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0003, t01=0x0176}
0x0634…0648              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0003, t01=0x018a}
0x0648…066a              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0004, t01=0x000e}
0x066a…0680              Head {h00=0x0012, h01=0x0050, text=» PERF TR40GEN «, t00=0x0004, t01=0x0030}
0x0680…0692              Head {h00=0x000e, h01=0x0050, text=» B BUD401 «, t00=0x0004, t01=0x0046}
0x0692…069a              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0058}
0x069a…06a2              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0060}
0x06a2…06b0              Head {h00=0x000a, h01=0x0050, text=»BUD410«, t00=0x0004, t01=0x0068}
0x06b0…06c8              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU41FRM «, t00=0x0004, t01=0x0076}
0x06c8…06d6              Head {h00=0x000a, h01=0x0050, text=»BUD411«, t00=0x0004, t01=0x008e}
0x06d6…0702              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) «, t00=0x0004, t01=0x009c}
0x0702…0724              Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN14),=D'1' «, t00=0x0004, t01=0x00c8}
0x0724…073e              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0004, t01=0x00ea}
0x073e…0752              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0004, t01=0x0104}
0x0752…0766              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0004, t01=0x0118}
0x0766…0788              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0004, t01=0x012c}
0x0788…079e              Head {h00=0x0012, h01=0x0050, text=» PERF TR41GEN «, t00=0x0004, t01=0x014e}
0x079e…07b0              Head {h00=0x000e, h01=0x0050, text=» B BUD411 «, t00=0x0004, t01=0x0164}
0x07b0…07b8              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x0176}
0x07b8…07c0              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x017e}
0x07c0…07ce              Head {h00=0x000a, h01=0x0050, text=»BUD420«, t00=0x0004, t01=0x0186}
0x07ce…07e6 (5, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU42FRM «, t00=0x0005, t01=0x0004}
0x07e6…07f4              Head {h00=0x000a, h01=0x0050, text=»BUD421«, t00=0x0005, t01=0x001c}
0x07f4…0820              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) «, t00=0x0005, t01=0x002a}
0x0820…0842              Head {h00=0x001e, h01=0x0050, text=» SUB GTDUPF(CBIN14),=D'1' «, t00=0x0005, t01=0x0056}
0x0842…0856              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0005, t01=0x0078}
0x0856…0870              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0005, t01=0x008c}
0x0870…0884              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0005, t01=0x00a6}
0x0884…08a6              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0005, t01=0x00ba}
0x08a6…08bc              Head {h00=0x0012, h01=0x0050, text=» PERF TR42GEN «, t00=0x0005, t01=0x00dc}
0x08bc…08ce              Head {h00=0x000e, h01=0x0050, text=» B BUD421 «, t00=0x0005, t01=0x00f2}
0x08ce…08d6              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x0104}
0x08d6…08de              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x010c}
0x08de…08ec              Head {h00=0x000a, h01=0x0050, text=»BUD450«, t00=0x0005, t01=0x0114}
0x08ec…0904              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU45FRM «, t00=0x0005, t01=0x0122}
0x0904…0912              Head {h00=0x000a, h01=0x0050, text=»BUD451«, t00=0x0005, t01=0x013a}
0x0912…092c              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0005, t01=0x0148}
0x092c…0940              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0005, t01=0x0162}
0x0940…0954              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0005, t01=0x0176}
0x0954…0976              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0005, t01=0x018a}
0x0976…098c              Head {h00=0x0012, h01=0x0050, text=» PERF TR45GEN «, t00=0x0006, t01=0x001c}
0x098c…09a4              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0006, t01=0x0032}
0x09a4…09b6              Head {h00=0x000e, h01=0x0050, text=» B BUD451 «, t00=0x0006, t01=0x004a}
0x09b6…09be              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x005c}
0x09be…09c6              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x0064}
0x09c6…09d4              Head {h00=0x000a, h01=0x0050, text=»BUD460«, t00=0x0006, t01=0x006c}
0x09d4…09ec              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU46FRM «, t00=0x0006, t01=0x007a}
0x09ec…09fa              Head {h00=0x000a, h01=0x0050, text=»BUD461«, t00=0x0006, t01=0x0092}
0x09fa…0a14              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0006, t01=0x00a0}
0x0a14…0a28              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0006, t01=0x00ba}
0x0a28…0a3c              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0006, t01=0x00ce}
0x0a3c…0a5e              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0006, t01=0x00e2}
0x0a5e…0a74              Head {h00=0x0012, h01=0x0050, text=» PERF TR46GEN «, t00=0x0006, t01=0x0104}
0x0a74…0a8c              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0006, t01=0x011a}
0x0a8c…0a9e              Head {h00=0x000e, h01=0x0050, text=» B BUD461 «, t00=0x0006, t01=0x0132}
0x0a9e…0aa6              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x0144}
0x0aa6…0aae              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x014c}
0x0aae…0abc              Head {h00=0x000a, h01=0x0050, text=»BUD470«, t00=0x0006, t01=0x0154}
0x0abc…0ad4              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU47FRM «, t00=0x0006, t01=0x0162}
0x0ad4…0ae2              Head {h00=0x000a, h01=0x0050, text=»BUD471«, t00=0x0006, t01=0x017a}
0x0ae2…0afc              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0006, t01=0x0188}
0x0afc…0b10              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0007, t01=0x0012}
0x0b10…0b24              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0007, t01=0x0026}
0x0b24…0b46              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0007, t01=0x003a}
0x0b46…0b5c              Head {h00=0x0012, h01=0x0050, text=» PERF TR47GEN «, t00=0x0007, t01=0x005c}
0x0b5c…0b74              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0007, t01=0x0072}
0x0b74…0b86              Head {h00=0x000e, h01=0x0050, text=» B BUD471 «, t00=0x0007, t01=0x008a}
0x0b86…0b8e              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x009c}
0x0b8e…0b96              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x00a4}
0x0b96…0ba4              Head {h00=0x000a, h01=0x0050, text=»BUD480«, t00=0x0007, t01=0x00ac}
0x0ba4…0bbc              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU48FRM «, t00=0x0007, t01=0x00ba}
0x0bbc…0bca              Head {h00=0x000a, h01=0x0050, text=»BUD481«, t00=0x0007, t01=0x00d2}
0x0bca…0be4              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0007, t01=0x00e0}
0x0be4…0bf8              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0007, t01=0x00fa}
0x0bf8…0c0c              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0007, t01=0x010e}
0x0c0c…0c2e              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0007, t01=0x0122}
0x0c2e…0c44              Head {h00=0x0012, h01=0x0050, text=» PERF TR48GEN «, t00=0x0007, t01=0x0144}
0x0c44…0c5c              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0007, t01=0x015a}
0x0c5c…0c6e              Head {h00=0x000e, h01=0x0050, text=» B BUD481 «, t00=0x0007, t01=0x0172}
0x0c6e…0c76              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x0184}
0x0c76…0c7e              Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x018c}
0x0c7e…0c8c (8, 0, 400)  Head {h00=0x000a, h01=0x0050, text=»BUD490«, t00=0x0008, t01=0x0004}
0x0c8c…0ca4              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU49FRM «, t00=0x0008, t01=0x0012}
0x0ca4…0cb2              Head {h00=0x000a, h01=0x0050, text=»BUD491«, t00=0x0008, t01=0x002a}
0x0cb2…0ccc              Head {h00=0x0016, h01=0x0050, text=» ADD GTANTAL,=D'1'«, t00=0x0008, t01=0x0038}
0x0ccc…0ce0              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x0008, t01=0x0052}
0x0ce0…0cf4              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0008, t01=0x0066}
0x0cf4…0d16              Head {h00=0x001e, h01=0x0050, text=» IB SPBINW2,BUD000,BUD500 «, t00=0x0008, t01=0x007a}
0x0d16…0d2c              Head {h00=0x0012, h01=0x0050, text=» PERF TR49GEN «, t00=0x0008, t01=0x009c}
0x0d2c…0d44              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0008, t01=0x00b2}
0x0d44…0d56              Head {h00=0x000e, h01=0x0050, text=» B BUD491 «, t00=0x0008, t01=0x00ca}
0x0d56…0d5e              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00dc}
0x0d5e…0d66              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00e4}
0x0d66…0d74              Head {h00=0x000a, h01=0x0050, text=»BUD500«, t00=0x0008, t01=0x00ec}
0x0d74…0d92              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x0008, t01=0x00fa}
0x0d92…0dc8              Head {h00=0x0032, h01=0x0050, text=» SUB GSWBIN1,=W'29' FIND FORMAT FOR TOTALLINE «, t00=0x0008, t01=0x0118}
0x0dc8…0de4              Head {h00=0x0018, h01=0x0050, text=» PERF FRMBUD,GSWBIN1«, t00=0x0008, t01=0x014e}
0x0de4…0df8              Head {h00=0x0010, h01=0x0050, text=» PERF BUWRIT«, t00=0x0008, t01=0x016a}
0x0df8…0e1c              Head {h00=0x0020, h01=0x0050, text=» CALL FMOVE,GTSTRFMT,STJFRM «, t00=0x0008, t01=0x017e}
0x0e1c…0e46              Head {h00=0x0026, h01=0x0050, text=» PERF BUWRIT INDICATE TRANSCHANGE «, t00=0x0009, t01=0x0012}
0x0e46…0e58              Head {h00=0x000e, h01=0x0050, text=» B BUD000 «, t00=0x0009, t01=0x003c}
0x0e58…0e60              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x004e}
0x0e60…0e68              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0056}
0x0e68…0e76              Head {h00=0x000a, h01=0x0050, text=»BUD700«, t00=0x0009, t01=0x005e}
0x0e76…0eb4              Head {h00=0x003a, h01=0x0050, text=»* THE PART OF THE PROGRAM SEEKS FOR REG. TRANSACTIONS «, t00=0x0009, t01=0x006c}
0x0eb4…0ee4              Head {h00=0x002c, h01=0x0050, text=»* THE TRANS WILL BE DISPLAYED AND CAN BE«, t00=0x0009, t01=0x00aa}
0x0ee4…0f1c              Head {h00=0x0034, h01=0x0050, text=»* CORRECTED. AFTERWARDS IT WILL BE WRITTEN BACK «, t00=0x0009, t01=0x00da}
0x0f1c…0f34              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BUSPFRMT«, t00=0x0009, t01=0x0112}
0x0f34…0f4a              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0009, t01=0x012a}
0x0f4a…0f5e              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x0009, t01=0x0140}
0x0f5e…0f86              Head {h00=0x0024, h01=0x0050, text=» IB SPBINW2,BUD700,BUD760,BUD710«, t00=0x0009, t01=0x0154}
0x0f86…0f98              Head {h00=0x000e, h01=0x0050, text=» B BUD700 «, t00=0x0009, t01=0x017c}
0x0f98…0fa6              Head {h00=0x000a, h01=0x0050, text=»BUD710«, t00=0x0009, t01=0x018e}
0x0fa6…0fd2              Head {h00=0x0028, h01=0x0050, text=»* GSWBCD6 CONTAINS TRANSCODE (40-49)«, t00=0x000a, t01=0x000c}
0x0fd2…0ff8              Head {h00=0x0022, h01=0x0050, text=»* GSWBCD7 CONTAINS REGKONTONR «, t00=0x000a, t01=0x0038}
0x0ff8…1014              Head {h00=0x0018, h01=0x0050, text=» MOVE GTRECNR,CRECNR«, t00=0x000a, t01=0x005e}
0x1014…1022              Head {h00=0x000a, h01=0x0050, text=»BUD712«, t00=0x000a, t01=0x007a}
0x1022…1048              Head {h00=0x0022, h01=0x0050, text=» SUB GTRECNR,CBIN1 NEXT RECORD«, t00=0x000a, t01=0x0088}
0x1048…1076              Head {h00=0x002a, h01=0x0050, text=» CBNG GTRECNR,CBIN1,BUD750 FINISHED ? «, t00=0x000a, t01=0x00ae}
0x1076…10a8              Head {h00=0x002e, h01=0x0050, text=» PERF RGREAD,DK02,=D'2',CBIN2 READ RECORD «, t00=0x000a, t01=0x00dc}
0x10a8…10bc              Head {h00=0x0010, h01=0x0050, text=» BOK BUD730 «, t00=0x000a, t01=0x010e}
0x10bc…10ce              Head {h00=0x000e, h01=0x0050, text=» B BUD712 «, t00=0x000a, t01=0x0122}
0x10ce…10dc              Head {h00=0x000a, h01=0x0050, text=»BUD730«, t00=0x000a, t01=0x0134}
0x10dc…1100              Head {h00=0x0020, h01=0x0050, text=» CBNE GTREGNR,GSWBCD6,BUD712«, t00=0x000a, t01=0x0142}
0x1100…112a              Head {h00=0x0026, h01=0x0050, text=» CBNE GTREGF(CBIN1),GSWBCD7,BUD712«, t00=0x000a, t01=0x0166}
0x112a…1134              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0190}
0x1134…114a              Head {h00=0x0012, h01=0x0050, text=» PERF NULSTIL «, t00=0x000b, t01=0x000a}
0x114a…1168              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x000b, t01=0x0020}
0x1168…1184              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x000b, t01=0x003e}
0x1184…119c              Head {h00=0x0014, h01=0x0050, text=» CLEAR TTEORFLG «, t00=0x000b, t01=0x005a}
0x119c…11d6              Head {h00=0x0036, h01=0x0050, text=» IB GSWBIN1,BUD740,BUD741,BUD742,BUD743,BUD744,  C«, t00=0x000b, t01=0x0072}
0x11d6…1202              Head {h00=0x0028, h01=0x0050, text=»  BUD745,BUD746,BUD747,BUD748,BUD749«, t00=0x000b, t01=0x00ac}
0x1202…1210              Head {h00=0x000a, h01=0x0050, text=»BUD740«, t00=0x000b, t01=0x00d8}
0x1210…1228              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU40FRM «, t00=0x000b, t01=0x00e6}
0x1228…123c              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000b, t01=0x00fe}
0x123c…1250              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000b, t01=0x0112}
0x1250…1272              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000b, t01=0x0126}
0x1272…1288              Head {h00=0x0012, h01=0x0050, text=» PERF TR40GEN «, t00=0x000b, t01=0x0148}
0x1288…129a              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000b, t01=0x015e}
0x129a…12a8              Head {h00=0x000a, h01=0x0050, text=»BUD741«, t00=0x000b, t01=0x0170}
0x12a8…12c0              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU41FRM «, t00=0x000b, t01=0x017e}
0x12c0…12d4              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000c, t01=0x0008}
0x12d4…12e8              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000c, t01=0x001c}
0x12e8…130a              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000c, t01=0x0030}
0x130a…1320              Head {h00=0x0012, h01=0x0050, text=» PERF TR41GEN «, t00=0x000c, t01=0x0052}
0x1320…1332              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000c, t01=0x0068}
0x1332…1340              Head {h00=0x000a, h01=0x0050, text=»BUD742«, t00=0x000c, t01=0x007a}
0x1340…1358              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU42FRM «, t00=0x000c, t01=0x0088}
0x1358…136c              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000c, t01=0x00a0}
0x136c…1380              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000c, t01=0x00b4}
0x1380…13a2              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000c, t01=0x00c8}
0x13a2…13b8              Head {h00=0x0012, h01=0x0050, text=» PERF TR42GEN «, t00=0x000c, t01=0x00ea}
0x13b8…13ca              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000c, t01=0x0100}
0x13ca…13d8              Head {h00=0x000a, h01=0x0050, text=»BUD743«, t00=0x000c, t01=0x0112}
0x13d8…13e6              Head {h00=0x000a, h01=0x0050, text=»BUD744«, t00=0x000c, t01=0x0120}
0x13e6…13f8              Head {h00=0x000e, h01=0x0050, text=» B BUD750 «, t00=0x000c, t01=0x012e}
0x13f8…1406              Head {h00=0x000a, h01=0x0050, text=»BUD745«, t00=0x000c, t01=0x0140}
0x1406…141e              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU45FRM «, t00=0x000c, t01=0x014e}
0x141e…1432              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000c, t01=0x0166}
0x1432…1448              Head {h00=0x0012, h01=0x0050, text=» PERF MOV56INV«, t00=0x000c, t01=0x017a}
0x1448…145c              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000c, t01=0x0190}
0x145c…147e              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000d, t01=0x0014}
0x147e…1494              Head {h00=0x0012, h01=0x0050, text=» PERF TR45GEN «, t00=0x000d, t01=0x0036}
0x1494…14a6              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000d, t01=0x004c}
0x14a6…14b4              Head {h00=0x000a, h01=0x0050, text=»BUD746«, t00=0x000d, t01=0x005e}
0x14b4…14cc              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU46FRM «, t00=0x000d, t01=0x006c}
0x14cc…14e0              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000d, t01=0x0084}
0x14e0…14f6              Head {h00=0x0012, h01=0x0050, text=» PERF MOV56INV«, t00=0x000d, t01=0x0098}
0x14f6…150a              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000d, t01=0x00ae}
0x150a…152c              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000d, t01=0x00c2}
0x152c…1542              Head {h00=0x0012, h01=0x0050, text=» PERF TR45GEN «, t00=0x000d, t01=0x00e4}
0x1542…1554              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000d, t01=0x00fa}
0x1554…1562              Head {h00=0x000a, h01=0x0050, text=»BUD747«, t00=0x000d, t01=0x010c}
0x1562…157a              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU47FRM «, t00=0x000d, t01=0x011a}
0x157a…158e              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000d, t01=0x0132}
0x158e…15a4              Head {h00=0x0012, h01=0x0050, text=» PERF MOV56INV«, t00=0x000d, t01=0x0146}
0x15a4…15b8              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000d, t01=0x015c}
0x15b8…15da              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000d, t01=0x0170}
0x15da…15f0 (14, 0, 400) Head {h00=0x0012, h01=0x0050, text=» PERF TR47GEN «, t00=0x000e, t01=0x0004}
0x15f0…1602              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000e, t01=0x001a}
0x1602…1610              Head {h00=0x000a, h01=0x0050, text=»BUD748«, t00=0x000e, t01=0x002c}
0x1610…1628              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU48FRM «, t00=0x000e, t01=0x003a}
0x1628…163c              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x0052}
0x163c…1650              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000e, t01=0x0066}
0x1650…1672              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000e, t01=0x007a}
0x1672…1688              Head {h00=0x0012, h01=0x0050, text=» PERF TR48GEN «, t00=0x000e, t01=0x009c}
0x1688…169a              Head {h00=0x000e, h01=0x0050, text=» B BUD749A«, t00=0x000e, t01=0x00b2}
0x169a…16a8              Head {h00=0x000a, h01=0x0050, text=»BUD749«, t00=0x000e, t01=0x00c4}
0x16a8…16c0              Head {h00=0x0014, h01=0x0050, text=» ATTFMT BU49FRM «, t00=0x000e, t01=0x00d2}
0x16c0…16d4              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x00ea}
0x16d4…16e8              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRN«, t00=0x000e, t01=0x00fe}
0x16e8…170a              Head {h00=0x001e, h01=0x0050, text=» CBNE SPBINW2,CBIN3,BUD750«, t00=0x000e, t01=0x0112}
0x170a…1720              Head {h00=0x0012, h01=0x0050, text=» PERF TR49GEN «, t00=0x000e, t01=0x0134}
0x1720…1730              Head {h00=0x000c, h01=0x0050, text=»BUD749A «, t00=0x000e, t01=0x014a}
0x1730…1746              Head {h00=0x0012, h01=0x0050, text=» PERF DELRECS «, t00=0x000e, t01=0x015a}
0x1746…1754              Head {h00=0x000a, h01=0x0050, text=»BUD750«, t00=0x000e, t01=0x0170}
0x1754…1766              Head {h00=0x000e, h01=0x0050, text=» B BUD700 «, t00=0x000e, t01=0x017e}
0x1766…1774              Head {h00=0x000a, h01=0x0050, text=»BUD760«, t00=0x000e, t01=0x0190}
0x1774…1798              Head {h00=0x0020, h01=0x0050, text=» CALL FMOVE,GTSTRFMT,STJFRM «, t00=0x000f, t01=0x000e}
0x1798…17ac              Head {h00=0x0010, h01=0x0050, text=» PERF BUWRIT«, t00=0x000f, t01=0x0032}
0x17ac…17be              Head {h00=0x000e, h01=0x0050, text=» B BUD000 «, t00=0x000f, t01=0x0046}
0x17be…17c6              Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0058}
0x17c6…17d4              Head {h00=0x000a, h01=0x0050, text=»BUD900«, t00=0x000f, t01=0x0060}
0x17d4…17fc              Head {h00=0x0024, h01=0x0050, text=»* PRINT LOGFILE, INSERT HEADERS «, t00=0x000f, t01=0x006e}
0x17fc…1816              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN1«, t00=0x000f, t01=0x0096}
0x1816…1824              Head {h00=0x000a, h01=0x0050, text=»PRT022«, t00=0x000f, t01=0x00b0}
0x1824…1842              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x000f, t01=0x00be}
0x1842…187a              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT«, t00=0x000f, t01=0x00dc}
0x187a…188e              Head {h00=0x0010, h01=0x0050, text=» BNOK PRT095«, t00=0x000f, t01=0x0114}
0x188e…18ac              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,GTREMBUF«, t00=0x000f, t01=0x0128}
0x18ac…18de              Head {h00=0x002e, h01=0x0050, text=» CBE GSWSTR2,='SL',PRT080 EMPTY PRINTFILE «, t00=0x000f, t01=0x0146}
0x18de…1900              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',PRT024«, t00=0x000f, t01=0x0178}
0x1900…191a              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0010, t01=0x000a}
0x191a…192c              Head {h00=0x000e, h01=0x0050, text=» B PRT022 «, t00=0x0010, t01=0x0024}
0x192c…193a              Head {h00=0x000a, h01=0x0050, text=»PRT024«, t00=0x0010, t01=0x0036}
0x193a…194e              Head {h00=0x0010, h01=0x0050, text=» PERF OVSKR «, t00=0x0010, t01=0x0044}
0x194e…195c              Head {h00=0x000a, h01=0x0050, text=»PRT030«, t00=0x0010, t01=0x0058}
0x195c…1980              Head {h00=0x0020, h01=0x0050, text=» DLETE GTREMBUF,CBIN0,CBIN2 «, t00=0x0010, t01=0x0066}
0x1980…19bc              Head {h00=0x0038, h01=0x0050, text=» IB GSWBIN10,PRT031,PRT031,PRT031,PRT034,PRT034,  C «, t00=0x0010, t01=0x008a}
0x19bc…19e8              Head {h00=0x0028, h01=0x0050, text=»  PRT034,PRT034,PRT034,PRT034,PRT034«, t00=0x0010, t01=0x00c6}
0x19e8…1a1e              Head {h00=0x0032, h01=0x0050, text=»* THIS PIECE OF CODING SPLITS PRINTLINES FROM «, t00=0x0010, t01=0x00f2}
0x1a1e…1a5a              Head {h00=0x0038, h01=0x0050, text=»* THE PRINTFILE (DK12) INTO TWO PHYSICAL PRINTLINES.«, t00=0x0010, t01=0x0128}
0x1a5a…1a68              Head {h00=0x000a, h01=0x0050, text=»PRT031«, t00=0x0010, t01=0x0164}
0x1a68…1a82              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWSTR9,='*'«, t00=0x0010, t01=0x0172}
0x1a82…1a9e              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN0 «, t00=0x0010, t01=0x018c}
0x1a9e…1abc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,=W'128' «, t00=0x0011, t01=0x0018}
0x1abc…1af8              Head {h00=0x0038, h01=0x0050, text=» MATCH GTREMBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 «, t00=0x0011, t01=0x0036}
0x1af8…1b24              Head {h00=0x0028, h01=0x0050, text=» BNOK PRT034 NOT FOUND, TRY TO PRINT«, t00=0x0011, t01=0x0072}
0x1b24…1b3e              Head {h00=0x0016, h01=0x0050, text=» PERF WAITF,CPFLG «, t00=0x0011, t01=0x009e}
0x1b3e…1b6c              Head {h00=0x002a, h01=0x0050, text=» MOVE CPCKBUF,GTREMBUF SAVE OLD BUFFER«, t00=0x0011, t01=0x00b8}
0x1b6c…1b9a              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWBIN10,GSWBIN1 SAVE POS ON '*'«, t00=0x0011, t01=0x00e6}
0x1b9a…1bb8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0011, t01=0x0114}
0x1bb8…1bd6              Head {h00=0x001a, h01=0x0050, text=» SUB GSWBIN1,GSWBIN10 «, t00=0x0011, t01=0x0132}
0x1bd6…1c10              Head {h00=0x0036, h01=0x0050, text=» DLETE GTREMBUF,GSWBIN10,GSWBIN1 DELETE LAST PART «, t00=0x0011, t01=0x0150}
0x1c10…1c46              Head {h00=0x0032, h01=0x0050, text=» PERF GENWRF,GTHCDEV,BUSUB10 PRINT FIRST PART «, t00=0x0011, t01=0x018a}
0x1c46…1c62              Head {h00=0x0018, h01=0x0050, text=» MOVE GTREMBUF,=' ' «, t00=0x0012, t01=0x0030}
0x1c62…1c80              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0012, t01=0x004c}
0x1c80…1c9e              Head {h00=0x001a, h01=0x0050, text=» SUB GSWBIN1,GSWBIN10 «, t00=0x0012, t01=0x006a}
0x1c9e…1cb8              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN1,CBIN3«, t00=0x0012, t01=0x0088}
0x1cb8…1cee              Head {h00=0x0032, h01=0x0050, text=» COPY GTREMBUF,CBIN0,GSWBIN1,CPCKBUF,GSWBIN10 «, t00=0x0012, t01=0x00a2}
0x1cee…1d12              Head {h00=0x0020, h01=0x0050, text=» CLEAR CPFLG RELEASE BUFFER «, t00=0x0012, t01=0x00d8}
0x1d12…1d40              Head {h00=0x002a, h01=0x0050, text=» ADD GTLINE,CBIN2 ADJUST LINE COUNTER «, t00=0x0012, t01=0x00fc}
0x1d40…1d4e              Head {h00=0x000a, h01=0x0050, text=»PRT034«, t00=0x0012, t01=0x012a}
0x1d4e…1d72              Head {h00=0x0020, h01=0x0050, text=» PERF GENWRF,GTHCDEV,BUSUB10«, t00=0x0012, t01=0x0138}
0x1d72…1d8c              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0012, t01=0x015c}
0x1d8c…1da6              Head {h00=0x0016, h01=0x0050, text=» ADD GTLINE,CBIN2 «, t00=0x0012, t01=0x0176}
0x1da6…1dc4              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x0012, t01=0x0190}
0x1dc4…1dfc              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT«, t00=0x0013, t01=0x001e}
0x1dfc…1e10              Head {h00=0x0010, h01=0x0050, text=» BNOK PRT095«, t00=0x0013, t01=0x0056}
0x1e10…1e2e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,GTREMBUF«, t00=0x0013, t01=0x006a}
0x1e2e…1e50              Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR2,='SL',PRT080 «, t00=0x0013, t01=0x0088}
0x1e50…1e7c              Head {h00=0x0028, h01=0x0050, text=» CBE GSWSTR2,='**',PRT040 NEW PAGE ?«, t00=0x0013, t01=0x00aa}
0x1e7c…1e9e              Head {h00=0x001e, h01=0x0050, text=» CBNL GTLINE,=W'43',PRT035«, t00=0x0013, t01=0x00d6}
0x1e9e…1ebc              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD2,GSWSTR2 «, t00=0x0013, t01=0x00f8}
0x1ebc…1eda              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN10,GSWBCD2«, t00=0x0013, t01=0x0116}
0x1eda…1ef6              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN10,=W'39'«, t00=0x0013, t01=0x0134}
0x1ef6…1f08              Head {h00=0x000e, h01=0x0050, text=» B PRT030 «, t00=0x0013, t01=0x0150}
0x1f08…1f16              Head {h00=0x000a, h01=0x0050, text=»PRT035«, t00=0x0013, t01=0x0162}
0x1f16…1f32              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBCD5,=D'1' «, t00=0x0013, t01=0x0170}
0x1f32…1f44              Head {h00=0x000e, h01=0x0050, text=» PERF SKIP«, t00=0x0013, t01=0x018c}
0x1f44…1f66              Head {h00=0x001e, h01=0x0050, text=» CBE GSWSTR2,='SL',PRT080 «, t00=0x0014, t01=0x000e}
0x1f66…1f88              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',PRT024«, t00=0x0014, t01=0x0030}
0x1f88…1fa2              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0014, t01=0x0052}
0x1fa2…1fb4              Head {h00=0x000e, h01=0x0050, text=» B PRT022 «, t00=0x0014, t01=0x006c}
0x1fb4…1fc2              Head {h00=0x000a, h01=0x0050, text=»PRT040«, t00=0x0014, t01=0x007e}
0x1fc2…1fe0              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN10,=W'43' «, t00=0x0014, t01=0x008c}
0x1fe0…201c              Head {h00=0x0038, h01=0x0050, text=» SUB GSWBIN10,GTLINE HOW MANY NEW LINES DO WE NEED? «, t00=0x0014, t01=0x00aa}
0x201c…203a              Head {h00=0x001a, h01=0x0050, text=» PERF NEWLIN,GSWBIN10 «, t00=0x0014, t01=0x00e6}
0x203a…204c              Head {h00=0x000e, h01=0x0050, text=» B PRT035 «, t00=0x0014, t01=0x0104}
0x204c…205a              Head {h00=0x000a, h01=0x0050, text=»PRT080«, t00=0x0014, t01=0x0116}
0x205a…207a              Head {h00=0x001c, h01=0x0018, text=»* RESET VARIOUS POINTERS«, t00=0x0014, t01=0x0124}
0x207a…209c              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREMBUF,=C'SLUTD ' «, t00=0x0014, t01=0x0144}
0x209c…20cc              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK12,=D'12',GTREMBUF,CBIN1 «, t00=0x0014, t01=0x0166}
0x20cc…20e0              Head {h00=0x0010, h01=0x0050, text=» BNOK PRT095«, t00=0x0015, t01=0x0008}
0x20e0…20fa              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN1«, t00=0x0015, t01=0x001c}
0x20fa…2112              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0015, t01=0x0036}
0x2112…2124              Head {h00=0x000e, h01=0x0050, text=» B PRT099 «, t00=0x0015, t01=0x004e}
0x2124…2132              Head {h00=0x000a, h01=0x0050, text=»PRT095«, t00=0x0015, t01=0x0060}
0x2132…214c              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN0«, t00=0x0015, t01=0x006e}
0x214c…2164              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0015, t01=0x0088}
0x2164…2172              Head {h00=0x000a, h01=0x0050, text=»PRT099«, t00=0x0015, t01=0x00a0}
0x2172…2184              Head {h00=0x000e, h01=0x0009, text=» B BUD000 «, t00=0x0015, t01=0x00ae}
0x2184…218c              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x00c0}
0x218c…219a              Head {h00=0x000a, h01=0x0050, text=»BUDEND«, t00=0x0015, t01=0x00c8}
0x219a…21ca              Head {h00=0x002c, h01=0x0050, text=» SUB CTASKNR,CBIN1 REMOVE FROM ACTIVITY «, t00=0x0015, t01=0x00d6}
0x21ca…21de              Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x0015, t01=0x0106}
0x21de…21f6              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTASTFLG «, t00=0x0015, t01=0x011a}
0x21f6…2204              Head {h00=0x000a, h01=0x0050, text=»BUDRET«, t00=0x0015, t01=0x0132}
0x2204…2210              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0140}
0x2210…221e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0015, t01=0x014c}
0x221e…222c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x015a}
0x222c…2240              Head {h00=0x0010, h01=0x000c, text=»BUDSTRT PROC«, t00=0x0015, t01=0x0168}
0x2240…224a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017c}
0x224a…2276              Head {h00=0x0028, h01=0x0050, text=»* THE PROCEDURE HAS TWO OBJECTIVES: «, t00=0x0015, t01=0x0186}
0x2276…22a6              Head {h00=0x002c, h01=0x0050, text=»* 1. WHEN A NEW FLOPPY HAS BEEN LOADED, «, t00=0x0016, t01=0x0022}
0x22a6…22ce              Head {h00=0x0024, h01=0x0050, text=»*    THE FILE WILL BE INITIATED «, t00=0x0016, t01=0x0052}
0x22ce…22f4              Head {h00=0x0022, h01=0x0050, text=»*    (ONLY AFTER PROGRAM-LOAD)«, t00=0x0016, t01=0x007a}
0x22f4…2320              Head {h00=0x0028, h01=0x0050, text=»* 2. WHEN THE PROGRAM IS LOADED AND «, t00=0x0016, t01=0x00a0}
0x2320…234c              Head {h00=0x0028, h01=0x0050, text=»*    THE FILE IS NOT EMPTY, THE PROC«, t00=0x0016, t01=0x00cc}
0x234c…237a              Head {h00=0x002a, h01=0x0050, text=»*    WILL SCAN THE FILE IN SEARCH FOR «, t00=0x0016, t01=0x00f8}
0x237a…23a4              Head {h00=0x0026, h01=0x0050, text=»*    A 'SLUTD' RECORD, AND CBUDPT «, t00=0x0016, t01=0x0126}
0x23a4…23ce              Head {h00=0x0026, h01=0x0050, text=»*    WILL BE UPDATED ACCORDINGLY. «, t00=0x0016, t01=0x0150}
0x23ce…23f6              Head {h00=0x0024, h01=0x0050, text=»* 3. AT LAST SOME FIELDS WILL BE«, t00=0x0016, t01=0x017a}
0x23f6…2424              Head {h00=0x002a, h01=0x0050, text=»*    INITIATED WITH <YEAR-1>, <YEAR>, «, t00=0x0017, t01=0x0012}
0x2424…2442              Head {h00=0x001a, h01=0x0050, text=»*    ......,<YEAR+6>. «, t00=0x0017, t01=0x0040}
0x2442…244c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x005e}
0x244c…2484              Head {h00=0x0034, h01=0x0050, text=» CBNE CBUDPT,CBIN0,BST090 FIRST RUN AFTER LOAD ?«, t00=0x0017, t01=0x0068}
0x2484…24a0              Head {h00=0x0018, h01=0x0050, text=» MOVE GTREMBUF,=' ' «, t00=0x0017, t01=0x00a0}
0x24a0…24ba              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN1«, t00=0x0017, t01=0x00bc}
0x24ba…24d8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x0017, t01=0x00d6}
0x24d8…2510              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT«, t00=0x0017, t01=0x00f4}
0x2510…2524              Head {h00=0x0010, h01=0x0050, text=» BNOK BST095«, t00=0x0017, t01=0x012c}
0x2524…2544              Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,GTREMBUF «, t00=0x0017, t01=0x0140}
0x2544…2576              Head {h00=0x002e, h01=0x0050, text=» CBE GSWSTR20,=C' ',BST060 CLEAN DISKFILE «, t00=0x0017, t01=0x0160}
0x2576…25ac (24, 0, 400) Head {h00=0x0032, h01=0x0050, text=» CBE GSWSTR20,=C'SLUTD ',BST080 READY FOR USE «, t00=0x0018, t01=0x0004}
0x25ac…25c6              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN2«, t00=0x0018, t01=0x003a}
0x25c6…25d4              Head {h00=0x000a, h01=0x0050, text=»BST045«, t00=0x0018, t01=0x0054}
0x25d4…25f2              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN8,=W'128' «, t00=0x0018, t01=0x0062}
0x25f2…262a              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK12,=D'12',GTREMBUF,GSWBIN8,CBUDPT«, t00=0x0018, t01=0x0080}
0x262a…263e              Head {h00=0x0010, h01=0x0050, text=» BNOK BST095«, t00=0x0018, t01=0x00b8}
0x263e…265e              Head {h00=0x001c, h01=0x0050, text=» MOVE GSWSTR20,GTREMBUF «, t00=0x0018, t01=0x00cc}
0x265e…2686              Head {h00=0x0024, h01=0x0050, text=» CBE GSWSTR20,=C'SLUTD ',BST080 «, t00=0x0018, t01=0x00ec}
0x2686…26a0              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0018, t01=0x0114}
0x26a0…26b2              Head {h00=0x000e, h01=0x0050, text=» B BST045 «, t00=0x0018, t01=0x012e}
0x26b2…26cc              Head {h00=0x0016, h01=0x0050, text=»BST060   INITIATE «, t00=0x0018, t01=0x0140}
0x26cc…26ee              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREMBUF,=C'SLUTD ' «, t00=0x0018, t01=0x015a}
0x26ee…271e              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK12,=D'12',GTREMBUF,CBUDPT«, t00=0x0018, t01=0x017c}
0x271e…2732              Head {h00=0x0010, h01=0x0050, text=» BNOK BST095«, t00=0x0019, t01=0x001c}
0x2732…2740              Head {h00=0x000a, h01=0x0050, text=»BST080«, t00=0x0019, t01=0x0030}
0x2740…274e              Head {h00=0x000a, h01=0x0050, text=»BST090«, t00=0x0019, t01=0x003e}
0x274e…2764              Head {h00=0x0012, h01=0x0050, text=»* ISOLATE YEAR«, t00=0x0019, t01=0x004c}
0x2764…278a              Head {h00=0x0022, h01=0x0050, text=» MOVE GSWBCD1,CMASKDAT DDMMYY «, t00=0x0019, t01=0x0062}
0x278a…27ae              Head {h00=0x0020, h01=0x0050, text=» DIV GSWBCD1,=D'100'    DDMM«, t00=0x0019, t01=0x0088}
0x27ae…27d2              Head {h00=0x0020, h01=0x0050, text=» MUL GSWBCD1,=D'100' DDMM00 «, t00=0x0019, t01=0x00ac}
0x27d2…27f0              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD2,CMASKDAT«, t00=0x0019, t01=0x00d0}
0x27f0…2814              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBCD2,GSWBCD1      YY«, t00=0x0019, t01=0x00ee}
0x2814…282e              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBCD2,=D'2'«, t00=0x0019, t01=0x0112}
0x282e…284a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN13«, t00=0x0019, t01=0x012c}
0x284a…2858              Head {h00=0x000a, h01=0x0050, text=»BST092«, t00=0x0019, t01=0x0148}
0x2858…287e              Head {h00=0x0022, h01=0x0050, text=» MOVE GTDUPF(GSWBIN2),GSWBCD2 «, t00=0x0019, t01=0x0156}
0x287e…2898              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN2,CBIN1«, t00=0x0019, t01=0x017c}
0x2898…28b2              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD2,=D'1'«, t00=0x001a, t01=0x0008}
0x28b2…28d4              Head {h00=0x001e, h01=0x0050, text=» CBL GSWBIN2,CBIN22,BST092«, t00=0x001a, t01=0x0022}
0x28d4…28ec              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x001a, t01=0x0044}
0x28ec…28fe              Head {h00=0x000e, h01=0x0050, text=» B BST099 «, t00=0x001a, t01=0x005c}
0x28fe…290c              Head {h00=0x000a, h01=0x0050, text=»BST095«, t00=0x001a, t01=0x006e}
0x290c…2926              Head {h00=0x0016, h01=0x0050, text=» MOVE CBUDPT,CBIN0«, t00=0x001a, t01=0x007c}
0x2926…293e              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x001a, t01=0x0096}
0x293e…294c              Head {h00=0x000a, h01=0x0050, text=»BST099«, t00=0x001a, t01=0x00ae}
0x294c…2958              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x00bc}
0x2958…2966              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x00c8}
0x2966…2974              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00d6}
0x2974…2988              Head {h00=0x0010, h01=0x000c, text=»TR40GEN PROC«, t00=0x001a, t01=0x00e4}
0x2988…29aa              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR40EX «, t00=0x001a, t01=0x00f8}
0x29aa…29be              Head {h00=0x0010, h01=0x0050, text=» PERF TOTADD«, t00=0x001a, t01=0x011a}
0x29be…29d8              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'16'«, t00=0x001a, t01=0x012e}
0x29d8…29ec              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001a, t01=0x0148}
0x29ec…29fa              Head {h00=0x000a, h01=0x0050, text=»TR40EX«, t00=0x001a, t01=0x015c}
0x29fa…2a06              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001a, t01=0x016a}
0x2a06…2a14              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001a, t01=0x0176}
0x2a14…2a1c              Head {h00=0x0004, h01=0x0000, t00=0x001a, t01=0x0184}
0x2a1c…2a30              Head {h00=0x0010, h01=0x000c, text=»TR41GEN PROC«, t00=0x001a, t01=0x018c}
0x2a30…2a52              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR41EX «, t00=0x001b, t01=0x0010}
0x2a52…2a66              Head {h00=0x0010, h01=0x0050, text=» PERF TOTADD«, t00=0x001b, t01=0x0032}
0x2a66…2a80              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'17'«, t00=0x001b, t01=0x0046}
0x2a80…2a94              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001b, t01=0x0060}
0x2a94…2aa2              Head {h00=0x000a, h01=0x0050, text=»TR41EX«, t00=0x001b, t01=0x0074}
0x2aa2…2aae              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001b, t01=0x0082}
0x2aae…2abc              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001b, t01=0x008e}
0x2abc…2ac4              Head {h00=0x0004, h01=0x0000, t00=0x001b, t01=0x009c}
0x2ac4…2acc              Head {h00=0x0004, h01=0x0000, t00=0x001b, t01=0x00a4}
0x2acc…2ae0              Head {h00=0x0010, h01=0x000c, text=»TR42GEN PROC«, t00=0x001b, t01=0x00ac}
0x2ae0…2b02              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR42EX «, t00=0x001b, t01=0x00c0}
0x2b02…2b16              Head {h00=0x0010, h01=0x0050, text=» PERF TOTADD«, t00=0x001b, t01=0x00e2}
0x2b16…2b30              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'18'«, t00=0x001b, t01=0x00f6}
0x2b30…2b44              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001b, t01=0x0110}
0x2b44…2b52              Head {h00=0x000a, h01=0x0050, text=»TR42EX«, t00=0x001b, t01=0x0124}
0x2b52…2b5e              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001b, t01=0x0132}
0x2b5e…2b6c              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001b, t01=0x013e}
0x2b6c…2b74              Head {h00=0x0004, h01=0x0000, t00=0x001b, t01=0x014c}
0x2b74…2b88              Head {h00=0x0010, h01=0x000c, text=»TR45GEN PROC«, t00=0x001b, t01=0x0154}
0x2b88…2baa              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR45EX «, t00=0x001b, t01=0x0168}
0x2baa…2bbe              Head {h00=0x0010, h01=0x0050, text=» PERF MOV56 «, t00=0x001b, t01=0x018a}
0x2bbe…2be8              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN17)«, t00=0x001c, t01=0x000e}
0x2be8…2bfc              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001c, t01=0x0038}
0x2bfc…2c28              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTREGF(CBIN14) «, t00=0x001c, t01=0x004c}
0x2c28…2c42              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'19'«, t00=0x001c, t01=0x0078}
0x2c42…2c50              Head {h00=0x000a, h01=0x0050, text=»TR45EX«, t00=0x001c, t01=0x0092}
0x2c50…2c5c              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001c, t01=0x00a0}
0x2c5c…2c6a              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001c, t01=0x00ac}
0x2c6a…2c72              Head {h00=0x0004, h01=0x0000, t00=0x001c, t01=0x00ba}
0x2c72…2c7a              Head {h00=0x0004, h01=0x0000, t00=0x001c, t01=0x00c2}
0x2c7a…2c8e              Head {h00=0x0010, h01=0x000c, text=»TR46GEN PROC«, t00=0x001c, t01=0x00ca}
0x2c8e…2cb0              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR46EX «, t00=0x001c, t01=0x00de}
0x2cb0…2cc4              Head {h00=0x0010, h01=0x0050, text=» PERF MOV56 «, t00=0x001c, t01=0x0100}
0x2cc4…2cee              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN17)«, t00=0x001c, t01=0x0114}
0x2cee…2d02              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001c, t01=0x013e}
0x2d02…2d2e              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTREGF(CBIN14) «, t00=0x001c, t01=0x0152}
0x2d2e…2d48              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'20'«, t00=0x001c, t01=0x017e}
0x2d48…2d56              Head {h00=0x000a, h01=0x0050, text=»TR46EX«, t00=0x001d, t01=0x0008}
0x2d56…2d62              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001d, t01=0x0016}
0x2d62…2d70              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001d, t01=0x0022}
0x2d70…2d78              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x0030}
0x2d78…2d80              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x0038}
0x2d80…2d94              Head {h00=0x0010, h01=0x000c, text=»TR47GEN PROC«, t00=0x001d, t01=0x0040}
0x2d94…2db6              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR47EX «, t00=0x001d, t01=0x0054}
0x2db6…2dca              Head {h00=0x0010, h01=0x0050, text=» PERF MOV56 «, t00=0x001d, t01=0x0076}
0x2dca…2df4              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN17)«, t00=0x001d, t01=0x008a}
0x2df4…2e08              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001d, t01=0x00b4}
0x2e08…2e34              Head {h00=0x0028, h01=0x0050, text=» MOVE GTDUPF(CBIN14),GTREGF(CBIN14) «, t00=0x001d, t01=0x00c8}
0x2e34…2e4e              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'21'«, t00=0x001d, t01=0x00f4}
0x2e4e…2e5c              Head {h00=0x000a, h01=0x0050, text=»TR47EX«, t00=0x001d, t01=0x010e}
0x2e5c…2e68              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001d, t01=0x011c}
0x2e68…2e76              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001d, t01=0x0128}
0x2e76…2e7e              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x0136}
0x2e7e…2e86              Head {h00=0x0004, h01=0x0000, t00=0x001d, t01=0x013e}
0x2e86…2e9a              Head {h00=0x0010, h01=0x000c, text=»TR48GEN PROC«, t00=0x001d, t01=0x0146}
0x2e9a…2ebc              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR48EX «, t00=0x001d, t01=0x015a}
0x2ebc…2ee6              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN4) «, t00=0x001d, t01=0x017c}
0x2ee6…2f00              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'22'«, t00=0x001e, t01=0x0016}
0x2f00…2f14              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001e, t01=0x0030}
0x2f14…2f22              Head {h00=0x000a, h01=0x0050, text=»TR48EX«, t00=0x001e, t01=0x0044}
0x2f22…2f2e              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001e, t01=0x0052}
0x2f2e…2f3c              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001e, t01=0x005e}
0x2f3c…2f44              Head {h00=0x0004, h01=0x0000, t00=0x001e, t01=0x006c}
0x2f44…2f4c              Head {h00=0x0004, h01=0x0000, t00=0x001e, t01=0x0074}
0x2f4c…2f60              Head {h00=0x0010, h01=0x000c, text=»TR49GEN PROC«, t00=0x001e, t01=0x007c}
0x2f60…2f82              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TR49EX «, t00=0x001e, t01=0x0090}
0x2f82…2fac              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN4) «, t00=0x001e, t01=0x00b2}
0x2fac…2fc6              Head {h00=0x0016, h01=0x0050, text=» PERF TRGEN,=W'23'«, t00=0x001e, t01=0x00dc}
0x2fc6…2fda              Head {h00=0x0010, h01=0x0050, text=» PERF BUEDIT«, t00=0x001e, t01=0x00f6}
0x2fda…2fe8              Head {h00=0x000a, h01=0x0050, text=»TR49EX«, t00=0x001e, t01=0x010a}
0x2fe8…2ff4              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x001e, t01=0x0118}
0x2ff4…3002              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x001e, t01=0x0124}
0x3002…300a              Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x0132}
0x300a…3012              Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x013a}
0x3012…3026              Head {h00=0x0010, h01=0x0050, text=»TOTADD PROC «, t00=0x001e, t01=0x0142}
0x3026…3050              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN14),GTREGF(CBIN3) «, t00=0x001e, t01=0x0156}
0x3050…307a              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN15),GTREGF(CBIN4) «, t00=0x001e, t01=0x0180}
0x307a…30a4              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN16),GTREGF(CBIN5) «, t00=0x001f, t01=0x001a}
0x30a4…30ce              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN17),GTREGF(CBIN6) «, t00=0x001f, t01=0x0044}
0x30ce…30f8              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN18),GTREGF(CBIN7) «, t00=0x001f, t01=0x006e}
0x30f8…3122              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN19),GTREGF(CBIN8) «, t00=0x001f, t01=0x0098}
0x3122…314c              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN20),GTREGF(CBIN9) «, t00=0x001f, t01=0x00c2}
0x314c…3176              Head {h00=0x0026, h01=0x0050, text=» ADD GTREGF(CBIN21),GTREGF(CBIN10)«, t00=0x001f, t01=0x00ec}
0x3176…3182              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001f, t01=0x0116}
0x3182…3190              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001f, t01=0x0122}
0x3190…3198              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0130}
0x3198…31a0              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0138}
0x31a0…31b2              Head {h00=0x000e, h01=0x0050, text=»OVSKR PROC«, t00=0x001f, t01=0x0140}
0x31b2…31d0              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,GTREMBUF«, t00=0x001f, t01=0x0152}
0x31d0…31ee              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBCD2,GSWSTR2 «, t00=0x001f, t01=0x0170}
0x31ee…320c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD2 «, t00=0x001f, t01=0x018e}
0x320c…3228              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x0020, t01=0x001c}
0x3228…3244              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR20,=' ' «, t00=0x0020, t01=0x0038}
0x3244…3262              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN10,GSWBIN1«, t00=0x0020, t01=0x0054}
0x3262…329a              Head {h00=0x0034, h01=0x0050, text=» IB GSWBIN1,OVS40,OVS41,OVS42,OVSERR,OVSERR,  C «, t00=0x0020, t01=0x0072}
0x329a…32c2              Head {h00=0x0024, h01=0x0050, text=»  OVS45,OVS46,OVS47,OVS48,OVS49 «, t00=0x0020, t01=0x00aa}
0x32c2…32d4              Head {h00=0x000e, h01=0x0050, text=» B OVSERR «, t00=0x0020, t01=0x00d2}
0x32d4…32e2              Head {h00=0x000a, h01=0x0050, text=»OVS40 «, t00=0x0020, t01=0x00e4}
0x32e2…3306              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,='BUDGETTAL '«, t00=0x0020, t01=0x00f2}
0x3306…3316              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0020, t01=0x0116}
0x3316…3324              Head {h00=0x000a, h01=0x0050, text=»OVS41 «, t00=0x0020, t01=0x0126}
0x3324…3348              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,='BUDGETTAL '«, t00=0x0020, t01=0x0134}
0x3348…3358              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0020, t01=0x0158}
0x3358…3366              Head {h00=0x000a, h01=0x0050, text=»OVS42 «, t00=0x0020, t01=0x0168}
0x3366…338a              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWSTR20,='BUDGETTAL '«, t00=0x0020, t01=0x0176}
0x338a…339a              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x000a}
0x339a…33a8              Head {h00=0x000a, h01=0x0050, text=»OVS45 «, t00=0x0021, t01=0x001a}
0x33a8…33d6              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR20,='TILL[GSBEV. BUDGET ' «, t00=0x0021, t01=0x0028}
0x33d6…33e6              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x0056}
0x33e6…33f4              Head {h00=0x000a, h01=0x0050, text=»OVS46 «, t00=0x0021, t01=0x0066}
0x33f4…341c              Head {h00=0x0024, h01=0x0050, text=» MOVE GSWSTR20,='OMPLACERINGER '«, t00=0x0021, t01=0x0074}
0x341c…342c              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x009c}
0x342c…343a              Head {h00=0x000a, h01=0x0050, text=»OVS47 «, t00=0x0021, t01=0x00ac}
0x343a…3468              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR20,='SUM AF R]DIGHEDSB. ' «, t00=0x0021, t01=0x00ba}
0x3468…3478              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x00e8}
0x3478…3486              Head {h00=0x000a, h01=0x0050, text=»OVS48 «, t00=0x0021, t01=0x00f8}
0x3486…34b2              Head {h00=0x0028, h01=0x0050, text=» MOVE GSWSTR20,='ANL[GSUDGIFTER-TB '«, t00=0x0021, t01=0x0106}
0x34b2…34c2              Head {h00=0x000c, h01=0x0050, text=» B OVSPR«, t00=0x0021, t01=0x0132}
0x34c2…34d0              Head {h00=0x000a, h01=0x0050, text=»OVS49 «, t00=0x0021, t01=0x0142}
0x34d0…34fe              Head {h00=0x002a, h01=0x0050, text=» MOVE GSWSTR20,='ANL[GSINDT[GTER-TB ' «, t00=0x0021, t01=0x0150}
0x34fe…350c              Head {h00=0x000a, h01=0x0050, text=»OVSPR «, t00=0x0021, t01=0x017e}
0x350c…351a              Head {h00=0x000a, h01=0x0050, text=»OVSERR«, t00=0x0021, t01=0x018c}
0x351a…352e              Head {h00=0x0010, h01=0x0050, text=» PERF FRMBUP«, t00=0x0022, t01=0x000a}
0x352e…3554              Head {h00=0x0022, h01=0x0050, text=» PERF GENWRS,GTHCDEV,GTSTRFMT «, t00=0x0022, t01=0x001e}
0x3554…356e              Head {h00=0x0016, h01=0x0050, text=» MOVE GTLINE,CBIN4«, t00=0x0022, t01=0x0044}
0x356e…357a              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0022, t01=0x005e}
0x357a…3588              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0022, t01=0x006a}
0x3588…3590              Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0078}
0x3590…3598              Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0080}
0x3598…35ac              Head {h00=0x0010, h01=0x0050, text=»BUEDIT PROC «, t00=0x0022, t01=0x0088}
0x35ac…35ca              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GTREGNR «, t00=0x0022, t01=0x009c}
0x35ca…35e6              Head {h00=0x0018, h01=0x0050, text=» SUB GSWBIN1,=W'39' «, t00=0x0022, t01=0x00ba}
0x35e6…3602              Head {h00=0x0018, h01=0x0050, text=» PERF FRMBUD,GSWBIN1«, t00=0x0022, t01=0x00d6}
0x3602…3616              Head {h00=0x0010, h01=0x0050, text=» PERF BUWRIT«, t00=0x0022, t01=0x00f2}
0x3616…3622              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0022, t01=0x0106}
0x3622…3630              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0022, t01=0x0112}
0x3630…3638              Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0120}
0x3638…3640              Head {h00=0x0004, h01=0x0050, t00=0x0022, t01=0x0128}
0x3640…3654              Head {h00=0x0010, h01=0x0050, text=»BUWRIT PROC «, t00=0x0022, t01=0x0130}
0x3654…3674              Head {h00=0x001c, h01=0x0050, text=» EDIT GTREMBUF,GTSTRFMT «, t00=0x0022, t01=0x0144}
0x3674…3692              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,GTREMBUF«, t00=0x0022, t01=0x0164}
0x3692…36b4              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',BUW020«, t00=0x0022, t01=0x0182}
0x36b4…36d0              Head {h00=0x0018, h01=0x0050, text=» TBT GTASTFLG,BUW090«, t00=0x0023, t01=0x0014}
0x36d0…36de              Head {h00=0x000a, h01=0x0050, text=»BUW020«, t00=0x0023, t01=0x0030}
0x36de…36f6              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTASTFLG «, t00=0x0023, t01=0x003e}
0x36f6…3728              Head {h00=0x002e, h01=0x0050, text=» ADD CBUDPT,CBIN1 WRITE A NEW SLUTD BEFORE«, t00=0x0023, t01=0x0056}
0x3728…3760              Head {h00=0x0034, h01=0x0050, text=» MOVE GTREMBUF,=C'SLUTD ' CORRUPTING THE OLD ONE«, t00=0x0023, t01=0x0088}
0x3760…3792              Head {h00=0x002e, h01=0x0050, text=»  PERF RAWRIT,DK12,=D'12',GTREMBUF,CBUDPT «, t00=0x0023, t01=0x00c0}
0x3792…37a6              Head {h00=0x0010, h01=0x0050, text=» BNOK BUW095«, t00=0x0023, t01=0x00f2}
0x37a6…37c0              Head {h00=0x0016, h01=0x0050, text=» SUB CBUDPT,CBIN1 «, t00=0x0023, t01=0x0106}
0x37c0…37e0              Head {h00=0x001c, h01=0x0050, text=» EDIT GTREMBUF,GTSTRFMT «, t00=0x0023, t01=0x0120}
0x37e0…3810              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK12,=D'12',GTREMBUF,CBUDPT«, t00=0x0023, t01=0x0140}
0x3810…3824              Head {h00=0x0010, h01=0x0050, text=» BNOK BUW095«, t00=0x0023, t01=0x0170}
0x3824…383e              Head {h00=0x0016, h01=0x0050, text=» ADD CBUDPT,CBIN1 «, t00=0x0023, t01=0x0184}
0x383e…385c              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR2,GTREMBUF«, t00=0x0024, t01=0x000e}
0x385c…387e              Head {h00=0x001e, h01=0x0050, text=» CBNE GSWSTR2,='**',BUW090«, t00=0x0024, t01=0x002c}
0x387e…3894              Head {h00=0x0012, h01=0x0050, text=» SET GTASTFLG «, t00=0x0024, t01=0x004e}
0x3894…38a2              Head {h00=0x000a, h01=0x0050, text=»BUW090«, t00=0x0024, t01=0x0064}
0x38a2…38ba              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN0«, t00=0x0024, t01=0x0072}
0x38ba…38cc              Head {h00=0x000e, h01=0x0050, text=» B BUW099 «, t00=0x0024, t01=0x008a}
0x38cc…38da              Head {h00=0x000a, h01=0x0050, text=»BUW095«, t00=0x0024, t01=0x009c}
0x38da…38f2              Head {h00=0x0014, h01=0x0050, text=» CMP CBIN0,CBIN1«, t00=0x0024, t01=0x00aa}
0x38f2…3900              Head {h00=0x000a, h01=0x0050, text=»BUW099«, t00=0x0024, t01=0x00c2}
0x3900…390c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0024, t01=0x00d0}
0x390c…391a              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0024, t01=0x00dc}
0x391a…3922              Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00ea}
0x3922…392a              Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00f2}
0x392a…393c              Head {h00=0x000e, h01=0x0050, text=»MOV56 PROC«, t00=0x0024, t01=0x00fa}
0x393c…3968              Head {h00=0x0028, h01=0x0050, text=»* THE AMOUNT MUST BE MOVED TO FIELD «, t00=0x0024, t01=0x010c}
0x3968…3992              Head {h00=0x0026, h01=0x0050, text=»* 55,56,57, DEPENING ON WHICH YEAR«, t00=0x0024, t01=0x0138}
0x3992…39aa              Head {h00=0x0014, h01=0x0050, text=»* IT BELONGS TO.«, t00=0x0024, t01=0x0162}
0x39aa…39c2              Head {h00=0x0014, h01=0x0050, text=»* THE FORMEL IS:«, t00=0x0024, t01=0x017a}
0x39c2…39ec (37, 0, 400) Head {h00=0x0026, h01=0x0050, text=»* FIELDNR := REGYEAR + 4 - ACTYEAR«, t00=0x0025, t01=0x0004}
0x39ec…3a0e              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN5),CBIN0 «, t00=0x0025, t01=0x002e}
0x3a0e…3a32              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBCD1,GTREGF(CBIN14)«, t00=0x0025, t01=0x0050}
0x3a32…3a4c              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBCD1,=D'4'«, t00=0x0025, t01=0x0074}
0x3a4c…3a70              Head {h00=0x0020, h01=0x0050, text=» SUB GSWBCD1,GTDUPF(CBIN15) «, t00=0x0025, t01=0x008e}
0x3a70…3a8e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD1 «, t00=0x0025, t01=0x00b2}
0x3a8e…3aba              Head {h00=0x0028, h01=0x0050, text=» MOVE GTREGF(GSWBIN1),GTREGF(CBIN17)«, t00=0x0025, t01=0x00d0}
0x3aba…3ad8              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN2,GSWBIN1 «, t00=0x0025, t01=0x00fc}
0x3ad8…3af4              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN2,=W'52' «, t00=0x0025, t01=0x011a}
0x3af4…3b10              Head {h00=0x0018, h01=0x0050, text=» MUL GSWBIN2,=W'-1' «, t00=0x0025, t01=0x0136}
0x3b10…3b36              Head {h00=0x0022, h01=0x0050, text=» MOVE GTUSED(GSWBIN1),GSWBIN2 «, t00=0x0025, t01=0x0152}
0x3b36…3b5c              Head {h00=0x0022, h01=0x0050, text=» MOVE GTPRTDAT,GTREGF(CBIN14) «, t00=0x0025, t01=0x0178}
0x3b5c…3b68              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0026, t01=0x000e}
0x3b68…3b76              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0026, t01=0x001a}
0x3b76…3b7e              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0028}
0x3b7e…3b86              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0030}
0x3b86…3b9c              Head {h00=0x0012, h01=0x0050, text=»MOV56INV PROC «, t00=0x0026, t01=0x0038}
0x3b9c…3bc4              Head {h00=0x0024, h01=0x0050, text=» CBE GTUSED(CBIN3),CBIN0,MOV561 «, t00=0x0026, t01=0x004e}
0x3bc4…3be0              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN3 «, t00=0x0026, t01=0x0076}
0x3be0…3bf2              Head {h00=0x000e, h01=0x0050, text=» B MOV563 «, t00=0x0026, t01=0x0092}
0x3bf2…3c00              Head {h00=0x000a, h01=0x0050, text=»MOV561«, t00=0x0026, t01=0x00a4}
0x3c00…3c28              Head {h00=0x0024, h01=0x0050, text=» CBE GTUSED(CBIN4),CBIN0,MOV562 «, t00=0x0026, t01=0x00b2}
0x3c28…3c44              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN4 «, t00=0x0026, t01=0x00da}
0x3c44…3c56              Head {h00=0x000e, h01=0x0050, text=» B MOV563 «, t00=0x0026, t01=0x00f6}
0x3c56…3c64              Head {h00=0x000a, h01=0x0050, text=»MOV562«, t00=0x0026, t01=0x0108}
0x3c64…3c80              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN1,CBIN5 «, t00=0x0026, t01=0x0116}
0x3c80…3c8e              Head {h00=0x000a, h01=0x0050, text=»MOV563«, t00=0x0026, t01=0x0132}
0x3c8e…3cba              Head {h00=0x0028, h01=0x0050, text=» MOVE GTREGF(CBIN17),GTREGF(GSWBIN1)«, t00=0x0026, t01=0x0140}
0x3cba…3cde              Head {h00=0x0020, h01=0x0050, text=» MOVE GSWBIN2,GTDUPF(CBIN15)«, t00=0x0026, t01=0x016c}
0x3cde…3cfa              Head {h00=0x0018, h01=0x0050, text=» ADD GSWBIN2,GSWBIN1«, t00=0x0026, t01=0x0190}
0x3cfa…3d14              Head {h00=0x0016, h01=0x0050, text=» SUB GSWBIN2,CBIN4«, t00=0x0027, t01=0x001c}
0x3d14…3d38              Head {h00=0x0020, h01=0x0050, text=» MOVE GTPRTDAT,GSWBIN2 YEEAR«, t00=0x0027, t01=0x0036}
0x3d38…3d5c              Head {h00=0x0020, h01=0x0050, text=» MOVE GTREGF(CBIN14),GSWBIN2«, t00=0x0027, t01=0x005a}
0x3d5c…3d68              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0027, t01=0x007e}
0x3d68…3d76              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0027, t01=0x008a}
0x3d76…3d7e              Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x0098}
0x3d7e…3d86              Head {h00=0x0004, h01=0x0050, t00=0x0027, t01=0x00a0}
0x3d86…3d9a              Head {h00=0x0010, h01=0x0050, text=»DELRECS PROC«, t00=0x0027, t01=0x00a8}
0x3d9a…3db4              Head {h00=0x0016, h01=0x0050, text=» PERF WAITF,CPFLG «, t00=0x0027, t01=0x00bc}
0x3db4…3dd2              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0027, t01=0x00d6}
0x3dd2…3e0a              Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 «, t00=0x0027, t01=0x00f4}
0x3e0a…3e20              Head {h00=0x0012, h01=0x0050, text=» BNOK DELREC2 «, t00=0x0027, t01=0x012c}
0x3e20…3e3e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWSTR20,CPCKBUF«, t00=0x0027, t01=0x0142}
0x3e3e…3e4e              Head {h00=0x000c, h01=0x0050, text=»DELREC1 «, t00=0x0027, t01=0x0160}
0x3e4e…3e64              Head {h00=0x0012, h01=0x0050, text=» SET GTSWFLAG «, t00=0x0027, t01=0x0170}
0x3e64…3e88              Head {h00=0x0020, h01=0x0050, text=» CBE CRECLGD,=W'128',DELREC3«, t00=0x0027, t01=0x0186}
0x3e88…3ea0              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTSWFLAG «, t00=0x0028, t01=0x001a}
0x3ea0…3eb0              Head {h00=0x000c, h01=0x0050, text=»DELREC3 «, t00=0x0028, t01=0x0032}
0x3eb0…3ece              Head {h00=0x001a, h01=0x0050, text=» EDIT CPCKBUF,PCKINIT «, t00=0x0028, t01=0x0042}
0x3ece…3f00              Head {h00=0x002e, h01=0x0050, text=» COPY CPCKBUF,CBIN0,CBIN20,GSWSTR20,CBIN0 «, t00=0x0028, t01=0x0060}
0x3f00…3f1c              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR9,=X'7F'«, t00=0x0028, t01=0x0092}
0x3f1c…3f4c              Head {h00=0x002c, h01=0x0050, text=» COPY CPCKBUF,CBIN20,CBIN1,GSWSTR9,CBIN0«, t00=0x0028, t01=0x00ae}
0x3f4c…3f7c              Head {h00=0x002c, h01=0x0050, text=» PERF RAWRIT,DK02,=D'2',CPCKBUF,GSWBIN9 «, t00=0x0028, t01=0x00de}
0x3f7c…3f92              Head {h00=0x0012, h01=0x0050, text=» BNOK DELREC2 «, t00=0x0028, t01=0x010e}
0x3f92…3fa2              Head {h00=0x000c, h01=0x0050, text=»DELREC2 «, t00=0x0028, t01=0x0124}
0x3fa2…3fc8              Head {h00=0x0022, h01=0x0050, text=» CBNL GSWBIN9,GSWBIN10,DELREC9«, t00=0x0028, t01=0x0134}
0x3fc8…3fe2              Head {h00=0x0016, h01=0x0050, text=» ADD GSWBIN9,CBIN1«, t00=0x0028, t01=0x015a}
0x3fe2…4000              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,=W'128' «, t00=0x0028, t01=0x0174}
0x4000…4038 (41, 0, 400) Head {h00=0x0034, h01=0x0050, text=» PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 «, t00=0x0029, t01=0x0004}
0x4038…404e              Head {h00=0x0012, h01=0x0050, text=» BNOK DELREC2 «, t00=0x0029, t01=0x003c}
0x404e…4090              Head {h00=0x003e, h01=0x0050, text=» COPY GSWSTR20,CBIN6,CBIN5,CPCKBUF,CBIN6 MOVE LOBENR ONLY «, t00=0x0029, t01=0x0052}
0x4090…40ba              Head {h00=0x0026, h01=0x0050, text=» B DELREC1 AND DELETE CONT.RECORD «, t00=0x0029, t01=0x0094}
0x40ba…40ca              Head {h00=0x000c, h01=0x0050, text=»DELREC9 «, t00=0x0029, t01=0x00be}
0x40ca…40de              Head {h00=0x0010, h01=0x0050, text=» CLEAR CPFLG«, t00=0x0029, t01=0x00ce}
0x40de…40ea              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0029, t01=0x00e2}
0x40ea…40f8              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0029, t01=0x00ee}
0x40f8…4100              Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x00fc}
0x4100…4108              Head {h00=0x0004, h01=0x0050, t00=0x0029, t01=0x0104}
0x4108…411e              Head {h00=0x0012, h01=0x0050, text=»TRGEN PROC $W «, t00=0x0029, t01=0x010c}
0x411e…4140              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN14),CBIN0«, t00=0x0029, t01=0x0122}
0x4140…4162              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN15),CBIN0«, t00=0x0029, t01=0x0144}
0x4162…4184              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN16),CBIN0«, t00=0x0029, t01=0x0166}
0x4184…41a6              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN17),CBIN0«, t00=0x0029, t01=0x0188}
0x41a6…41c8              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN18),CBIN0«, t00=0x002a, t01=0x001a}
0x41c8…41ea              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN19),CBIN0«, t00=0x002a, t01=0x003c}
0x41ea…420c              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN20),CBIN0«, t00=0x002a, t01=0x005e}
0x420c…422e              Head {h00=0x001e, h01=0x0050, text=» MOVE GTUSED(CBIN21),CBIN0«, t00=0x002a, t01=0x0080}
0x422e…4248              Head {h00=0x0016, h01=0x0050, text=» MOVE GTREGDEX,$W «, t00=0x002a, t01=0x00a2}
0x4248…426a              Head {h00=0x001e, h01=0x0050, text=» CBG SPBINW2,CBIN3,TRGEN1 «, t00=0x002a, t01=0x00bc}
0x426a…4286              Head {h00=0x0018, h01=0x0050, text=» PERF PACKST,CBIN15 «, t00=0x002a, t01=0x00de}
0x4286…429a              Head {h00=0x0010, h01=0x0050, text=» PERF WRITFD«, t00=0x002a, t01=0x00fa}
0x429a…42ae              Head {h00=0x0010, h01=0x0050, text=» BOK TRGEN1 «, t00=0x002a, t01=0x010e}
0x42ae…42ca              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW4,CBIN17«, t00=0x002a, t01=0x0122}
0x42ca…42de              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x002a, t01=0x013e}
0x42de…42f0              Head {h00=0x000e, h01=0x0050, text=» B TRGEN9 «, t00=0x002a, t01=0x0152}
0x42f0…42fe              Head {h00=0x000a, h01=0x0050, text=»TRGEN1«, t00=0x002a, t01=0x0164}
0x42fe…4312              Head {h00=0x0010, h01=0x0050, text=» PERF PACKCL«, t00=0x002a, t01=0x0172}
0x4312…4320              Head {h00=0x000a, h01=0x0050, text=»TRGEN9«, t00=0x002a, t01=0x0186}
0x4320…432c (43, 0, 400) Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002b, t01=0x0004}
0x432c…433a              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002b, t01=0x0010}
0x433a…4342              Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x001e}
0x4342…434a              Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x0026}
0x434a…435e              Head {h00=0x0010, h01=0x0050, text=»NULSTIL PROC«, t00=0x002b, t01=0x002e}
0x435e…4380              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN14),=D'0'«, t00=0x002b, t01=0x0042}
0x4380…43a2              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN15),=D'0'«, t00=0x002b, t01=0x0064}
0x43a2…43c4              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN16),=D'0'«, t00=0x002b, t01=0x0086}
0x43c4…43e6              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN17),=D'0'«, t00=0x002b, t01=0x00a8}
0x43e6…4408              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN18),=D'0'«, t00=0x002b, t01=0x00ca}
0x4408…442a              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN19),=D'0'«, t00=0x002b, t01=0x00ec}
0x442a…444c              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN20),=D'0'«, t00=0x002b, t01=0x010e}
0x444c…446e              Head {h00=0x001e, h01=0x0050, text=» MOVE GTREGF(CBIN21),=D'0'«, t00=0x002b, t01=0x0130}
0x446e…447a              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x002b, t01=0x0152}
0x447a…4488              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x002b, t01=0x015e}
0x4488…4496              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x002b, t01=0x016c}
0x4496…449e              Head {h00=0x0004, h01=0x0050, t00=0x002b, t01=0x017a}
0x449e…44ba              Head {h00=0x0018, h01=0x0013, text=»BU00FRMT FRMT  MENU «, t00=0x002b, t01=0x0182}
0x44ba…44c6              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x002c, t01=0x000e}
0x44c6…44e2              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343020' «, t00=0x002c, t01=0x001a}
0x44e2…44fe              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='BUDGETTAL '«, t00=0x002c, t01=0x0036}
0x44fe…4516              Head {h00=0x0014, h01=0x000f, text=» FCOPY ='UDEN ' «, t00=0x002c, t01=0x0052}
0x4516…453a              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='BUDGETTERINGSKODE' «, t00=0x002c, t01=0x006a}
0x453a…4546              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002c, t01=0x008e}
0x4546…4562              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343120' «, t00=0x002c, t01=0x009a}
0x4562…457e              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='BUDGETTAL '«, t00=0x002c, t01=0x00b6}
0x457e…4594              Head {h00=0x0012, h01=0x000e, text=» FCOPY ='MED '«, t00=0x002c, t01=0x00d2}
0x4594…45b8              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='BUDGETTERINGSKODE' «, t00=0x002c, t01=0x00e8}
0x45b8…45c4              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002c, t01=0x010c}
0x45c4…45e0              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343220' «, t00=0x002c, t01=0x0118}
0x45e0…4606              Head {h00=0x0022, h01=0x001e, text=» FCOPY ='[NDRING/SLETNING AF '«, t00=0x002c, t01=0x0134}
0x4606…4622              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='BUDGETTAL '«, t00=0x002c, t01=0x015a}
0x4622…4638              Head {h00=0x0012, h01=0x000e, text=» FCOPY ='MED '«, t00=0x002c, t01=0x0176}
0x4638…465c              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='BUDGETTERINGSKODE' «, t00=0x002c, t01=0x018c}
0x465c…4668              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x0020}
0x4668…4684              Head {h00=0x0018, h01=0x0050, text=» FCOPY =X'5C343520' «, t00=0x002d, t01=0x002c}
0x4684…46aa              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='TILL[GSBEV. BUDGET ' «, t00=0x002d, t01=0x0048}
0x46aa…46b6              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x006e}
0x46b6…46d2              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343620' «, t00=0x002d, t01=0x007a}
0x46d2…46f2              Head {h00=0x001c, h01=0x0050, text=» FCOPY ='OMPLACERINGER '«, t00=0x002d, t01=0x0096}
0x46f2…46fe              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x00b6}
0x46fe…471a              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343720' «, t00=0x002d, t01=0x00c2}
0x471a…4740              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='SUM AF R]DIGHEDSB. ' «, t00=0x002d, t01=0x00de}
0x4740…474c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x0104}
0x474c…4768              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343820' «, t00=0x002d, t01=0x0110}
0x4768…478c              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='ANL[GSUDGIFTER-TB '«, t00=0x002d, t01=0x012c}
0x478c…4798              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002d, t01=0x0150}
0x4798…47b4              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343920' «, t00=0x002d, t01=0x015c}
0x47b4…47da              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='ANL[GSINDT[GTER-TB ' «, t00=0x002d, t01=0x0178}
0x47da…47e6              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x000e}
0x47e6…47f2              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x001a}
0x47f2…4816              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='INDTAST TRANSKODE:'«, t00=0x002e, t01=0x0026}
0x4816…482c              Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x002e, t01=0x004a}
0x482c…484e              Head {h00=0x001e, h01=0x0050, text=» FKI 29,MINL=2,MAXL=2,NUM «, t00=0x002e, t01=0x0060}
0x484e…4868              Head {h00=0x0016, h01=0x0050, text=» FMEL 'XX',GTREGNR«, t00=0x002e, t01=0x0082}
0x4868…4874              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x002e, t01=0x009c}
0x4874…48a4              Head {h00=0x002c, h01=0x0050, text=» FCOPY ='ELLER TRYK "KVIT" ELLER "KRE"' «, t00=0x002e, t01=0x00a8}
0x48a4…48b2              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x002e, t01=0x00d8}
0x48b2…48ba              Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x00e6}
0x48ba…48c2              Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x00ee}
0x48c2…48d8              Head {h00=0x0012, h01=0x0050, text=»BUSPFRMT FRMT «, t00=0x002e, t01=0x00f6}
0x48d8…48e4              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x002e, t01=0x010c}
0x48e4…490a              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='INDTAST TRANSKODE: ' «, t00=0x002e, t01=0x0118}
0x490a…4920              Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x002e, t01=0x013e}
0x4920…4944              Head {h00=0x0020, h01=0x0050, text=» FKI 21,MINL=2,MAXL=2,ME,NUM«, t00=0x002e, t01=0x0154}
0x4944…495e              Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZ',GSWBCD6«, t00=0x002e, t01=0x0178}
0x495e…496e (47, 0, 400) Head {h00=0x000c, h01=0x0050, text=» FTAB 25«, t00=0x002f, t01=0x0004}
0x496e…4984              Head {h00=0x0012, h01=0x0050, text=» FCOPY ='PLUS'«, t00=0x002f, t01=0x0014}
0x4984…49a2              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='REGKONTONR:' «, t00=0x002f, t01=0x002a}
0x49a2…49ce              Head {h00=0x0028, h01=0x0050, text=» FKI 41,MINL=4,MAXL=10,ME,NUM,REWRT «, t00=0x002f, t01=0x0048}
0x49ce…49f6              Head {h00=0x0024, h01=0x0050, text=» FMEL '999E-999E-99E-99',GSWBCD7«, t00=0x002f, t01=0x0074}
0x49f6…4a04              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002f, t01=0x009c}
0x4a04…4a0c              Head {h00=0x0004, h01=0x0000, t00=0x002f, t01=0x00aa}
0x4a0c…4a14              Head {h00=0x0004, h01=0x0000, t00=0x002f, t01=0x00b2}
0x4a14…4a1c              Head {h00=0x0004, h01=0x0000, t00=0x002f, t01=0x00ba}
0x4a1c…4a30              Head {h00=0x0010, h01=0x000c, text=»BU40FRM FRMT«, t00=0x002f, t01=0x00c2}
0x4a30…4a3c              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x002f, t01=0x00d6}
0x4a3c…4a58              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343020' «, t00=0x002f, t01=0x00e2}
0x4a58…4a6e              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB1 «, t00=0x002f, t01=0x00fe}
0x4a6e…4a84              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB2 «, t00=0x002f, t01=0x0114}
0x4a84…4a92              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x002f, t01=0x012a}
0x4a92…4a9a              Head {h00=0x0004, h01=0x0000, t00=0x002f, t01=0x0138}
0x4a9a…4aa2              Head {h00=0x0004, h01=0x0000, t00=0x002f, t01=0x0140}
0x4aa2…4ab6              Head {h00=0x0010, h01=0x000c, text=»BU41FRM FRMT«, t00=0x002f, t01=0x0148}
0x4ab6…4ac2              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x002f, t01=0x015c}
0x4ac2…4ade              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343120' «, t00=0x002f, t01=0x0168}
0x4ade…4af4              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB1 «, t00=0x002f, t01=0x0184}
0x4af4…4b0a              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB3 «, t00=0x0030, t01=0x000a}
0x4b0a…4b20              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB2 «, t00=0x0030, t01=0x0020}
0x4b20…4b2e              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0030, t01=0x0036}
0x4b2e…4b36              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x0044}
0x4b36…4b3e              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x004c}
0x4b3e…4b46              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x0054}
0x4b46…4b5a              Head {h00=0x0010, h01=0x000c, text=»BU42FRM FRMT«, t00=0x0030, t01=0x005c}
0x4b5a…4b66              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0030, t01=0x0070}
0x4b66…4b82              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343220' «, t00=0x0030, t01=0x007c}
0x4b82…4b98              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB1 «, t00=0x0030, t01=0x0098}
0x4b98…4bae              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB3 «, t00=0x0030, t01=0x00ae}
0x4bae…4bc4              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB2 «, t00=0x0030, t01=0x00c4}
0x4bc4…4bd2              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0030, t01=0x00da}
0x4bd2…4bda              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x00e8}
0x4bda…4be2              Head {h00=0x0004, h01=0x0000, t00=0x0030, t01=0x00f0}
0x4be2…4bf6              Head {h00=0x0010, h01=0x000c, text=»BU45FRM FRMT«, t00=0x0030, t01=0x00f8}
0x4bf6…4c02              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0030, t01=0x010c}
0x4c02…4c1e              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343520' «, t00=0x0030, t01=0x0118}
0x4c1e…4c44              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='TILL[GSBEV. BUDGET ' «, t00=0x0030, t01=0x0134}
0x4c44…4c5a              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB4 «, t00=0x0030, t01=0x015a}
0x4c5a…4c70              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB5 «, t00=0x0030, t01=0x0170}
0x4c70…4c7e              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0030, t01=0x0186}
0x4c7e…4c86 (49, 0, 400) Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x0004}
0x4c86…4c8e              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x000c}
0x4c8e…4ca2              Head {h00=0x0010, h01=0x000c, text=»BU46FRM FRMT«, t00=0x0031, t01=0x0014}
0x4ca2…4cae              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0031, t01=0x0028}
0x4cae…4cca              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343620' «, t00=0x0031, t01=0x0034}
0x4cca…4cea              Head {h00=0x001c, h01=0x0050, text=» FCOPY ='OMPLACERINGER '«, t00=0x0031, t01=0x0050}
0x4cea…4d00              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB4 «, t00=0x0031, t01=0x0070}
0x4d00…4d14              Head {h00=0x0010, h01=0x000c, text=» FILLR ' ',5«, t00=0x0031, t01=0x0086}
0x4d14…4d36              Head {h00=0x001e, h01=0x0050, text=» FCOPY ='DET.KODE/LBNR: ' «, t00=0x0031, t01=0x009a}
0x4d36…4d4c              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB7 «, t00=0x0031, t01=0x00bc}
0x4d4c…4d62              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB5 «, t00=0x0031, t01=0x00d2}
0x4d62…4d70              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0031, t01=0x00e8}
0x4d70…4d78              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x00f6}
0x4d78…4d80              Head {h00=0x0004, h01=0x0000, t00=0x0031, t01=0x00fe}
0x4d80…4d94              Head {h00=0x0010, h01=0x000c, text=»BU47FRM FRMT«, t00=0x0031, t01=0x0106}
0x4d94…4da0              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0031, t01=0x011a}
0x4da0…4dbc              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343720' «, t00=0x0031, t01=0x0126}
0x4dbc…4de2              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='SUM AF R]DIGHEDSB. ' «, t00=0x0031, t01=0x0142}
0x4de2…4dee              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0031, t01=0x0168}
0x4dee…4e04              Head {h00=0x0012, h01=0x000d, text=» FLINK BUBEL1 «, t00=0x0031, t01=0x0174}
0x4e04…4e1a              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB8 «, t00=0x0031, t01=0x018a}
0x4e1a…4e30              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB5 «, t00=0x0032, t01=0x0010}
0x4e30…4e3e              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0032, t01=0x0026}
0x4e3e…4e46              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x0034}
0x4e46…4e4e              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x003c}
0x4e4e…4e62              Head {h00=0x0010, h01=0x000c, text=»BU48FRM FRMT«, t00=0x0032, t01=0x0044}
0x4e62…4e6e              Head {h00=0x0008, h01=0x0005, text=» FSL«, t00=0x0032, t01=0x0058}
0x4e6e…4e8a              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343820' «, t00=0x0032, t01=0x0064}
0x4e8a…4eae              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='ANL[GSUDGIFTER-TB '«, t00=0x0032, t01=0x0080}
0x4eae…4ec4              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB6 «, t00=0x0032, t01=0x00a4}
0x4ec4…4eda              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB9 «, t00=0x0032, t01=0x00ba}
0x4eda…4ee8              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0032, t01=0x00d0}
0x4ee8…4ef0              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x00de}
0x4ef0…4ef8              Head {h00=0x0004, h01=0x0000, t00=0x0032, t01=0x00e6}
0x4ef8…4f0c              Head {h00=0x0010, h01=0x000c, text=»BU49FRM FRMT«, t00=0x0032, t01=0x00ee}
0x4f0c…4f18              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0032, t01=0x0102}
0x4f18…4f34              Head {h00=0x0018, h01=0x0013, text=» FCOPY =X'5C343920' «, t00=0x0032, t01=0x010e}
0x4f34…4f5a              Head {h00=0x0022, h01=0x0050, text=» FCOPY ='ANL[GSINDT[GTER-TB ' «, t00=0x0032, t01=0x012a}
0x4f5a…4f70              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB6 «, t00=0x0032, t01=0x0150}
0x4f70…4f86              Head {h00=0x0012, h01=0x0050, text=» FLINK BUSUB9 «, t00=0x0032, t01=0x0166}
0x4f86…4f94              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0032, t01=0x017c}
0x4f94…4f9c              Head {h00=0x0004, h01=0x0050, t00=0x0032, t01=0x018a}
0x4f9c…4fa4 (51, 0, 400) Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x0004}
0x4fa4…4fac              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x000c}
0x4fac…4fc0              Head {h00=0x0010, h01=0x000b, text=»BUBEL1 FRMT «, t00=0x0033, t01=0x0014}
0x4fc0…4fdc              Head {h00=0x0018, h01=0x0013, text=» FCOPY ='BUDGETBEL' «, t00=0x0033, t01=0x0028}
0x4fdc…4ff2              Head {h00=0x0012, h01=0x0050, text=» FILLR X'5C',1«, t00=0x0033, t01=0x0044}
0x4ff2…500a              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='B ]R: '«, t00=0x0033, t01=0x005a}
0x500a…5018              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0033, t01=0x0072}
0x5018…5020              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x0080}
0x5020…5028              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x0088}
0x5028…5030              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x0090}
0x5030…5038              Head {h00=0x0004, h01=0x0000, t00=0x0033, t01=0x0098}
0x5038…504c              Head {h00=0x0010, h01=0x000b, text=»BUSUB1 FRMT «, t00=0x0033, t01=0x00a0}
0x504c…5070              Head {h00=0x0020, h01=0x001c, text=» FCOPY ='INDBERETNING LOKAL'«, t00=0x0033, t01=0x00b4}
0x5070…5086              Head {h00=0x0012, h01=0x000d, text=» FILLR ' ',18 «, t00=0x0033, t01=0x00d8}
0x5086…50a6              Head {h00=0x001c, h01=0x0018, text=» FCOPY ='PRISREG.KODE: '«, t00=0x0033, t01=0x00ee}
0x50a6…50e2              Head {h00=0x0038, h01=0x0050, text=» FKI 55,APPL=64,MINL=1,MAXL=1,ME,DUPL=GTDUPF(CBIN12)«, t00=0x0033, t01=0x010e}
0x50e2…5102              Head {h00=0x001c, h01=0x0018, text=» FMEL 'X',GTREGF(CBIN12)«, t00=0x0033, t01=0x014a}
0x5102…510e              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0033, t01=0x016a}
0x510e…511a              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0033, t01=0x0176}
0x511a…5134              Head {h00=0x0016, h01=0x0011, text=» FCOPY ='LINNR: ' «, t00=0x0033, t01=0x0182}
0x5134…5150              Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZ9',GTANTAL«, t00=0x0034, t01=0x000c}
0x5150…5164              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x0034, t01=0x0028}
0x5164…5182              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='REGKONTONR:' «, t00=0x0034, t01=0x003c}
0x5182…51bc              Head {h00=0x0036, h01=0x0050, text=» FKI 33,APPL=5,MINL=10,MAXL=10,ME,SCHK=1,REWRT,  C«, t00=0x0034, t01=0x005a}
0x51bc…51d8              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTDUPF(CBIN1)«, t00=0x0034, t01=0x0094}
0x51d8…5206              Head {h00=0x002a, h01=0x0050, text=» FMEL '999E-999E-99E-99',GTREGF(CBIN1)«, t00=0x0034, t01=0x00b0}
0x5206…5214              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0034, t01=0x00de}
0x5214…521c              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x00ec}
0x521c…5224              Head {h00=0x0004, h01=0x0000, t00=0x0034, t01=0x00f4}
0x5224…5238              Head {h00=0x0010, h01=0x000b, text=»BUSUB2 FRMT «, t00=0x0034, t01=0x00fc}
0x5238…5244              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0034, t01=0x0110}
0x5244…5250              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0034, t01=0x011c}
0x5250…526a              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BUDGET]R'«, t00=0x0034, t01=0x0128}
0x526a…528c              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN14)«, t00=0x0034, t01=0x0142}
0x528c…52a8              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0034, t01=0x0164}
0x52a8…52ca              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN15)«, t00=0x0034, t01=0x0180}
0x52ca…52d6              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0035, t01=0x0012}
0x52d6…530c              Head {h00=0x0032, h01=0x0050, text=» FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=55«, t00=0x0035, t01=0x001e}
0x530c…5338              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN3) «, t00=0x0035, t01=0x0054}
0x5338…5374              Head {h00=0x0038, h01=0x0050, text=» FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=56,  C «, t00=0x0035, t01=0x0080}
0x5374…5390              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN3)«, t00=0x0035, t01=0x00bc}
0x5390…53bc              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN4) «, t00=0x0035, t01=0x00d8}
0x53bc…53c8              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0035, t01=0x0104}
0x53c8…53d4              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0035, t01=0x0110}
0x53d4…53ee              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BUDGET]R'«, t00=0x0035, t01=0x011c}
0x53ee…5410              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN16)«, t00=0x0035, t01=0x0136}
0x5410…542c              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0035, t01=0x0158}
0x542c…544e              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN17)«, t00=0x0035, t01=0x0174}
0x544e…546a              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0036, t01=0x0008}
0x546a…548c              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN18)«, t00=0x0036, t01=0x0024}
0x548c…54a8              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0036, t01=0x0046}
0x54a8…54ca              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN19)«, t00=0x0036, t01=0x0062}
0x54ca…54e6              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0036, t01=0x0084}
0x54e6…5508              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN20)«, t00=0x0036, t01=0x00a0}
0x5508…5524              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='  BUDGET]R'«, t00=0x0036, t01=0x00c2}
0x5524…5546              Head {h00=0x001e, h01=0x0050, text=» FMEL 'B99',GTDUPF(CBIN21)«, t00=0x0036, t01=0x00de}
0x5546…5552              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0036, t01=0x0100}
0x5552…558c              Head {h00=0x0036, h01=0x0050, text=» FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=57,  C«, t00=0x0036, t01=0x010c}
0x558c…55a8              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN4)«, t00=0x0036, t01=0x0146}
0x55a8…55d4              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN5) «, t00=0x0036, t01=0x0162}
0x55d4…5610              Head {h00=0x0038, h01=0x0050, text=» FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=58,  C «, t00=0x0036, t01=0x018e}
0x5610…562c              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN5)«, t00=0x0037, t01=0x003a}
0x562c…5658              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN6) «, t00=0x0037, t01=0x0056}
0x5658…5694              Head {h00=0x0038, h01=0x0050, text=» FKI 27,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=59,  C «, t00=0x0037, t01=0x0082}
0x5694…56b0              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN6)«, t00=0x0037, t01=0x00be}
0x56b0…56dc              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN7) «, t00=0x0037, t01=0x00da}
0x56dc…5718              Head {h00=0x0038, h01=0x0050, text=» FKI 40,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=60,  C «, t00=0x0037, t01=0x0106}
0x5718…5734              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN7)«, t00=0x0037, t01=0x0142}
0x5734…5760              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN8) «, t00=0x0037, t01=0x015e}
0x5760…579c              Head {h00=0x0038, h01=0x0050, text=» FKI 53,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=61,  C «, t00=0x0037, t01=0x018a}
0x579c…57b8              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN8)«, t00=0x0038, t01=0x0036}
0x57b8…57e4              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN9) «, t00=0x0038, t01=0x0052}
0x57e4…5820              Head {h00=0x0038, h01=0x0050, text=» FKI 66,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=62,  C «, t00=0x0038, t01=0x007e}
0x5820…583c              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTREGF(CBIN9)«, t00=0x0038, t01=0x00ba}
0x583c…5868              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN10)«, t00=0x0038, t01=0x00d6}
0x5868…5874              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0038, t01=0x0102}
0x5874…5880              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0038, t01=0x010e}
0x5880…588c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0038, t01=0x011a}
0x588c…5898              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0038, t01=0x0126}
0x5898…58b0              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='TOTAL:'«, t00=0x0038, t01=0x0132}
0x58b0…58bc              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0038, t01=0x014a}
0x58bc…58e8              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN14)«, t00=0x0038, t01=0x0156}
0x58e8…5914              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN15)«, t00=0x0038, t01=0x0182}
0x5914…5920              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0039, t01=0x001e}
0x5920…594c              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN16)«, t00=0x0039, t01=0x002a}
0x594c…5978              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN17)«, t00=0x0039, t01=0x0056}
0x5978…59a4              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN18)«, t00=0x0039, t01=0x0082}
0x59a4…59d0              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN19)«, t00=0x0039, t01=0x00ae}
0x59d0…59fc              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN20)«, t00=0x0039, t01=0x00da}
0x59fc…5a28              Head {h00=0x0028, h01=0x0024, text=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN21)«, t00=0x0039, t01=0x0106}
0x5a28…5a36              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0039, t01=0x0132}
0x5a36…5a3e              Head {h00=0x0004, h01=0x0000, t00=0x0039, t01=0x0140}
0x5a3e…5a46              Head {h00=0x0004, h01=0x0000, t00=0x0039, t01=0x0148}
0x5a46…5a5a              Head {h00=0x0010, h01=0x000b, text=»BUSUB3 FRMT «, t00=0x0039, t01=0x0150}
0x5a5a…5a6e              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',3«, t00=0x0039, t01=0x0164}
0x5a6e…5a94              Head {h00=0x0022, h01=0x001d, text=» FCOPY ='BUDGETTERINGSKODE: ' «, t00=0x0039, t01=0x0178}
0x5a94…5ac8              Head {h00=0x0030, h01=0x0050, text=» FKI 67,APPL=54,MINL=1,MAXL=10,ME,REWRT,  C «, t00=0x003a, t01=0x000e}
0x5ac8…5ae4              Head {h00=0x0018, h01=0x0050, text=»  DUPL=GTDUPF(CBIN2)«, t00=0x003a, t01=0x0042}
0x5ae4…5b10              Head {h00=0x0028, h01=0x0023, text=» FMEL 'XBXXXXBXXXBXX',GTREGF(CBIN2) «, t00=0x003a, t01=0x005e}
0x5b10…5b1e              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003a, t01=0x008a}
0x5b1e…5b26              Head {h00=0x0004, h01=0x0000, t00=0x003a, t01=0x0098}
0x5b26…5b2e              Head {h00=0x0004, h01=0x0000, t00=0x003a, t01=0x00a0}
0x5b2e…5b42              Head {h00=0x0010, h01=0x000b, text=»BUSUB4 FRMT «, t00=0x003a, t01=0x00a8}
0x5b42…5b58              Head {h00=0x0012, h01=0x000d, text=» FLINK BUSUB6 «, t00=0x003a, t01=0x00bc}
0x5b58…5b6c              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',5«, t00=0x003a, t01=0x00d2}
0x5b6c…5b82              Head {h00=0x0012, h01=0x000d, text=» FLINK BUBEL1 «, t00=0x003a, t01=0x00e6}
0x5b82…5bb4              Head {h00=0x002e, h01=0x0050, text=» FKI 52,MINL=2,MAXL=2,ME,NUM,APPL=120,  C «, t00=0x003a, t01=0x00fc}
0x5bb4…5bcc              Head {h00=0x0014, h01=0x0050, text=»  DUPL=GTPRTDAT «, t00=0x003a, t01=0x012e}
0x5bcc…5bee              Head {h00=0x001e, h01=0x0050, text=» FMEL 'XX',GTREGF(CBIN14) «, t00=0x003a, t01=0x0146}
0x5bee…5bfc              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003a, t01=0x0168}
0x5bfc…5c04              Head {h00=0x0004, h01=0x0000, t00=0x003a, t01=0x0176}
0x5c04…5c0c              Head {h00=0x0004, h01=0x0000, t00=0x003a, t01=0x017e}
0x5c0c…5c20              Head {h00=0x0010, h01=0x000b, text=»BUSUB5 FRMT «, t00=0x003a, t01=0x0186}
0x5c20…5c2c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003b, t01=0x000a}
0x5c2c…5c4a              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='REGKONTONR ' «, t00=0x003b, t01=0x0016}
0x5c4a…5c5e              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x003b, t01=0x0034}
0x5c5e…5c74              Head {h00=0x0012, h01=0x0050, text=» FLINK BUBEL1 «, t00=0x003b, t01=0x0048}
0x5c74…5c80              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003b, t01=0x005e}
0x5c80…5cba              Head {h00=0x0036, h01=0x0050, text=» FKI 1,MINL=10,MAXL=10,ME,SCHK=1,NUM,REWRT,APPL=5 «, t00=0x003b, t01=0x006a}
0x5cba…5ce8              Head {h00=0x002a, h01=0x0050, text=» FMEL '999E-999E-99E-99',GTREGF(CBIN1)«, t00=0x003b, t01=0x00a4}
0x5ce8…5d22              Head {h00=0x0036, h01=0x0050, text=» FKI 16,MINL=1,MAXL=11,ME,APPL=57,NUM,SCHK=4,REWRT«, t00=0x003b, t01=0x00d2}
0x5d22…5d4e              Head {h00=0x0028, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN17) «, t00=0x003b, t01=0x010c}
0x5d4e…5d5c              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003b, t01=0x0138}
0x5d5c…5d64              Head {h00=0x0004, h01=0x0000, t00=0x003b, t01=0x0146}
0x5d64…5d6c              Head {h00=0x0004, h01=0x0000, t00=0x003b, t01=0x014e}
0x5d6c…5d80              Head {h00=0x0010, h01=0x000b, text=»BUSUB6 FRMT «, t00=0x003b, t01=0x0156}
0x5d80…5d8c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003b, t01=0x016a}
0x5d8c…5d98              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x003b, t01=0x0176}
0x5d98…5dbc              Head {h00=0x0020, h01=0x001b, text=» FCOPY ='TILL[GSBEV.DATO: ' «, t00=0x003b, t01=0x0182}
0x5dbc…5de6              Head {h00=0x0026, h01=0x0050, text=» FKI 18,MINL=6,MAXL=6,APPL=63,  C «, t00=0x003c, t01=0x0016}
0x5de6…5e18              Head {h00=0x002e, h01=0x0050, text=»  ME,NUM,REWRT,SCHK=2,DUPL=GTDUPF(CBIN11) «, t00=0x003c, t01=0x0040}
0x5e18…5e40              Head {h00=0x0024, h01=0x001f, text=» FMEL 'XXVXXVXX',GTREGF(CBIN11) «, t00=0x003c, t01=0x0072}
0x5e40…5e4e              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003c, t01=0x009a}
0x5e4e…5e56              Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x00a8}
0x5e56…5e5e              Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x00b0}
0x5e5e…5e72              Head {h00=0x0010, h01=0x0050, text=»BUSUB7 FRMT «, t00=0x003c, t01=0x00b8}
0x5e72…5eb2              Head {h00=0x003c, h01=0x0050, text=» FKI 75,NUM,MINL=1,MAXL=4,APPL=65,ME,DUPL=GTDUPF(CBIN13)«, t00=0x003c, t01=0x00cc}
0x5eb2…5ed6              Head {h00=0x0020, h01=0x001b, text=» FMEL 'XXXX',GTREGF(CBIN13) «, t00=0x003c, t01=0x010c}
0x5ed6…5ee4              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003c, t01=0x0130}
0x5ee4…5eec              Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x013e}
0x5eec…5ef4              Head {h00=0x0004, h01=0x0050, t00=0x003c, t01=0x0146}
0x5ef4…5f08              Head {h00=0x0010, h01=0x0050, text=»BUSUB8 FRMT «, t00=0x003c, t01=0x014e}
0x5f08…5f44              Head {h00=0x0038, h01=0x0050, text=» FKI 18,MINL=2,MAXL=2,NUM,ME,APPL=120,DUPL=GTPRTDAT «, t00=0x003c, t01=0x0162}
0x5f44…5f66              Head {h00=0x001e, h01=0x0050, text=» FMEL 'XX',GTREGF(CBIN14) «, t00=0x003d, t01=0x000e}
0x5f66…5f74              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003d, t01=0x0030}
0x5f74…5f7c              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x003e}
0x5f7c…5f84              Head {h00=0x0004, h01=0x0050, t00=0x003d, t01=0x0046}
0x5f84…5f98              Head {h00=0x0010, h01=0x0050, text=»BUSUB9 FRMT «, t00=0x003d, t01=0x004e}
0x5f98…5fa4              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003d, t01=0x0062}
0x5fa4…5fc2              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='PROJEKT NR ' «, t00=0x003d, t01=0x006e}
0x5fc2…5fd6              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',4«, t00=0x003d, t01=0x008c}
0x5fd6…5fec              Head {h00=0x0012, h01=0x0050, text=» FLINK BUBEL1 «, t00=0x003d, t01=0x00a0}
0x5fec…5ff8              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x003d, t01=0x00b6}
0x5ff8…6026              Head {h00=0x002a, h01=0x0050, text=» FKI 1,MINL=4,MAXL=4,ME,NUM,REWRT,  C «, t00=0x003d, t01=0x00c2}
0x6026…604a              Head {h00=0x0020, h01=0x0050, text=»  APPL=5,DUPL=GTDUPF(CBIN1) «, t00=0x003d, t01=0x00f0}
0x604a…606c              Head {h00=0x001e, h01=0x0050, text=» FMEL 'XXXX',GTREGF(CBIN1)«, t00=0x003d, t01=0x0114}
0x606c…60a6              Head {h00=0x0036, h01=0x0050, text=» FKI 16,MINL=1,MAXL=11,ME,APPL=56,NUM,SCHK=4,REWRT«, t00=0x003d, t01=0x0136}
0x60a6…60d0              Head {h00=0x0026, h01=0x0050, text=» FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN4)«, t00=0x003d, t01=0x0170}
0x60d0…60de              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x003e, t01=0x000a}
0x60de…60e6              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0018}
0x60e6…60ee              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x0020}
0x60ee…6102              Head {h00=0x0010, h01=0x0050, text=»BUSUB10 FRMT«, t00=0x003e, t01=0x0028}
0x6102…6116              Head {h00=0x0010, h01=0x0050, text=» FILLR '0',2«, t00=0x003e, t01=0x003c}
0x6116…612e              Head {h00=0x0014, h01=0x0050, text=» FCOPY GTREMBUF «, t00=0x003e, t01=0x0050}
0x612e…613c              Head {h00=0x000a, h01=0x0050, text=» FEOR «, t00=0x003e, t01=0x0068}
0x613c…614a              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x0076}
0x614a…6152              Head {h00=0x0004, h01=0x0000, t00=0x003e, t01=0x0084}
0x6152…615a              Head {h00=0x0004, h01=0x0000, t00=0x003e, t01=0x008c}
0x615a…616e              Head {h00=0x0010, h01=0x0050, text=»STJFRM FRMT «, t00=0x003e, t01=0x0094}
0x616e…6182              Head {h00=0x0010, h01=0x0050, text=» FILLR '*',5«, t00=0x003e, t01=0x00a8}
0x6182…6190              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x00bc}
0x6190…6198              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00ca}
0x6198…61a0              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x00d2}
0x61a0…61b4              Head {h00=0x0010, h01=0x0050, text=»PCKINIT FRMT«, t00=0x003e, t01=0x00da}
0x61b4…61ca              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x003e, t01=0x00ee}
0x61ca…61e0              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',40 «, t00=0x003e, t01=0x0104}
0x61e0…61fc              Head {h00=0x0018, h01=0x0050, text=» FBT GTSWFLAG,PCKI10«, t00=0x003e, t01=0x011a}
0x61fc…6214              Head {h00=0x0014, h01=0x0050, text=» FILLR X'00',48 «, t00=0x003e, t01=0x0136}
0x6214…6222              Head {h00=0x000a, h01=0x0050, text=» FEXIT«, t00=0x003e, t01=0x014e}
0x6222…6230              Head {h00=0x000a, h01=0x0050, text=»PCKI10«, t00=0x003e, t01=0x015c}
0x6230…6246              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',48 «, t00=0x003e, t01=0x016a}
0x6246…6254              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x003e, t01=0x0180}
0x6254…625c              Head {h00=0x0004, h01=0x0050, t00=0x003e, t01=0x018e}
0x625c…6264              Head {h00=0x0004, h01=0x0050, t00=0x003f, t01=0x0008}
0x6264…6270              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x003f, t01=0x0010}
0x6270…6274              Head {h00=0x4004, h01=0x0000}
0x6274…6278              00 3f 00 1c                                                                                                                                                                                                                                       ┆ ?  ┆
0x6278…6280 (64, 1, 8)   20 04 00 00 00 40 00 04                                                                                                                                                                                                                           ┆     @  ┆
0x6280…62d0 (65, 0, 398) 4b 49 2c 42 55 46 4c 3d 32 20 00 08 01 7a 00 04 00 50 00 09 00 12 00 06 00 50 2a 20 00 09 00 1a 00 06 00 50 2a 20 00 09 00 24 00 12 00 50 2a 5c 47 54 50 20 54 45 52 4d 49 4e 41 4c 00 09 00 2e 00 06 00 50 2a 20 00 09 00 44 00 06 00 50 2a 20   ┆KI,BUFL=2    z   P       P*        P*    $   P* GTP TERMINAL   .   P*    D   P* ┆
0x62d0…6320              00 09 00 4e 00 0c 00 50 5c 54 45 52 4d 5c 47 41 00 09 00 58 00 06 00 50 2a 20 00 09 00 68 00 0c 00 50 5c 43 57 42 5c 43 42 39 00 09 00 72 00 0c 00 50 5c 54 57 42 5c 54 42 39 00 09 00 82 00 06 00 50 2a 20 00 09 00 92 00 10 00 50 5c 53 54 41   ┆   N   P TERM GA   X   P*    h   P CWB CB9   r   P TWB TB9       P*        P STA┆
0x6320…6370              52 54 5c 47 54 50 47 4f 00 09 00 9c 00 14 00 50 20 52 45 45 4e 54 45 52 20 52 45 45 4e 47 41 20 00 09 00 b0 00 06 00 50 2a 20 00 09 00 c8 00 14 00 50 44 53 44 43 5c 44 53 45 54 5c 46 43 3d 36 31 20 00 09 00 d2 00 1c 00 50 44 53 49 43 52 5c   ┆RT GTPGO       P REENTER REENGA        P*        PDSDC DSET FC=61        PDSICR ┆
0x6370…63c0              44 53 45 54 5c 46 43 3d 45 30 2c 44 45 56 3d 49 49 20 00 09 00 ea 00 24 00 50 44 53 49 43 57 5c 44 53 45 54 5c 46 43 3d 45 31 2c 44 45 56 3d 49 4f 5c 43 4f 50 43 4d 44 3d 31 00 09 01 0a 00 24 00 50 44 53 47 54 50 5c 44 53 45 54 5c 46 43 3d   ┆DSET FC=E0,DEV=II      $ PDSICW DSET FC=E1,DEV=IO COPCMD=1     $ PDSGTP DSET FC=┆
0x63c0…640e              33 30 2c 44 45 56 3d 47 50 2c 42 55 46 4c 3d 31 36 32 00 09 01 32 00 06 00 50 2a 20 00 09 01 5a 00 0a 00 50 5c 45 4a 45 43 54 00 09 01 64 00 06 00 50 2a 20 00 09 01 72 00 12 00 50 2a 20 4c 49 4e 45 20 50 52 49 4e 54 45 52 00 09 01 7c         ┆30,DEV=GP,BUFL=162   2   P*    Z   P EJECT   d   P*    r   P* LINE PRINTER   |┆
0x640e…645e (66, 0, 400) 00 06 00 50 2a 20 00 0a 00 04 00 06 00 50 2a 20 00 0a 00 0e 00 0c 00 50 20 54 45 52 4d 20 4c 41 00 0a 00 18 00 06 00 50 2a 20 00 0a 00 28 00 0c 00 50 20 43 57 42 20 43 42 39 00 0a 00 32 00 0c 00 50 20 54 57 42 20 54 42 39 00 0a 00 42 00 06   ┆   P*        P*        P TERM LA       P*    (   P CWB CB9   2   P TWB TB9   B  ┆
0x645e…64ae              00 50 2a 20 00 0a 00 52 00 10 00 50 20 53 54 41 52 54 20 4c 50 47 4f 20 00 0a 00 5c 00 14 00 50 20 52 45 45 4e 54 45 52 20 52 45 45 4e 4c 41 20 00 0a 00 70 00 06 00 50 2a 20 00 0a 00 88 00 14 00 50 44 53 44 43 5c 44 53 45 54 5c 46 43 3d 36   ┆ P*    R   P START LPGO        P REENTER REENLA    p   P*        PDSDC DSET FC=6┆
0x64ae…64fe              31 20 00 0a 00 92 00 1c 00 50 44 53 49 43 52 5c 44 53 45 54 5c 46 43 3d 45 30 2c 44 45 56 3d 49 49 20 00 0a 00 aa 00 24 00 50 44 53 49 43 57 5c 44 53 45 54 5c 46 43 3d 45 31 2c 44 45 56 3d 49 4f 5c 43 4f 50 43 4d 44 3d 31 00 0a 00 ca 00 24   ┆1        PDSICR DSET FC=E0,DEV=II      $ PDSICW DSET FC=E1,DEV=IO COPCMD=1     $┆
0x64fe…654e              00 50 44 53 4c 50 20 44 53 45 54 20 46 43 3d 38 30 2c 44 45 56 3d 4c 50 2c 42 55 46 4c 3d 31 36 32 20 00 0a 00 f2 00 04 00 50 00 0a 01 1a 00 06 00 50 2a 20 00 0a 01 22 00 06 00 50 2a 20 00 0a 01 2c 00 0c 00 50 2a 5c 44 43 54 41 53 4b 00 0a   ┆ PDSLP DSET FC=80,DEV=LP,BUFL=162        P       P*    "   P*    ,   P* DCTASK  ┆
0x654e…659e              01 36 00 06 00 50 2a 20 00 0a 01 46 00 06 00 50 2a 20 00 0a 01 50 00 0c 00 50 5c 54 45 52 4d 20 44 30 00 0a 01 5a 00 06 00 50 2a 20 00 0a 01 6a 00 0c 00 50 5c 43 57 42 5c 43 42 39 00 0a 01 74 00 10 00 50 5c 53 54 41 52 54 5c 44 43 31 47 4f   ┆ 6   P*    F   P*    P   P TERM D0   Z   P*    j   P CWB CB9   t   P START DC1GO┆
0x659e…65ee (67, 0, 400) 00 0a 01 84 00 14 00 50 20 52 45 45 4e 54 45 52 20 52 45 45 4e 44 30 20 00 0b 00 08 00 14 00 50 44 53 44 43 5c 44 53 45 54 5c 46 43 3d 36 30 20 00 0b 00 20 00 06 00 50 2a 20 00 0b 00 38 00 0a 00 50 5c 45 4a 45 43 54 00 0b 00 42 00 06 00 50   ┆       P REENTER REEND0        PDSDC DSET FC=60        P*    8   P EJECT   B   P┆
0x65ee…663e              2a 20 00 0b 00 50 00 06 00 50 2a 20 00 0b 00 5a 00 34 00 50 2a 20 20 20 20 20 20 57 4f 52 4b 20 41 52 45 41 20 46 4f 52 20 4b 45 59 42 4f 41 52 44 20 41 4e 44 20 44 49 53 50 4c 41 59 20 54 41 53 4b 53 20 00 0b 00 64 00 06 00 50 2a 20 00 0b   ┆*    P   P*    Z 4 P*      WORK AREA FOR KEYBOARD AND DISPLAY TASKS    d   P*   ┆
0x663e…668e              00 9c 00 06 00 50 2a 20 00 0b 00 a6 00 0c 00 50 54 42 39 5c 42 4c 4b 20 00 0b 00 b0 00 06 00 50 2a 20 00 0b 00 c0 00 26 00 50 54 43 54 30 31 5c 42 49 4e 5c 34 58 27 30 27 5c 54 49 44 20 41 4e 44 20 53 54 41 43 4b 42 41 53 45 20 00 0b 00 ca   ┆     P*        PTB9 BLK        P*      & PTCT01 BIN 4X'0' TID AND STACKBASE     ┆
0x668e…66de              00 2a 00 50 50 52 49 4e 54 45 52 5c 53 54 52 47 5c 34 58 27 30 27 5c 4b 45 59 42 41 52 44 2f 56 44 55 2f 50 52 49 4e 54 45 52 00 0b 00 f4 00 26 00 50 42 56 44 55 5c 53 54 52 47 5c 33 38 34 30 58 27 30 27 5c 56 44 55 20 53 43 52 45 45 4e 20   ┆ * PPRINTER STRG 4X'0' KEYBARD/VDU/PRINTER     & PBVDU STRG 3840X'0' VDU SCREEN ┆
0x66de…672e              42 55 46 46 00 0b 01 22 00 28 00 50 50 43 55 52 53 5c 53 54 52 47 5c 34 58 27 30 27 5c 43 55 52 53 4f 52 20 41 44 44 52 2e 20 42 49 4e 41 52 59 00 0b 01 4c 00 2e 00 50 41 54 54 52 49 42 5c 53 54 52 47 5c 34 58 27 30 27 5c 4c 41 53 54 20 41   ┆BUFF   " ( PPCURS STRG 4X'0' CURSOR ADDR. BINARY   L . PATTRIB STRG 4X'0' LAST A┆
0x672e…677e (68, 0, 400) 54 54 52 49 42 55 54 45 20 43 48 41 52 41 43 54 45 52 00 0b 01 78 00 26 00 50 43 55 52 41 54 54 5c 53 54 52 47 5c 34 58 27 30 27 5c 43 55 52 53 4f 52 20 41 54 54 52 49 42 55 54 45 00 0c 00 1a 00 24 00 50 57 43 43 5c 53 54 52 47 5c 34 58 27   ┆TTRIBUTE CHARACTER   x & PCURATT STRG 4X'0' CURSOR ATTRIBUTE     $ PWCC STRG 4X'┆
0x677e…67ce              30 27 5c 57 43 43 2f 43 43 43 20 43 48 41 52 41 43 54 45 52 00 0c 00 44 00 2c 00 50 4b 42 49 4e 48 5c 53 54 52 47 5c 34 58 27 30 27 5c 4b 45 59 42 4f 41 52 44 20 49 4e 48 49 42 49 54 20 49 4e 44 49 43 2e 00 0c 00 6c 00 16 00 50 4c 49 4e 43   ┆0' WCC/CCC CHARACTER   D , PKBINH STRG 4X'0' KEYBOARD INHIBIT INDIC.   l   PLINC┆
0x67ce…681e              4e 54 5c 53 54 52 47 5c 34 58 27 30 27 5c 00 0c 00 9c 00 2e 00 50 44 43 4c 45 4e 47 5c 53 54 52 47 5c 34 58 27 30 27 5c 44 43 20 52 45 41 44 20 45 46 46 45 43 54 49 56 45 20 4c 45 4e 47 54 48 00 0c 00 b6 00 16 00 50 49 43 57 4f 52 4b 5c 53   ┆NT STRG 4X'0'      . PDCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH       PICWORK S┆
0x681e…686e              54 52 47 5c 34 58 27 30 27 20 00 0c 00 e8 00 2a 00 50 49 4e 54 41 54 54 5c 53 54 52 47 5c 34 58 27 30 27 5c 49 4e 54 45 4e 53 49 54 59 20 41 54 54 52 49 42 55 54 45 20 00 0c 01 02 00 22 00 50 4f 46 46 46 4c 47 5c 53 54 52 47 5c 34 58 27 30   ┆TRG 4X'0'      * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE      " POFFFLG STRG 4X'0┆
0x686e…68be              27 5c 4f 46 46 4c 49 4e 45 20 46 4c 41 47 00 0c 01 30 00 20 00 50 43 4f 50 4e 4f 5c 42 49 4e 5c 5c 54 49 44 20 46 4f 52 20 48 41 52 44 43 4f 50 59 20 00 0c 01 56 00 20 00 50 4d 49 53 43 41 52 5c 53 54 52 47 5c 34 34 58 27 30 27 5c 43 43 43   ┆' OFFLINE FLAG   0   PCOPNO BIN  TID FOR HARDCOPY    V   PMISCAR STRG 44X'0' CCC┆

Reduced view