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

⟦37b28ad74⟧

    Length: 14074 (0x36fa)
    Notes: pts_type(SC)
    Names: »RGMAIN.SC«

Derivation

└─⟦f445cacdf⟧ Bits:30009666 Philips computer tape "600111"
    └─⟦this⟧ »NJ-AMT/RGMAIN.SC« 

PTS(SC)

	IDENT RGMAIN 	02.03.XXX.1
	DDUM	KMD08 
	PDIV 
	ENTRY	INITRG 
 ENTRY FUNCT
 ENTRY TRINP
 ENTRY TRPAGE 
 EXT BELL 
	EXT	SETKRE 
 EXT SETDEB 
	EXT	PACKCL 
	EXT	FMSTYR 
	EXT	FRMTSP 
	EXT	SPCLRA 
	EXT	SPERR
 EXT SPCA 
 EXT SPCN 
 EXT SPCLRN 
	EXT	SPINF1 
	EXT	LSTINT 
	EXT	SUBTOT 
 EXT CYK
	EXT	MODP 
	EXT	KORT 
	EXT	KVIT 
 EXT ADM
	EXT	SUM
	EXT	DIVTR
	EXT	ENTER
	INCLUDE	EQUATE 
	EJECT
INITRG	PROC 
********************
* 
*           INITRG - THIS PROCEDURE TAKES CARE OF ALL REGISTRATIONS,
*         FROM 'KASSEAABNING' TO 'KASSELUKNING'.
*         ONLY KASSEFUNCTIONS, FROM OPEN TO CLOSE.
*         TWO DIFFERENT METHODS ARE USED, 
*         DETERMINED BY THE FLAG CTRVALG: 
*              CTRVALG TRUE : 'SKOVBOMETODE'
*              CTRVALG FALSE: 'VIBORGMETODE'
* 
********************
* 
*     GENERAL INITIATION
	MOVE	SPLINTOP,=W'1'	FIRST LINE, SCREEN 
	MOVE	SPLINLOW,=W'0'	LAST LINE, SCREEN
	MOVE	SPKEY,CBIN1	USE KEY POSITION 1
	SET	GTREGFLG	FIRST TRANS 
 CLEAR SPME 
	MOVE	GTREGNR,=D'1'	INITIAL TRANSTYPE 1 
	MOVE	GTREGDEX,CBIN1
	PERF	SETKRE	KREDIT 
	PERF	PACKCL	CLEAR PACKBUFFER 
* 
	TBF	CTRVALG,TR250
*     INITIATE SKOVBOMETODE 
TR200 
 PERF TRPAGE TRANS SELECTED 
	SET	GTDIVTR	'DIVERSE TRANS'
	B	TR400
* 
*     INITIATE VIBORGMETODE 
TR250 
	CLEAR	GTDIVTR
	MOVE	TTSTYRDX,=W'1'	'HOVEDBOG' 
	EJECT
*     READ
TR400 
	SET	SPPROMPT 
	MOVE	TTTROLD,=W'-1'	CLEAR OLD TRANS NO 
TR410 
	CLEAR	SPCHANGE	READY FOR FUNCTIONS 
	TBT	GTDIVTR,TR420
	MOVE	GTDBKRC,=C' ' 
	PERF	FMSTYR	ATTACH CONTROL INF 
	CLEAR	GTTRSEL
	B	TR430
TR420 
	PERF	FRMTSP	ATTACH FULL FORMAT 
TR430 
 TBT GTLOKSPG,TR435 
 CLEAR TFELT90
 CLEAR TFELT91
 CLEAR TFELT92
 CLEAR TFELT93
 CLEAR TFELT94
 CLEAR TFELT901 
 CLEAR TFELT911 
 CLEAR TFELT921 
 CLEAR TFELT931 
 CLEAR TFELT941 
 MOVE SPKEY,CBIN1 
	PERF	SPCLRA	WRITE AND READ ON SCREEN 
 B TR500
TR435 
 MOVE SPKEY,CBIN3 
 PERF SPCLRN IF LOCAL INQUIRIES 
	EJECT
TR500 
	TBT	SPCHANGE,TR600 
*      FUNCTION CALL
	PERF	FUNCT 
	SET	GTSLUTFL 
*     BRANCH ON TYPE OF FUNCTION
	IB	SPBINW3,		C 
		TR510,TR520,TR530,TR540,TR550 
* 
TR510			NEW TYPE OF CONTROL INF 
	B	TR400
* 
TR520			ERROR TYPE
	PERF	SPERR 
	CBE	SPBINW2,=W'2',TR510	MAK KEY
	B	TR530	CORRECTION 
* 
TR530			FUNCTION WITHOUT INPUT
	CLEAR	SPPROMPT 
	PERF	SPCLRA	RESTAT INPUT 
	B	TR500
* 
TR540			FUNCTION WITH INPUT 
	B	TR400
* 
TR550			OUT OF REGISTRATION 
 SET SPME 
	RET
* 
	EJECT
TR600 
*     NOT FUNCTION CALL 
	PERF	TRINP 
	SET	GTSLUTFL 
*     BRANCH ON TYPE OF INPUT 
*     (MAK, ERROR, TRSEL, END 1 PG, END MORE PG,
*     TO NEXT PAGE) 
	IB	SPBINW3,		C 
		TR610,TR620,TR630,TR640,TR650,TR660 
* 
TR610			MAK TYPE
	PERF	TRPAGE
	B	TR400
* 
TR620			INVALID KEY 
	PERF	SPERR 
	CBE	SPBINW2,=W'2',TR610	MAK
	CLEAR	SPPROMPT 
	PERF	SPCN
	B	TR500
* 
TR630			TRANSACTION SELECTED
	TBT	GTDIVTR,TR620	NOT ALLOWED
	PERF	TRPAGE
	CBNE	TTTROLD,GTREGDEX,TR635
	CLEAR	SPPROMPT	SAME AS PREVIOUS TRANS
	PERF	SPINF1
	PERF	FRMTSP
	PERF	SPCN
	B	TR500
TR635 
	CBL	TTTROLD,CBIN0,TR636
	ERASE	0,CBIN4,CBIN4
	ERASE	0,CBIN6,CBIN6
TR636 
	MOVE	TTTROLD,GTREGDEX	NOT AS PREVIOUS TRANS
	SET	SPPROMPT 
	PERF	FRMTSP
	PERF	SPCA
	B	TR500
* 
TR640			1 PAGE TRANS CORRECT
	TBT	GTDIVTR,TR645
	ERASE	10,SPLINTOP,SPLINLOW	ERASE VARIABLES IN
	MOVE	GTDBKRC,=C' ' 
			CURRENT FORMAT 
TR645 
	CLEAR	SPPROMPT 
	CLEAR	GTREGFLG 
	B	TR410
* 
TR650			>1 PAGE TRANS CORRECT 
	TBT	GTDIVTR,TR610
	MOVE	GTDBKRC,=C' ' 
	CLEAR	GTREGFLG 
	B	TR610
* 
TR660			TO NEXT PAGE
			NEXT PAGE ALREADY
			ATTACHED 
	MOVE	TTTROLD,CBIN0 
	SET	SPPROMPT 
	PERF	SPCLRA
	B	TR500
* 
* 
	PEND 
	EJECT
FUNCT	PROC
********************
* 
*             FUNCT - PROCEDURE FOR EXECUTING ALL FUNCTIONS ALLOWED.
*          INPUT: 
*               SPBINW2, GIVING KEY INDEX, COMMING FROM 
*                        SCREEN PACKAGE 
*          OUTPUT:
*               SPBINW3, GIVING THE TYPE OF FUNCTION
*                   1     MAK OR NEW CONTROL INFORMATION
*                   2     INVALID KEY 
*                   3     FUNCTION WITHOUT INPUT
*                   4     FUNCTION WITH INPUT 
*                   5     REG KEY, OUT OF REGISTRATION
* 
********************
	IB	SPBINW2,		C 
		FU01,FU02,FU03,FU04,FU05,FU06,FU07,FU08,FU09,FU10,		C 
		FU11,FU12,FU13,FU14,FU15,FU16,FU17,FU18,FU19,FU20,		C 
		FU21,FU22,FU23
 B FU01 
* 
FU01
FU02
 CLEAR GTLOKSPG 
			MAK
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU03			ENTER
 TBT GTLOKSPG,FU08
 TEST GTDIVTR 
 BZ FUNOK 
 PERF SETDEB
 PERF BELL
 PERF SPINF1
 MOVE SPBINW3,CBIN3 DEBET 
	RET
* 
FU04			KREDIT KEY 
 TEST GTDIVTR 
 BZ FUNOK 
 PERF SETKRE
 PERF BELL
 PERF SPINF1
 MOVE SPBINW3,CBIN3 KREDIT
	RET
* 
FU05			REG KEY
	MOVE	SPBINW3,CBIN5	OUT OF REGISTRATION 
	RET
* 
FU06			LISTE
	PERF	LSTINT
	BNOK	FUNOK 
	B	FUOK 
* 
FU07			SUBTOTAL 
	PERF	SUBTOT
	BNOK	FUNOK 
	B	FUOK 
* 
FU08			SPG FUNCTION 
 PERF ADM,CBIN11
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU09			CYCLE
 PERF CYK,CBIN1 
	BNOK	FUNOK 
	MOVE	SPBINW3,CBIN4 
	RET
* 
FU10			STABEL 
 PERF CYK,CBIN2 
	BNOK	FUNOK 
	MOVE	SPBINW3,CBIN4 
	RET
* 
FU11			INVKEY, MODP 
	PERF	MODP
 BNOK FUNOK 
 CBE GTRETUR,=W'3',FU1110 
	B	FUOK 
FU1110
 MOVE SPBINW3,CBIN4 
 RET
* 
FU12			KONTOKORT
	PERF	KORT
	BNOK	FUNOK 
	MOVE	SPBINW3,CBIN4 
	RET
* 
FU13			KVIT 
	PERF	KVIT
	BNOK	FUNOK 
	B	FUOK 
* 
FU14			SUPL 
 PERF ADM,CBIN10
	BNOK	FUNOK 
	B	FUOK 
* 
FU15			SUM
	PERF	SUM 
	BNOK	FUNOK 
	B	FUOK 
* 
FU16			ADM KEY
	MOVE	GSWBCD3,SPINPUT	GET ADM TYPE
	MOVE	GSWBIN1,GSWBCD3 
 PERF ADM,GSWBIN1 
 MOVE SPBINW3,CBIN4 
 RET
* 
FU17			CYCLE KEY
	MOVE	GSWBCD3,SPINPUT	GET TYPE OF CYCLE 
	MOVE	GSWBIN1,GSWBCD3 
	IB	GSWBIN1,		C 
		FU09,FU10,FUNOK,FCYK4,FUNOK,	CYCLE,STABEL	C 
		FUNOK,FUNOK,FUNOK,FCYK9 
	PERF	CYK,CBIN10	END OF CYCLE/STABEL
	BNOK	FUNOK 
	B	FUOK 
* 
FCYK4			PAUSE IN CYCLE STABEL 
 PERF CYK,CBIN4 
 BNOK FUNOK 
 B FUOK 
* 
FCYK9 
	PERF	CYK,CBIN9	CLEAR ARKIV KNT. NR 
	BNOK	FUNOK 
	B	FUOK 
* 
FU18			DIV TRANS
	PERF	DIVTR 
	BNOK	FUNOK 
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU19			HOVEDBOG 
	TBT	GTDIVTR,FUNOK
	MOVE	TTSTYRDX,=W'1'
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU20			DEBITOR POSTERING
	TBT	GTDIVTR,FUNOK
	MOVE	TTSTYRDX,=W'2'
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU21			REMITTERING
	TBT	GTDIVTR,FUNOK
	MOVE	TTSTYRDX,=W'3'
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU22			TRANS SELECTION IN DIVTR 
	TBF	GTDIVTR,FUNOK
	PERF	TRPAGE
	MOVE	SPBINW3,CBIN1 
	RET
* 
FU23			ONLINE 
 PERF ADM,CBIN7 PERFORM ONLINE
 MOVE SPBINW3,CBIN4 REWRITE SCREEN
 RET
* 
* 
FUNOK 
	MOVE	SPBINW4,=W'16'	INVALID KEY
	MOVE	SPBINW3,CBIN2 
	RET
* 
FUOK
	MOVE	SPBINW3,CBIN3 
	RET
	PEND 
	EJECT
TRINP	PROC
********************
* 
*            TRINP - PROCEDURE FOR HANDLING INFORMATION GIVEN OVER
*          FROM THE SCREEN PACKAGE. 
*          WILL BE CALLED WHEN SOMETHING HAS BEEN ENTERED 
*          WHICH THE SCREEN PACKAGE CAN NOT TAKE CARE OF
*          ITSELF.
*          SPCHANGE WILL BE SET.
*          INPUT: 
*               SPBINW2: INDEX FOR THE KEY DEPRESSED
*          OUTPUT:
*               SPBINW3: GIVING THE TYPE OF INPUT 
*               1   MAK TYPE
*               2   INVALID KEY 
*               3   TRANSACTION SELECTED
*               4   1 PAGE TRANS CORRECT
*               5   >1 PAGE TRANS CORRECT 
*               6   NEXT PAGE OF TRANS ALREADY ATTACHED 
* 
********************
* 
	IB	SPBINW2,		C 
		IN01,IN02,IN03
	CBE	SPBINW2,=W'22',IN22
IN00
	MOVE	SPBINW3,CBIN2	INVALID KEY 
	RET
* 
IN01
IN02			MAK
	MOVE	SPBINW3,CBIN1 
	RET
* 
IN03			AFTER SLUT,
	TBT	GTTRSEL,IN030
	CBE	SPBINW1,=W'0',IN00	NOT ALLOWED 
IN030 
	PERF	ENTER 
	BNOK	IN035	ERRORS DETECTED IN FLDTST 
	IB	GTRETUR,		C 
		IN031,IN032,IN033 
IN031 
	MOVE	SPBINW3,CBIN4 
	RET
IN032 
	MOVE	SPBINW3,CBIN6 
	RET
IN033 
	MOVE	SPBINW3,CBIN5 
	RET
IN035 
	TBWD		TAB OVER LAST FIELD
	MOVE	SPBINW3,CBIN2 
	RET
* 
IN22
			TRANS SELECTED 
	MOVE	SPBINW3,CBIN3 
	RET
* 
	PEND 
	EJECT
TRPAGE	PROC 
********************
* 
*              TRPAGE - AFTER SELECTION OF TRANSTYPE, SET CORRECT 
*          INFORMATION ABOUT THE SIZE AND TYPE OF 
*          THE TRANSACTION
* 
********************
* 
	SET	GTTRSEL	TRANSACTION SELECTED 
	CLEAR	GTTYPE2
	CLEAR	GTTYPE3
	MOVE	GTPAGE,CBIN1
*          TRANSTYPE  01, 02, 03, 04, 05, 06, 07, 08, 09, 10, 
*                     12, 40, 41, 42, 45, 46, 47, 48, 49, 50, 
*                     51, 52, 53, 54
	IB	GTREGDEX,		C
		PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG03,PG03,PG01,		C 
		PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,		C 
		PG03,PG01,PG03,PG01 
PG01
	RET
PG02
	SET	GTTYPE2
	RET
PG03
	SET	GTTYPE3
	RET
	PEND 
	END

HexDump

0x0000…0022 (0, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» IDENT RGMAIN  02.03.XXX.1«, t00=0x0000, t01=0x0004}
0x0022…0036              Head {h00=0x0010, h01=0x0050, text=» DDUM KMD08 «, t00=0x0000, t01=0x0026}
0x0036…0044              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x003a}
0x0044…005a              Head {h00=0x0012, h01=0x0050, text=» ENTRY INITRG «, t00=0x0000, t01=0x0048}
0x005a…006e              Head {h00=0x0010, h01=0x0050, text=» ENTRY FUNCT«, t00=0x0000, t01=0x005e}
0x006e…0082              Head {h00=0x0010, h01=0x0050, text=» ENTRY TRINP«, t00=0x0000, t01=0x0072}
0x0082…0098              Head {h00=0x0012, h01=0x0050, text=» ENTRY TRPAGE «, t00=0x0000, t01=0x0086}
0x0098…00aa              Head {h00=0x000e, h01=0x0050, text=» EXT BELL «, t00=0x0000, t01=0x009c}
0x00aa…00be              Head {h00=0x0010, h01=0x0050, text=» EXT SETKRE «, t00=0x0000, t01=0x00ae}
0x00be…00d2              Head {h00=0x0010, h01=0x0050, text=» EXT SETDEB «, t00=0x0000, t01=0x00c2}
0x00d2…00e6              Head {h00=0x0010, h01=0x0050, text=» EXT PACKCL «, t00=0x0000, t01=0x00d6}
0x00e6…00fa              Head {h00=0x0010, h01=0x0050, text=» EXT FMSTYR «, t00=0x0000, t01=0x00ea}
0x00fa…010e              Head {h00=0x0010, h01=0x0050, text=» EXT FRMTSP «, t00=0x0000, t01=0x00fe}
0x010e…0122              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRA «, t00=0x0000, t01=0x0112}
0x0122…0134              Head {h00=0x000e, h01=0x0050, text=» EXT SPERR«, t00=0x0000, t01=0x0126}
0x0134…0146              Head {h00=0x000e, h01=0x0050, text=» EXT SPCA «, t00=0x0000, t01=0x0138}
0x0146…0158              Head {h00=0x000e, h01=0x0050, text=» EXT SPCN «, t00=0x0000, t01=0x014a}
0x0158…016c              Head {h00=0x0010, h01=0x0050, text=» EXT SPCLRN «, t00=0x0000, t01=0x015c}
0x016c…0180              Head {h00=0x0010, h01=0x0050, text=» EXT SPINF1 «, t00=0x0000, t01=0x0170}
0x0180…0194              Head {h00=0x0010, h01=0x0050, text=» EXT LSTINT «, t00=0x0000, t01=0x0184}
0x0194…01a8              Head {h00=0x0010, h01=0x0050, text=» EXT SUBTOT «, t00=0x0001, t01=0x0008}
0x01a8…01b8              Head {h00=0x000c, h01=0x0050, text=» EXT CYK«, t00=0x0001, t01=0x001c}
0x01b8…01ca              Head {h00=0x000e, h01=0x0050, text=» EXT MODP «, t00=0x0001, t01=0x002c}
0x01ca…01dc              Head {h00=0x000e, h01=0x0050, text=» EXT KORT «, t00=0x0001, t01=0x003e}
0x01dc…01ee              Head {h00=0x000e, h01=0x0050, text=» EXT KVIT «, t00=0x0001, t01=0x0050}
0x01ee…01fe              Head {h00=0x000c, h01=0x0050, text=» EXT ADM«, t00=0x0001, t01=0x0062}
0x01fe…020e              Head {h00=0x000c, h01=0x0050, text=» EXT SUM«, t00=0x0001, t01=0x0072}
0x020e…0220              Head {h00=0x000e, h01=0x0050, text=» EXT DIVTR«, t00=0x0001, t01=0x0082}
0x0220…0232              Head {h00=0x000e, h01=0x0050, text=» EXT ENTER«, t00=0x0001, t01=0x0094}
0x0232…024a              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x00a6}
0x024a…0258              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00be}
0x0258…026c              Head {h00=0x0010, h01=0x0050, text=»INITRG PROC «, t00=0x0001, t01=0x00cc}
0x026c…0288              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0001, t01=0x00e0}
0x0288…0292              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x0292…02de              Head {h00=0x0048, h01=0x0050, text=»*           INITRG - THIS PROCEDURE TAKES CARE OF ALL REGISTRATIONS,«, t00=0x0001, t01=0x0106}
0x02de…0316              Head {h00=0x0034, h01=0x0050, text=»*         FROM 'KASSEAABNING' TO 'KASSELUKNING'.«, t00=0x0001, t01=0x0152}
0x0316…0350              Head {h00=0x0036, h01=0x0050, text=»*         ONLY KASSEFUNCTIONS, FROM OPEN TO CLOSE.«, t00=0x0001, t01=0x018a}
0x0350…0382              Head {h00=0x002e, h01=0x0050, text=»*         TWO DIFFERENT METHODS ARE USED, «, t00=0x0002, t01=0x0034}
0x0382…03b4              Head {h00=0x002e, h01=0x0050, text=»*         DETERMINED BY THE FLAG CTRVALG: «, t00=0x0002, t01=0x0066}
0x03b4…03e8              Head {h00=0x0030, h01=0x0050, text=»*              CTRVALG TRUE : 'SKOVBOMETODE'«, t00=0x0002, t01=0x0098}
0x03e8…041c              Head {h00=0x0030, h01=0x0050, text=»*              CTRVALG FALSE: 'VIBORGMETODE'«, t00=0x0002, t01=0x00cc}
0x041c…0426              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0100}
0x0426…0442              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0002, t01=0x010a}
0x0442…044c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0126}
0x044c…046c              Head {h00=0x001c, h01=0x0050, text=»*     GENERAL INITIATION«, t00=0x0002, t01=0x0130}
0x046c…049c              Head {h00=0x002c, h01=0x0050, text=» MOVE SPLINTOP,=W'1' FIRST LINE, SCREEN «, t00=0x0002, t01=0x0150}
0x049c…04ca              Head {h00=0x002a, h01=0x0050, text=» MOVE SPLINLOW,=W'0' LAST LINE, SCREEN«, t00=0x0002, t01=0x0180}
0x04ca…04f6              Head {h00=0x0028, h01=0x0050, text=» MOVE SPKEY,CBIN1 USE KEY POSITION 1«, t00=0x0003, t01=0x001e}
0x04f6…0518              Head {h00=0x001e, h01=0x0050, text=» SET GTREGFLG FIRST TRANS «, t00=0x0003, t01=0x004a}
0x0518…052c              Head {h00=0x0010, h01=0x0050, text=» CLEAR SPME «, t00=0x0003, t01=0x006c}
0x052c…055c              Head {h00=0x002c, h01=0x0050, text=» MOVE GTREGNR,=D'1' INITIAL TRANSTYPE 1 «, t00=0x0003, t01=0x0080}
0x055c…0578              Head {h00=0x0018, h01=0x0050, text=» MOVE GTREGDEX,CBIN1«, t00=0x0003, t01=0x00b0}
0x0578…0594              Head {h00=0x0018, h01=0x0050, text=» PERF SETKRE KREDIT «, t00=0x0003, t01=0x00cc}
0x0594…05ba              Head {h00=0x0022, h01=0x0050, text=» PERF PACKCL CLEAR PACKBUFFER «, t00=0x0003, t01=0x00e8}
0x05ba…05c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x010e}
0x05c4…05de              Head {h00=0x0016, h01=0x0050, text=» TBF CTRVALG,TR250«, t00=0x0003, t01=0x0118}
0x05de…0602              Head {h00=0x0020, h01=0x0050, text=»*     INITIATE SKOVBOMETODE «, t00=0x0003, t01=0x0132}
0x0602…0610              Head {h00=0x000a, h01=0x0050, text=»TR200 «, t00=0x0003, t01=0x0156}
0x0610…0634              Head {h00=0x0020, h01=0x0050, text=» PERF TRPAGE TRANS SELECTED «, t00=0x0003, t01=0x0164}
0x0634…0658              Head {h00=0x0020, h01=0x0050, text=» SET GTDIVTR 'DIVERSE TRANS'«, t00=0x0003, t01=0x0188}
0x0658…0668              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0004, t01=0x001c}
0x0668…0672              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002c}
0x0672…0696              Head {h00=0x0020, h01=0x0050, text=»*     INITIATE VIBORGMETODE «, t00=0x0004, t01=0x0036}
0x0696…06a4              Head {h00=0x000a, h01=0x0050, text=»TR250 «, t00=0x0004, t01=0x005a}
0x06a4…06ba              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTDIVTR«, t00=0x0004, t01=0x0068}
0x06ba…06e2              Head {h00=0x0024, h01=0x0050, text=» MOVE TTSTYRDX,=W'1' 'HOVEDBOG' «, t00=0x0004, t01=0x007e}
0x06e2…06f0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x00a6}
0x06f0…0702              Head {h00=0x000e, h01=0x0050, text=»*     READ«, t00=0x0004, t01=0x00b4}
0x0702…0710              Head {h00=0x000a, h01=0x0050, text=»TR400 «, t00=0x0004, t01=0x00c6}
0x0710…0726              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0004, t01=0x00d4}
0x0726…0756              Head {h00=0x002c, h01=0x0050, text=» MOVE TTTROLD,=W'-1' CLEAR OLD TRANS NO «, t00=0x0004, t01=0x00ea}
0x0756…0764              Head {h00=0x000a, h01=0x0050, text=»TR410 «, t00=0x0004, t01=0x011a}
0x0764…0790              Head {h00=0x0028, h01=0x0050, text=» CLEAR SPCHANGE READY FOR FUNCTIONS «, t00=0x0004, t01=0x0128}
0x0790…07aa              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,TR420«, t00=0x0004, t01=0x0154}
0x07aa…07c6              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRC,=C' ' «, t00=0x0004, t01=0x016e}
0x07c6…07ee              Head {h00=0x0024, h01=0x0050, text=» PERF FMSTYR ATTACH CONTROL INF «, t00=0x0004, t01=0x018a}
0x07ee…0804              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTRSEL«, t00=0x0005, t01=0x0022}
0x0804…0814              Head {h00=0x000c, h01=0x0050, text=» B TR430«, t00=0x0005, t01=0x0038}
0x0814…0822              Head {h00=0x000a, h01=0x0050, text=»TR420 «, t00=0x0005, t01=0x0048}
0x0822…084a              Head {h00=0x0024, h01=0x0050, text=» PERF FRMTSP ATTACH FULL FORMAT «, t00=0x0005, t01=0x0056}
0x084a…0858              Head {h00=0x000a, h01=0x0050, text=»TR430 «, t00=0x0005, t01=0x007e}
0x0858…0874              Head {h00=0x0018, h01=0x0050, text=» TBT GTLOKSPG,TR435 «, t00=0x0005, t01=0x008c}
0x0874…088a              Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT90«, t00=0x0005, t01=0x00a8}
0x088a…08a0              Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT91«, t00=0x0005, t01=0x00be}
0x08a0…08b6              Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT92«, t00=0x0005, t01=0x00d4}
0x08b6…08cc              Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT93«, t00=0x0005, t01=0x00ea}
0x08cc…08e2              Head {h00=0x0012, h01=0x0050, text=» CLEAR TFELT94«, t00=0x0005, t01=0x0100}
0x08e2…08fa              Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT901 «, t00=0x0005, t01=0x0116}
0x08fa…0912              Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT911 «, t00=0x0005, t01=0x012e}
0x0912…092a              Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT921 «, t00=0x0005, t01=0x0146}
0x092a…0942              Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT931 «, t00=0x0005, t01=0x015e}
0x0942…095a              Head {h00=0x0014, h01=0x0050, text=» CLEAR TFELT941 «, t00=0x0005, t01=0x0176}
0x095a…0974              Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN1 «, t00=0x0005, t01=0x018e}
0x0974…09a2              Head {h00=0x002a, h01=0x0050, text=» PERF SPCLRA WRITE AND READ ON SCREEN «, t00=0x0006, t01=0x0018}
0x09a2…09b2              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0006, t01=0x0046}
0x09b2…09c0              Head {h00=0x000a, h01=0x0050, text=»TR435 «, t00=0x0006, t01=0x0056}
0x09c0…09da              Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN3 «, t00=0x0006, t01=0x0064}
0x09da…0a02              Head {h00=0x0024, h01=0x0050, text=» PERF SPCLRN IF LOCAL INQUIRIES «, t00=0x0006, t01=0x007e}
0x0a02…0a10              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00a6}
0x0a10…0a1e              Head {h00=0x000a, h01=0x0050, text=»TR500 «, t00=0x0006, t01=0x00b4}
0x0a1e…0a3a              Head {h00=0x0018, h01=0x0050, text=» TBT SPCHANGE,TR600 «, t00=0x0006, t01=0x00c2}
0x0a3a…0a56              Head {h00=0x0018, h01=0x0050, text=»*      FUNCTION CALL«, t00=0x0006, t01=0x00de}
0x0a56…0a6a              Head {h00=0x0010, h01=0x0050, text=» PERF FUNCT «, t00=0x0006, t01=0x00fa}
0x0a6a…0a80              Head {h00=0x0012, h01=0x0050, text=» SET GTSLUTFL «, t00=0x0006, t01=0x010e}
0x0a80…0aa8              Head {h00=0x0024, h01=0x0050, text=»*     BRANCH ON TYPE OF FUNCTION«, t00=0x0006, t01=0x0124}
0x0aa8…0ac0              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW3,  C «, t00=0x0006, t01=0x014c}
0x0ac0…0ae8              Head {h00=0x0024, h01=0x0050, text=»  TR510,TR520,TR530,TR540,TR550 «, t00=0x0006, t01=0x0164}
0x0ae8…0af2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018c}
0x0af2…0b1a              Head {h00=0x0024, h01=0x0050, text=»TR510   NEW TYPE OF CONTROL INF «, t00=0x0007, t01=0x0008}
0x0b1a…0b2a              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0007, t01=0x0030}
0x0b2a…0b34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0040}
0x0b34…0b4e              Head {h00=0x0016, h01=0x0050, text=»TR520   ERROR TYPE«, t00=0x0007, t01=0x004a}
0x0b4e…0b62              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0007, t01=0x0064}
0x0b62…0b8a              Head {h00=0x0024, h01=0x0050, text=» CBE SPBINW2,=W'2',TR510 MAK KEY«, t00=0x0007, t01=0x0078}
0x0b8a…0ba6              Head {h00=0x0018, h01=0x0050, text=» B TR530 CORRECTION «, t00=0x0007, t01=0x00a0}
0x0ba6…0bb0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00bc}
0x0bb0…0bd6              Head {h00=0x0022, h01=0x0050, text=»TR530   FUNCTION WITHOUT INPUT«, t00=0x0007, t01=0x00c6}
0x0bd6…0bee              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0007, t01=0x00ec}
0x0bee…0c10              Head {h00=0x001e, h01=0x0050, text=» PERF SPCLRA RESTAT INPUT «, t00=0x0007, t01=0x0104}
0x0c10…0c20              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0007, t01=0x0126}
0x0c20…0c2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0136}
0x0c2a…0c4e              Head {h00=0x0020, h01=0x0050, text=»TR540   FUNCTION WITH INPUT «, t00=0x0007, t01=0x0140}
0x0c4e…0c5e              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0007, t01=0x0164}
0x0c5e…0c68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0174}
0x0c68…0c8c              Head {h00=0x0020, h01=0x0050, text=»TR550   OUT OF REGISTRATION «, t00=0x0007, t01=0x017e}
0x0c8c…0c9e              Head {h00=0x000e, h01=0x0050, text=» SET SPME «, t00=0x0008, t01=0x0012}
0x0c9e…0caa              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x0024}
0x0caa…0cb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0030}
0x0cb4…0cc2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x003a}
0x0cc2…0cd0              Head {h00=0x000a, h01=0x0050, text=»TR600 «, t00=0x0008, t01=0x0048}
0x0cd0…0cf0              Head {h00=0x001c, h01=0x0050, text=»*     NOT FUNCTION CALL «, t00=0x0008, t01=0x0056}
0x0cf0…0d04              Head {h00=0x0010, h01=0x0050, text=» PERF TRINP «, t00=0x0008, t01=0x0076}
0x0d04…0d1a              Head {h00=0x0012, h01=0x0050, text=» SET GTSLUTFL «, t00=0x0008, t01=0x008a}
0x0d1a…0d40              Head {h00=0x0022, h01=0x0050, text=»*     BRANCH ON TYPE OF INPUT «, t00=0x0008, t01=0x00a0}
0x0d40…0d78              Head {h00=0x0034, h01=0x0050, text=»*     (MAK, ERROR, TRSEL, END 1 PG, END MORE PG,«, t00=0x0008, t01=0x00c6}
0x0d78…0d94              Head {h00=0x0018, h01=0x0050, text=»*     TO NEXT PAGE) «, t00=0x0008, t01=0x00fe}
0x0d94…0dac              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW3,  C «, t00=0x0008, t01=0x011a}
0x0dac…0dda              Head {h00=0x002a, h01=0x0050, text=»  TR610,TR620,TR630,TR640,TR650,TR660 «, t00=0x0008, t01=0x0132}
0x0dda…0de4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0160}
0x0de4…0dfc              Head {h00=0x0014, h01=0x0050, text=»TR610   MAK TYPE«, t00=0x0008, t01=0x016a}
0x0dfc…0e10              Head {h00=0x0010, h01=0x0050, text=» PERF TRPAGE«, t00=0x0008, t01=0x0182}
0x0e10…0e20              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0009, t01=0x0008}
0x0e20…0e2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0018}
0x0e2a…0e46              Head {h00=0x0018, h01=0x0050, text=»TR620   INVALID KEY «, t00=0x0009, t01=0x0022}
0x0e46…0e5a              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0009, t01=0x003e}
0x0e5a…0e7e              Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW2,=W'2',TR610 MAK«, t00=0x0009, t01=0x0052}
0x0e7e…0e96              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0009, t01=0x0076}
0x0e96…0ea8              Head {h00=0x000e, h01=0x0050, text=» PERF SPCN«, t00=0x0009, t01=0x008e}
0x0ea8…0eb8              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0009, t01=0x00a0}
0x0eb8…0ec2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b0}
0x0ec2…0ee6              Head {h00=0x0020, h01=0x0050, text=»TR630   TRANSACTION SELECTED«, t00=0x0009, t01=0x00ba}
0x0ee6…0f0c              Head {h00=0x0022, h01=0x0050, text=» TBT GTDIVTR,TR620 NOT ALLOWED«, t00=0x0009, t01=0x00de}
0x0f0c…0f20              Head {h00=0x0010, h01=0x0050, text=» PERF TRPAGE«, t00=0x0009, t01=0x0104}
0x0f20…0f44              Head {h00=0x0020, h01=0x0050, text=» CBNE TTTROLD,GTREGDEX,TR635«, t00=0x0009, t01=0x0118}
0x0f44…0f72              Head {h00=0x002a, h01=0x0050, text=» CLEAR SPPROMPT SAME AS PREVIOUS TRANS«, t00=0x0009, t01=0x013c}
0x0f72…0f86              Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x0009, t01=0x016a}
0x0f86…0f9a              Head {h00=0x0010, h01=0x0050, text=» PERF FRMTSP«, t00=0x0009, t01=0x017e}
0x0f9a…0fac (10, 0, 400) Head {h00=0x000e, h01=0x0050, text=» PERF SPCN«, t00=0x000a, t01=0x0004}
0x0fac…0fbc              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x000a, t01=0x0016}
0x0fbc…0fca              Head {h00=0x000a, h01=0x0050, text=»TR635 «, t00=0x000a, t01=0x0026}
0x0fca…0fea              Head {h00=0x001c, h01=0x0050, text=» CBL TTTROLD,CBIN0,TR636«, t00=0x000a, t01=0x0034}
0x0fea…1006              Head {h00=0x0018, h01=0x0050, text=» ERASE 0,CBIN4,CBIN4«, t00=0x000a, t01=0x0054}
0x1006…1022              Head {h00=0x0018, h01=0x0050, text=» ERASE 0,CBIN6,CBIN6«, t00=0x000a, t01=0x0070}
0x1022…1030              Head {h00=0x000a, h01=0x0050, text=»TR636 «, t00=0x000a, t01=0x008c}
0x1030…1064              Head {h00=0x0030, h01=0x0050, text=» MOVE TTTROLD,GTREGDEX NOT AS PREVIOUS TRANS«, t00=0x000a, t01=0x009a}
0x1064…107a              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000a, t01=0x00ce}
0x107a…108e              Head {h00=0x0010, h01=0x0050, text=» PERF FRMTSP«, t00=0x000a, t01=0x00e4}
0x108e…10a0              Head {h00=0x000e, h01=0x0050, text=» PERF SPCA«, t00=0x000a, t01=0x00f8}
0x10a0…10b0              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x000a, t01=0x010a}
0x10b0…10ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011a}
0x10ba…10de              Head {h00=0x0020, h01=0x0050, text=»TR640   1 PAGE TRANS CORRECT«, t00=0x000a, t01=0x0124}
0x10de…10f8              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,TR645«, t00=0x000a, t01=0x0148}
0x10f8…112e              Head {h00=0x0032, h01=0x0050, text=» ERASE 10,SPLINTOP,SPLINLOW ERASE VARIABLES IN«, t00=0x000a, t01=0x0162}
0x112e…114a              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRC,=C' ' «, t00=0x000b, t01=0x0008}
0x114a…1164              Head {h00=0x0016, h01=0x0050, text=»   CURRENT FORMAT «, t00=0x000b, t01=0x0024}
0x1164…1172              Head {h00=0x000a, h01=0x0050, text=»TR645 «, t00=0x000b, t01=0x003e}
0x1172…118a              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x000b, t01=0x004c}
0x118a…11a2              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTREGFLG «, t00=0x000b, t01=0x0064}
0x11a2…11b2              Head {h00=0x000c, h01=0x0050, text=» B TR410«, t00=0x000b, t01=0x007c}
0x11b2…11bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008c}
0x11bc…11e2              Head {h00=0x0022, h01=0x0050, text=»TR650   >1 PAGE TRANS CORRECT «, t00=0x000b, t01=0x0096}
0x11e2…11fc              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,TR610«, t00=0x000b, t01=0x00bc}
0x11fc…1218              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRC,=C' ' «, t00=0x000b, t01=0x00d6}
0x1218…1230              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTREGFLG «, t00=0x000b, t01=0x00f2}
0x1230…1240              Head {h00=0x000c, h01=0x0050, text=» B TR610«, t00=0x000b, t01=0x010a}
0x1240…124a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x011a}
0x124a…1266              Head {h00=0x0018, h01=0x0050, text=»TR660   TO NEXT PAGE«, t00=0x000b, t01=0x0124}
0x1266…1282              Head {h00=0x0018, h01=0x0050, text=»   NEXT PAGE ALREADY«, t00=0x000b, t01=0x0140}
0x1282…1296              Head {h00=0x0010, h01=0x0050, text=»   ATTACHED «, t00=0x000b, t01=0x015c}
0x1296…12b2              Head {h00=0x0018, h01=0x0050, text=» MOVE TTTROLD,CBIN0 «, t00=0x000b, t01=0x0170}
0x12b2…12c8              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000b, t01=0x018c}
0x12c8…12dc              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x000c, t01=0x0012}
0x12dc…12ec              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x000c, t01=0x0026}
0x12ec…12f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0036}
0x12f6…1300              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0040}
0x1300…130e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000c, t01=0x004a}
0x130e…131c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0058}
0x131c…132e              Head {h00=0x000e, h01=0x0050, text=»FUNCT PROC«, t00=0x000c, t01=0x0066}
0x132e…134a              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000c, t01=0x0078}
0x134a…1354              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0094}
0x1354…13a0              Head {h00=0x0048, h01=0x0050, text=»*             FUNCT - PROCEDURE FOR EXECUTING ALL FUNCTIONS ALLOWED.«, t00=0x000c, t01=0x009e}
0x13a0…13ba              Head {h00=0x0016, h01=0x0050, text=»*          INPUT: «, t00=0x000c, t01=0x00ea}
0x13ba…13fa              Head {h00=0x003c, h01=0x0050, text=»*               SPBINW2, GIVING KEY INDEX, COMMING FROM «, t00=0x000c, t01=0x0104}
0x13fa…142a              Head {h00=0x002c, h01=0x0050, text=»*                        SCREEN PACKAGE «, t00=0x000c, t01=0x0144}
0x142a…1444              Head {h00=0x0016, h01=0x0050, text=»*          OUTPUT:«, t00=0x000c, t01=0x0174}
0x1444…1480              Head {h00=0x0038, h01=0x0050, text=»*               SPBINW3, GIVING THE TYPE OF FUNCTION«, t00=0x000c, t01=0x018e}
0x1480…14c0              Head {h00=0x003c, h01=0x0050, text=»*                   1     MAK OR NEW CONTROL INFORMATION«, t00=0x000d, t01=0x003a}
0x14c0…14ee              Head {h00=0x002a, h01=0x0050, text=»*                   2     INVALID KEY «, t00=0x000d, t01=0x007a}
0x14ee…1526              Head {h00=0x0034, h01=0x0050, text=»*                   3     FUNCTION WITHOUT INPUT«, t00=0x000d, t01=0x00a8}
0x1526…155c              Head {h00=0x0032, h01=0x0050, text=»*                   4     FUNCTION WITH INPUT «, t00=0x000d, t01=0x00e0}
0x155c…159a              Head {h00=0x003a, h01=0x0050, text=»*                   5     REG KEY, OUT OF REGISTRATION«, t00=0x000d, t01=0x0116}
0x159a…15a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0154}
0x15a4…15c0              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000d, t01=0x015e}
0x15c0…15d8              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2,  C «, t00=0x000d, t01=0x017a}
0x15d8…1618 (14, 0, 400) Head {h00=0x003c, h01=0x0050, text=»  FU01,FU02,FU03,FU04,FU05,FU06,FU07,FU08,FU09,FU10,  C «, t00=0x000e, t01=0x0004}
0x1618…1658              Head {h00=0x003c, h01=0x0050, text=»  FU11,FU12,FU13,FU14,FU15,FU16,FU17,FU18,FU19,FU20,  C «, t00=0x000e, t01=0x0044}
0x1658…1670              Head {h00=0x0014, h01=0x0050, text=»  FU21,FU22,FU23«, t00=0x000e, t01=0x0084}
0x1670…1680              Head {h00=0x000c, h01=0x0050, text=» B FU01 «, t00=0x000e, t01=0x009c}
0x1680…168a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x168a…1696              Head {h00=0x0008, h01=0x0050, text=»FU01«, t00=0x000e, t01=0x00b6}
0x1696…16a2              Head {h00=0x0008, h01=0x0050, text=»FU02«, t00=0x000e, t01=0x00c2}
0x16a2…16ba              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTLOKSPG «, t00=0x000e, t01=0x00ce}
0x16ba…16c8              Head {h00=0x000a, h01=0x0050, text=»   MAK«, t00=0x000e, t01=0x00e6}
0x16c8…16e4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x000e, t01=0x00f4}
0x16e4…16f0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x0110}
0x16f0…16fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011c}
0x16fa…170e              Head {h00=0x0010, h01=0x0050, text=»FU03   ENTER«, t00=0x000e, t01=0x0126}
0x170e…1728              Head {h00=0x0016, h01=0x0050, text=» TBT GTLOKSPG,FU08«, t00=0x000e, t01=0x013a}
0x1728…173e              Head {h00=0x0012, h01=0x0050, text=» TEST GTDIVTR «, t00=0x000e, t01=0x0154}
0x173e…1750              Head {h00=0x000e, h01=0x0050, text=» BZ FUNOK «, t00=0x000e, t01=0x016a}
0x1750…1764              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x017c}
0x1764…1776              Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x000e, t01=0x0190}
0x1776…178a              Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x000f, t01=0x0012}
0x178a…17ac              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW3,CBIN3 DEBET «, t00=0x000f, t01=0x0026}
0x17ac…17b8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0048}
0x17b8…17c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0054}
0x17c2…17dc              Head {h00=0x0016, h01=0x0050, text=»FU04   KREDIT KEY «, t00=0x000f, t01=0x005e}
0x17dc…17f2              Head {h00=0x0012, h01=0x0050, text=» TEST GTDIVTR «, t00=0x000f, t01=0x0078}
0x17f2…1804              Head {h00=0x000e, h01=0x0050, text=» BZ FUNOK «, t00=0x000f, t01=0x008e}
0x1804…1818              Head {h00=0x0010, h01=0x0050, text=» PERF SETKRE«, t00=0x000f, t01=0x00a0}
0x1818…182a              Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x000f, t01=0x00b4}
0x182a…183e              Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x000f, t01=0x00c6}
0x183e…1860              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW3,CBIN3 KREDIT«, t00=0x000f, t01=0x00da}
0x1860…186c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x00fc}
0x186c…1876              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0108}
0x1876…188c              Head {h00=0x0012, h01=0x0050, text=»FU05   REG KEY«, t00=0x000f, t01=0x0112}
0x188c…18bc              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW3,CBIN5 OUT OF REGISTRATION «, t00=0x000f, t01=0x0128}
0x18bc…18c8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0158}
0x18c8…18d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0164}
0x18d2…18e6              Head {h00=0x0010, h01=0x0050, text=»FU06   LISTE«, t00=0x000f, t01=0x016e}
0x18e6…18fa              Head {h00=0x0010, h01=0x0050, text=» PERF LSTINT«, t00=0x000f, t01=0x0182}
0x18fa…190e              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0010, t01=0x0008}
0x190e…191e              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0010, t01=0x001c}
0x191e…1928              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002c}
0x1928…1940              Head {h00=0x0014, h01=0x0050, text=»FU07   SUBTOTAL «, t00=0x0010, t01=0x0036}
0x1940…1954              Head {h00=0x0010, h01=0x0050, text=» PERF SUBTOT«, t00=0x0010, t01=0x004e}
0x1954…1968              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0010, t01=0x0062}
0x1968…1978              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0010, t01=0x0076}
0x1978…1982              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0086}
0x1982…199e              Head {h00=0x0018, h01=0x0050, text=»FU08   SPG FUNCTION «, t00=0x0010, t01=0x0090}
0x199e…19b6              Head {h00=0x0014, h01=0x0050, text=» PERF ADM,CBIN11«, t00=0x0010, t01=0x00ac}
0x19b6…19d2              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0010, t01=0x00c4}
0x19d2…19de              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x00e0}
0x19de…19e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ec}
0x19e8…19fc              Head {h00=0x0010, h01=0x0050, text=»FU09   CYCLE«, t00=0x0010, t01=0x00f6}
0x19fc…1a14              Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN1 «, t00=0x0010, t01=0x010a}
0x1a14…1a28              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0010, t01=0x0122}
0x1a28…1a44              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0010, t01=0x0136}
0x1a44…1a50              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0152}
0x1a50…1a5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x015e}
0x1a5a…1a70              Head {h00=0x0012, h01=0x0050, text=»FU10   STABEL «, t00=0x0010, t01=0x0168}
0x1a70…1a88              Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN2 «, t00=0x0010, t01=0x017e}
0x1a88…1a9c              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x0008}
0x1a9c…1ab8              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0011, t01=0x001c}
0x1ab8…1ac4              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x0038}
0x1ac4…1ace              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0044}
0x1ace…1aea              Head {h00=0x0018, h01=0x0050, text=»FU11   INVKEY, MODP «, t00=0x0011, t01=0x004e}
0x1aea…1afc              Head {h00=0x000e, h01=0x0050, text=» PERF MODP«, t00=0x0011, t01=0x006a}
0x1afc…1b10              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x007c}
0x1b10…1b32              Head {h00=0x001e, h01=0x0050, text=» CBE GTRETUR,=W'3',FU1110 «, t00=0x0011, t01=0x0090}
0x1b32…1b42              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0011, t01=0x00b2}
0x1b42…1b50              Head {h00=0x000a, h01=0x0050, text=»FU1110«, t00=0x0011, t01=0x00c2}
0x1b50…1b6c              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0011, t01=0x00d0}
0x1b6c…1b78              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x00ec}
0x1b78…1b82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f8}
0x1b82…1b9a              Head {h00=0x0014, h01=0x0050, text=»FU12   KONTOKORT«, t00=0x0011, t01=0x0102}
0x1b9a…1bac              Head {h00=0x000e, h01=0x0050, text=» PERF KORT«, t00=0x0011, t01=0x011a}
0x1bac…1bc0              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x012c}
0x1bc0…1bdc              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0011, t01=0x0140}
0x1bdc…1be8              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x015c}
0x1be8…1bf2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0168}
0x1bf2…1c06              Head {h00=0x0010, h01=0x0050, text=»FU13   KVIT «, t00=0x0011, t01=0x0172}
0x1c06…1c18              Head {h00=0x000e, h01=0x0050, text=» PERF KVIT«, t00=0x0011, t01=0x0186}
0x1c18…1c2c              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0012, t01=0x0008}
0x1c2c…1c3c              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0012, t01=0x001c}
0x1c3c…1c46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x002c}
0x1c46…1c5a              Head {h00=0x0010, h01=0x0050, text=»FU14   SUPL «, t00=0x0012, t01=0x0036}
0x1c5a…1c72              Head {h00=0x0014, h01=0x0050, text=» PERF ADM,CBIN10«, t00=0x0012, t01=0x004a}
0x1c72…1c86              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0012, t01=0x0062}
0x1c86…1c96              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0012, t01=0x0076}
0x1c96…1ca0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0086}
0x1ca0…1cb2              Head {h00=0x000e, h01=0x0050, text=»FU15   SUM«, t00=0x0012, t01=0x0090}
0x1cb2…1cc4              Head {h00=0x000e, h01=0x0050, text=» PERF SUM «, t00=0x0012, t01=0x00a2}
0x1cc4…1cd8              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0012, t01=0x00b4}
0x1cd8…1ce8              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0012, t01=0x00c8}
0x1ce8…1cf2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d8}
0x1cf2…1d08              Head {h00=0x0012, h01=0x0050, text=»FU16   ADM KEY«, t00=0x0012, t01=0x00e2}
0x1d08…1d32              Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET ADM TYPE«, t00=0x0012, t01=0x00f8}
0x1d32…1d50              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0012, t01=0x0122}
0x1d50…1d6a              Head {h00=0x0016, h01=0x0050, text=» PERF ADM,GSWBIN1 «, t00=0x0012, t01=0x0140}
0x1d6a…1d86              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0012, t01=0x015a}
0x1d86…1d92              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x0176}
0x1d92…1d9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0182}
0x1d9c…1db4              Head {h00=0x0014, h01=0x0050, text=»FU17   CYCLE KEY«, t00=0x0012, t01=0x018c}
0x1db4…1de4              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET TYPE OF CYCLE «, t00=0x0013, t01=0x0014}
0x1de4…1e02              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0013, t01=0x0044}
0x1e02…1e1a              Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN1,  C «, t00=0x0013, t01=0x0062}
0x1e1a…1e50              Head {h00=0x0032, h01=0x0050, text=»  FU09,FU10,FUNOK,FCYK4,FUNOK, CYCLE,STABEL C «, t00=0x0013, t01=0x007a}
0x1e50…1e72              Head {h00=0x001e, h01=0x0050, text=»  FUNOK,FUNOK,FUNOK,FCYK9 «, t00=0x0013, t01=0x00b0}
0x1e72…1e9e              Head {h00=0x0028, h01=0x0050, text=» PERF CYK,CBIN10 END OF CYCLE/STABEL«, t00=0x0013, t01=0x00d2}
0x1e9e…1eb2              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0013, t01=0x00fe}
0x1eb2…1ec2              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0013, t01=0x0112}
0x1ec2…1ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0122}
0x1ecc…1ef2              Head {h00=0x0022, h01=0x0050, text=»FCYK4   PAUSE IN CYCLE STABEL «, t00=0x0013, t01=0x012c}
0x1ef2…1f0a              Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN4 «, t00=0x0013, t01=0x0152}
0x1f0a…1f1e              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0013, t01=0x016a}
0x1f1e…1f2e              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0013, t01=0x017e}
0x1f2e…1f38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018e}
0x1f38…1f46              Head {h00=0x000a, h01=0x0050, text=»FCYK9 «, t00=0x0014, t01=0x0008}
0x1f46…1f72              Head {h00=0x0028, h01=0x0050, text=» PERF CYK,CBIN9 CLEAR ARKIV KNT. NR «, t00=0x0014, t01=0x0016}
0x1f72…1f86              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0014, t01=0x0042}
0x1f86…1f96              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0014, t01=0x0056}
0x1f96…1fa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0066}
0x1fa0…1fb8              Head {h00=0x0014, h01=0x0050, text=»FU18   DIV TRANS«, t00=0x0014, t01=0x0070}
0x1fb8…1fcc              Head {h00=0x0010, h01=0x0050, text=» PERF DIVTR «, t00=0x0014, t01=0x0088}
0x1fcc…1fe0              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0014, t01=0x009c}
0x1fe0…1ffc              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0014, t01=0x00b0}
0x1ffc…2008              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x00cc}
0x2008…2012              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00d8}
0x2012…202a              Head {h00=0x0014, h01=0x0050, text=»FU19   HOVEDBOG «, t00=0x0014, t01=0x00e2}
0x202a…2044              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,FUNOK«, t00=0x0014, t01=0x00fa}
0x2044…2060              Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'1'«, t00=0x0014, t01=0x0114}
0x2060…207c              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0014, t01=0x0130}
0x207c…2088              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x014c}
0x2088…2092              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0158}
0x2092…20b2              Head {h00=0x001c, h01=0x0050, text=»FU20   DEBITOR POSTERING«, t00=0x0014, t01=0x0162}
0x20b2…20cc              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,FUNOK«, t00=0x0014, t01=0x0182}
0x20cc…20e8              Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'2'«, t00=0x0015, t01=0x000c}
0x20e8…2104              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0015, t01=0x0028}
0x2104…2110              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0044}
0x2110…211a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0050}
0x211a…2134              Head {h00=0x0016, h01=0x0050, text=»FU21   REMITTERING«, t00=0x0015, t01=0x005a}
0x2134…214e              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,FUNOK«, t00=0x0015, t01=0x0074}
0x214e…216a              Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'3'«, t00=0x0015, t01=0x008e}
0x216a…2186              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0015, t01=0x00aa}
0x2186…2192              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x00c6}
0x2192…219c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d2}
0x219c…21c4              Head {h00=0x0024, h01=0x0050, text=»FU22   TRANS SELECTION IN DIVTR «, t00=0x0015, t01=0x00dc}
0x21c4…21de              Head {h00=0x0016, h01=0x0050, text=» TBF GTDIVTR,FUNOK«, t00=0x0015, t01=0x0104}
0x21de…21f2              Head {h00=0x0010, h01=0x0050, text=» PERF TRPAGE«, t00=0x0015, t01=0x011e}
0x21f2…220e              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0015, t01=0x0132}
0x220e…221a              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x014e}
0x221a…2224              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x015a}
0x2224…223a              Head {h00=0x0012, h01=0x0050, text=»FU23   ONLINE «, t00=0x0015, t01=0x0164}
0x223a…2260              Head {h00=0x0022, h01=0x0050, text=» PERF ADM,CBIN7 PERFORM ONLINE«, t00=0x0015, t01=0x017a}
0x2260…228a              Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW3,CBIN4 REWRITE SCREEN«, t00=0x0016, t01=0x0010}
0x228a…2296              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x003a}
0x2296…22a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0046}
0x22a0…22aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0050}
0x22aa…22b8              Head {h00=0x000a, h01=0x0050, text=»FUNOK «, t00=0x0016, t01=0x005a}
0x22b8…22e0              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,=W'16' INVALID KEY«, t00=0x0016, t01=0x0068}
0x22e0…22fc              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN2 «, t00=0x0016, t01=0x0090}
0x22fc…2308              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00ac}
0x2308…2312              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00b8}
0x2312…231e              Head {h00=0x0008, h01=0x0050, text=»FUOK«, t00=0x0016, t01=0x00c2}
0x231e…233a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN3 «, t00=0x0016, t01=0x00ce}
0x233a…2346              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x00ea}
0x2346…2354              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x00f6}
0x2354…2362              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0104}
0x2362…2374              Head {h00=0x000e, h01=0x0050, text=»TRINP PROC«, t00=0x0016, t01=0x0112}
0x2374…2390              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0016, t01=0x0124}
0x2390…239a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0140}
0x239a…23e4              Head {h00=0x0046, h01=0x0050, text=»*            TRINP - PROCEDURE FOR HANDLING INFORMATION GIVEN OVER«, t00=0x0016, t01=0x014a}
0x23e4…2410 (23, 0, 400) Head {h00=0x0028, h01=0x0050, text=»*          FROM THE SCREEN PACKAGE. «, t00=0x0017, t01=0x0004}
0x2410…2452              Head {h00=0x003e, h01=0x0050, text=»*          WILL BE CALLED WHEN SOMETHING HAS BEEN ENTERED «, t00=0x0017, t01=0x0030}
0x2452…2492              Head {h00=0x003c, h01=0x0050, text=»*          WHICH THE SCREEN PACKAGE CAN NOT TAKE CARE OF«, t00=0x0017, t01=0x0072}
0x2492…24ac              Head {h00=0x0016, h01=0x0050, text=»*          ITSELF.«, t00=0x0017, t01=0x00b2}
0x24ac…24d4              Head {h00=0x0024, h01=0x0050, text=»*          SPCHANGE WILL BE SET.«, t00=0x0017, t01=0x00cc}
0x24d4…24ee              Head {h00=0x0016, h01=0x0050, text=»*          INPUT: «, t00=0x0017, t01=0x00f4}
0x24ee…252a              Head {h00=0x0038, h01=0x0050, text=»*               SPBINW2: INDEX FOR THE KEY DEPRESSED«, t00=0x0017, t01=0x010e}
0x252a…2544              Head {h00=0x0016, h01=0x0050, text=»*          OUTPUT:«, t00=0x0017, t01=0x014a}
0x2544…257e              Head {h00=0x0036, h01=0x0050, text=»*               SPBINW3: GIVING THE TYPE OF INPUT «, t00=0x0017, t01=0x0164}
0x257e…25a2              Head {h00=0x0020, h01=0x0050, text=»*               1   MAK TYPE«, t00=0x0018, t01=0x000e}
0x25a2…25ca              Head {h00=0x0024, h01=0x0050, text=»*               2   INVALID KEY «, t00=0x0018, t01=0x0032}
0x25ca…25fa              Head {h00=0x002c, h01=0x0050, text=»*               3   TRANSACTION SELECTED«, t00=0x0018, t01=0x005a}
0x25fa…262a              Head {h00=0x002c, h01=0x0050, text=»*               4   1 PAGE TRANS CORRECT«, t00=0x0018, t01=0x008a}
0x262a…265c              Head {h00=0x002e, h01=0x0050, text=»*               5   >1 PAGE TRANS CORRECT «, t00=0x0018, t01=0x00ba}
0x265c…269c              Head {h00=0x003c, h01=0x0050, text=»*               6   NEXT PAGE OF TRANS ALREADY ATTACHED «, t00=0x0018, t01=0x00ec}
0x269c…26a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x012c}
0x26a6…26c2              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0018, t01=0x0136}
0x26c2…26cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0152}
0x26cc…26e4              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2,  C «, t00=0x0018, t01=0x015c}
0x26e4…26fc              Head {h00=0x0014, h01=0x0050, text=»  IN01,IN02,IN03«, t00=0x0018, t01=0x0174}
0x26fc…271c              Head {h00=0x001c, h01=0x0050, text=» CBE SPBINW2,=W'22',IN22«, t00=0x0018, t01=0x018c}
0x271c…2728              Head {h00=0x0008, h01=0x0050, text=»IN00«, t00=0x0019, t01=0x001c}
0x2728…2750              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW3,CBIN2 INVALID KEY «, t00=0x0019, t01=0x0028}
0x2750…275c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x0050}
0x275c…2766              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005c}
0x2766…2772              Head {h00=0x0008, h01=0x0050, text=»IN01«, t00=0x0019, t01=0x0066}
0x2772…2784              Head {h00=0x000e, h01=0x0050, text=»IN02   MAK«, t00=0x0019, t01=0x0072}
0x2784…27a0              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0019, t01=0x0084}
0x27a0…27ac              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x00a0}
0x27ac…27b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ac}
0x27b6…27d0              Head {h00=0x0016, h01=0x0050, text=»IN03   AFTER SLUT,«, t00=0x0019, t01=0x00b6}
0x27d0…27ea              Head {h00=0x0016, h01=0x0050, text=» TBT GTTRSEL,IN030«, t00=0x0019, t01=0x00d0}
0x27ea…2816              Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW1,=W'0',IN00 NOT ALLOWED «, t00=0x0019, t01=0x00ea}
0x2816…2824              Head {h00=0x000a, h01=0x0050, text=»IN030 «, t00=0x0019, t01=0x0116}
0x2824…2838              Head {h00=0x0010, h01=0x0050, text=» PERF ENTER «, t00=0x0019, t01=0x0124}
0x2838…2866              Head {h00=0x002a, h01=0x0050, text=» BNOK IN035 ERRORS DETECTED IN FLDTST «, t00=0x0019, t01=0x0138}
0x2866…287e              Head {h00=0x0014, h01=0x0050, text=» IB GTRETUR,  C «, t00=0x0019, t01=0x0166}
0x287e…289a              Head {h00=0x0018, h01=0x0050, text=»  IN031,IN032,IN033 «, t00=0x0019, t01=0x017e}
0x289a…28a8              Head {h00=0x000a, h01=0x0050, text=»IN031 «, t00=0x001a, t01=0x000a}
0x28a8…28c4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x001a, t01=0x0018}
0x28c4…28d0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x0034}
0x28d0…28de              Head {h00=0x000a, h01=0x0050, text=»IN032 «, t00=0x001a, t01=0x0040}
0x28de…28fa              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN6 «, t00=0x001a, t01=0x004e}
0x28fa…2906              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x006a}
0x2906…2914              Head {h00=0x000a, h01=0x0050, text=»IN033 «, t00=0x001a, t01=0x0076}
0x2914…2930              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN5 «, t00=0x001a, t01=0x0084}
0x2930…293c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x00a0}
0x293c…294a              Head {h00=0x000a, h01=0x0050, text=»IN035 «, t00=0x001a, t01=0x00ac}
0x294a…296c              Head {h00=0x001e, h01=0x0050, text=» TBWD  TAB OVER LAST FIELD«, t00=0x001a, t01=0x00ba}
0x296c…2988              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN2 «, t00=0x001a, t01=0x00dc}
0x2988…2994              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x00f8}
0x2994…299e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0104}
0x299e…29aa              Head {h00=0x0008, h01=0x0050, text=»IN22«, t00=0x001a, t01=0x010e}
0x29aa…29c4              Head {h00=0x0016, h01=0x0050, text=»   TRANS SELECTED «, t00=0x001a, t01=0x011a}
0x29c4…29e0              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN3 «, t00=0x001a, t01=0x0134}
0x29e0…29ec              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x0150}
0x29ec…29f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x015c}
0x29f6…2a04              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x0166}
0x2a04…2a12              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0174}
0x2a12…2a26              Head {h00=0x0010, h01=0x0050, text=»TRPAGE PROC «, t00=0x001a, t01=0x0182}
0x2a26…2a42              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001b, t01=0x0008}
0x2a42…2a4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0024}
0x2a4c…2a96              Head {h00=0x0046, h01=0x0050, text=»*              TRPAGE - AFTER SELECTION OF TRANSTYPE, SET CORRECT «, t00=0x001b, t01=0x002e}
0x2a96…2ad0              Head {h00=0x0036, h01=0x0050, text=»*          INFORMATION ABOUT THE SIZE AND TYPE OF «, t00=0x001b, t01=0x0078}
0x2ad0…2af2              Head {h00=0x001e, h01=0x0050, text=»*          THE TRANSACTION«, t00=0x001b, t01=0x00b2}
0x2af2…2afc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00d4}
0x2afc…2b18              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001b, t01=0x00de}
0x2b18…2b22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00fa}
0x2b22…2b4c              Head {h00=0x0026, h01=0x0050, text=» SET GTTRSEL TRANSACTION SELECTED «, t00=0x001b, t01=0x0104}
0x2b4c…2b62              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTYPE2«, t00=0x001b, t01=0x012e}
0x2b62…2b78              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTYPE3«, t00=0x001b, t01=0x0144}
0x2b78…2b92              Head {h00=0x0016, h01=0x0050, text=» MOVE GTPAGE,CBIN1«, t00=0x001b, t01=0x015a}
0x2b92…2bd8              Head {h00=0x0042, h01=0x0050, text=»*          TRANSTYPE  01, 02, 03, 04, 05, 06, 07, 08, 09, 10, «, t00=0x001b, t01=0x0174}
0x2bd8…2c1e              Head {h00=0x0042, h01=0x0050, text=»*                     12, 40, 41, 42, 45, 46, 47, 48, 49, 50, «, t00=0x001c, t01=0x002a}
0x2c1e…2c4a              Head {h00=0x0028, h01=0x0050, text=»*                     51, 52, 53, 54«, t00=0x001c, t01=0x0070}
0x2c4a…2c62              Head {h00=0x0014, h01=0x0050, text=» IB GTREGDEX,  C«, t00=0x001c, t01=0x009c}
0x2c62…2ca2              Head {h00=0x003c, h01=0x0050, text=»  PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG03,PG03,PG01,  C «, t00=0x001c, t01=0x00b4}
0x2ca2…2ce2              Head {h00=0x003c, h01=0x0050, text=»  PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,  C «, t00=0x001c, t01=0x00f4}
0x2ce2…2d00              Head {h00=0x001a, h01=0x0050, text=»  PG03,PG01,PG03,PG01 «, t00=0x001c, t01=0x0134}
0x2d00…2d0c              Head {h00=0x0008, h01=0x0050, text=»PG01«, t00=0x001c, t01=0x0152}
0x2d0c…2d18              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x015e}
0x2d18…2d24              Head {h00=0x0008, h01=0x0050, text=»PG02«, t00=0x001c, t01=0x016a}
0x2d24…2d38              Head {h00=0x0010, h01=0x0050, text=» SET GTTYPE2«, t00=0x001c, t01=0x0176}
0x2d38…2d44              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x018a}
0x2d44…2d50              Head {h00=0x0008, h01=0x0050, text=»PG03«, t00=0x001d, t01=0x0008}
0x2d50…2d64              Head {h00=0x0010, h01=0x0050, text=» SET GTTYPE3«, t00=0x001d, t01=0x0014}
0x2d64…2d70              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x0028}
0x2d70…2d7e              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001d, t01=0x0034}
0x2d7e…2d8a              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001d, t01=0x0042}
0x2d8a…2d8e              Head {h00=0x4004, h01=0x0000}
0x2d8e…2d92              00 1d 00 4e                                                                                                                                                                                                                                       ┆   N┆
0x2d92…2d9a (30, 1, 8)   20 04 00 00 00 1e 00 04                                                                                                                                                                                                                           ┆        ┆
0x2d9a…2dea (31, 0, 400) 4f 56 45 5c 47 53 57 53 54 52 32 30 2c 3d 43 27 53 55 42 54 4f 54 41 4c 20 27 00 1e 01 8e 00 18 00 50 5c 4d 4f 56 45 5c 47 53 57 42 49 4e 36 2c 43 42 49 4e 33 20 00 1f 00 22 00 0e 00 50 5c 42 5c 54 43 4c 34 32 30 20 00 1f 00 3e 00 0a 00 50   ┆OVE GSWSTR20,=C'SUBTOTAL '       P MOVE GSWBIN6,CBIN3    "   P B TCL420    >   P┆
0x2dea…2e3a              54 43 4c 34 32 30 00 1f 00 50 00 18 00 50 20 4d 4f 56 45 20 47 54 57 42 43 44 31 2c 3d 44 27 30 27 20 00 1f 00 5e 00 18 00 50 20 4d 4f 56 45 20 47 53 57 42 43 44 36 2c 3d 44 27 30 27 20 00 1f 00 7a 00 18 00 50 20 4d 4f 56 45 20 47 53 57 42   ┆TCL420   P   P MOVE GTWBCD1,=D'0'    ^   P MOVE GSWBCD6,=D'0'    z   P MOVE GSWB┆
0x2e3a…2e8a              43 44 37 2c 3d 44 27 30 27 20 00 1f 00 96 00 0a 00 50 54 43 4c 34 32 35 00 1f 00 b2 00 10 00 50 5c 50 45 52 46 5c 47 52 41 53 50 56 00 1f 00 c0 00 1a 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 33 2c 43 56 4f 55 54 4f 50 20 00 1f 00 d4 00 16   ┆CD7,=D'0'        PTCL425       P PERF GRASPV       P MOVE GSWBIN3,CVOUTOP       ┆
0x2e8a…2eda              00 50 20 41 44 44 20 47 53 57 42 49 4e 33 2c 43 42 49 4e 36 00 1f 00 f2 00 1c 00 50 5c 44 53 43 31 5c 4b 56 4f 55 43 48 2c 50 4f 53 2c 47 53 57 42 49 4e 33 00 1f 01 0c 00 10 00 50 5c 50 45 52 46 5c 43 4c 45 41 52 38 00 1f 01 2c 00 28 00 50   ┆ P ADD GSWBIN3,CBIN6       P DSC1 KVOUCH,POS,GSWBIN3       P PERF CLEAR8   , ( P┆
0x2eda…2f2a              5c 50 45 52 46 5c 46 52 4d 58 56 4f 2c 43 42 49 4e 31 33 5c 48 45 41 44 20 4f 4e 20 56 4f 55 43 48 45 52 20 00 1f 01 40 00 1a 00 50 5c 45 44 57 52 54 5c 4b 56 4f 55 43 48 2c 47 54 53 54 52 46 4d 54 00 1f 01 6c 00 0a 00 50 54 43 4c 34 33 30   ┆ PERF FRMXVO,CBIN13 HEAD ON VOUCHER    @   P EDWRT KVOUCH,GTSTRFMT   l   PTCL430┆
0x2f2a…2f7a (32, 0, 400) 00 1f 01 8a 00 16 00 50 5c 41 44 44 5c 47 54 57 42 43 44 31 2c 3d 44 27 31 27 00 20 00 08 00 1a 00 50 5c 4d 4f 56 45 5c 47 53 57 42 49 4e 33 2c 47 54 57 42 43 44 31 20 00 20 00 22 00 22 00 50 20 41 44 44 20 47 53 57 42 49 4e 33 2c 43 42 45   ┆       P ADD GTWBCD1,=D'1'       P MOVE GSWBIN3,GTWBCD1    " " P ADD GSWBIN3,CBE┆
0x2f7a…2fca              48 28 47 54 55 57 42 2c 43 42 49 4e 31 29 00 20 00 40 00 1a 00 50 20 4d 4f 56 45 20 47 53 57 42 49 4e 34 2c 47 54 57 42 43 44 32 20 00 20 00 66 00 20 00 50 5c 43 42 47 5c 47 53 57 42 49 4e 33 2c 47 53 57 42 49 4e 34 2c 54 43 4c 34 39 30 20   ┆H(GTUWB,CBIN1)   @   P MOVE GSWBIN4,GTWBCD2    f   P CBG GSWBIN3,GSWBIN4,TCL490 ┆
0x2fca…301a              00 20 00 84 00 2a 00 50 20 43 42 45 20 43 42 41 43 43 28 47 53 57 42 49 4e 33 2c 43 42 49 4e 31 29 2c 3d 44 27 30 27 2c 54 43 4c 34 33 30 00 20 00 a8 00 2a 00 50 2a 20 20 20 20 20 41 44 44 20 54 4f 20 54 4f 54 41 4c 2c 20 50 45 52 49 4f 44   ┆     * P CBE CBACC(GSWBIN3,CBIN1),=D'0',TCL430     * P*     ADD TO TOTAL, PERIOD┆
0x301a…306a              45 20 41 4e 44 20 53 41 4c 44 4f 20 00 20 00 d6 00 2e 00 50 20 41 44 44 20 47 53 57 42 43 44 36 2c 43 42 41 43 43 28 47 53 57 42 49 4e 33 2c 43 42 49 4e 32 29 20 50 45 52 49 4f 44 45 20 00 20 01 04 00 2c 00 50 20 41 44 44 20 47 53 57 42 43   ┆E AND SALDO      . P ADD GSWBCD6,CBACC(GSWBIN3,CBIN2) PERIODE      , P ADD GSWBC┆
0x306a…30ba              44 37 2c 43 42 41 43 43 28 47 53 57 42 49 4e 33 2c 43 42 49 4e 33 29 20 53 41 4c 44 4f 20 00 20 01 36 00 18 00 50 5c 50 45 52 46 5c 46 52 4d 58 56 4f 2c 43 42 49 4e 31 34 20 00 20 01 66 00 1a 00 50 5c 45 44 57 52 54 5c 4b 56 4f 55 43 48 2c   ┆D7,CBACC(GSWBIN3,CBIN3) SALDO    6   P PERF FRMXVO,CBIN14    f   P EDWRT KVOUCH,┆
0x30ba…310a (33, 0, 400) 47 54 53 54 52 46 4d 54 00 20 01 82 00 18 00 50 20 54 42 54 20 47 54 54 45 53 54 46 4c 2c 54 43 4c 34 33 33 00 21 00 10 00 24 00 50 5c 49 42 5c 47 53 57 42 49 4e 36 2c 54 43 4c 34 33 31 2c 54 43 4c 34 33 32 2c 54 43 4c 34 33 33 00 21 00 2c   ┆GTSTRFMT       P TBT GTTESTFL,TCL433 !   $ P IB GSWBIN6,TCL431,TCL432,TCL433 ! ,┆
0x310a…315a              00 0e 00 50 5c 42 5c 54 43 4c 34 33 33 20 00 21 00 54 00 0a 00 50 54 43 4c 34 33 31 00 21 00 66 00 2a 00 50 5c 4d 4f 56 45 5c 43 42 41 43 43 28 47 53 57 42 49 4e 33 2c 43 42 49 4e 33 29 2c 3d 44 27 30 27 5c 53 41 4c 44 4f 00 21 00 74 00 0a   ┆   P B TCL433  ! T   PTCL431 ! f * P MOVE CBACC(GSWBIN3,CBIN3),=D'0' SALDO ! t  ┆
0x315a…31aa              00 50 54 43 4c 34 33 32 00 21 00 a2 00 2c 00 50 5c 4d 4f 56 45 5c 43 42 41 43 43 28 47 53 57 42 49 4e 33 2c 43 42 49 4e 32 29 2c 3d 44 27 30 27 5c 50 45 52 49 4f 44 45 00 21 00 b0 00 0a 00 50 54 43 4c 34 33 33 00 21 00 e0 00 16 00 50 20 53   ┆ PTCL432 !   , P MOVE CBACC(GSWBIN3,CBIN2),=D'0' PERIODE !     PTCL433 !     P S┆
0x31aa…31fa              55 42 20 54 54 4c 49 4e 4e 52 2c 3d 44 27 31 27 00 21 00 ee 00 1e 00 50 20 43 42 47 20 54 54 4c 49 4e 4e 52 2c 3d 44 27 30 27 2c 54 43 4c 34 33 30 20 00 21 01 08 00 16 00 50 20 44 53 43 30 20 4b 56 4f 55 43 48 2c 52 4c 45 41 53 00 21 01 2a   ┆UB TTLINNR,=D'1' !     P CBG TTLINNR,=D'0',TCL430  !     P DSC0 KVOUCH,RLEAS ! *┆
0x31fa…324a              00 18 00 50 20 4d 4f 56 45 20 54 54 4c 49 4e 4e 52 2c 3d 44 27 32 35 27 00 21 01 44 00 0e 00 50 20 42 20 54 43 4c 34 32 35 20 00 21 01 60 00 0a 00 50 54 43 4c 34 39 30 00 21 01 72 00 1a 00 50 2a 20 20 20 20 20 57 52 49 54 45 20 54 4f 54 41   ┆   P MOVE TTLINNR,=D'25' ! D   P B TCL425  ! `   PTCL490 ! r   P*     WRITE TOTA┆
0x324a…329a (34, 0, 400) 4c 20 4c 49 4e 45 00 21 01 80 00 18 00 50 20 50 45 52 46 20 46 52 4d 58 56 4f 2c 43 42 49 4e 31 38 20 00 22 00 0e 00 1a 00 50 20 45 44 57 52 54 20 4b 56 4f 55 43 48 2c 47 54 53 54 52 46 4d 54 00 22 00 2a 00 16 00 50 5c 44 53 43 30 5c 4b 56   ┆L LINE !     P PERF FRMXVO,CBIN18  "     P EDWRT KVOUCH,GTSTRFMT " *   P DSC0 KV┆
0x329a…32ea              4f 55 43 48 2c 52 4c 45 41 53 00 22 00 48 00 0c 00 50 43 4c 42 45 48 52 45 54 00 22 00 62 00 08 00 50 20 52 45 54 00 22 00 72 00 0a 00 50 20 50 45 4e 44 20 00 22 00 7e 00 0a 00 50 20 45 4a 45 43 54 00 22 00 8c 00 1c 00 50 2a 2a 2a 2a 2a 2a   ┆OUCH,RLEAS " H   PCLBEHRET " b   P RET " r   P PEND  " ~   P EJECT "     P******┆
0x32ea…333a              2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 22 00 9a 00 06 00 50 2a 20 00 22 00 ba 00 06 00 50 2a 20 00 22 00 c4 00 28 00 50 2a 20 20 20 20 20 20 20 20 20 20 41 44 4d 20 46 55 4e 43 54 49 4f 4e 53 20 20 20 20 20 20 20 20 20 20   ┆****************** "     P*  "     P*  "   ( P*          ADM FUNCTIONS          ┆
0x333a…338a              2a 20 00 22 00 ce 00 06 00 50 2a 20 00 22 00 fa 00 24 00 50 2a 20 20 20 20 20 41 44 4d 20 20 31 20 20 20 20 20 45 4a 20 45 44 42 20 54 5b 4c 4c 45 52 45 20 00 22 01 04 00 28 00 50 2a 20 20 20 20 20 41 44 4d 20 20 32 20 20 20 20 20 42 45 48   ┆*  "     P*  "   $ P*     ADM  1     EJ EDB T[LLERE  "   ( P*     ADM  2     BEH┆
0x338a…33da              4f 4c 44 4e 49 4e 47 53 54 5b 4c 4c 45 52 45 20 00 22 01 2c 00 2a 00 50 2a 20 20 20 20 20 41 44 4d 20 20 33 20 20 20 20 20 4f 50 52 45 54 54 45 4c 53 45 20 4b 4f 4e 54 4f 50 4c 41 4e 20 00 22 01 58 00 10 00 50 2a 20 20 20 20 20 41 44 4d 20   ┆OLDNINGST[LLERE  " , * P*     ADM  3     OPRETTELSE KONTOPLAN  " X   P*     ADM ┆
0x33da…342a (35, 0, 400) 20 34 00 22 01 86 00 22 00 50 2a 20 20 20 20 20 41 44 4d 20 20 35 20 20 20 20 20 4b 4f 4e 56 45 52 54 45 52 49 4e 47 20 00 23 00 0a 00 26 00 50 2a 20 20 20 20 20 41 44 4d 20 20 36 20 20 20 20 20 44 41 54 41 54 52 41 4e 53 4d 49 53 53 49 4f   ┆ 4 "   " P*     ADM  5     KONVERTERING  #   & P*     ADM  6     DATATRANSMISSIO┆
0x342a…347a              4e 20 00 23 00 30 00 20 00 50 2a 20 20 20 20 20 41 44 4d 20 20 37 20 20 20 20 20 33 32 37 30 20 4f 4e 4c 49 4e 45 00 23 00 5a 00 10 00 50 2a 20 20 20 20 20 41 44 4d 20 20 38 00 23 00 7e 00 26 00 50 2a 20 20 20 20 20 41 44 4d 20 20 39 20 20   ┆N  # 0   P*     ADM  7     3270 ONLINE # Z   P*     ADM  8 # ~ & P*     ADM  9  ┆
0x347a…34ca              20 20 20 44 45 46 41 55 4c 54 20 4c 49 4e 45 20 4e 4f 2e 20 00 23 00 92 00 24 00 50 2a 20 20 20 20 20 41 44 4d 20 31 30 20 20 20 20 20 53 55 50 50 4c 45 4d 45 4e 54 20 50 4f 53 54 00 23 00 bc 00 1c 00 50 2a 20 20 20 20 20 41 44 4d 20 31 31   ┆   DEFAULT LINE NO.  #   $ P*     ADM 10     SUPPLEMENT POST #     P*     ADM 11┆
0x34ca…351a              20 20 20 20 20 53 50 4f 45 52 47 45 00 23 00 e4 00 28 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 31 20 20 20 20 20 42 49 4c 41 47 20 20 45 4a 20 45 44 42 20 00 23 01 04 00 34 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20   ┆     SPOERGE #   ( P*          SPG  1     BILAG  EJ EDB  #   4 P*          SPG  ┆
0x351a…356a              32 20 20 20 20 20 42 49 4c 41 47 20 20 42 45 48 4f 4c 44 4e 49 4e 47 53 54 5b 4c 4c 45 52 45 20 00 23 01 30 00 2c 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 33 20 20 20 20 20 42 49 4c 41 47 20 20 45 44 42 20 54 5b 4c 4c 45 52 45   ┆2     BILAG  BEHOLDNINGST[LLERE  # 0 , P*          SPG  3     BILAG  EDB T[LLERE┆
0x356a…35ba (36, 0, 400) 00 23 01 68 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 34 20 20 20 20 20 41 41 42 4e 45 20 4b 41 53 53 45 52 00 24 00 08 00 2c 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 35 20 20 20 20 20 55 44 53 4b 52 49 46 54   ┆ # h & P*          SPG  4     AABNE KASSER $   , P*          SPG  5     UDSKRIFT┆
0x35ba…360a              20 4b 4f 4e 54 4f 50 4c 41 4e 00 24 00 32 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 36 20 20 20 20 20 45 4e 4b 45 4c 54 20 42 45 48 4f 4c 44 4e 49 4e 47 53 54 5b 4c 4c 45 52 00 24 00 62 00 2a 00 50 2a 20 20 20 20 20 20 20   ┆ KONTOPLAN $ 2 2 P*          SPG  6     ENKELT BEHOLDNINGST[LLER $ b * P*       ┆
0x360a…365a              20 20 20 53 50 47 20 20 37 20 20 20 20 20 4b 41 53 53 45 42 45 48 4f 4c 44 4e 49 4e 47 20 00 24 00 98 00 2e 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 38 20 20 20 20 20 53 50 47 2e 20 50 5d 20 50 4f 53 54 45 52 49 4e 47 45 52 20   ┆   SPG  7     KASSEBEHOLDNING  $   . P*          SPG  8     SPG. P] POSTERINGER ┆
0x365a…36aa              00 24 00 c6 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 20 39 20 20 20 20 20 2d 22 2d 20 20 47 4c 2e 20 52 45 47 53 45 54 20 00 24 00 f8 00 2e 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 31 30 20 20 20 20 20 53 50 47 2e   ┆ $   * P*          SPG  9     -"-  GL. REGSET  $   . P*          SPG 10     SPG.┆
0x36aa…36fa              20 50 52 49 4e 54 20 49 4e 54 45 52 56 41 4c 20 00 24 01 26 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 53 50 47 20 31 31 20 20 20 20 20 2d 22 2d 20 20 47 4c 2e 20 52 45 47 53 45 54 20 00 24 01 58 00 24 00 50 2a 20 20 20 20 20 41 44 4d 20   ┆ PRINT INTERVAL  $ & * P*          SPG 11     -"-  GL. REGSET  $ X $ P*     ADM ┆

Reduced view