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

⟦00bd9881e⟧

    Length: 11570 (0x2d32)
    Notes: pts_type(SC)
    Names: »RGMAIN.SC«

Derivation

└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/RGMAIN.SC« 

PTS(SC)

	IDENT RGMAIN 	03.01.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' 
	B	TR400
	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 
 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,PG02,PG02,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  03.01.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…06f2              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0004, t01=0x00a6}
0x06f2…0700              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x00b6}
0x0700…0712              Head {h00=0x000e, h01=0x0050, text=»*     READ«, t00=0x0004, t01=0x00c4}
0x0712…0720              Head {h00=0x000a, h01=0x0050, text=»TR400 «, t00=0x0004, t01=0x00d6}
0x0720…0736              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0004, t01=0x00e4}
0x0736…0766              Head {h00=0x002c, h01=0x0050, text=» MOVE TTTROLD,=W'-1' CLEAR OLD TRANS NO «, t00=0x0004, t01=0x00fa}
0x0766…0774              Head {h00=0x000a, h01=0x0050, text=»TR410 «, t00=0x0004, t01=0x012a}
0x0774…07a0              Head {h00=0x0028, h01=0x0050, text=» CLEAR SPCHANGE READY FOR FUNCTIONS «, t00=0x0004, t01=0x0138}
0x07a0…07ba              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,TR420«, t00=0x0004, t01=0x0164}
0x07ba…07d6              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRC,=C' ' «, t00=0x0004, t01=0x017e}
0x07d6…07fe              Head {h00=0x0024, h01=0x0050, text=» PERF FMSTYR ATTACH CONTROL INF «, t00=0x0005, t01=0x000a}
0x07fe…0814              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTRSEL«, t00=0x0005, t01=0x0032}
0x0814…0824              Head {h00=0x000c, h01=0x0050, text=» B TR430«, t00=0x0005, t01=0x0048}
0x0824…0832              Head {h00=0x000a, h01=0x0050, text=»TR420 «, t00=0x0005, t01=0x0058}
0x0832…085a              Head {h00=0x0024, h01=0x0050, text=» PERF FRMTSP ATTACH FULL FORMAT «, t00=0x0005, t01=0x0066}
0x085a…0868              Head {h00=0x000a, h01=0x0050, text=»TR430 «, t00=0x0005, t01=0x008e}
0x0868…0884              Head {h00=0x0018, h01=0x0050, text=» TBT GTLOKSPG,TR435 «, t00=0x0005, t01=0x009c}
0x0884…089e              Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN1 «, t00=0x0005, t01=0x00b8}
0x089e…08cc              Head {h00=0x002a, h01=0x0050, text=» PERF SPCLRA WRITE AND READ ON SCREEN «, t00=0x0005, t01=0x00d2}
0x08cc…08dc              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0005, t01=0x0100}
0x08dc…08ea              Head {h00=0x000a, h01=0x0050, text=»TR435 «, t00=0x0005, t01=0x0110}
0x08ea…0904              Head {h00=0x0016, h01=0x0050, text=» MOVE SPKEY,CBIN3 «, t00=0x0005, t01=0x011e}
0x0904…092c              Head {h00=0x0024, h01=0x0050, text=» PERF SPCLRN IF LOCAL INQUIRIES «, t00=0x0005, t01=0x0138}
0x092c…093a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0160}
0x093a…0948              Head {h00=0x000a, h01=0x0050, text=»TR500 «, t00=0x0005, t01=0x016e}
0x0948…0964              Head {h00=0x0018, h01=0x0050, text=» TBT SPCHANGE,TR600 «, t00=0x0005, t01=0x017c}
0x0964…0980              Head {h00=0x0018, h01=0x0050, text=»*      FUNCTION CALL«, t00=0x0006, t01=0x0008}
0x0980…0994              Head {h00=0x0010, h01=0x0050, text=» PERF FUNCT «, t00=0x0006, t01=0x0024}
0x0994…09aa              Head {h00=0x0012, h01=0x0050, text=» SET GTSLUTFL «, t00=0x0006, t01=0x0038}
0x09aa…09d2              Head {h00=0x0024, h01=0x0050, text=»*     BRANCH ON TYPE OF FUNCTION«, t00=0x0006, t01=0x004e}
0x09d2…09ea              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW3,  C «, t00=0x0006, t01=0x0076}
0x09ea…0a12              Head {h00=0x0024, h01=0x0050, text=»  TR510,TR520,TR530,TR540,TR550 «, t00=0x0006, t01=0x008e}
0x0a12…0a1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b6}
0x0a1c…0a44              Head {h00=0x0024, h01=0x0050, text=»TR510   NEW TYPE OF CONTROL INF «, t00=0x0006, t01=0x00c0}
0x0a44…0a54              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0006, t01=0x00e8}
0x0a54…0a5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f8}
0x0a5e…0a78              Head {h00=0x0016, h01=0x0050, text=»TR520   ERROR TYPE«, t00=0x0006, t01=0x0102}
0x0a78…0a8c              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0006, t01=0x011c}
0x0a8c…0ab4              Head {h00=0x0024, h01=0x0050, text=» CBE SPBINW2,=W'2',TR510 MAK KEY«, t00=0x0006, t01=0x0130}
0x0ab4…0ad0              Head {h00=0x0018, h01=0x0050, text=» B TR530 CORRECTION «, t00=0x0006, t01=0x0158}
0x0ad0…0ada              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0174}
0x0ada…0b00              Head {h00=0x0022, h01=0x0050, text=»TR530   FUNCTION WITHOUT INPUT«, t00=0x0006, t01=0x017e}
0x0b00…0b18              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0007, t01=0x0014}
0x0b18…0b3a              Head {h00=0x001e, h01=0x0050, text=» PERF SPCLRA RESTAT INPUT «, t00=0x0007, t01=0x002c}
0x0b3a…0b4a              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0007, t01=0x004e}
0x0b4a…0b54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005e}
0x0b54…0b78              Head {h00=0x0020, h01=0x0050, text=»TR540   FUNCTION WITH INPUT «, t00=0x0007, t01=0x0068}
0x0b78…0b88              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0007, t01=0x008c}
0x0b88…0b92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009c}
0x0b92…0bb6              Head {h00=0x0020, h01=0x0050, text=»TR550   OUT OF REGISTRATION «, t00=0x0007, t01=0x00a6}
0x0bb6…0bc8              Head {h00=0x000e, h01=0x0050, text=» SET SPME «, t00=0x0007, t01=0x00ca}
0x0bc8…0bd4              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x00dc}
0x0bd4…0bde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e8}
0x0bde…0bec              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00f2}
0x0bec…0bfa              Head {h00=0x000a, h01=0x0050, text=»TR600 «, t00=0x0007, t01=0x0100}
0x0bfa…0c1a              Head {h00=0x001c, h01=0x0050, text=»*     NOT FUNCTION CALL «, t00=0x0007, t01=0x010e}
0x0c1a…0c2e              Head {h00=0x0010, h01=0x0050, text=» PERF TRINP «, t00=0x0007, t01=0x012e}
0x0c2e…0c44              Head {h00=0x0012, h01=0x0050, text=» SET GTSLUTFL «, t00=0x0007, t01=0x0142}
0x0c44…0c6a              Head {h00=0x0022, h01=0x0050, text=»*     BRANCH ON TYPE OF INPUT «, t00=0x0007, t01=0x0158}
0x0c6a…0ca2              Head {h00=0x0034, h01=0x0050, text=»*     (MAK, ERROR, TRSEL, END 1 PG, END MORE PG,«, t00=0x0007, t01=0x017e}
0x0ca2…0cbe              Head {h00=0x0018, h01=0x0050, text=»*     TO NEXT PAGE) «, t00=0x0008, t01=0x0026}
0x0cbe…0cd6              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW3,  C «, t00=0x0008, t01=0x0042}
0x0cd6…0d04              Head {h00=0x002a, h01=0x0050, text=»  TR610,TR620,TR630,TR640,TR650,TR660 «, t00=0x0008, t01=0x005a}
0x0d04…0d0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0088}
0x0d0e…0d26              Head {h00=0x0014, h01=0x0050, text=»TR610   MAK TYPE«, t00=0x0008, t01=0x0092}
0x0d26…0d3a              Head {h00=0x0010, h01=0x0050, text=» PERF TRPAGE«, t00=0x0008, t01=0x00aa}
0x0d3a…0d4a              Head {h00=0x000c, h01=0x0050, text=» B TR400«, t00=0x0008, t01=0x00be}
0x0d4a…0d54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ce}
0x0d54…0d70              Head {h00=0x0018, h01=0x0050, text=»TR620   INVALID KEY «, t00=0x0008, t01=0x00d8}
0x0d70…0d84              Head {h00=0x0010, h01=0x0050, text=» PERF SPERR «, t00=0x0008, t01=0x00f4}
0x0d84…0da8              Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW2,=W'2',TR610 MAK«, t00=0x0008, t01=0x0108}
0x0da8…0dc0              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x0008, t01=0x012c}
0x0dc0…0dd2              Head {h00=0x000e, h01=0x0050, text=» PERF SPCN«, t00=0x0008, t01=0x0144}
0x0dd2…0de2              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0008, t01=0x0156}
0x0de2…0dec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0166}
0x0dec…0e10              Head {h00=0x0020, h01=0x0050, text=»TR630   TRANSACTION SELECTED«, t00=0x0008, t01=0x0170}
0x0e10…0e36 (9, 0, 400)  Head {h00=0x0022, h01=0x0050, text=» TBT GTDIVTR,TR620 NOT ALLOWED«, t00=0x0009, t01=0x0004}
0x0e36…0e4a              Head {h00=0x0010, h01=0x0050, text=» PERF TRPAGE«, t00=0x0009, t01=0x002a}
0x0e4a…0e6e              Head {h00=0x0020, h01=0x0050, text=» CBNE TTTROLD,GTREGDEX,TR635«, t00=0x0009, t01=0x003e}
0x0e6e…0e9c              Head {h00=0x002a, h01=0x0050, text=» CLEAR SPPROMPT SAME AS PREVIOUS TRANS«, t00=0x0009, t01=0x0062}
0x0e9c…0eb0              Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x0009, t01=0x0090}
0x0eb0…0ec4              Head {h00=0x0010, h01=0x0050, text=» PERF FRMTSP«, t00=0x0009, t01=0x00a4}
0x0ec4…0ed6              Head {h00=0x000e, h01=0x0050, text=» PERF SPCN«, t00=0x0009, t01=0x00b8}
0x0ed6…0ee6              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x0009, t01=0x00ca}
0x0ee6…0ef4              Head {h00=0x000a, h01=0x0050, text=»TR635 «, t00=0x0009, t01=0x00da}
0x0ef4…0f14              Head {h00=0x001c, h01=0x0050, text=» CBL TTTROLD,CBIN0,TR636«, t00=0x0009, t01=0x00e8}
0x0f14…0f30              Head {h00=0x0018, h01=0x0050, text=» ERASE 0,CBIN4,CBIN4«, t00=0x0009, t01=0x0108}
0x0f30…0f4c              Head {h00=0x0018, h01=0x0050, text=» ERASE 0,CBIN6,CBIN6«, t00=0x0009, t01=0x0124}
0x0f4c…0f5a              Head {h00=0x000a, h01=0x0050, text=»TR636 «, t00=0x0009, t01=0x0140}
0x0f5a…0f8e              Head {h00=0x0030, h01=0x0050, text=» MOVE TTTROLD,GTREGDEX NOT AS PREVIOUS TRANS«, t00=0x0009, t01=0x014e}
0x0f8e…0fa4              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x0009, t01=0x0182}
0x0fa4…0fb8              Head {h00=0x0010, h01=0x0050, text=» PERF FRMTSP«, t00=0x000a, t01=0x0008}
0x0fb8…0fca              Head {h00=0x000e, h01=0x0050, text=» PERF SPCA«, t00=0x000a, t01=0x001c}
0x0fca…0fda              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x000a, t01=0x002e}
0x0fda…0fe4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003e}
0x0fe4…1008              Head {h00=0x0020, h01=0x0050, text=»TR640   1 PAGE TRANS CORRECT«, t00=0x000a, t01=0x0048}
0x1008…1022              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,TR645«, t00=0x000a, t01=0x006c}
0x1022…1058              Head {h00=0x0032, h01=0x0050, text=» ERASE 10,SPLINTOP,SPLINLOW ERASE VARIABLES IN«, t00=0x000a, t01=0x0086}
0x1058…1074              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRC,=C' ' «, t00=0x000a, t01=0x00bc}
0x1074…108e              Head {h00=0x0016, h01=0x0050, text=»   CURRENT FORMAT «, t00=0x000a, t01=0x00d8}
0x108e…109c              Head {h00=0x000a, h01=0x0050, text=»TR645 «, t00=0x000a, t01=0x00f2}
0x109c…10b4              Head {h00=0x0014, h01=0x0050, text=» CLEAR SPPROMPT «, t00=0x000a, t01=0x0100}
0x10b4…10cc              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTREGFLG «, t00=0x000a, t01=0x0118}
0x10cc…10dc              Head {h00=0x000c, h01=0x0050, text=» B TR410«, t00=0x000a, t01=0x0130}
0x10dc…10e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0140}
0x10e6…110c              Head {h00=0x0022, h01=0x0050, text=»TR650   >1 PAGE TRANS CORRECT «, t00=0x000a, t01=0x014a}
0x110c…1126              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,TR610«, t00=0x000a, t01=0x0170}
0x1126…1142              Head {h00=0x0018, h01=0x0050, text=» MOVE GTDBKRC,=C' ' «, t00=0x000a, t01=0x018a}
0x1142…115a              Head {h00=0x0014, h01=0x0050, text=» CLEAR GTREGFLG «, t00=0x000b, t01=0x0016}
0x115a…116a              Head {h00=0x000c, h01=0x0050, text=» B TR610«, t00=0x000b, t01=0x002e}
0x116a…1174              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003e}
0x1174…1190              Head {h00=0x0018, h01=0x0050, text=»TR660   TO NEXT PAGE«, t00=0x000b, t01=0x0048}
0x1190…11ac              Head {h00=0x0018, h01=0x0050, text=»   NEXT PAGE ALREADY«, t00=0x000b, t01=0x0064}
0x11ac…11c0              Head {h00=0x0010, h01=0x0050, text=»   ATTACHED «, t00=0x000b, t01=0x0080}
0x11c0…11dc              Head {h00=0x0018, h01=0x0050, text=» MOVE TTTROLD,CBIN0 «, t00=0x000b, t01=0x0094}
0x11dc…11f2              Head {h00=0x0012, h01=0x0050, text=» SET SPPROMPT «, t00=0x000b, t01=0x00b0}
0x11f2…1206              Head {h00=0x0010, h01=0x0050, text=» PERF SPCLRA«, t00=0x000b, t01=0x00c6}
0x1206…1216              Head {h00=0x000c, h01=0x0050, text=» B TR500«, t00=0x000b, t01=0x00da}
0x1216…1220              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ea}
0x1220…122a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f4}
0x122a…1238              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000b, t01=0x00fe}
0x1238…1246              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x010c}
0x1246…1258              Head {h00=0x000e, h01=0x0050, text=»FUNCT PROC«, t00=0x000b, t01=0x011a}
0x1258…1274              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000b, t01=0x012c}
0x1274…127e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0148}
0x127e…12ca              Head {h00=0x0048, h01=0x0050, text=»*             FUNCT - PROCEDURE FOR EXECUTING ALL FUNCTIONS ALLOWED.«, t00=0x000b, t01=0x0152}
0x12ca…12e4              Head {h00=0x0016, h01=0x0050, text=»*          INPUT: «, t00=0x000c, t01=0x000e}
0x12e4…1324              Head {h00=0x003c, h01=0x0050, text=»*               SPBINW2, GIVING KEY INDEX, COMMING FROM «, t00=0x000c, t01=0x0028}
0x1324…1354              Head {h00=0x002c, h01=0x0050, text=»*                        SCREEN PACKAGE «, t00=0x000c, t01=0x0068}
0x1354…136e              Head {h00=0x0016, h01=0x0050, text=»*          OUTPUT:«, t00=0x000c, t01=0x0098}
0x136e…13aa              Head {h00=0x0038, h01=0x0050, text=»*               SPBINW3, GIVING THE TYPE OF FUNCTION«, t00=0x000c, t01=0x00b2}
0x13aa…13ea              Head {h00=0x003c, h01=0x0050, text=»*                   1     MAK OR NEW CONTROL INFORMATION«, t00=0x000c, t01=0x00ee}
0x13ea…1418              Head {h00=0x002a, h01=0x0050, text=»*                   2     INVALID KEY «, t00=0x000c, t01=0x012e}
0x1418…1450              Head {h00=0x0034, h01=0x0050, text=»*                   3     FUNCTION WITHOUT INPUT«, t00=0x000c, t01=0x015c}
0x1450…1486 (13, 0, 400) Head {h00=0x0032, h01=0x0050, text=»*                   4     FUNCTION WITH INPUT «, t00=0x000d, t01=0x0004}
0x1486…14c4              Head {h00=0x003a, h01=0x0050, text=»*                   5     REG KEY, OUT OF REGISTRATION«, t00=0x000d, t01=0x003a}
0x14c4…14ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0078}
0x14ce…14ea              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x000d, t01=0x0082}
0x14ea…14f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x009e}
0x14f4…150c              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2,  C «, t00=0x000d, t01=0x00a8}
0x150c…154c              Head {h00=0x003c, h01=0x0050, text=»  FU01,FU02,FU03,FU04,FU05,FU06,FU07,FU08,FU09,FU10,  C «, t00=0x000d, t01=0x00c0}
0x154c…158c              Head {h00=0x003c, h01=0x0050, text=»  FU11,FU12,FU13,FU14,FU15,FU16,FU17,FU18,FU19,FU20,  C «, t00=0x000d, t01=0x0100}
0x158c…15a4              Head {h00=0x0014, h01=0x0050, text=»  FU21,FU22,FU23«, t00=0x000d, t01=0x0140}
0x15a4…15b4              Head {h00=0x000c, h01=0x0050, text=» B FU01 «, t00=0x000d, t01=0x0158}
0x15b4…15be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0168}
0x15be…15c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0172}
0x15c8…15d4              Head {h00=0x0008, h01=0x0050, text=»FU01«, t00=0x000d, t01=0x017c}
0x15d4…15e0              Head {h00=0x0008, h01=0x0050, text=»FU02«, t00=0x000d, t01=0x0188}
0x15e0…15f8 (14, 0, 400) Head {h00=0x0014, h01=0x0050, text=» CLEAR GTLOKSPG «, t00=0x000e, t01=0x0004}
0x15f8…1606              Head {h00=0x000a, h01=0x0050, text=»   MAK«, t00=0x000e, t01=0x001c}
0x1606…1622              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x000e, t01=0x002a}
0x1622…162e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x0046}
0x162e…1638              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0052}
0x1638…164c              Head {h00=0x0010, h01=0x0050, text=»FU03   ENTER«, t00=0x000e, t01=0x005c}
0x164c…1666              Head {h00=0x0016, h01=0x0050, text=» TBT GTLOKSPG,FU08«, t00=0x000e, t01=0x0070}
0x1666…167c              Head {h00=0x0012, h01=0x0050, text=» TEST GTDIVTR «, t00=0x000e, t01=0x008a}
0x167c…168e              Head {h00=0x000e, h01=0x0050, text=» BZ FUNOK «, t00=0x000e, t01=0x00a0}
0x168e…16a2              Head {h00=0x0010, h01=0x0050, text=» PERF SETDEB«, t00=0x000e, t01=0x00b2}
0x16a2…16b4              Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x000e, t01=0x00c6}
0x16b4…16c8              Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x000e, t01=0x00d8}
0x16c8…16ea              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW3,CBIN3 DEBET «, t00=0x000e, t01=0x00ec}
0x16ea…16f6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x010e}
0x16f6…1700              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011a}
0x1700…171a              Head {h00=0x0016, h01=0x0050, text=»FU04   KREDIT KEY «, t00=0x000e, t01=0x0124}
0x171a…1730              Head {h00=0x0012, h01=0x0050, text=» TEST GTDIVTR «, t00=0x000e, t01=0x013e}
0x1730…1742              Head {h00=0x000e, h01=0x0050, text=» BZ FUNOK «, t00=0x000e, t01=0x0154}
0x1742…1756              Head {h00=0x0010, h01=0x0050, text=» PERF SETKRE«, t00=0x000e, t01=0x0166}
0x1756…1768              Head {h00=0x000e, h01=0x0050, text=» PERF BELL«, t00=0x000e, t01=0x017a}
0x1768…177c              Head {h00=0x0010, h01=0x0050, text=» PERF SPINF1«, t00=0x000e, t01=0x018c}
0x177c…179e              Head {h00=0x001e, h01=0x0050, text=» MOVE SPBINW3,CBIN3 KREDIT«, t00=0x000f, t01=0x0010}
0x179e…17aa              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x0032}
0x17aa…17b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x003e}
0x17b4…17ca              Head {h00=0x0012, h01=0x0050, text=»FU05   REG KEY«, t00=0x000f, t01=0x0048}
0x17ca…17fa              Head {h00=0x002c, h01=0x0050, text=» MOVE SPBINW3,CBIN5 OUT OF REGISTRATION «, t00=0x000f, t01=0x005e}
0x17fa…1806              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000f, t01=0x008e}
0x1806…1810              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x009a}
0x1810…1824              Head {h00=0x0010, h01=0x0050, text=»FU06   LISTE«, t00=0x000f, t01=0x00a4}
0x1824…1838              Head {h00=0x0010, h01=0x0050, text=» PERF LSTINT«, t00=0x000f, t01=0x00b8}
0x1838…184c              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x000f, t01=0x00cc}
0x184c…185c              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x000f, t01=0x00e0}
0x185c…1866              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00f0}
0x1866…187e              Head {h00=0x0014, h01=0x0050, text=»FU07   SUBTOTAL «, t00=0x000f, t01=0x00fa}
0x187e…1892              Head {h00=0x0010, h01=0x0050, text=» PERF SUBTOT«, t00=0x000f, t01=0x0112}
0x1892…18a6              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x000f, t01=0x0126}
0x18a6…18b6              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x000f, t01=0x013a}
0x18b6…18c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x014a}
0x18c0…18dc              Head {h00=0x0018, h01=0x0050, text=»FU08   SPG FUNCTION «, t00=0x000f, t01=0x0154}
0x18dc…18f4              Head {h00=0x0014, h01=0x0050, text=» PERF ADM,CBIN11«, t00=0x000f, t01=0x0170}
0x18f4…1910              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x000f, t01=0x0188}
0x1910…191c              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0014}
0x191c…1926              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0020}
0x1926…193a              Head {h00=0x0010, h01=0x0050, text=»FU09   CYCLE«, t00=0x0010, t01=0x002a}
0x193a…1952              Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN1 «, t00=0x0010, t01=0x003e}
0x1952…1966              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0010, t01=0x0056}
0x1966…1982              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0010, t01=0x006a}
0x1982…198e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x0086}
0x198e…1998              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0092}
0x1998…19ae              Head {h00=0x0012, h01=0x0050, text=»FU10   STABEL «, t00=0x0010, t01=0x009c}
0x19ae…19c6              Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN2 «, t00=0x0010, t01=0x00b2}
0x19c6…19da              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0010, t01=0x00ca}
0x19da…19f6              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0010, t01=0x00de}
0x19f6…1a02              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0010, t01=0x00fa}
0x1a02…1a0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0106}
0x1a0c…1a28              Head {h00=0x0018, h01=0x0050, text=»FU11   INVKEY, MODP «, t00=0x0010, t01=0x0110}
0x1a28…1a3a              Head {h00=0x000e, h01=0x0050, text=» PERF MODP«, t00=0x0010, t01=0x012c}
0x1a3a…1a4e              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0010, t01=0x013e}
0x1a4e…1a70              Head {h00=0x001e, h01=0x0050, text=» CBE GTRETUR,=W'3',FU1110 «, t00=0x0010, t01=0x0152}
0x1a70…1a80              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0010, t01=0x0174}
0x1a80…1a8e              Head {h00=0x000a, h01=0x0050, text=»FU1110«, t00=0x0010, t01=0x0184}
0x1a8e…1aaa (17, 0, 400) Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0011, t01=0x0004}
0x1aaa…1ab6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x0020}
0x1ab6…1ac0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x002c}
0x1ac0…1ad8              Head {h00=0x0014, h01=0x0050, text=»FU12   KONTOKORT«, t00=0x0011, t01=0x0036}
0x1ad8…1aea              Head {h00=0x000e, h01=0x0050, text=» PERF KORT«, t00=0x0011, t01=0x004e}
0x1aea…1afe              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x0060}
0x1afe…1b1a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0011, t01=0x0074}
0x1b1a…1b26              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0011, t01=0x0090}
0x1b26…1b30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x009c}
0x1b30…1b44              Head {h00=0x0010, h01=0x0050, text=»FU13   KVIT «, t00=0x0011, t01=0x00a6}
0x1b44…1b56              Head {h00=0x000e, h01=0x0050, text=» PERF KVIT«, t00=0x0011, t01=0x00ba}
0x1b56…1b6a              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x00cc}
0x1b6a…1b7a              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0011, t01=0x00e0}
0x1b7a…1b84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f0}
0x1b84…1b98              Head {h00=0x0010, h01=0x0050, text=»FU14   SUPL «, t00=0x0011, t01=0x00fa}
0x1b98…1bb0              Head {h00=0x0014, h01=0x0050, text=» PERF ADM,CBIN10«, t00=0x0011, t01=0x010e}
0x1bb0…1bc4              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x0126}
0x1bc4…1bd4              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0011, t01=0x013a}
0x1bd4…1bde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x014a}
0x1bde…1bf0              Head {h00=0x000e, h01=0x0050, text=»FU15   SUM«, t00=0x0011, t01=0x0154}
0x1bf0…1c02              Head {h00=0x000e, h01=0x0050, text=» PERF SUM «, t00=0x0011, t01=0x0166}
0x1c02…1c16              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0011, t01=0x0178}
0x1c16…1c26              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0011, t01=0x018c}
0x1c26…1c30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x000c}
0x1c30…1c46              Head {h00=0x0012, h01=0x0050, text=»FU16   ADM KEY«, t00=0x0012, t01=0x0016}
0x1c46…1c70              Head {h00=0x0026, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET ADM TYPE«, t00=0x0012, t01=0x002c}
0x1c70…1c8e              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0012, t01=0x0056}
0x1c8e…1ca8              Head {h00=0x0016, h01=0x0050, text=» PERF ADM,GSWBIN1 «, t00=0x0012, t01=0x0074}
0x1ca8…1cc4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0012, t01=0x008e}
0x1cc4…1cd0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0012, t01=0x00aa}
0x1cd0…1cda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b6}
0x1cda…1cf2              Head {h00=0x0014, h01=0x0050, text=»FU17   CYCLE KEY«, t00=0x0012, t01=0x00c0}
0x1cf2…1d22              Head {h00=0x002c, h01=0x0050, text=» MOVE GSWBCD3,SPINPUT GET TYPE OF CYCLE «, t00=0x0012, t01=0x00d8}
0x1d22…1d40              Head {h00=0x001a, h01=0x0050, text=» MOVE GSWBIN1,GSWBCD3 «, t00=0x0012, t01=0x0108}
0x1d40…1d58              Head {h00=0x0014, h01=0x0050, text=» IB GSWBIN1,  C «, t00=0x0012, t01=0x0126}
0x1d58…1d8e              Head {h00=0x0032, h01=0x0050, text=»  FU09,FU10,FUNOK,FCYK4,FUNOK, CYCLE,STABEL C «, t00=0x0012, t01=0x013e}
0x1d8e…1db0              Head {h00=0x001e, h01=0x0050, text=»  FUNOK,FUNOK,FUNOK,FCYK9 «, t00=0x0012, t01=0x0174}
0x1db0…1ddc              Head {h00=0x0028, h01=0x0050, text=» PERF CYK,CBIN10 END OF CYCLE/STABEL«, t00=0x0013, t01=0x0008}
0x1ddc…1df0              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0013, t01=0x0034}
0x1df0…1e00              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0013, t01=0x0048}
0x1e00…1e0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0058}
0x1e0a…1e30              Head {h00=0x0022, h01=0x0050, text=»FCYK4   PAUSE IN CYCLE STABEL «, t00=0x0013, t01=0x0062}
0x1e30…1e48              Head {h00=0x0014, h01=0x0050, text=» PERF CYK,CBIN4 «, t00=0x0013, t01=0x0088}
0x1e48…1e5c              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0013, t01=0x00a0}
0x1e5c…1e6c              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0013, t01=0x00b4}
0x1e6c…1e76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00c4}
0x1e76…1e84              Head {h00=0x000a, h01=0x0050, text=»FCYK9 «, t00=0x0013, t01=0x00ce}
0x1e84…1eb0              Head {h00=0x0028, h01=0x0050, text=» PERF CYK,CBIN9 CLEAR ARKIV KNT. NR «, t00=0x0013, t01=0x00dc}
0x1eb0…1ec4              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0013, t01=0x0108}
0x1ec4…1ed4              Head {h00=0x000c, h01=0x0050, text=» B FUOK «, t00=0x0013, t01=0x011c}
0x1ed4…1ede              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x012c}
0x1ede…1ef6              Head {h00=0x0014, h01=0x0050, text=»FU18   DIV TRANS«, t00=0x0013, t01=0x0136}
0x1ef6…1f0a              Head {h00=0x0010, h01=0x0050, text=» PERF DIVTR «, t00=0x0013, t01=0x014e}
0x1f0a…1f1e              Head {h00=0x0010, h01=0x0050, text=» BNOK FUNOK «, t00=0x0013, t01=0x0162}
0x1f1e…1f3a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0013, t01=0x0176}
0x1f3a…1f46 (20, 0, 400) Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0004}
0x1f46…1f50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0010}
0x1f50…1f68              Head {h00=0x0014, h01=0x0050, text=»FU19   HOVEDBOG «, t00=0x0014, t01=0x001a}
0x1f68…1f82              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,FUNOK«, t00=0x0014, t01=0x0032}
0x1f82…1f9e              Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'1'«, t00=0x0014, t01=0x004c}
0x1f9e…1fba              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0014, t01=0x0068}
0x1fba…1fc6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x0084}
0x1fc6…1fd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0090}
0x1fd0…1ff0              Head {h00=0x001c, h01=0x0050, text=»FU20   DEBITOR POSTERING«, t00=0x0014, t01=0x009a}
0x1ff0…200a              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,FUNOK«, t00=0x0014, t01=0x00ba}
0x200a…2026              Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'2'«, t00=0x0014, t01=0x00d4}
0x2026…2042              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0014, t01=0x00f0}
0x2042…204e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x010c}
0x204e…2058              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0118}
0x2058…2072              Head {h00=0x0016, h01=0x0050, text=»FU21   REMITTERING«, t00=0x0014, t01=0x0122}
0x2072…208c              Head {h00=0x0016, h01=0x0050, text=» TBT GTDIVTR,FUNOK«, t00=0x0014, t01=0x013c}
0x208c…20a8              Head {h00=0x0018, h01=0x0050, text=» MOVE TTSTYRDX,=W'3'«, t00=0x0014, t01=0x0156}
0x20a8…20c4              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0014, t01=0x0172}
0x20c4…20d0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0014, t01=0x018e}
0x20d0…20da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x000a}
0x20da…2102              Head {h00=0x0024, h01=0x0050, text=»FU22   TRANS SELECTION IN DIVTR «, t00=0x0015, t01=0x0014}
0x2102…211c              Head {h00=0x0016, h01=0x0050, text=» TBF GTDIVTR,FUNOK«, t00=0x0015, t01=0x003c}
0x211c…2130              Head {h00=0x0010, h01=0x0050, text=» PERF TRPAGE«, t00=0x0015, t01=0x0056}
0x2130…214c              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0015, t01=0x006a}
0x214c…2158              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0086}
0x2158…2162              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0092}
0x2162…2178              Head {h00=0x0012, h01=0x0050, text=»FU23   ONLINE «, t00=0x0015, t01=0x009c}
0x2178…219e              Head {h00=0x0022, h01=0x0050, text=» PERF ADM,CBIN7 PERFORM ONLINE«, t00=0x0015, t01=0x00b2}
0x219e…21c8              Head {h00=0x0026, h01=0x0050, text=» MOVE SPBINW3,CBIN4 REWRITE SCREEN«, t00=0x0015, t01=0x00d8}
0x21c8…21d4              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0102}
0x21d4…21de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010e}
0x21de…21e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0118}
0x21e8…21f6              Head {h00=0x000a, h01=0x0050, text=»FUNOK «, t00=0x0015, t01=0x0122}
0x21f6…221e              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW4,=W'16' INVALID KEY«, t00=0x0015, t01=0x0130}
0x221e…223a              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN2 «, t00=0x0015, t01=0x0158}
0x223a…2246              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0015, t01=0x0174}
0x2246…2250              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0180}
0x2250…225c              Head {h00=0x0008, h01=0x0050, text=»FUOK«, t00=0x0015, t01=0x018a}
0x225c…2278              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN3 «, t00=0x0016, t01=0x0008}
0x2278…2284              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0016, t01=0x0024}
0x2284…228e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0030}
0x228e…2298              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003a}
0x2298…22a6              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0016, t01=0x0044}
0x22a6…22b4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x0052}
0x22b4…22c6              Head {h00=0x000e, h01=0x0050, text=»TRINP PROC«, t00=0x0016, t01=0x0060}
0x22c6…22e2              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0016, t01=0x0072}
0x22e2…22ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x008e}
0x22ec…2336              Head {h00=0x0046, h01=0x0050, text=»*            TRINP - PROCEDURE FOR HANDLING INFORMATION GIVEN OVER«, t00=0x0016, t01=0x0098}
0x2336…2362              Head {h00=0x0028, h01=0x0050, text=»*          FROM THE SCREEN PACKAGE. «, t00=0x0016, t01=0x00e2}
0x2362…23a4              Head {h00=0x003e, h01=0x0050, text=»*          WILL BE CALLED WHEN SOMETHING HAS BEEN ENTERED «, t00=0x0016, t01=0x010e}
0x23a4…23e4              Head {h00=0x003c, h01=0x0050, text=»*          WHICH THE SCREEN PACKAGE CAN NOT TAKE CARE OF«, t00=0x0016, t01=0x0150}
0x23e4…23fe              Head {h00=0x0016, h01=0x0050, text=»*          ITSELF.«, t00=0x0016, t01=0x0190}
0x23fe…2426              Head {h00=0x0024, h01=0x0050, text=»*          SPCHANGE WILL BE SET.«, t00=0x0017, t01=0x001a}
0x2426…2440              Head {h00=0x0016, h01=0x0050, text=»*          INPUT: «, t00=0x0017, t01=0x0042}
0x2440…247c              Head {h00=0x0038, h01=0x0050, text=»*               SPBINW2: INDEX FOR THE KEY DEPRESSED«, t00=0x0017, t01=0x005c}
0x247c…2496              Head {h00=0x0016, h01=0x0050, text=»*          OUTPUT:«, t00=0x0017, t01=0x0098}
0x2496…24d0              Head {h00=0x0036, h01=0x0050, text=»*               SPBINW3: GIVING THE TYPE OF INPUT «, t00=0x0017, t01=0x00b2}
0x24d0…24f4              Head {h00=0x0020, h01=0x0050, text=»*               1   MAK TYPE«, t00=0x0017, t01=0x00ec}
0x24f4…251c              Head {h00=0x0024, h01=0x0050, text=»*               2   INVALID KEY «, t00=0x0017, t01=0x0110}
0x251c…254c              Head {h00=0x002c, h01=0x0050, text=»*               3   TRANSACTION SELECTED«, t00=0x0017, t01=0x0138}
0x254c…257c              Head {h00=0x002c, h01=0x0050, text=»*               4   1 PAGE TRANS CORRECT«, t00=0x0017, t01=0x0168}
0x257c…25ae              Head {h00=0x002e, h01=0x0050, text=»*               5   >1 PAGE TRANS CORRECT «, t00=0x0018, t01=0x0008}
0x25ae…25ee              Head {h00=0x003c, h01=0x0050, text=»*               6   NEXT PAGE OF TRANS ALREADY ATTACHED «, t00=0x0018, t01=0x003a}
0x25ee…25f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x007a}
0x25f8…2614              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x0018, t01=0x0084}
0x2614…261e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00a0}
0x261e…2636              Head {h00=0x0014, h01=0x0050, text=» IB SPBINW2,  C «, t00=0x0018, t01=0x00aa}
0x2636…264e              Head {h00=0x0014, h01=0x0050, text=»  IN01,IN02,IN03«, t00=0x0018, t01=0x00c2}
0x264e…266e              Head {h00=0x001c, h01=0x0050, text=» CBE SPBINW2,=W'22',IN22«, t00=0x0018, t01=0x00da}
0x266e…267a              Head {h00=0x0008, h01=0x0050, text=»IN00«, t00=0x0018, t01=0x00fa}
0x267a…26a2              Head {h00=0x0024, h01=0x0050, text=» MOVE SPBINW3,CBIN2 INVALID KEY «, t00=0x0018, t01=0x0106}
0x26a2…26ae              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0018, t01=0x012e}
0x26ae…26b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x013a}
0x26b8…26c4              Head {h00=0x0008, h01=0x0050, text=»IN01«, t00=0x0018, t01=0x0144}
0x26c4…26d6              Head {h00=0x000e, h01=0x0050, text=»IN02   MAK«, t00=0x0018, t01=0x0150}
0x26d6…26f2              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN1 «, t00=0x0018, t01=0x0162}
0x26f2…26fe              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0018, t01=0x017e}
0x26fe…2708              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x018a}
0x2708…2722 (25, 0, 400) Head {h00=0x0016, h01=0x0050, text=»IN03   AFTER SLUT,«, t00=0x0019, t01=0x0004}
0x2722…273c              Head {h00=0x0016, h01=0x0050, text=» TBT GTTRSEL,IN030«, t00=0x0019, t01=0x001e}
0x273c…2768              Head {h00=0x0028, h01=0x0050, text=» CBE SPBINW1,=W'0',IN00 NOT ALLOWED «, t00=0x0019, t01=0x0038}
0x2768…2776              Head {h00=0x000a, h01=0x0050, text=»IN030 «, t00=0x0019, t01=0x0064}
0x2776…278a              Head {h00=0x0010, h01=0x0050, text=» PERF ENTER «, t00=0x0019, t01=0x0072}
0x278a…27b8              Head {h00=0x002a, h01=0x0050, text=» BNOK IN035 ERRORS DETECTED IN FLDTST «, t00=0x0019, t01=0x0086}
0x27b8…27d0              Head {h00=0x0014, h01=0x0050, text=» IB GTRETUR,  C «, t00=0x0019, t01=0x00b4}
0x27d0…27ec              Head {h00=0x0018, h01=0x0050, text=»  IN031,IN032,IN033 «, t00=0x0019, t01=0x00cc}
0x27ec…27fa              Head {h00=0x000a, h01=0x0050, text=»IN031 «, t00=0x0019, t01=0x00e8}
0x27fa…2816              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN4 «, t00=0x0019, t01=0x00f6}
0x2816…2822              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x0112}
0x2822…2830              Head {h00=0x000a, h01=0x0050, text=»IN032 «, t00=0x0019, t01=0x011e}
0x2830…284c              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN6 «, t00=0x0019, t01=0x012c}
0x284c…2858              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x0148}
0x2858…2866              Head {h00=0x000a, h01=0x0050, text=»IN033 «, t00=0x0019, t01=0x0154}
0x2866…2882              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN5 «, t00=0x0019, t01=0x0162}
0x2882…288e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0019, t01=0x017e}
0x288e…289c              Head {h00=0x000a, h01=0x0050, text=»IN035 «, t00=0x0019, t01=0x018a}
0x289c…28be              Head {h00=0x001e, h01=0x0050, text=» TBWD  TAB OVER LAST FIELD«, t00=0x001a, t01=0x0008}
0x28be…28da              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN2 «, t00=0x001a, t01=0x002a}
0x28da…28e6              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x0046}
0x28e6…28f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0052}
0x28f0…28fc              Head {h00=0x0008, h01=0x0050, text=»IN22«, t00=0x001a, t01=0x005c}
0x28fc…2916              Head {h00=0x0016, h01=0x0050, text=»   TRANS SELECTED «, t00=0x001a, t01=0x0068}
0x2916…2932              Head {h00=0x0018, h01=0x0050, text=» MOVE SPBINW3,CBIN3 «, t00=0x001a, t01=0x0082}
0x2932…293e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001a, t01=0x009e}
0x293e…2948              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00aa}
0x2948…2956              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001a, t01=0x00b4}
0x2956…2964              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x00c2}
0x2964…2978              Head {h00=0x0010, h01=0x0050, text=»TRPAGE PROC «, t00=0x001a, t01=0x00d0}
0x2978…2994              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001a, t01=0x00e4}
0x2994…299e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0100}
0x299e…29e8              Head {h00=0x0046, h01=0x0050, text=»*              TRPAGE - AFTER SELECTION OF TRANSTYPE, SET CORRECT «, t00=0x001a, t01=0x010a}
0x29e8…2a22              Head {h00=0x0036, h01=0x0050, text=»*          INFORMATION ABOUT THE SIZE AND TYPE OF «, t00=0x001a, t01=0x0154}
0x2a22…2a44              Head {h00=0x001e, h01=0x0050, text=»*          THE TRANSACTION«, t00=0x001a, t01=0x018e}
0x2a44…2a4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0020}
0x2a4e…2a6a              Head {h00=0x0018, h01=0x0050, text=»********************«, t00=0x001b, t01=0x002a}
0x2a6a…2a74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0046}
0x2a74…2a9e              Head {h00=0x0026, h01=0x0050, text=» SET GTTRSEL TRANSACTION SELECTED «, t00=0x001b, t01=0x0050}
0x2a9e…2ab4              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTYPE2«, t00=0x001b, t01=0x007a}
0x2ab4…2aca              Head {h00=0x0012, h01=0x0050, text=» CLEAR GTTYPE3«, t00=0x001b, t01=0x0090}
0x2aca…2ae4              Head {h00=0x0016, h01=0x0050, text=» MOVE GTPAGE,CBIN1«, t00=0x001b, t01=0x00a6}
0x2ae4…2b2a              Head {h00=0x0042, h01=0x0050, text=»*          TRANSTYPE  01, 02, 03, 04, 05, 06, 07, 08, 09, 10, «, t00=0x001b, t01=0x00c0}
0x2b2a…2b70              Head {h00=0x0042, h01=0x0050, text=»*                     12, 40, 41, 42, 45, 46, 47, 48, 49, 50, «, t00=0x001b, t01=0x0106}
0x2b70…2b9c              Head {h00=0x0028, h01=0x0050, text=»*                     51, 52, 53, 54«, t00=0x001b, t01=0x014c}
0x2b9c…2bb4              Head {h00=0x0014, h01=0x0050, text=» IB GTREGDEX,  C«, t00=0x001b, t01=0x0178}
0x2bb4…2bf4              Head {h00=0x003c, h01=0x0050, text=»  PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG02,PG02,PG01,  C «, t00=0x001b, t01=0x0190}
0x2bf4…2c34              Head {h00=0x003c, h01=0x0050, text=»  PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,  C «, t00=0x001c, t01=0x0040}
0x2c34…2c52              Head {h00=0x001a, h01=0x0050, text=»  PG03,PG01,PG03,PG01 «, t00=0x001c, t01=0x0080}
0x2c52…2c5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x009e}
0x2c5c…2c68              Head {h00=0x0008, h01=0x0050, text=»PG01«, t00=0x001c, t01=0x00a8}
0x2c68…2c74              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x00b4}
0x2c74…2c7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00c0}
0x2c7e…2c8a              Head {h00=0x0008, h01=0x0050, text=»PG02«, t00=0x001c, t01=0x00ca}
0x2c8a…2c9e              Head {h00=0x0010, h01=0x0050, text=» SET GTTYPE2«, t00=0x001c, t01=0x00d6}
0x2c9e…2caa              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x00ea}
0x2caa…2cb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00f6}
0x2cb4…2cc0              Head {h00=0x0008, h01=0x0050, text=»PG03«, t00=0x001c, t01=0x0100}
0x2cc0…2cd4              Head {h00=0x0010, h01=0x0050, text=» SET GTTYPE3«, t00=0x001c, t01=0x010c}
0x2cd4…2ce0              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x0120}
0x2ce0…2cea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012c}
0x2cea…2cf8              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001c, t01=0x0136}
0x2cf8…2d02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0144}
0x2d02…2d0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014e}
0x2d0c…2d16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0158}
0x2d16…2d22              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001c, t01=0x0162}
0x2d22…2d26              Head {h00=0x4004, h01=0x0000}
0x2d26…2d2a              00 1c 01 6e                                                                                                                                                                                                                                       ┆   n┆
0x2d2a…2d32 (29, 1, 8)   20 04 00 00 00 1d 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view