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

⟦fbcc666f4⟧

    Length: 20622 (0x508e)
    Notes: pts_type(SC)
    Names: »KMD08.SC«

Derivation

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

PTS(SC)

	IDENT KMD08 	02.01.XXX.1 
* 
* 
********************************************************
* 
*     THIS IS THE MAIN MODULE FOR KMDAPLICATION 
*     CONTAINING THE CWB'S, TWB'S AND INITIAL 
*        START POINTS 
* 
* 
* 
************************************************* 
	DDIV 
 OPTNS LINES=45 
****************************************************
* 
*           TRANSACTION TASK  TC
* 
****************************************************
	TERM	TC
* 
	CWB	CB1
 CWB CB2
 CWB CB3
	CWB	CB4
 CWB CB6
 DWB CD3(CB3) 
	DWB	CD4(CB4) 
 TWB GB1
 TWB GB2
 TWB GB3
 TWB GB4
 TWB TB1
 UWB TB2
 DWB TD2(TB2) 
* 
FD01 DSET FC=F8	VOL 999001
FD02 DSET FC=F9	VOL 999002
KVOUCH	DSET	FC=31,DEV=TV,BUFL=100 
KJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH 
KTALLY	DSET	FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH 
SCREEN DSET FC=50,BUFL=56 
KEYB DSET FC=20 
DK01 DSET FC=C1	FD999001 CONFDATA 
DK02 DSET FC=C2	FD999002 REGSET 
DK03 DSET FC=C3	FD999003 CYCLE SET
DK04 DSET FC=C4	FD999004 KT PLAN
DSSOPI DSET FC=10 
DSSOPO DSET FC=11 
DCOMM DSET FC=61
KCASS DSET FC=12
DK05 DSET FC=C5 
DK06 DSET FC=C6 
DK07 DSET FC=C7 
DK08 DSET FC=C8 
FD03 DSET FC=FA	VOL 999003
FD04 DSET FC=FB	VOL 999004
 FMTCTL INDS=KEYB,OUTDS=SCREEN
* 
* 
* 
* 
* 
	START	REGGO
	STACK	160
 EJECT
************************************************************************
* 
*   D A T D I V  :  DATA DIVISION FOR IBM-3270 EMULATION PACKAGE. 
*                   THIS MODULE ALSO CONTAINS THE CREDIT CODED
*                   START-UP ROUTINES.
* 
********************************************************************

	EJECT
* 
* 
* 
*	DATA DIVISION 
* 
* 
* 
*       KB/VDU TERMINAL 
* 
	TERM	KA
* 
	CWB	CB9
	TWB	TB9
* 
	START	KBVGO
* 
DSDC	DSET	FC=61 
DSICR	DSET	FC=E0,DEV=II	COPCMD=1
DSICW	DSET	FC=E1,DEV=IO 
DSVDU	DSET	FC=50,DEV=DY,BUFL=162
DSKBAN	DSET	FC=20,DEV=KA,BUFL=2 
DSKBSD	DSET	FC=40,DEV=KI,BUFL=2 
	EJECT
* 
* 
*	GTP TERMINAL
* 
* 
	TERM	GA
* 
	CWB	CB9
	TWB	TB9
* 
	START	GTPGO
* 
DSDC	DSET	FC=61 
DSICR	DSET	FC=E0,DEV=II 
DSICW	DSET	FC=E1,DEV=IO	COPCMD=1
DSGTP	DSET	FC=30,DEV=GP,BUFL=162
	EJECT
* 
* 
*	DCTASK
* 
* 
	TERM D0
* 
	CWB	CB9
	START	DC1GO
DSDC	DSET	FC=60 
* 
	EJECT
* 
* 
*      WORK AREA FOR KEYBOARD AND DISPLAY TASKS 
* 
* 
TB9	BLK 
* 
TCT01	BIN	4X'0'	TID AND STACKBASE 
PRINTER	STRG	4X'0'	KEYBARD/VDU/PRINTER
BVDU	STRG	3840X'0'	VDU SCREEN BUFF
PCURS	STRG	4X'0'	CURSOR ADDR. BINARY
ATTRIB	STRG	4X'0'	LAST ATTRIBUTE CHARACTER
CURATT	STRG	4X'0'	CURSOR ATTRIBUTE
WCC	STRG	4X'0'	WCC/CCC CHARACTER
KBINH	STRG	4X'0'	KEYBOARD INHIBIT INDIC.
LINCNT	STRG	4X'0'	
DCLENG	STRG	4X'0'	DC READ EFFECTIVE LENGTH
ICWORK	STRG	4X'0' 
INTATT	STRG	4X'0'	INTENSITY ATTRIBUTE 
OFFFLG	STRG	4X'0'	OFFLINE FLAG
COPNO	BIN		TID FOR HARDCOPY 
MISCAR	STRG	44X'0'	CCC,MAIN,
			MODE,KEYS,ECBDCC,ECBBLK, 
STRG2 STRG 4X'0'	DK 
	EJECT

**************
* 
*   COMMON WORK BLOCK FOR ALL TASKS 
* 
***************************************** 

CB9	BLK 
* 
CNFIGD	BOOL 
CNFBSY	BOOL 
* 
*  CONFIGURATION DATA 
* 
NBRKBV	BIN		NUMBER OF KB/VDUS 
NBRGTP	BIN		NUMBER OF GTPS
* 
MF1KBV	STRG	32X'40C1C2C3C4C5C6C7'	DV ADDRESSES KB/VDU 
MF1GTP	STRG	32X'C8C94A4B4C4D4E4F'	DV ADDRESSES GTP
* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED
* 
MF1CU	STRG	X'6040'	CU-ADDRESS MF # 1
* 
CNFHC	BINI	(16),'1','2','3','4','5','6','7','8'	HARDCOPY PRINTER
			FOR KB-VDU 1-16
* 
BINWK1	BIN
* 
OFF	STRGI	(12)2C'TC','TD','TE','TF','TG','TH',		C 
		'TI','TJ','TK','TL','TM','TN' 
	EJECT
*	CWB 1	COMMON
* 
* 
CB1	BLK 
CBKOFLG BOOL FALSE T=ALL BKO-CODES ALLOWED
CKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT
CCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK
CTESTFLG BOOL FALSE T=CONVERSION, TEST MODE 
CTRVALG	BOOL	FALSE	T: SKOVBO. F: VIBORG 
CFLT46 BOOL FALSE T=SPECIAL FIELD 46,TR=8 
CFLT48 BOOL FALSE T=SPECIAL FIELD 48,TR=3 
CKTAUTO BOOL TRUE T=ASK KORT AFTER TR 4 
CDCFLAG BOOL FALSE T=INCLUDES DATATRANSMISSION
CCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET 
CADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22)
C5MDISK BOOL FALSE T=5M DISK
CKASFLG BOOL TRUE T=BACKUP ON CASSETTE
CSLDFLG BOOL TRUE T=GL.SALDO PRESENT(CKTFLAG=T) 
CGLREGFL BOOL FALSE T=GL REGSET PRESENT 
CCONVERT BOOL FALSE T=CONVERSION MODE 
CBIN0 BIN '0' 
CBIN1 BIN '1' 
CBIN2 BIN '2' 
CBIN3 BIN '3' 
CBIN4 BIN '4' 
CBIN5 BIN '5' 
CBIN6 BIN '6' 
CBIN7 BIN '7' 
CBIN8 BIN '8' 
CBIN9 BIN '9' 
CBIN10 BIN '10' 
CBIN11	BIN	'11' 
WEIGTH	BCDI	(13),'2','7','6','5','4','3','2','7','6','5','4','3','2'
WEIGTH1 BCDI (13),'7','6','5','4','3','2','7','6','5','4','3','2','1' 
* 
 EJECT
CB2 BLK 
* 
CPFLG	BOOL	FALSE	T: DISK OCCUPIED 
CSPLITFL	BOOL	FALSE	T: SPLIT RECORD 
CWFLAG BOOL FALSE F=COLD START
CREMITFL BOOL FALSE F=NO REMIT
CSKIFTFL BOOL FALSE T=FD CHANGING 
CEORFLG BOOL FALSE T=END OF A RECORD
CCOLDFLG BOOL FALSE T=VERY FIRST COLD START 
CERRORFL BOOL FALSE T=ERROR IN COLD START 
CCONVFLG BOOL FALSE T=CONVERSION GOING ON 
CSWFLAG BOOL FALSE SCRATCH FLAG 
CSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE 
CKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN
* 
* 
* 
CBIN12 BIN '12' 
CBIN13 BIN '13' 
CBIN14 BIN '14' 
CBIN15 BIN '15' 
CBIN16 BIN '16' 
CBIN17 BIN '17' 
CBIN18 BIN '18' 
CBIN19 BIN '19' 
CBIN20 BIN '20' 
CBIN21 BIN '21' 
CBIN22 BIN '22' 
CBINMAX	BIN	'26'
	EJECT
*********************************************************** 
* 
*          TABLE GIVING INDEXES FOR TRANSACTIONFIELDS 
*           FIELD NR GIVES DISPLACEMENT IN TABLE
* 
************************************************************
CFLTDEX BINI (90),		C 
		'26','26','26','26','1','2','3','4','5','6',	1-10	C 
		'7','8','9','4','11','12','10','11','12','13',	11-20	C
		'10','11','12','13','14','15','16','1','8','9',	21-30	C 
		'10','5','12','13','14','5','18','19','7','7',	31-40	C
		'18','14','20','21','22','17','12','15','10','1',	41-50	C 
		'2','3','4','2','3','4','5','6','7','8',	51-60	C
		'9','10','11','12','13','6','26','26','26','26',	61-70	C
		'26','26','26','26','26','26','26','26','26','26',	71-80	C
		'19','26','26','26','26','26','26','26','26','26'	81-90 
CCNTDEX	BINI	(11),		C 
		'1','2','3','4','5','1','5','6','6','5','0' 
 EJECT
CB3 BLK 
* 
* 
* 
* 
* 
CTWBIN1 BIN 
CTWBIN2 BIN 
CVOUTOP BIN W'56' 
CMAXLIN BIN W'54' 
CMINLIN BIN W'2'
CCONBUF0	STRG	398X'FF'
CCONBUF1	STRG	398X'FF'
CCONBUF2	STRG	398X'FF'
CCONBUF3	STRG	398X'FF'
CCONBUF4	STRG	398X'FF'
CCONBUF5	STRG	398X'FF'
CCONBUF6 STRG 398X'FF'
CCONBUF7 STRG 398X'FF'
CCONBUF8 STRG 398X'FF'
CTRANBUF STRG 698 
CTID STRGI (12),2C'TC','TD','TE','TF','TG','TH',		C 
		'TI','TJ','TK','TL','TM','TN' 
* 
 EJECT
CB4 BLK 
* 
* 
* 
* 
* 
CMAXTASK BIN		NO OF TASKS 
CTASKNR BIN		NO. OF 0PEN TASKS
CRECLGD BIN W'128'
CRECNR	BIN		PHYSICAL RECORD NR. 
CCONBUF9 STRG 398X'FF'
CRECBCD	BCD	6D	LOGICAL RECORD NR. 
CEDATNR	BCD	4	DATASET NR. 
SOPINP STRG 4 
ASVOL STRG 6
ASFNAME STRG 8
CKMDNAM STRG 6'OD-KOM'
CVERSNR BCD 10D'01014610' VERSION NUMBER
CBLANKS STRG X'2020'
CPCKBUF	STRG	128	PACKBUFFER 
*          TEXT FOR BKO 
*          ONLY RELEVANT IF EITHER
*          CBKOFLG=F (CHECK BKO) OR 
*          CKTFLAG=F (NOT SALDO IN KT.) 
CTTXT07 STRG 13'00008		C
		99     0' 
CREGTAB BCDI (25,2),'01','-01',		C
		'02','-01',		C
		'03','-01',		C
		'04','-01',		C
		'05','-01',		C
		'06','-01',		C
		'07','-01',		C
		'08','-01',		C
		'09','-01',		C
		'10','-01',		C
		'12','-01',		C
		'40','-01',		C
		'41','-01',		C
		'42','-01',		C
		'45','-01',		C
		'46','-01',		C
		'47','-01',		C
		'48','-01',		C
		'49','-01',		C
		'50','-01',		C
		'51','-01',		C
		'52','-01',		C
		'53','-01',		C
		'54','-01',		C
		'-01','-01' 
* 
 EJECT
* 
CB6 BLK 
* 
CCYPFLG BOOL FALSE CYSET OCCUPIED ? 
* 
* 
* 
* 
CCYSIZE BIN '30' MAX SIZE OF CYCLE PAGE 
CKTLAST BIN '0' LAST RECORD USED, KTPLAN
CMAXREC BIN W'1400' GIVES WARNING OF FULL REGSET
CGLRECNR BIN '0' LAST RECNR, GL REGSET
CKTINDX BCDI (7),14D KNT.PLAN MASTER INDEX
CCYBUF STRG 128 CYSET BUFFER
CKTBUF STRG 128 KTPLAN BUFFER 
CKTTOP BCD 4D'5' FIRST LINE KORT (DEFAULT)
ON	STRGI	(12)2C'KA','KB','KC','KD','KE','KF','KG',		C 
		'KH','KI','KJ','KK','KL'
 EJECT
* 
TB1	BLK 
* 
* 
* 
* 
TTCY1FLG	BOOL	FALSE	IN CYCLE? 
TTCY2FLG	BOOL	FALSE	IN STABEL?
TTLSTFLG BOOL FALSE 
TTPSEFLG BOOL FALSE PAUSE STATE 
TTSUMFLG BOOL FALSE SUM ON SCREEN ? 
TTTSTFLG BOOL FALSE FIRST ENTRY IN CYKLE ?
TTINVFLG BOOL FALSE INDICATE MODPOST
TTJTEND BOOL FALSE END OF JOURNAL 
TTEORFLG	BOOL	FALSE	*-- END OF RECORD 
TTSUPFLG	BOOL	FALSE	SUPPLEMENT POST 
TTSMALL	BOOL	FALSE	*-- SMALL GIRO KVIT? 
TTR11FLG	BOOL	FALSE	T: KASSE CLOSE
TREMFLG BOOL FALSE T= REMOTE TERMINAL 
TTKORTFL BOOL FALSE T: IN KONTOKORT MODE
TTASKAT BOOL FALSE T=BKO 51 
* 
* 
TTDKDEX BIN 
TTSTYRDX	BIN	'1'	HBOG/DEBP/REM
TTTROLD	BIN		NO OF OLD TRANS
TTASKNR BIN 
TTDKBCD	BCD	2	D/K VALUE 
TTARKSAV BCD 12 SAVED ARK KT NR 
TTCYKTOT BCD 14 SAVED CYKLE TOTAL 
TTCYKPOS BCD 4 SAVED CYKLE LINE NR
TTLINNR BCD 4 LINE NR ON VOUCHER
TTCNTNR BCD 4 COUNTER TAELLER NR
TTEJEDB BCD 14 TOTAL OF EJ EDB
GTMSK	BCD	6D'999' 
GTDATO	BCD	8X'FFFFFFFF' 
TSWBCD2	BCD	2	*-- 
TTCYM STRG 1 CYKLE MARK ON JOURNAL
GTREGF	BCDI	(26),16X'F'	TRANSACTION FIELDS
* 
	EJECT
* 
GB1 BLK 
* 
* 
* 
* 
* 
GTEXFLAG BOOL FALSE 
GTADUPFL BOOL FALSE 
GTAUTODP BOOL FALSE 
GTREGFLG BOOL FALSE 
GTCYFLG BOOL FALSE
GTTFLG BOOL FALSE CLOSE ? 
GTCLRN	BOOL	FALSE	*-- SPCLRN OR SPCLRA
GTTYPE2	BOOL	FALSE	*--
GTTYPE3	BOOL	FALSE	*--
GTKASSE	BOOL	FALSE	*-- TRUE- IN KASSE FUNCTIONS 
GTSLUTFL	BOOL	TRUE	FALSE: SLUT KEY IS SIMULATED 
GTDIVTR	BOOL	FALSE	T: DIVERSE TRANS 
GTTRSEL	BOOL	FALSE	T: TRANSACTION SELECTED
GTMASTFL BOOL FALSE T=MASTER TERMINAL 
GTASUMFL BOOL FALSE T=AUTO SUM
GTSUBFLG BOOL FALSE T=SUBTOTAL
* 
GSWBIN1 BIN 
GSWBIN2 BIN 
GSWBIN3 BIN 
GSWBIN4 BIN 
GSWBIN5 BIN 
GSWBIN6 BIN 
GSWBCD1 BCD 14
GSWBCD2 BCD 14
GSWBCD3 BCD 6 
GSWBCD4 BCD 6D
GSWBCD5 BCD 6 
GSWBCD6 BCD 14
GSWBCD7 BCD 14
GTWBCD1 BCD 14
GTWBCD2 BCD 14
GTSTRFMT STRG 7 STRING FOR FORMATS
 EJECT
GB2 BLK 
* 
SPPROMPT BOOL FALSE 
SPCHANGE BOOL FALSE 
SPDUPL	BOOL	FALSE	TRUE: FIELD HAS BEEN DUPPED 
SPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS 
SPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR
SPWARNFL BOOL FALSE T: WARNING
TTKEY1 BOOL FALSE T=KEY 1 ON
TTKEY2 BOOL FALSE T=KEY 2 ON
TTKEY3 BOOL FALSE T=KEY 3 ON
TTKEY4 BOOL FALSE T=KEY 4 ON
* 
* 
* 
SPBINW1 BIN 
SPBINW2 BIN 
SPBINW3 BIN 
SPBINW4 BIN 
SPBINW5 BIN 
SPKEY	BIN	'1' 
SPERASE	BIN	'0'	0:ERASE; 4:NO ERASE 
SPLINTOP	BIN
SPLINLOW	BIN
GTCLASS BIN '1' TERMINAL CLASS
GTREGDEX BIN '0' TRANSTYPE INDEX
GTDFLIN	BIN	'27'	DEFAULT LINE NUMBER
GSSWITCH	BINI	(26)
GTUSED	BINI	(26)
* 
 EJECT
GB3 BLK 
* 
PSIGNFLG BOOL FALSE 
BCPR BOOL FALSE T=CPR  F=CIR
BLEV BOOL FALSE T=LEV., F=CPR 
GTDYFLG BOOL FALSE T=DISPLAY
GTSPGFLG BOOL FALSE 
GTKORTFL BOOL FALSE	T=KONTO FOUND IN KONTOPLAN
GTTESTFL BOOL FALSE T=IN TEST MODE
GTSWFLAG BOOL FALSE SCRATCH FLAG
GTSUMKEY	BOOL	FALSE	SUM INDIKATOR 
GTNWFLG BOOL FALSE T= USE .NW 
GTADMFLG BOOL FALSE T= IN ADM FUNCTIONS 
GTLOKSPG BOOL FALSE T=LOKAL INQUIRIES 
GTSLDFLG BOOL FALSE T=SALDO PRESENT. F=NOT PRESENT
GTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET 
* 
* 
GTPPOIN BIN 
GTPAGE BIN
GTRETUR	BIN 
GTSUM BCD 14
GTANTAL BCD 4 
GTCYSUM BCD 14
GTREGNR BCD 3 TRANSTYPE 
GTDBKRS BCD 2 SIGN FOR AMOUNT 
GTSUMST	BCD	6	1. NUMBER FOR SUM FUNCTION
GTSUMCNT	BCD	14	COUNTER FOR SUMFUNCTION 
GTL8TXT	STRG	8	TEXT FOR LINE 8
SPINPUT STRG 20 
GSWSTR1	STRG 1
GSWSTR2 STRG 2
GSWSTR9 STRG 9
GSWSTR20	STRG	20
* 
 EJECT
* 
GB4 BLK 
GTCYWRTF BOOL FALSE T=NO WRITE ON CYSET 
GTCYTRPF BOOL FALSE T=TRANSPORT IN CYCLE
* 
* 
* 
* 
GTPSELIN BIN '0' LINE NO. WHEN PAUSE
GTCYIN BIN		NEXT USED, CYCSET 
GTCYOUT BIN		NEXT FREE, CYCSET
GTRECNR BIN		SPG. RECORD NO.
GTLBNR BCD 6D SPG. EKSP.LB.NO.
GTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR
GTKTTYP BCD 4D KTPLAN TYPE
* 
* 
* 
* 
* 
 EJECT
TB2 BLK 
* 
* 
* 
* 
GTDBKRC	STRG	4	DEB/KRE TEXT 
GTTESTMK	STRG	1 
TTSUPMRK	STRG	1	SUPPLEMENT MARK 
TTSUMMRK	STRG	1	SUM MARK
GTTEXT	STRG	6 
TTSPARE3	STRG	1C'.' 
TCONBUF STRG 398X'FF' 
TTCYKST BCD 4 1. LINE CYCLE/STABEL
TTKTSLD	BCD 14	KONTOKORT, SALDO 
TTKTLIN	BCD	4	KONTOKORT, LINIE NR 
TTKTCHK	BCD	2	KONTOKORT, CHECKCIFFER
TTDBKRM STRG 1C'K' DEB/KRE MARK ON JOURNAL
TT16TXT	STRG	3	RENTE/GEBYR/RATE 
TT07TXT	STRG	5	BKO TEXTS
GTDUPF	BCDI	(26),16X'F'	DUP FIELDS
* 
* 
 EJECT
CD3 DBLK
* 
* 
* 
* 
* 
DUMCD3 STRG 10
CMASK BCDI (12),4D
CBACC BCDI (60,3),14D BEHOLDNINGER
CTR12NR BCDI (60),12D EJ-EDB ACCOUNT NOS. 
CRELDAY BCD 4X'FFFF'
CCONFREC BCD 6
C12ACC BCDI (60,2),14D EJ-EDB COUNTERS
* 
* 
* 
 EJECT
CD4 DBLK
* 
* 
* 
* 
* 
DUMCD4 BINI (4) 
CBEH BINI (12,2) FIRST AND SIZE OF BEHLDN.
CTR12 BINI (12,2) FIRST AND SIZE OF TR 12 
CFNAME STRGI (8),8
CVOLNO BCD 6 VOLUME NUMBER
CKMDNR BCD 6D KOMMUNE NR
CMASKDAT BCD 8X'FFFFFFFF' 
CVOL STRGI (4),6
* 
 EJECT
TD2 DBLK
* 
* 
* 
* 
* 
TTINF1	STRG	14
TTRECOPN BCD 6 REC. NO. FOR OPEN OR CLOSE 
TTRECCHN BCD 6 REC. NO. FOR FD CHANGE 
TTSTLBNR	BCD	6D	FIRST EKSP. LBNR
TTSTCASH	BCD	14D	PRIMO CASH AMOUNT
TTCASHAC	BCD	12D	CASH ACC. NR 
TVERSUR BCD 12D VERSUR ACC NR 
TTCASH	BCD	14D	CURRENT CASH AMOUNT
TTLBNR BCD 6D CURRENT EKSP.LBNR 
TTACC BCDI (8,2),16D'0' EDB COUNTERS
TTGLREC BCD 6 SAVE RECORD NO, GL REGSET 
* 
* 
* 
* 
	PDIV 
 ENTRY REGGO
	ENTRY	KBVGO
 ENTRY GTPGO
	ENTRY	DC1GO
* 
 EXT T1GO 
 EXT DCTASK 
	EXT	VDUKB
	EXT	PRINT
	EXT	SWITCH 
	EXT	GETTID	GET TASK IDENTITY 
	ENTRY	OFFLNE	OFFLINE START ADDRESS 
 ENTRY ONLINE 
 EJECT
	DSC0	DSDC,2	DUMMY REFERENCE T:IO 
	EJECT
****************************************
* 
*     START OF REGISTRATION 
* 
****************************************

REGGO 
 B T1GO 


 EJECT
****************************************
* 
*   START ADDRESS FOR KEYBOARD TASK 
****************************************
KBVGO 
	ADD	NBRKBV,='1'
	CALL	GETTID,TCT01
	SUB	TCT01,=X'4B40' 
*	PERF CONF READ & CONVERT CONFIG DATA
	MOVE	COPNO,CNFHC(TCT01)
	CBL	COPNO,='1',KB050 
	ADD	COPNO,=X'4740' 
 MOVE STRG2,OFF(TCT01) GET OFFLINE TASK ID
 CBE STRG2,=C'  ',KB050 ANY ? 
 PAUSE		YES, WAIT FOR RESTART 
KB050 
	CALL	VDUKB,TCT01 
	PERF	OFFLNE	BRANCH TO CREDIT CODE
	B	KB050	RETURN TO IBM-3270 EMULATION 
	EJECT


********************************************* 
* 
*   START ADDRESS FOR GENERAL PRINTER TASK
* 
********************************************* 

GTPGO 
	ADD	NBRGTP,='1'
	CALL	GETTID,TCT01
	SUB	TCT01,=X'4740' 
	MOVE	PRINTER,=X'0001'
*	PERF	CONF 
	CALL	PRINT,TCT01 

	EJECT


*********************************************** 
* 
*   START ADDRESS FOR DC-TASK 
* 
********************************* 

DC1GO 
	CALL	DCTASK,MF1CU
* 

 EJECT


***************************** 
* 
*     RESTART OFF LINE TASK 
* 
****************************

OFFLNE PROC 
 MOVE STRG2,OFF(TCT01)	GET OFF LINE TASK NAME 
 CBE STRG2,=C'  ',RETOFF	ANY OFFLINE ?
 RSTRT STRG2	YES
 PAUSE
RETOFF
 RET
 PEND 
* 
 EJECT


**************************
* 
*     RESTART ON LINE TASK
* 
******************************

ONLINE PROC 
 MOVE GSWSTR2,ON(TTASKNR)	GET ONLINE TASK NAME
 CBE GSWSTR2,CBLANKS,RETON	ANY ON LINE ?
 RSTRT GSWSTR2	YES
 PAUSE
RETON 
 RET
 PEND 
* 

	END

HexDump

0x0000…0022 (0, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» IDENT KMD08  02.01.XXX.1 «, t00=0x0000, t01=0x0004}
0x0022…002c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0026}
0x002c…0036              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0030}
0x0036…0076              Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0000, t01=0x003a}
0x0076…0080              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007a}
0x0080…00b8              Head {h00=0x0034, h01=0x0050, text=»*     THIS IS THE MAIN MODULE FOR KMDAPLICATION «, t00=0x0000, t01=0x0084}
0x00b8…00ee              Head {h00=0x0032, h01=0x0050, text=»*     CONTAINING THE CWB'S, TWB'S AND INITIAL «, t00=0x0000, t01=0x00bc}
0x00ee…010c              Head {h00=0x001a, h01=0x0050, text=»*        START POINTS «, t00=0x0000, t01=0x00f2}
0x010c…0116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0164              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x012e}
0x0164…0172              Head {h00=0x000a, h01=0x0050, text=» DDIV «, t00=0x0000, t01=0x0168}
0x0172…018a              Head {h00=0x0014, h01=0x0050, text=» OPTNS LINES=45 «, t00=0x0000, t01=0x0176}
0x018a…01c6              Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x018e}
0x01c6…01d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003a}
0x01d0…01f8              Head {h00=0x0024, h01=0x0050, text=»*           TRANSACTION TASK  TC«, t00=0x0001, t01=0x0044}
0x01f8…0202              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006c}
0x0202…023e              Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x0076}
0x023e…024e              Head {h00=0x000c, h01=0x0050, text=» TERM TC«, t00=0x0001, t01=0x00b2}
0x024e…0258              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x0258…0268              Head {h00=0x000c, h01=0x0050, text=» CWB CB1«, t00=0x0001, t01=0x00cc}
0x0268…0278              Head {h00=0x000c, h01=0x0050, text=» CWB CB2«, t00=0x0001, t01=0x00dc}
0x0278…0288              Head {h00=0x000c, h01=0x0050, text=» CWB CB3«, t00=0x0001, t01=0x00ec}
0x0288…0298              Head {h00=0x000c, h01=0x0050, text=» CWB CB4«, t00=0x0001, t01=0x00fc}
0x0298…02a8              Head {h00=0x000c, h01=0x0050, text=» CWB CB6«, t00=0x0001, t01=0x010c}
0x02a8…02be              Head {h00=0x0012, h01=0x0050, text=» DWB CD3(CB3) «, t00=0x0001, t01=0x011c}
0x02be…02d4              Head {h00=0x0012, h01=0x0050, text=» DWB CD4(CB4) «, t00=0x0001, t01=0x0132}
0x02d4…02e4              Head {h00=0x000c, h01=0x0050, text=» TWB GB1«, t00=0x0001, t01=0x0148}
0x02e4…02f4              Head {h00=0x000c, h01=0x0050, text=» TWB GB2«, t00=0x0001, t01=0x0158}
0x02f4…0304              Head {h00=0x000c, h01=0x0050, text=» TWB GB3«, t00=0x0001, t01=0x0168}
0x0304…0314              Head {h00=0x000c, h01=0x0050, text=» TWB GB4«, t00=0x0001, t01=0x0178}
0x0314…0324              Head {h00=0x000c, h01=0x0050, text=» TWB TB1«, t00=0x0001, t01=0x0188}
0x0324…0334              Head {h00=0x000c, h01=0x0050, text=» UWB TB2«, t00=0x0002, t01=0x0008}
0x0334…034a              Head {h00=0x0012, h01=0x0050, text=» DWB TD2(TB2) «, t00=0x0002, t01=0x0018}
0x034a…0354              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002e}
0x0354…0376              Head {h00=0x001e, h01=0x0050, text=»FD01 DSET FC=F8 VOL 999001«, t00=0x0002, t01=0x0038}
0x0376…0398              Head {h00=0x001e, h01=0x0050, text=»FD02 DSET FC=F9 VOL 999002«, t00=0x0002, t01=0x005a}
0x0398…03c2              Head {h00=0x0026, h01=0x0050, text=»KVOUCH DSET FC=31,DEV=TV,BUFL=100 «, t00=0x0002, t01=0x007c}
0x03c2…03f8              Head {h00=0x0032, h01=0x0050, text=»KJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH «, t00=0x0002, t01=0x00a6}
0x03f8…042e              Head {h00=0x0032, h01=0x0050, text=»KTALLY DSET FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH «, t00=0x0002, t01=0x00dc}
0x042e…0450              Head {h00=0x001e, h01=0x0050, text=»SCREEN DSET FC=50,BUFL=56 «, t00=0x0002, t01=0x0112}
0x0450…0468              Head {h00=0x0014, h01=0x0050, text=»KEYB DSET FC=20 «, t00=0x0002, t01=0x0134}
0x0468…0492              Head {h00=0x0026, h01=0x0050, text=»DK01 DSET FC=C1 FD999001 CONFDATA «, t00=0x0002, t01=0x014c}
0x0492…04ba              Head {h00=0x0024, h01=0x0050, text=»DK02 DSET FC=C2 FD999002 REGSET «, t00=0x0002, t01=0x0176}
0x04ba…04e4              Head {h00=0x0026, h01=0x0050, text=»DK03 DSET FC=C3 FD999003 CYCLE SET«, t00=0x0003, t01=0x000e}
0x04e4…050c              Head {h00=0x0024, h01=0x0050, text=»DK04 DSET FC=C4 FD999004 KT PLAN«, t00=0x0003, t01=0x0038}
0x050c…0526              Head {h00=0x0016, h01=0x0050, text=»DSSOPI DSET FC=10 «, t00=0x0003, t01=0x0060}
0x0526…0540              Head {h00=0x0016, h01=0x0050, text=»DSSOPO DSET FC=11 «, t00=0x0003, t01=0x007a}
0x0540…0558              Head {h00=0x0014, h01=0x0050, text=»DCOMM DSET FC=61«, t00=0x0003, t01=0x0094}
0x0558…0570              Head {h00=0x0014, h01=0x0050, text=»KCASS DSET FC=12«, t00=0x0003, t01=0x00ac}
0x0570…0588              Head {h00=0x0014, h01=0x0050, text=»DK05 DSET FC=C5 «, t00=0x0003, t01=0x00c4}
0x0588…05a0              Head {h00=0x0014, h01=0x0050, text=»DK06 DSET FC=C6 «, t00=0x0003, t01=0x00dc}
0x05a0…05b8              Head {h00=0x0014, h01=0x0050, text=»DK07 DSET FC=C7 «, t00=0x0003, t01=0x00f4}
0x05b8…05d0              Head {h00=0x0014, h01=0x0050, text=»DK08 DSET FC=C8 «, t00=0x0003, t01=0x010c}
0x05d0…05f2              Head {h00=0x001e, h01=0x0050, text=»FD03 DSET FC=FA VOL 999003«, t00=0x0003, t01=0x0124}
0x05f2…0614              Head {h00=0x001e, h01=0x0050, text=»FD04 DSET FC=FB VOL 999004«, t00=0x0003, t01=0x0146}
0x0614…063a              Head {h00=0x0022, h01=0x0050, text=» FMTCTL INDS=KEYB,OUTDS=SCREEN«, t00=0x0003, t01=0x0168}
0x063a…0644              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x018e}
0x0644…064e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0008}
0x064e…0658              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0012}
0x0658…0662              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x001c}
0x0662…066c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0026}
0x066c…0680              Head {h00=0x0010, h01=0x0050, text=» START REGGO«, t00=0x0004, t01=0x0030}
0x0680…0692              Head {h00=0x000e, h01=0x0050, text=» STACK 160«, t00=0x0004, t01=0x0044}
0x0692…06a0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0056}
0x06a0…06f0              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0004, t01=0x0064}
0x06f0…06fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b4}
0x06fa…0744              Head {h00=0x0046, h01=0x0050, text=»*   D A T D I V  :  DATA DIVISION FOR IBM-3270 EMULATION PACKAGE. «, t00=0x0004, t01=0x00be}
0x0744…078a              Head {h00=0x0042, h01=0x0050, text=»*                   THIS MODULE ALSO CONTAINS THE CREDIT CODED«, t00=0x0004, t01=0x0108}
0x078a…07b8              Head {h00=0x002a, h01=0x0050, text=»*                   START-UP ROUTINES.«, t00=0x0004, t01=0x014e}
0x07b8…07c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x017c}
0x07c2…080e              Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0004, t01=0x0186}
0x080e…0816              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x0042}
0x0816…0824              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x004a}
0x0824…082e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0058}
0x082e…0838              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0062}
0x0838…0842              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x006c}
0x0842…085a              Head {h00=0x0014, h01=0x0050, text=»* DATA DIVISION «, t00=0x0005, t01=0x0076}
0x085a…0864              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008e}
0x0864…086e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0098}
0x086e…0878              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a2}
0x0878…0898              Head {h00=0x001c, h01=0x0050, text=»*       KB/VDU TERMINAL «, t00=0x0005, t01=0x00ac}
0x0898…08a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00cc}
0x08a2…08b2              Head {h00=0x000c, h01=0x0050, text=» TERM KA«, t00=0x0005, t01=0x00d6}
0x08b2…08bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e6}
0x08bc…08cc              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x0005, t01=0x00f0}
0x08cc…08dc              Head {h00=0x000c, h01=0x0050, text=» TWB TB9«, t00=0x0005, t01=0x0100}
0x08dc…08e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0110}
0x08e6…08fa              Head {h00=0x0010, h01=0x0050, text=» START KBVGO«, t00=0x0005, t01=0x011a}
0x08fa…0904              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012e}
0x0904…091c              Head {h00=0x0014, h01=0x0050, text=»DSDC DSET FC=61 «, t00=0x0005, t01=0x0138}
0x091c…0944              Head {h00=0x0024, h01=0x0050, text=»DSICR DSET FC=E0,DEV=II COPCMD=1«, t00=0x0005, t01=0x0150}
0x0944…0964              Head {h00=0x001c, h01=0x0050, text=»DSICW DSET FC=E1,DEV=IO «, t00=0x0005, t01=0x0178}
0x0964…098c              Head {h00=0x0024, h01=0x0050, text=»DSVDU DSET FC=50,DEV=DY,BUFL=162«, t00=0x0006, t01=0x0008}
0x098c…09b4              Head {h00=0x0024, h01=0x0050, text=»DSKBAN DSET FC=20,DEV=KA,BUFL=2 «, t00=0x0006, t01=0x0030}
0x09b4…09dc              Head {h00=0x0024, h01=0x0050, text=»DSKBSD DSET FC=40,DEV=KI,BUFL=2 «, t00=0x0006, t01=0x0058}
0x09dc…09ea              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0080}
0x09ea…09f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008e}
0x09f4…09fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0098}
0x09fe…0a14              Head {h00=0x0012, h01=0x0050, text=»* GTP TERMINAL«, t00=0x0006, t01=0x00a2}
0x0a14…0a1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b8}
0x0a1e…0a28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c2}
0x0a28…0a38              Head {h00=0x000c, h01=0x0050, text=» TERM GA«, t00=0x0006, t01=0x00cc}
0x0a38…0a42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00dc}
0x0a42…0a52              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x0006, t01=0x00e6}
0x0a52…0a62              Head {h00=0x000c, h01=0x0050, text=» TWB TB9«, t00=0x0006, t01=0x00f6}
0x0a62…0a6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x0a6c…0a80              Head {h00=0x0010, h01=0x0050, text=» START GTPGO«, t00=0x0006, t01=0x0110}
0x0a80…0a8a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0124}
0x0a8a…0aa2              Head {h00=0x0014, h01=0x0050, text=»DSDC DSET FC=61 «, t00=0x0006, t01=0x012e}
0x0aa2…0ac2              Head {h00=0x001c, h01=0x0050, text=»DSICR DSET FC=E0,DEV=II «, t00=0x0006, t01=0x0146}
0x0ac2…0aea              Head {h00=0x0024, h01=0x0050, text=»DSICW DSET FC=E1,DEV=IO COPCMD=1«, t00=0x0006, t01=0x0166}
0x0aea…0b12              Head {h00=0x0024, h01=0x0050, text=»DSGTP DSET FC=30,DEV=GP,BUFL=162«, t00=0x0006, t01=0x018e}
0x0b12…0b20              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0026}
0x0b20…0b2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0034}
0x0b2a…0b34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003e}
0x0b34…0b44              Head {h00=0x000c, h01=0x0050, text=»* DCTASK«, t00=0x0007, t01=0x0048}
0x0b44…0b4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0058}
0x0b4e…0b58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0062}
0x0b58…0b68              Head {h00=0x000c, h01=0x0050, text=» TERM D0«, t00=0x0007, t01=0x006c}
0x0b68…0b72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007c}
0x0b72…0b82              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x0007, t01=0x0086}
0x0b82…0b96              Head {h00=0x0010, h01=0x0050, text=» START DC1GO«, t00=0x0007, t01=0x0096}
0x0b96…0bae              Head {h00=0x0014, h01=0x0050, text=»DSDC DSET FC=60 «, t00=0x0007, t01=0x00aa}
0x0bae…0bb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x0bb8…0bc6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00cc}
0x0bc6…0bd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00da}
0x0bd0…0bda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e4}
0x0bda…0c12              Head {h00=0x0034, h01=0x0050, text=»*      WORK AREA FOR KEYBOARD AND DISPLAY TASKS «, t00=0x0007, t01=0x00ee}
0x0c12…0c1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0126}
0x0c1c…0c26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0130}
0x0c26…0c36              Head {h00=0x000c, h01=0x0050, text=»TB9 BLK «, t00=0x0007, t01=0x013a}
0x0c36…0c40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x014a}
0x0c40…0c6a              Head {h00=0x0026, h01=0x0050, text=»TCT01 BIN 4X'0' TID AND STACKBASE «, t00=0x0007, t01=0x0154}
0x0c6a…0c98              Head {h00=0x002a, h01=0x0050, text=»PRINTER STRG 4X'0' KEYBARD/VDU/PRINTER«, t00=0x0007, t01=0x017e}
0x0c98…0cc2              Head {h00=0x0026, h01=0x0050, text=»BVDU STRG 3840X'0' VDU SCREEN BUFF«, t00=0x0008, t01=0x001c}
0x0cc2…0cee              Head {h00=0x0028, h01=0x0050, text=»PCURS STRG 4X'0' CURSOR ADDR. BINARY«, t00=0x0008, t01=0x0046}
0x0cee…0d20              Head {h00=0x002e, h01=0x0050, text=»ATTRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER«, t00=0x0008, t01=0x0072}
0x0d20…0d4a              Head {h00=0x0026, h01=0x0050, text=»CURATT STRG 4X'0' CURSOR ATTRIBUTE«, t00=0x0008, t01=0x00a4}
0x0d4a…0d72              Head {h00=0x0024, h01=0x0050, text=»WCC STRG 4X'0' WCC/CCC CHARACTER«, t00=0x0008, t01=0x00ce}
0x0d72…0da2              Head {h00=0x002c, h01=0x0050, text=»KBINH STRG 4X'0' KEYBOARD INHIBIT INDIC.«, t00=0x0008, t01=0x00f6}
0x0da2…0dbc              Head {h00=0x0016, h01=0x0050, text=»LINCNT STRG 4X'0' «, t00=0x0008, t01=0x0126}
0x0dbc…0dee              Head {h00=0x002e, h01=0x0050, text=»DCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH«, t00=0x0008, t01=0x0140}
0x0dee…0e08              Head {h00=0x0016, h01=0x0050, text=»ICWORK STRG 4X'0' «, t00=0x0008, t01=0x0172}
0x0e08…0e36              Head {h00=0x002a, h01=0x0050, text=»INTATT STRG 4X'0' INTENSITY ATTRIBUTE «, t00=0x0008, t01=0x018c}
0x0e36…0e5c              Head {h00=0x0022, h01=0x0050, text=»OFFFLG STRG 4X'0' OFFLINE FLAG«, t00=0x0009, t01=0x002a}
0x0e5c…0e80              Head {h00=0x0020, h01=0x0050, text=»COPNO BIN  TID FOR HARDCOPY «, t00=0x0009, t01=0x0050}
0x0e80…0ea4              Head {h00=0x0020, h01=0x0050, text=»MISCAR STRG 44X'0' CCC,MAIN,«, t00=0x0009, t01=0x0074}
0x0ea4…0ec8              Head {h00=0x0020, h01=0x0050, text=»   MODE,KEYS,ECBDCC,ECBBLK, «, t00=0x0009, t01=0x0098}
0x0ec8…0ee4              Head {h00=0x0018, h01=0x0050, text=»STRG2 STRG 4X'0' DK «, t00=0x0009, t01=0x00bc}
0x0ee4…0ef2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00d8}
0x0ef2…0efa              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x00e6}
0x0efa…0f10              Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0009, t01=0x00ee}
0x0f10…0f1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0104}
0x0f1a…0f46              Head {h00=0x0028, h01=0x0050, text=»*   COMMON WORK BLOCK FOR ALL TASKS «, t00=0x0009, t01=0x010e}
0x0f46…0f50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x013a}
0x0f50…0f82              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0009, t01=0x0144}
0x0f82…0f8a              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0176}
0x0f8a…0f9a              Head {h00=0x000c, h01=0x0050, text=»CB9 BLK «, t00=0x0009, t01=0x017e}
0x0f9a…0fa4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018e}
0x0fa4…0fb8              Head {h00=0x0010, h01=0x0050, text=»CNFIGD BOOL «, t00=0x000a, t01=0x0008}
0x0fb8…0fcc              Head {h00=0x0010, h01=0x0050, text=»CNFBSY BOOL «, t00=0x000a, t01=0x001c}
0x0fcc…0fd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0030}
0x0fd6…0ff4              Head {h00=0x001a, h01=0x0050, text=»*  CONFIGURATION DATA «, t00=0x000a, t01=0x003a}
0x0ff4…0ffe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0058}
0x0ffe…1024              Head {h00=0x0022, h01=0x0050, text=»NBRKBV BIN  NUMBER OF KB/VDUS «, t00=0x000a, t01=0x0062}
0x1024…1046              Head {h00=0x001e, h01=0x0050, text=»NBRGTP BIN  NUMBER OF GTPS«, t00=0x000a, t01=0x0088}
0x1046…1050              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00aa}
0x1050…108e              Head {h00=0x003a, h01=0x0050, text=»MF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV ADDRESSES KB/VDU «, t00=0x000a, t01=0x00b4}
0x108e…10c8              Head {h00=0x0036, h01=0x0050, text=»MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADDRESSES GTP«, t00=0x000a, t01=0x00f2}
0x10c8…1114              Head {h00=0x0048, h01=0x0050, text=»* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED«, t00=0x000a, t01=0x012c}
0x1114…111e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0178}
0x111e…114a              Head {h00=0x0028, h01=0x0050, text=»MF1CU STRG X'6040' CU-ADDRESS MF # 1«, t00=0x000a, t01=0x0182}
0x114a…1154              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001e}
0x1154…119c              Head {h00=0x0044, h01=0x0050, text=»CNFHC BINI (16),'1','2','3','4','5','6','7','8' HARDCOPY PRINTER«, t00=0x000b, t01=0x0028}
0x119c…11b6              Head {h00=0x0016, h01=0x0050, text=»   FOR KB-VDU 1-16«, t00=0x000b, t01=0x0070}
0x11b6…11c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008a}
0x11c0…11d2              Head {h00=0x000e, h01=0x0050, text=»BINWK1 BIN«, t00=0x000b, t01=0x0094}
0x11d2…11dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a6}
0x11dc…1216              Head {h00=0x0036, h01=0x0050, text=»OFF STRGI (12)2C'TC','TD','TE','TF','TG','TH',  C «, t00=0x000b, t01=0x00b0}
0x1216…123e              Head {h00=0x0024, h01=0x0050, text=»  'TI','TJ','TK','TL','TM','TN' «, t00=0x000b, t01=0x00ea}
0x123e…124c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0112}
0x124c…1262              Head {h00=0x0012, h01=0x0050, text=»* CWB 1 COMMON«, t00=0x000b, t01=0x0120}
0x1262…126c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0136}
0x126c…1276              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0140}
0x1276…1286              Head {h00=0x000c, h01=0x0050, text=»CB1 BLK «, t00=0x000b, t01=0x014a}
0x1286…12b8              Head {h00=0x002e, h01=0x0050, text=»CBKOFLG BOOL FALSE T=ALL BKO-CODES ALLOWED«, t00=0x000b, t01=0x015a}
0x12b8…12ec              Head {h00=0x0030, h01=0x0050, text=»CKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT«, t00=0x000b, t01=0x018c}
0x12ec…131e              Head {h00=0x002e, h01=0x0050, text=»CCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK«, t00=0x000c, t01=0x0030}
0x131e…1352              Head {h00=0x0030, h01=0x0050, text=»CTESTFLG BOOL FALSE T=CONVERSION, TEST MODE «, t00=0x000c, t01=0x0062}
0x1352…1382              Head {h00=0x002c, h01=0x0050, text=»CTRVALG BOOL FALSE T: SKOVBO. F: VIBORG «, t00=0x000c, t01=0x0096}
0x1382…13b4              Head {h00=0x002e, h01=0x0050, text=»CFLT46 BOOL FALSE T=SPECIAL FIELD 46,TR=8 «, t00=0x000c, t01=0x00c6}
0x13b4…13e6              Head {h00=0x002e, h01=0x0050, text=»CFLT48 BOOL FALSE T=SPECIAL FIELD 48,TR=3 «, t00=0x000c, t01=0x00f8}
0x13e6…1416              Head {h00=0x002c, h01=0x0050, text=»CKTAUTO BOOL TRUE T=ASK KORT AFTER TR 4 «, t00=0x000c, t01=0x012a}
0x1416…144c              Head {h00=0x0032, h01=0x0050, text=»CDCFLAG BOOL FALSE T=INCLUDES DATATRANSMISSION«, t00=0x000c, t01=0x015a}
0x144c…147e              Head {h00=0x002e, h01=0x0050, text=»CCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET «, t00=0x000c, t01=0x0190}
0x147e…14b4              Head {h00=0x0032, h01=0x0050, text=»CADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22)«, t00=0x000d, t01=0x0032}
0x14b4…14d8              Head {h00=0x0020, h01=0x0050, text=»C5MDISK BOOL FALSE T=5M DISK«, t00=0x000d, t01=0x0068}
0x14d8…1506              Head {h00=0x002a, h01=0x0050, text=»CKASFLG BOOL TRUE T=BACKUP ON CASSETTE«, t00=0x000d, t01=0x008c}
0x1506…153e              Head {h00=0x0034, h01=0x0050, text=»CSLDFLG BOOL TRUE T=GL.SALDO PRESENT(CKTFLAG=T) «, t00=0x000d, t01=0x00ba}
0x153e…156e              Head {h00=0x002c, h01=0x0050, text=»CGLREGFL BOOL FALSE T=GL REGSET PRESENT «, t00=0x000d, t01=0x00f2}
0x156e…159c              Head {h00=0x002a, h01=0x0050, text=»CCONVERT BOOL FALSE T=CONVERSION MODE «, t00=0x000d, t01=0x0122}
0x159c…15b2              Head {h00=0x0012, h01=0x0050, text=»CBIN0 BIN '0' «, t00=0x000d, t01=0x0150}
0x15b2…15c8              Head {h00=0x0012, h01=0x0050, text=»CBIN1 BIN '1' «, t00=0x000d, t01=0x0166}
0x15c8…15de              Head {h00=0x0012, h01=0x0050, text=»CBIN2 BIN '2' «, t00=0x000d, t01=0x017c}
0x15de…15f4 (14, 0, 400) Head {h00=0x0012, h01=0x0050, text=»CBIN3 BIN '3' «, t00=0x000e, t01=0x0004}
0x15f4…160a              Head {h00=0x0012, h01=0x0050, text=»CBIN4 BIN '4' «, t00=0x000e, t01=0x001a}
0x160a…1620              Head {h00=0x0012, h01=0x0050, text=»CBIN5 BIN '5' «, t00=0x000e, t01=0x0030}
0x1620…1636              Head {h00=0x0012, h01=0x0050, text=»CBIN6 BIN '6' «, t00=0x000e, t01=0x0046}
0x1636…164c              Head {h00=0x0012, h01=0x0050, text=»CBIN7 BIN '7' «, t00=0x000e, t01=0x005c}
0x164c…1662              Head {h00=0x0012, h01=0x0050, text=»CBIN8 BIN '8' «, t00=0x000e, t01=0x0072}
0x1662…1678              Head {h00=0x0012, h01=0x0050, text=»CBIN9 BIN '9' «, t00=0x000e, t01=0x0088}
0x1678…1690              Head {h00=0x0014, h01=0x0050, text=»CBIN10 BIN '10' «, t00=0x000e, t01=0x009e}
0x1690…16a8              Head {h00=0x0014, h01=0x0050, text=»CBIN11 BIN '11' «, t00=0x000e, t01=0x00b6}
0x16a8…16f4              Head {h00=0x0048, h01=0x0050, text=»WEIGTH BCDI (13),'2','7','6','5','4','3','2','7','6','5','4','3','2'«, t00=0x000e, t01=0x00ce}
0x16f4…1742              Head {h00=0x004a, h01=0x0050, text=»WEIGTH1 BCDI (13),'7','6','5','4','3','2','7','6','5','4','3','2','1' «, t00=0x000e, t01=0x011a}
0x1742…174c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0168}
0x174c…175a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0172}
0x175a…176a              Head {h00=0x000c, h01=0x0050, text=»CB2 BLK «, t00=0x000e, t01=0x0180}
0x176a…1774              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0190}
0x1774…179e              Head {h00=0x0026, h01=0x0050, text=»CPFLG BOOL FALSE T: DISK OCCUPIED «, t00=0x000f, t01=0x000a}
0x179e…17ca              Head {h00=0x0028, h01=0x0050, text=»CSPLITFL BOOL FALSE T: SPLIT RECORD «, t00=0x000f, t01=0x0034}
0x17ca…17f0              Head {h00=0x0022, h01=0x0050, text=»CWFLAG BOOL FALSE F=COLD START«, t00=0x000f, t01=0x0060}
0x17f0…1816              Head {h00=0x0022, h01=0x0050, text=»CREMITFL BOOL FALSE F=NO REMIT«, t00=0x000f, t01=0x0086}
0x1816…1840              Head {h00=0x0026, h01=0x0050, text=»CSKIFTFL BOOL FALSE T=FD CHANGING «, t00=0x000f, t01=0x00ac}
0x1840…186c              Head {h00=0x0028, h01=0x0050, text=»CEORFLG BOOL FALSE T=END OF A RECORD«, t00=0x000f, t01=0x00d6}
0x186c…18a0              Head {h00=0x0030, h01=0x0050, text=»CCOLDFLG BOOL FALSE T=VERY FIRST COLD START «, t00=0x000f, t01=0x0102}
0x18a0…18d2              Head {h00=0x002e, h01=0x0050, text=»CERRORFL BOOL FALSE T=ERROR IN COLD START «, t00=0x000f, t01=0x0136}
0x18d2…1904              Head {h00=0x002e, h01=0x0050, text=»CCONVFLG BOOL FALSE T=CONVERSION GOING ON «, t00=0x000f, t01=0x0168}
0x1904…192c              Head {h00=0x0024, h01=0x0050, text=»CSWFLAG BOOL FALSE SCRATCH FLAG «, t00=0x0010, t01=0x000a}
0x192c…1962              Head {h00=0x0032, h01=0x0050, text=»CSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE «, t00=0x0010, t01=0x0032}
0x1962…1994              Head {h00=0x002e, h01=0x0050, text=»CKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN«, t00=0x0010, t01=0x0068}
0x1994…199e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x009a}
0x199e…19a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a4}
0x19a8…19b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ae}
0x19b2…19ca              Head {h00=0x0014, h01=0x0050, text=»CBIN12 BIN '12' «, t00=0x0010, t01=0x00b8}
0x19ca…19e2              Head {h00=0x0014, h01=0x0050, text=»CBIN13 BIN '13' «, t00=0x0010, t01=0x00d0}
0x19e2…19fa              Head {h00=0x0014, h01=0x0050, text=»CBIN14 BIN '14' «, t00=0x0010, t01=0x00e8}
0x19fa…1a12              Head {h00=0x0014, h01=0x0050, text=»CBIN15 BIN '15' «, t00=0x0010, t01=0x0100}
0x1a12…1a2a              Head {h00=0x0014, h01=0x0050, text=»CBIN16 BIN '16' «, t00=0x0010, t01=0x0118}
0x1a2a…1a42              Head {h00=0x0014, h01=0x0050, text=»CBIN17 BIN '17' «, t00=0x0010, t01=0x0130}
0x1a42…1a5a              Head {h00=0x0014, h01=0x0050, text=»CBIN18 BIN '18' «, t00=0x0010, t01=0x0148}
0x1a5a…1a72              Head {h00=0x0014, h01=0x0050, text=»CBIN19 BIN '19' «, t00=0x0010, t01=0x0160}
0x1a72…1a8a              Head {h00=0x0014, h01=0x0050, text=»CBIN20 BIN '20' «, t00=0x0010, t01=0x0178}
0x1a8a…1aa2              Head {h00=0x0014, h01=0x0050, text=»CBIN21 BIN '21' «, t00=0x0010, t01=0x0190}
0x1aa2…1aba              Head {h00=0x0014, h01=0x0050, text=»CBIN22 BIN '22' «, t00=0x0011, t01=0x0018}
0x1aba…1ad2              Head {h00=0x0014, h01=0x0050, text=»CBINMAX BIN '26'«, t00=0x0011, t01=0x0030}
0x1ad2…1ae0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0048}
0x1ae0…1b24              Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0011, t01=0x0056}
0x1b24…1b2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x009a}
0x1b2e…1b6c              Head {h00=0x003a, h01=0x0050, text=»*          TABLE GIVING INDEXES FOR TRANSACTIONFIELDS «, t00=0x0011, t01=0x00a4}
0x1b6c…1ba4              Head {h00=0x0034, h01=0x0050, text=»*           FIELD NR GIVES DISPLACEMENT IN TABLE«, t00=0x0011, t01=0x00e2}
0x1ba4…1bae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x011a}
0x1bae…1bf2              Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0011, t01=0x0124}
0x1bf2…1c10              Head {h00=0x001a, h01=0x0050, text=»CFLTDEX BINI (90),  C «, t00=0x0011, t01=0x0168}
0x1c10…1c4e              Head {h00=0x003a, h01=0x0050, text=»  '26','26','26','26','1','2','3','4','5','6', 1-10 C «, t00=0x0011, t01=0x0186}
0x1c4e…1c8e              Head {h00=0x003c, h01=0x0050, text=»  '7','8','9','4','11','12','10','11','12','13', 11-20 C«, t00=0x0012, t01=0x0034}
0x1c8e…1cd0              Head {h00=0x003e, h01=0x0050, text=»  '10','11','12','13','14','15','16','1','8','9', 21-30 C «, t00=0x0012, t01=0x0074}
0x1cd0…1d10              Head {h00=0x003c, h01=0x0050, text=»  '10','5','12','13','14','5','18','19','7','7', 31-40 C«, t00=0x0012, t01=0x00b6}
0x1d10…1d54              Head {h00=0x0040, h01=0x0050, text=»  '18','14','20','21','22','17','12','15','10','1', 41-50 C «, t00=0x0012, t01=0x00f6}
0x1d54…1d8e              Head {h00=0x0036, h01=0x0050, text=»  '2','3','4','2','3','4','5','6','7','8', 51-60 C«, t00=0x0012, t01=0x013a}
0x1d8e…1dd0              Head {h00=0x003e, h01=0x0050, text=»  '9','10','11','12','13','6','26','26','26','26', 61-70 C«, t00=0x0012, t01=0x0174}
0x1dd0…1e14              Head {h00=0x0040, h01=0x0050, text=»  '26','26','26','26','26','26','26','26','26','26', 71-80 C«, t00=0x0013, t01=0x0026}
0x1e14…1e56              Head {h00=0x003e, h01=0x0050, text=»  '19','26','26','26','26','26','26','26','26','26' 81-90 «, t00=0x0013, t01=0x006a}
0x1e56…1e74              Head {h00=0x001a, h01=0x0050, text=»CCNTDEX BINI (11),  C «, t00=0x0013, t01=0x00ac}
0x1e74…1eaa              Head {h00=0x0032, h01=0x0050, text=»  '1','2','3','4','5','1','5','6','6','5','0' «, t00=0x0013, t01=0x00ca}
0x1eaa…1eb8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0100}
0x1eb8…1ec8              Head {h00=0x000c, h01=0x0050, text=»CB3 BLK «, t00=0x0013, t01=0x010e}
0x1ec8…1ed2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011e}
0x1ed2…1edc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0128}
0x1edc…1ee6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0132}
0x1ee6…1ef0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013c}
0x1ef0…1efa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0146}
0x1efa…1f0e              Head {h00=0x0010, h01=0x0050, text=»CTWBIN1 BIN «, t00=0x0013, t01=0x0150}
0x1f0e…1f22              Head {h00=0x0010, h01=0x0050, text=»CTWBIN2 BIN «, t00=0x0013, t01=0x0164}
0x1f22…1f3c              Head {h00=0x0016, h01=0x0050, text=»CVOUTOP BIN W'56' «, t00=0x0013, t01=0x0178}
0x1f3c…1f56 (20, 0, 400) Head {h00=0x0016, h01=0x0050, text=»CMAXLIN BIN W'54' «, t00=0x0014, t01=0x0004}
0x1f56…1f6e              Head {h00=0x0014, h01=0x0050, text=»CMINLIN BIN W'2'«, t00=0x0014, t01=0x001e}
0x1f6e…1f8c              Head {h00=0x001a, h01=0x0050, text=»CCONBUF0 STRG 398X'FF'«, t00=0x0014, t01=0x0036}
0x1f8c…1faa              Head {h00=0x001a, h01=0x0050, text=»CCONBUF1 STRG 398X'FF'«, t00=0x0014, t01=0x0054}
0x1faa…1fc8              Head {h00=0x001a, h01=0x0050, text=»CCONBUF2 STRG 398X'FF'«, t00=0x0014, t01=0x0072}
0x1fc8…1fe6              Head {h00=0x001a, h01=0x0050, text=»CCONBUF3 STRG 398X'FF'«, t00=0x0014, t01=0x0090}
0x1fe6…2004              Head {h00=0x001a, h01=0x0050, text=»CCONBUF4 STRG 398X'FF'«, t00=0x0014, t01=0x00ae}
0x2004…2022              Head {h00=0x001a, h01=0x0050, text=»CCONBUF5 STRG 398X'FF'«, t00=0x0014, t01=0x00cc}
0x2022…2040              Head {h00=0x001a, h01=0x0050, text=»CCONBUF6 STRG 398X'FF'«, t00=0x0014, t01=0x00ea}
0x2040…205e              Head {h00=0x001a, h01=0x0050, text=»CCONBUF7 STRG 398X'FF'«, t00=0x0014, t01=0x0108}
0x205e…207c              Head {h00=0x001a, h01=0x0050, text=»CCONBUF8 STRG 398X'FF'«, t00=0x0014, t01=0x0126}
0x207c…2096              Head {h00=0x0016, h01=0x0050, text=»CTRANBUF STRG 698 «, t00=0x0014, t01=0x0144}
0x2096…20d2              Head {h00=0x0038, h01=0x0050, text=»CTID STRGI (12),2C'TC','TD','TE','TF','TG','TH',  C «, t00=0x0014, t01=0x015e}
0x20d2…20fa              Head {h00=0x0024, h01=0x0050, text=»  'TI','TJ','TK','TL','TM','TN' «, t00=0x0015, t01=0x000a}
0x20fa…2104              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0032}
0x2104…2112              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x003c}
0x2112…2122              Head {h00=0x000c, h01=0x0050, text=»CB4 BLK «, t00=0x0015, t01=0x004a}
0x2122…212c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005a}
0x212c…2136              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0064}
0x2136…2140              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x006e}
0x2140…214a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0078}
0x214a…2154              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0082}
0x2154…2176              Head {h00=0x001e, h01=0x0050, text=»CMAXTASK BIN  NO OF TASKS «, t00=0x0015, t01=0x008c}
0x2176…219c              Head {h00=0x0022, h01=0x0050, text=»CTASKNR BIN  NO. OF 0PEN TASKS«, t00=0x0015, t01=0x00ae}
0x219c…21b6              Head {h00=0x0016, h01=0x0050, text=»CRECLGD BIN W'128'«, t00=0x0015, t01=0x00d4}
0x21b6…21de              Head {h00=0x0024, h01=0x0050, text=»CRECNR BIN  PHYSICAL RECORD NR. «, t00=0x0015, t01=0x00ee}
0x21de…21fc              Head {h00=0x001a, h01=0x0050, text=»CCONBUF9 STRG 398X'FF'«, t00=0x0015, t01=0x0116}
0x21fc…2226              Head {h00=0x0026, h01=0x0050, text=»CRECBCD BCD 6D LOGICAL RECORD NR. «, t00=0x0015, t01=0x0134}
0x2226…2248              Head {h00=0x001e, h01=0x0050, text=»CEDATNR BCD 4 DATASET NR. «, t00=0x0015, t01=0x015e}
0x2248…225e              Head {h00=0x0012, h01=0x0050, text=»SOPINP STRG 4 «, t00=0x0015, t01=0x0180}
0x225e…2272              Head {h00=0x0010, h01=0x0050, text=»ASVOL STRG 6«, t00=0x0016, t01=0x0008}
0x2272…2288              Head {h00=0x0012, h01=0x0050, text=»ASFNAME STRG 8«, t00=0x0016, t01=0x001c}
0x2288…22a6              Head {h00=0x001a, h01=0x0050, text=»CKMDNAM STRG 6'OD-KOM'«, t00=0x0016, t01=0x0032}
0x22a6…22d6              Head {h00=0x002c, h01=0x0050, text=»CVERSNR BCD 10D'01014610' VERSION NUMBER«, t00=0x0016, t01=0x0050}
0x22d6…22f2              Head {h00=0x0018, h01=0x0050, text=»CBLANKS STRG X'2020'«, t00=0x0016, t01=0x0080}
0x22f2…2316              Head {h00=0x0020, h01=0x0050, text=»CPCKBUF STRG 128 PACKBUFFER «, t00=0x0016, t01=0x009c}
0x2316…2336              Head {h00=0x001c, h01=0x0050, text=»*          TEXT FOR BKO «, t00=0x0016, t01=0x00c0}
0x2336…2360              Head {h00=0x0026, h01=0x0050, text=»*          ONLY RELEVANT IF EITHER«, t00=0x0016, t01=0x00e0}
0x2360…238c              Head {h00=0x0028, h01=0x0050, text=»*          CBKOFLG=F (CHECK BKO) OR «, t00=0x0016, t01=0x010a}
0x238c…23bc              Head {h00=0x002c, h01=0x0050, text=»*          CKTFLAG=F (NOT SALDO IN KT.) «, t00=0x0016, t01=0x0136}
0x23bc…23dc              Head {h00=0x001c, h01=0x0050, text=»CTTXT07 STRG 13'00008  C«, t00=0x0016, t01=0x0166}
0x23dc…23f0              Head {h00=0x0010, h01=0x0050, text=»  99     0' «, t00=0x0016, t01=0x0186}
0x23f0…241a              Head {h00=0x0026, h01=0x0050, text=»CREGTAB BCDI (25,2),'01','-01',  C«, t00=0x0017, t01=0x000a}
0x241a…2432              Head {h00=0x0014, h01=0x0050, text=»  '02','-01',  C«, t00=0x0017, t01=0x0034}
0x2432…244a              Head {h00=0x0014, h01=0x0050, text=»  '03','-01',  C«, t00=0x0017, t01=0x004c}
0x244a…2462              Head {h00=0x0014, h01=0x0050, text=»  '04','-01',  C«, t00=0x0017, t01=0x0064}
0x2462…247a              Head {h00=0x0014, h01=0x0050, text=»  '05','-01',  C«, t00=0x0017, t01=0x007c}
0x247a…2492              Head {h00=0x0014, h01=0x0050, text=»  '06','-01',  C«, t00=0x0017, t01=0x0094}
0x2492…24aa              Head {h00=0x0014, h01=0x0050, text=»  '07','-01',  C«, t00=0x0017, t01=0x00ac}
0x24aa…24c2              Head {h00=0x0014, h01=0x0050, text=»  '08','-01',  C«, t00=0x0017, t01=0x00c4}
0x24c2…24da              Head {h00=0x0014, h01=0x0050, text=»  '09','-01',  C«, t00=0x0017, t01=0x00dc}
0x24da…24f2              Head {h00=0x0014, h01=0x0050, text=»  '10','-01',  C«, t00=0x0017, t01=0x00f4}
0x24f2…250a              Head {h00=0x0014, h01=0x0050, text=»  '12','-01',  C«, t00=0x0017, t01=0x010c}
0x250a…2522              Head {h00=0x0014, h01=0x0050, text=»  '40','-01',  C«, t00=0x0017, t01=0x0124}
0x2522…253a              Head {h00=0x0014, h01=0x0050, text=»  '41','-01',  C«, t00=0x0017, t01=0x013c}
0x253a…2552              Head {h00=0x0014, h01=0x0050, text=»  '42','-01',  C«, t00=0x0017, t01=0x0154}
0x2552…256a              Head {h00=0x0014, h01=0x0050, text=»  '45','-01',  C«, t00=0x0017, t01=0x016c}
0x256a…2582              Head {h00=0x0014, h01=0x0050, text=»  '46','-01',  C«, t00=0x0017, t01=0x0184}
0x2582…259a              Head {h00=0x0014, h01=0x0050, text=»  '47','-01',  C«, t00=0x0018, t01=0x000c}
0x259a…25b2              Head {h00=0x0014, h01=0x0050, text=»  '48','-01',  C«, t00=0x0018, t01=0x0024}
0x25b2…25ca              Head {h00=0x0014, h01=0x0050, text=»  '49','-01',  C«, t00=0x0018, t01=0x003c}
0x25ca…25e2              Head {h00=0x0014, h01=0x0050, text=»  '50','-01',  C«, t00=0x0018, t01=0x0054}
0x25e2…25fa              Head {h00=0x0014, h01=0x0050, text=»  '51','-01',  C«, t00=0x0018, t01=0x006c}
0x25fa…2612              Head {h00=0x0014, h01=0x0050, text=»  '52','-01',  C«, t00=0x0018, t01=0x0084}
0x2612…262a              Head {h00=0x0014, h01=0x0050, text=»  '53','-01',  C«, t00=0x0018, t01=0x009c}
0x262a…2642              Head {h00=0x0014, h01=0x0050, text=»  '54','-01',  C«, t00=0x0018, t01=0x00b4}
0x2642…2658              Head {h00=0x0012, h01=0x0050, text=»  '-01','-01' «, t00=0x0018, t01=0x00cc}
0x2658…2662              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e2}
0x2662…2670              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00ec}
0x2670…267a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fa}
0x267a…268a              Head {h00=0x000c, h01=0x0050, text=»CB6 BLK «, t00=0x0018, t01=0x0104}
0x268a…2694              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0114}
0x2694…26c0              Head {h00=0x0028, h01=0x0050, text=»CCYPFLG BOOL FALSE CYSET OCCUPIED ? «, t00=0x0018, t01=0x011e}
0x26c0…26ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014a}
0x26ca…26d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0154}
0x26d4…26de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x015e}
0x26de…26e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0168}
0x26e8…2718              Head {h00=0x002c, h01=0x0050, text=»CCYSIZE BIN '30' MAX SIZE OF CYCLE PAGE «, t00=0x0018, t01=0x0172}
0x2718…2748              Head {h00=0x002c, h01=0x0050, text=»CKTLAST BIN '0' LAST RECORD USED, KTPLAN«, t00=0x0019, t01=0x0012}
0x2748…2780              Head {h00=0x0034, h01=0x0050, text=»CMAXREC BIN W'1400' GIVES WARNING OF FULL REGSET«, t00=0x0019, t01=0x0042}
0x2780…27ae              Head {h00=0x002a, h01=0x0050, text=»CGLRECNR BIN '0' LAST RECNR, GL REGSET«, t00=0x0019, t01=0x007a}
0x27ae…27e0              Head {h00=0x002e, h01=0x0050, text=»CKTINDX BCDI (7),14D KNT.PLAN MASTER INDEX«, t00=0x0019, t01=0x00a8}
0x27e0…2804              Head {h00=0x0020, h01=0x0050, text=»CCYBUF STRG 128 CYSET BUFFER«, t00=0x0019, t01=0x00da}
0x2804…282a              Head {h00=0x0022, h01=0x0050, text=»CKTBUF STRG 128 KTPLAN BUFFER «, t00=0x0019, t01=0x00fe}
0x282a…285c              Head {h00=0x002e, h01=0x0050, text=»CKTTOP BCD 4D'5' FIRST LINE KORT (DEFAULT)«, t00=0x0019, t01=0x0124}
0x285c…289a              Head {h00=0x003a, h01=0x0050, text=»ON STRGI (12)2C'KA','KB','KC','KD','KE','KF','KG',  C «, t00=0x0019, t01=0x0156}
0x289a…28bc (26, 0, 400) Head {h00=0x001e, h01=0x0050, text=»  'KH','KI','KJ','KK','KL'«, t00=0x001a, t01=0x0004}
0x28bc…28ca              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001a, t01=0x0026}
0x28ca…28d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0034}
0x28d4…28e4              Head {h00=0x000c, h01=0x0050, text=»TB1 BLK «, t00=0x001a, t01=0x003e}
0x28e4…28ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x004e}
0x28ee…28f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0058}
0x28f8…2902              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0062}
0x2902…290c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x006c}
0x290c…2932              Head {h00=0x0022, h01=0x0050, text=»TTCY1FLG BOOL FALSE IN CYCLE? «, t00=0x001a, t01=0x0076}
0x2932…2958              Head {h00=0x0022, h01=0x0050, text=»TTCY2FLG BOOL FALSE IN STABEL?«, t00=0x001a, t01=0x009c}
0x2958…2974              Head {h00=0x0018, h01=0x0050, text=»TTLSTFLG BOOL FALSE «, t00=0x001a, t01=0x00c2}
0x2974…299c              Head {h00=0x0024, h01=0x0050, text=»TTPSEFLG BOOL FALSE PAUSE STATE «, t00=0x001a, t01=0x00de}
0x299c…29c8              Head {h00=0x0028, h01=0x0050, text=»TTSUMFLG BOOL FALSE SUM ON SCREEN ? «, t00=0x001a, t01=0x0106}
0x29c8…29fa              Head {h00=0x002e, h01=0x0050, text=»TTTSTFLG BOOL FALSE FIRST ENTRY IN CYKLE ?«, t00=0x001a, t01=0x0132}
0x29fa…2a26              Head {h00=0x0028, h01=0x0050, text=»TTINVFLG BOOL FALSE INDICATE MODPOST«, t00=0x001a, t01=0x0164}
0x2a26…2a50              Head {h00=0x0026, h01=0x0050, text=»TTJTEND BOOL FALSE END OF JOURNAL «, t00=0x001a, t01=0x0190}
0x2a50…2a7e              Head {h00=0x002a, h01=0x0050, text=»TTEORFLG BOOL FALSE *-- END OF RECORD «, t00=0x001b, t01=0x002a}
0x2a7e…2aaa              Head {h00=0x0028, h01=0x0050, text=»TTSUPFLG BOOL FALSE SUPPLEMENT POST «, t00=0x001b, t01=0x0058}
0x2aaa…2ada              Head {h00=0x002c, h01=0x0050, text=»TTSMALL BOOL FALSE *-- SMALL GIRO KVIT? «, t00=0x001b, t01=0x0084}
0x2ada…2b04              Head {h00=0x0026, h01=0x0050, text=»TTR11FLG BOOL FALSE T: KASSE CLOSE«, t00=0x001b, t01=0x00b4}
0x2b04…2b32              Head {h00=0x002a, h01=0x0050, text=»TREMFLG BOOL FALSE T= REMOTE TERMINAL «, t00=0x001b, t01=0x00de}
0x2b32…2b62              Head {h00=0x002c, h01=0x0050, text=»TTKORTFL BOOL FALSE T: IN KONTOKORT MODE«, t00=0x001b, t01=0x010c}
0x2b62…2b86              Head {h00=0x0020, h01=0x0050, text=»TTASKAT BOOL FALSE T=BKO 51 «, t00=0x001b, t01=0x013c}
0x2b86…2b90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0160}
0x2b90…2b9a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x016a}
0x2b9a…2bae              Head {h00=0x0010, h01=0x0050, text=»TTDKDEX BIN «, t00=0x001b, t01=0x0174}
0x2bae…2bd4              Head {h00=0x0022, h01=0x0050, text=»TTSTYRDX BIN '1' HBOG/DEBP/REM«, t00=0x001b, t01=0x0188}
0x2bd4…2bf8              Head {h00=0x0020, h01=0x0050, text=»TTTROLD BIN  NO OF OLD TRANS«, t00=0x001c, t01=0x001e}
0x2bf8…2c0c              Head {h00=0x0010, h01=0x0050, text=»TTASKNR BIN «, t00=0x001c, t01=0x0042}
0x2c0c…2c2c              Head {h00=0x001c, h01=0x0050, text=»TTDKBCD BCD 2 D/K VALUE «, t00=0x001c, t01=0x0056}
0x2c2c…2c54              Head {h00=0x0024, h01=0x0050, text=»TTARKSAV BCD 12 SAVED ARK KT NR «, t00=0x001c, t01=0x0076}
0x2c54…2c7e              Head {h00=0x0026, h01=0x0050, text=»TTCYKTOT BCD 14 SAVED CYKLE TOTAL «, t00=0x001c, t01=0x009e}
0x2c7e…2ca8              Head {h00=0x0026, h01=0x0050, text=»TTCYKPOS BCD 4 SAVED CYKLE LINE NR«, t00=0x001c, t01=0x00c8}
0x2ca8…2cd0              Head {h00=0x0024, h01=0x0050, text=»TTLINNR BCD 4 LINE NR ON VOUCHER«, t00=0x001c, t01=0x00f2}
0x2cd0…2cf8              Head {h00=0x0024, h01=0x0050, text=»TTCNTNR BCD 4 COUNTER TAELLER NR«, t00=0x001c, t01=0x011a}
0x2cf8…2d1e              Head {h00=0x0022, h01=0x0050, text=»TTEJEDB BCD 14 TOTAL OF EJ EDB«, t00=0x001c, t01=0x0142}
0x2d1e…2d38              Head {h00=0x0016, h01=0x0050, text=»GTMSK BCD 6D'999' «, t00=0x001c, t01=0x0168}
0x2d38…2d58              Head {h00=0x001c, h01=0x0050, text=»GTDATO BCD 8X'FFFFFFFF' «, t00=0x001c, t01=0x0182}
0x2d58…2d72              Head {h00=0x0016, h01=0x0050, text=»TSWBCD2 BCD 2 *-- «, t00=0x001d, t01=0x0012}
0x2d72…2d9c              Head {h00=0x0026, h01=0x0050, text=»TTCYM STRG 1 CYKLE MARK ON JOURNAL«, t00=0x001d, t01=0x002c}
0x2d9c…2dce              Head {h00=0x002e, h01=0x0050, text=»GTREGF BCDI (26),16X'F' TRANSACTION FIELDS«, t00=0x001d, t01=0x0056}
0x2dce…2dd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0088}
0x2dd8…2de6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0092}
0x2de6…2df0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a0}
0x2df0…2e00              Head {h00=0x000c, h01=0x0050, text=»GB1 BLK «, t00=0x001d, t01=0x00aa}
0x2e00…2e0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ba}
0x2e0a…2e14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00c4}
0x2e14…2e1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ce}
0x2e1e…2e28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00d8}
0x2e28…2e32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00e2}
0x2e32…2e4e              Head {h00=0x0018, h01=0x0050, text=»GTEXFLAG BOOL FALSE «, t00=0x001d, t01=0x00ec}
0x2e4e…2e6a              Head {h00=0x0018, h01=0x0050, text=»GTADUPFL BOOL FALSE «, t00=0x001d, t01=0x0108}
0x2e6a…2e86              Head {h00=0x0018, h01=0x0050, text=»GTAUTODP BOOL FALSE «, t00=0x001d, t01=0x0124}
0x2e86…2ea2              Head {h00=0x0018, h01=0x0050, text=»GTREGFLG BOOL FALSE «, t00=0x001d, t01=0x0140}
0x2ea2…2ebc              Head {h00=0x0016, h01=0x0050, text=»GTCYFLG BOOL FALSE«, t00=0x001d, t01=0x015c}
0x2ebc…2ede              Head {h00=0x001e, h01=0x0050, text=»GTTFLG BOOL FALSE CLOSE ? «, t00=0x001d, t01=0x0176}
0x2ede…2f0c              Head {h00=0x002a, h01=0x0050, text=»GTCLRN BOOL FALSE *-- SPCLRN OR SPCLRA«, t00=0x001e, t01=0x0008}
0x2f0c…2f2a              Head {h00=0x001a, h01=0x0050, text=»GTTYPE2 BOOL FALSE *--«, t00=0x001e, t01=0x0036}
0x2f2a…2f48              Head {h00=0x001a, h01=0x0050, text=»GTTYPE3 BOOL FALSE *--«, t00=0x001e, t01=0x0054}
0x2f48…2f80              Head {h00=0x0034, h01=0x0050, text=»GTKASSE BOOL FALSE *-- TRUE- IN KASSE FUNCTIONS «, t00=0x001e, t01=0x0072}
0x2f80…2fb8              Head {h00=0x0034, h01=0x0050, text=»GTSLUTFL BOOL TRUE FALSE: SLUT KEY IS SIMULATED «, t00=0x001e, t01=0x00aa}
0x2fb8…2fe4              Head {h00=0x0028, h01=0x0050, text=»GTDIVTR BOOL FALSE T: DIVERSE TRANS «, t00=0x001e, t01=0x00e2}
0x2fe4…3016              Head {h00=0x002e, h01=0x0050, text=»GTTRSEL BOOL FALSE T: TRANSACTION SELECTED«, t00=0x001e, t01=0x010e}
0x3016…3044              Head {h00=0x002a, h01=0x0050, text=»GTMASTFL BOOL FALSE T=MASTER TERMINAL «, t00=0x001e, t01=0x0140}
0x3044…306a              Head {h00=0x0022, h01=0x0050, text=»GTASUMFL BOOL FALSE T=AUTO SUM«, t00=0x001e, t01=0x016e}
0x306a…3090 (31, 0, 400) Head {h00=0x0022, h01=0x0050, text=»GTSUBFLG BOOL FALSE T=SUBTOTAL«, t00=0x001f, t01=0x0004}
0x3090…309a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x002a}
0x309a…30ae              Head {h00=0x0010, h01=0x0050, text=»GSWBIN1 BIN «, t00=0x001f, t01=0x0034}
0x30ae…30c2              Head {h00=0x0010, h01=0x0050, text=»GSWBIN2 BIN «, t00=0x001f, t01=0x0048}
0x30c2…30d6              Head {h00=0x0010, h01=0x0050, text=»GSWBIN3 BIN «, t00=0x001f, t01=0x005c}
0x30d6…30ea              Head {h00=0x0010, h01=0x0050, text=»GSWBIN4 BIN «, t00=0x001f, t01=0x0070}
0x30ea…30fe              Head {h00=0x0010, h01=0x0050, text=»GSWBIN5 BIN «, t00=0x001f, t01=0x0084}
0x30fe…3112              Head {h00=0x0010, h01=0x0050, text=»GSWBIN6 BIN «, t00=0x001f, t01=0x0098}
0x3112…3128              Head {h00=0x0012, h01=0x0050, text=»GSWBCD1 BCD 14«, t00=0x001f, t01=0x00ac}
0x3128…313e              Head {h00=0x0012, h01=0x0050, text=»GSWBCD2 BCD 14«, t00=0x001f, t01=0x00c2}
0x313e…3154              Head {h00=0x0012, h01=0x0050, text=»GSWBCD3 BCD 6 «, t00=0x001f, t01=0x00d8}
0x3154…316a              Head {h00=0x0012, h01=0x0050, text=»GSWBCD4 BCD 6D«, t00=0x001f, t01=0x00ee}
0x316a…3180              Head {h00=0x0012, h01=0x0050, text=»GSWBCD5 BCD 6 «, t00=0x001f, t01=0x0104}
0x3180…3196              Head {h00=0x0012, h01=0x0050, text=»GSWBCD6 BCD 14«, t00=0x001f, t01=0x011a}
0x3196…31ac              Head {h00=0x0012, h01=0x0050, text=»GSWBCD7 BCD 14«, t00=0x001f, t01=0x0130}
0x31ac…31c2              Head {h00=0x0012, h01=0x0050, text=»GTWBCD1 BCD 14«, t00=0x001f, t01=0x0146}
0x31c2…31d8              Head {h00=0x0012, h01=0x0050, text=»GTWBCD2 BCD 14«, t00=0x001f, t01=0x015c}
0x31d8…3202              Head {h00=0x0026, h01=0x0050, text=»GTSTRFMT STRG 7 STRING FOR FORMATS«, t00=0x001f, t01=0x0172}
0x3202…3210              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0020, t01=0x000c}
0x3210…3220              Head {h00=0x000c, h01=0x0050, text=»GB2 BLK «, t00=0x0020, t01=0x001a}
0x3220…322a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x002a}
0x322a…3246              Head {h00=0x0018, h01=0x0050, text=»SPPROMPT BOOL FALSE «, t00=0x0020, t01=0x0034}
0x3246…3262              Head {h00=0x0018, h01=0x0050, text=»SPCHANGE BOOL FALSE «, t00=0x0020, t01=0x0050}
0x3262…3298              Head {h00=0x0032, h01=0x0050, text=»SPDUPL BOOL FALSE TRUE: FIELD HAS BEEN DUPPED «, t00=0x0020, t01=0x006c}
0x3298…32ce              Head {h00=0x0032, h01=0x0050, text=»SPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS «, t00=0x0020, t01=0x00a2}
0x32ce…3302              Head {h00=0x0030, h01=0x0050, text=»SPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR«, t00=0x0020, t01=0x00d8}
0x3302…3328              Head {h00=0x0022, h01=0x0050, text=»SPWARNFL BOOL FALSE T: WARNING«, t00=0x0020, t01=0x010c}
0x3328…334c              Head {h00=0x0020, h01=0x0050, text=»TTKEY1 BOOL FALSE T=KEY 1 ON«, t00=0x0020, t01=0x0132}
0x334c…3370              Head {h00=0x0020, h01=0x0050, text=»TTKEY2 BOOL FALSE T=KEY 2 ON«, t00=0x0020, t01=0x0156}
0x3370…3394              Head {h00=0x0020, h01=0x0050, text=»TTKEY3 BOOL FALSE T=KEY 3 ON«, t00=0x0020, t01=0x017a}
0x3394…33b8              Head {h00=0x0020, h01=0x0050, text=»TTKEY4 BOOL FALSE T=KEY 4 ON«, t00=0x0021, t01=0x000e}
0x33b8…33c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0032}
0x33c2…33cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x003c}
0x33cc…33d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0046}
0x33d6…33ea              Head {h00=0x0010, h01=0x0050, text=»SPBINW1 BIN «, t00=0x0021, t01=0x0050}
0x33ea…33fe              Head {h00=0x0010, h01=0x0050, text=»SPBINW2 BIN «, t00=0x0021, t01=0x0064}
0x33fe…3412              Head {h00=0x0010, h01=0x0050, text=»SPBINW3 BIN «, t00=0x0021, t01=0x0078}
0x3412…3426              Head {h00=0x0010, h01=0x0050, text=»SPBINW4 BIN «, t00=0x0021, t01=0x008c}
0x3426…343a              Head {h00=0x0010, h01=0x0050, text=»SPBINW5 BIN «, t00=0x0021, t01=0x00a0}
0x343a…3450              Head {h00=0x0012, h01=0x0050, text=»SPKEY BIN '1' «, t00=0x0021, t01=0x00b4}
0x3450…347c              Head {h00=0x0028, h01=0x0050, text=»SPERASE BIN '0' 0:ERASE; 4:NO ERASE «, t00=0x0021, t01=0x00ca}
0x347c…3490              Head {h00=0x0010, h01=0x0050, text=»SPLINTOP BIN«, t00=0x0021, t01=0x00f6}
0x3490…34a4              Head {h00=0x0010, h01=0x0050, text=»SPLINLOW BIN«, t00=0x0021, t01=0x010a}
0x34a4…34ca              Head {h00=0x0022, h01=0x0050, text=»GTCLASS BIN '1' TERMINAL CLASS«, t00=0x0021, t01=0x011e}
0x34ca…34f2              Head {h00=0x0024, h01=0x0050, text=»GTREGDEX BIN '0' TRANSTYPE INDEX«, t00=0x0021, t01=0x0144}
0x34f2…351e              Head {h00=0x0028, h01=0x0050, text=»GTDFLIN BIN '27' DEFAULT LINE NUMBER«, t00=0x0021, t01=0x016c}
0x351e…3538              Head {h00=0x0016, h01=0x0050, text=»GSSWITCH BINI (26)«, t00=0x0022, t01=0x0008}
0x3538…3550              Head {h00=0x0014, h01=0x0050, text=»GTUSED BINI (26)«, t00=0x0022, t01=0x0022}
0x3550…355a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x003a}
0x355a…3568              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0044}
0x3568…3578              Head {h00=0x000c, h01=0x0050, text=»GB3 BLK «, t00=0x0022, t01=0x0052}
0x3578…3582              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0062}
0x3582…359e              Head {h00=0x0018, h01=0x0050, text=»PSIGNFLG BOOL FALSE «, t00=0x0022, t01=0x006c}
0x359e…35c2              Head {h00=0x0020, h01=0x0050, text=»BCPR BOOL FALSE T=CPR  F=CIR«, t00=0x0022, t01=0x0088}
0x35c2…35e8              Head {h00=0x0022, h01=0x0050, text=»BLEV BOOL FALSE T=LEV., F=CPR «, t00=0x0022, t01=0x00ac}
0x35e8…360c              Head {h00=0x0020, h01=0x0050, text=»GTDYFLG BOOL FALSE T=DISPLAY«, t00=0x0022, t01=0x00d2}
0x360c…3628              Head {h00=0x0018, h01=0x0050, text=»GTSPGFLG BOOL FALSE «, t00=0x0022, t01=0x00f6}
0x3628…365e              Head {h00=0x0032, h01=0x0050, text=»GTKORTFL BOOL FALSE T=KONTO FOUND IN KONTOPLAN«, t00=0x0022, t01=0x0112}
0x365e…3688              Head {h00=0x0026, h01=0x0050, text=»GTTESTFL BOOL FALSE T=IN TEST MODE«, t00=0x0022, t01=0x0148}
0x3688…36b0              Head {h00=0x0024, h01=0x0050, text=»GTSWFLAG BOOL FALSE SCRATCH FLAG«, t00=0x0022, t01=0x0172}
0x36b0…36da              Head {h00=0x0026, h01=0x0050, text=»GTSUMKEY BOOL FALSE SUM INDIKATOR «, t00=0x0023, t01=0x000a}
0x36da…3700              Head {h00=0x0022, h01=0x0050, text=»GTNWFLG BOOL FALSE T= USE .NW «, t00=0x0023, t01=0x0034}
0x3700…3730              Head {h00=0x002c, h01=0x0050, text=»GTADMFLG BOOL FALSE T= IN ADM FUNCTIONS «, t00=0x0023, t01=0x005a}
0x3730…375e              Head {h00=0x002a, h01=0x0050, text=»GTLOKSPG BOOL FALSE T=LOKAL INQUIRIES «, t00=0x0023, t01=0x008a}
0x375e…3798              Head {h00=0x0036, h01=0x0050, text=»GTSLDFLG BOOL FALSE T=SALDO PRESENT. F=NOT PRESENT«, t00=0x0023, t01=0x00b8}
0x3798…37cc              Head {h00=0x0030, h01=0x0050, text=»GTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET «, t00=0x0023, t01=0x00f2}
0x37cc…37d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0126}
0x37d6…37e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0130}
0x37e0…37f4              Head {h00=0x0010, h01=0x0050, text=»GTPPOIN BIN «, t00=0x0023, t01=0x013a}
0x37f4…3806              Head {h00=0x000e, h01=0x0050, text=»GTPAGE BIN«, t00=0x0023, t01=0x014e}
0x3806…381a              Head {h00=0x0010, h01=0x0050, text=»GTRETUR BIN «, t00=0x0023, t01=0x0160}
0x381a…382e              Head {h00=0x0010, h01=0x0050, text=»GTSUM BCD 14«, t00=0x0023, t01=0x0174}
0x382e…3844              Head {h00=0x0012, h01=0x0050, text=»GTANTAL BCD 4 «, t00=0x0023, t01=0x0188}
0x3844…385a              Head {h00=0x0012, h01=0x0050, text=»GTCYSUM BCD 14«, t00=0x0024, t01=0x000e}
0x385a…387a              Head {h00=0x001c, h01=0x0050, text=»GTREGNR BCD 3 TRANSTYPE «, t00=0x0024, t01=0x0024}
0x387a…38a0              Head {h00=0x0022, h01=0x0050, text=»GTDBKRS BCD 2 SIGN FOR AMOUNT «, t00=0x0024, t01=0x0044}
0x38a0…38d0              Head {h00=0x002c, h01=0x0050, text=»GTSUMST BCD 6 1. NUMBER FOR SUM FUNCTION«, t00=0x0024, t01=0x006a}
0x38d0…3900              Head {h00=0x002c, h01=0x0050, text=»GTSUMCNT BCD 14 COUNTER FOR SUMFUNCTION «, t00=0x0024, t01=0x009a}
0x3900…3926              Head {h00=0x0022, h01=0x0050, text=»GTL8TXT STRG 8 TEXT FOR LINE 8«, t00=0x0024, t01=0x00ca}
0x3926…393e              Head {h00=0x0014, h01=0x0050, text=»SPINPUT STRG 20 «, t00=0x0024, t01=0x00f0}
0x393e…3954              Head {h00=0x0012, h01=0x0050, text=»GSWSTR1 STRG 1«, t00=0x0024, t01=0x0108}
0x3954…396a              Head {h00=0x0012, h01=0x0050, text=»GSWSTR2 STRG 2«, t00=0x0024, t01=0x011e}
0x396a…3980              Head {h00=0x0012, h01=0x0050, text=»GSWSTR9 STRG 9«, t00=0x0024, t01=0x0134}
0x3980…3998              Head {h00=0x0014, h01=0x0050, text=»GSWSTR20 STRG 20«, t00=0x0024, t01=0x014a}
0x3998…39a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0162}
0x39a2…39b0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x016c}
0x39b0…39ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x017a}
0x39ba…39ca              Head {h00=0x000c, h01=0x0050, text=»GB4 BLK «, t00=0x0024, t01=0x0184}
0x39ca…39fa (37, 0, 400) Head {h00=0x002c, h01=0x0050, text=»GTCYWRTF BOOL FALSE T=NO WRITE ON CYSET «, t00=0x0025, t01=0x0004}
0x39fa…3a2a              Head {h00=0x002c, h01=0x0050, text=»GTCYTRPF BOOL FALSE T=TRANSPORT IN CYCLE«, t00=0x0025, t01=0x0034}
0x3a2a…3a34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0064}
0x3a34…3a3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006e}
0x3a3e…3a48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0078}
0x3a48…3a52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0082}
0x3a52…3a7e              Head {h00=0x0028, h01=0x0050, text=»GTPSELIN BIN '0' LINE NO. WHEN PAUSE«, t00=0x0025, t01=0x008c}
0x3a7e…3aa4              Head {h00=0x0022, h01=0x0050, text=»GTCYIN BIN  NEXT USED, CYCSET «, t00=0x0025, t01=0x00b8}
0x3aa4…3aca              Head {h00=0x0022, h01=0x0050, text=»GTCYOUT BIN  NEXT FREE, CYCSET«, t00=0x0025, t01=0x00de}
0x3aca…3aee              Head {h00=0x0020, h01=0x0050, text=»GTRECNR BIN  SPG. RECORD NO.«, t00=0x0025, t01=0x0104}
0x3aee…3b14              Head {h00=0x0022, h01=0x0050, text=»GTLBNR BCD 6D SPG. EKSP.LB.NO.«, t00=0x0025, t01=0x0128}
0x3b14…3b40              Head {h00=0x0028, h01=0x0050, text=»GTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR«, t00=0x0025, t01=0x014e}
0x3b40…3b62              Head {h00=0x001e, h01=0x0050, text=»GTKTTYP BCD 4D KTPLAN TYPE«, t00=0x0025, t01=0x017a}
0x3b62…3b6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x000c}
0x3b6c…3b76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0016}
0x3b76…3b80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0020}
0x3b80…3b8a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x002a}
0x3b8a…3b94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0034}
0x3b94…3ba2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x003e}
0x3ba2…3bb2              Head {h00=0x000c, h01=0x0050, text=»TB2 BLK «, t00=0x0026, t01=0x004c}
0x3bb2…3bbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x005c}
0x3bbc…3bc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0066}
0x3bc6…3bd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0070}
0x3bd0…3bda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x007a}
0x3bda…3bfe              Head {h00=0x0020, h01=0x0050, text=»GTDBKRC STRG 4 DEB/KRE TEXT «, t00=0x0026, t01=0x0084}
0x3bfe…3c16              Head {h00=0x0014, h01=0x0050, text=»GTTESTMK STRG 1 «, t00=0x0026, t01=0x00a8}
0x3c16…3c3e              Head {h00=0x0024, h01=0x0050, text=»TTSUPMRK STRG 1 SUPPLEMENT MARK «, t00=0x0026, t01=0x00c0}
0x3c3e…3c5e              Head {h00=0x001c, h01=0x0050, text=»TTSUMMRK STRG 1 SUM MARK«, t00=0x0026, t01=0x00e8}
0x3c5e…3c74              Head {h00=0x0012, h01=0x0050, text=»GTTEXT STRG 6 «, t00=0x0026, t01=0x0108}
0x3c74…3c90              Head {h00=0x0018, h01=0x0050, text=»TTSPARE3 STRG 1C'.' «, t00=0x0026, t01=0x011e}
0x3c90…3cae              Head {h00=0x001a, h01=0x0050, text=»TCONBUF STRG 398X'FF' «, t00=0x0026, t01=0x013a}
0x3cae…3cd8              Head {h00=0x0026, h01=0x0050, text=»TTCYKST BCD 4 1. LINE CYCLE/STABEL«, t00=0x0026, t01=0x0158}
0x3cd8…3d00              Head {h00=0x0024, h01=0x0050, text=»TTKTSLD BCD 14 KONTOKORT, SALDO «, t00=0x0026, t01=0x0182}
0x3d00…3d2a              Head {h00=0x0026, h01=0x0050, text=»TTKTLIN BCD 4 KONTOKORT, LINIE NR «, t00=0x0027, t01=0x001a}
0x3d2a…3d56              Head {h00=0x0028, h01=0x0050, text=»TTKTCHK BCD 2 KONTOKORT, CHECKCIFFER«, t00=0x0027, t01=0x0044}
0x3d56…3d88              Head {h00=0x002e, h01=0x0050, text=»TTDBKRM STRG 1C'K' DEB/KRE MARK ON JOURNAL«, t00=0x0027, t01=0x0070}
0x3d88…3db0              Head {h00=0x0024, h01=0x0050, text=»TT16TXT STRG 3 RENTE/GEBYR/RATE «, t00=0x0027, t01=0x00a2}
0x3db0…3dd0              Head {h00=0x001c, h01=0x0050, text=»TT07TXT STRG 5 BKO TEXTS«, t00=0x0027, t01=0x00ca}
0x3dd0…3dfa              Head {h00=0x0026, h01=0x0050, text=»GTDUPF BCDI (26),16X'F' DUP FIELDS«, t00=0x0027, t01=0x00ea}
0x3dfa…3e04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0114}
0x3e04…3e0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x011e}
0x3e0e…3e1c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0128}
0x3e1c…3e2c              Head {h00=0x000c, h01=0x0050, text=»CD3 DBLK«, t00=0x0027, t01=0x0136}
0x3e2c…3e36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0146}
0x3e36…3e40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0150}
0x3e40…3e4a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x015a}
0x3e4a…3e54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0164}
0x3e54…3e5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x016e}
0x3e5e…3e74              Head {h00=0x0012, h01=0x0050, text=»DUMCD3 STRG 10«, t00=0x0027, t01=0x0178}
0x3e74…3e8e              Head {h00=0x0016, h01=0x0050, text=»CMASK BCDI (12),4D«, t00=0x0027, t01=0x018e}
0x3e8e…3eb8              Head {h00=0x0026, h01=0x0050, text=»CBACC BCDI (60,3),14D BEHOLDNINGER«, t00=0x0028, t01=0x0018}
0x3eb8…3eea              Head {h00=0x002e, h01=0x0050, text=»CTR12NR BCDI (60),12D EJ-EDB ACCOUNT NOS. «, t00=0x0028, t01=0x0042}
0x3eea…3f06              Head {h00=0x0018, h01=0x0050, text=»CRELDAY BCD 4X'FFFF'«, t00=0x0028, t01=0x0074}
0x3f06…3f1c              Head {h00=0x0012, h01=0x0050, text=»CCONFREC BCD 6«, t00=0x0028, t01=0x0090}
0x3f1c…3f4a              Head {h00=0x002a, h01=0x0050, text=»C12ACC BCDI (60,2),14D EJ-EDB COUNTERS«, t00=0x0028, t01=0x00a6}
0x3f4a…3f54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00d4}
0x3f54…3f5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00de}
0x3f5e…3f68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e8}
0x3f68…3f76              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00f2}
0x3f76…3f86              Head {h00=0x000c, h01=0x0050, text=»CD4 DBLK«, t00=0x0028, t01=0x0100}
0x3f86…3f90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0110}
0x3f90…3f9a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x011a}
0x3f9a…3fa4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0124}
0x3fa4…3fae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x012e}
0x3fae…3fb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0138}
0x3fb8…3fd0              Head {h00=0x0014, h01=0x0050, text=»DUMCD4 BINI (4) «, t00=0x0028, t01=0x0142}
0x3fd0…4002              Head {h00=0x002e, h01=0x0050, text=»CBEH BINI (12,2) FIRST AND SIZE OF BEHLDN.«, t00=0x0028, t01=0x015a}
0x4002…4034              Head {h00=0x002e, h01=0x0050, text=»CTR12 BINI (12,2) FIRST AND SIZE OF TR 12 «, t00=0x0028, t01=0x018c}
0x4034…404e              Head {h00=0x0016, h01=0x0050, text=»CFNAME STRGI (8),8«, t00=0x0029, t01=0x002e}
0x404e…4070              Head {h00=0x001e, h01=0x0050, text=»CVOLNO BCD 6 VOLUME NUMBER«, t00=0x0029, t01=0x0048}
0x4070…4090              Head {h00=0x001c, h01=0x0050, text=»CKMDNR BCD 6D KOMMUNE NR«, t00=0x0029, t01=0x006a}
0x4090…40b2              Head {h00=0x001e, h01=0x0050, text=»CMASKDAT BCD 8X'FFFFFFFF' «, t00=0x0029, t01=0x008a}
0x40b2…40ca              Head {h00=0x0014, h01=0x0050, text=»CVOL STRGI (4),6«, t00=0x0029, t01=0x00ac}
0x40ca…40d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c4}
0x40d4…40e2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00ce}
0x40e2…40f2              Head {h00=0x000c, h01=0x0050, text=»TD2 DBLK«, t00=0x0029, t01=0x00dc}
0x40f2…40fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00ec}
0x40fc…4106              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00f6}
0x4106…4110              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0100}
0x4110…411a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x010a}
0x411a…4124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0114}
0x4124…413a              Head {h00=0x0012, h01=0x0050, text=»TTINF1 STRG 14«, t00=0x0029, t01=0x011e}
0x413a…416c              Head {h00=0x002e, h01=0x0050, text=»TTRECOPN BCD 6 REC. NO. FOR OPEN OR CLOSE «, t00=0x0029, t01=0x0134}
0x416c…419a              Head {h00=0x002a, h01=0x0050, text=»TTRECCHN BCD 6 REC. NO. FOR FD CHANGE «, t00=0x0029, t01=0x0166}
0x419a…41c2 (42, 0, 400) Head {h00=0x0024, h01=0x0050, text=»TTSTLBNR BCD 6D FIRST EKSP. LBNR«, t00=0x002a, t01=0x0004}
0x41c2…41ec              Head {h00=0x0026, h01=0x0050, text=»TTSTCASH BCD 14D PRIMO CASH AMOUNT«, t00=0x002a, t01=0x002c}
0x41ec…4212              Head {h00=0x0022, h01=0x0050, text=»TTCASHAC BCD 12D CASH ACC. NR «, t00=0x002a, t01=0x0056}
0x4212…4238              Head {h00=0x0022, h01=0x0050, text=»TVERSUR BCD 12D VERSUR ACC NR «, t00=0x002a, t01=0x007c}
0x4238…4262              Head {h00=0x0026, h01=0x0050, text=»TTCASH BCD 14D CURRENT CASH AMOUNT«, t00=0x002a, t01=0x00a2}
0x4262…428a              Head {h00=0x0024, h01=0x0050, text=»TTLBNR BCD 6D CURRENT EKSP.LBNR «, t00=0x002a, t01=0x00cc}
0x428a…42b6              Head {h00=0x0028, h01=0x0050, text=»TTACC BCDI (8,2),16D'0' EDB COUNTERS«, t00=0x002a, t01=0x00f4}
0x42b6…42e6              Head {h00=0x002c, h01=0x0050, text=»TTGLREC BCD 6 SAVE RECORD NO, GL REGSET «, t00=0x002a, t01=0x0120}
0x42e6…42f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0150}
0x42f0…42fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x015a}
0x42fa…4304              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0164}
0x4304…430e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x016e}
0x430e…431c              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x002a, t01=0x0178}
0x431c…4330              Head {h00=0x0010, h01=0x0050, text=» ENTRY REGGO«, t00=0x002a, t01=0x0186}
0x4330…4344              Head {h00=0x0010, h01=0x0050, text=» ENTRY KBVGO«, t00=0x002b, t01=0x000a}
0x4344…4358              Head {h00=0x0010, h01=0x0050, text=» ENTRY GTPGO«, t00=0x002b, t01=0x001e}
0x4358…436c              Head {h00=0x0010, h01=0x0050, text=» ENTRY DC1GO«, t00=0x002b, t01=0x0032}
0x436c…4376              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0046}
0x4376…4388              Head {h00=0x000e, h01=0x0050, text=» EXT T1GO «, t00=0x002b, t01=0x0050}
0x4388…439c              Head {h00=0x0010, h01=0x0050, text=» EXT DCTASK «, t00=0x002b, t01=0x0062}
0x439c…43ae              Head {h00=0x000e, h01=0x0050, text=» EXT VDUKB«, t00=0x002b, t01=0x0076}
0x43ae…43c0              Head {h00=0x000e, h01=0x0050, text=» EXT PRINT«, t00=0x002b, t01=0x0088}
0x43c0…43d4              Head {h00=0x0010, h01=0x0050, text=» EXT SWITCH «, t00=0x002b, t01=0x009a}
0x43d4…43fa              Head {h00=0x0022, h01=0x0050, text=» EXT GETTID GET TASK IDENTITY «, t00=0x002b, t01=0x00ae}
0x43fa…4426              Head {h00=0x0028, h01=0x0050, text=» ENTRY OFFLNE OFFLINE START ADDRESS «, t00=0x002b, t01=0x00d4}
0x4426…443c              Head {h00=0x0012, h01=0x0050, text=» ENTRY ONLINE «, t00=0x002b, t01=0x0100}
0x443c…444a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0116}
0x444a…4474              Head {h00=0x0026, h01=0x0050, text=» DSC0 DSDC,2 DUMMY REFERENCE T:IO «, t00=0x002b, t01=0x0124}
0x4474…4482              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x014e}
0x4482…44b2              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x002b, t01=0x015c}
0x44b2…44bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x018c}
0x44bc…44e0              Head {h00=0x0020, h01=0x0050, text=»*     START OF REGISTRATION «, t00=0x002c, t01=0x0008}
0x44e0…44ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x002c}
0x44ea…451a              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x002c, t01=0x0036}
0x451a…4522              Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0066}
0x4522…4530              Head {h00=0x000a, h01=0x0050, text=»REGGO «, t00=0x002c, t01=0x006e}
0x4530…4540              Head {h00=0x000c, h01=0x0050, text=» B T1GO «, t00=0x002c, t01=0x007c}
0x4540…4548              Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x008c}
0x4548…4550              Head {h00=0x0004, h01=0x0050, t00=0x002c, t01=0x0094}
0x4550…455e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x009c}
0x455e…458e              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x002c, t01=0x00aa}
0x458e…4598              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00da}
0x4598…45c4              Head {h00=0x0028, h01=0x0050, text=»*   START ADDRESS FOR KEYBOARD TASK «, t00=0x002c, t01=0x00e4}
0x45c4…45f4              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x002c, t01=0x0110}
0x45f4…4602              Head {h00=0x000a, h01=0x0050, text=»KBVGO «, t00=0x002c, t01=0x0140}
0x4602…461a              Head {h00=0x0014, h01=0x0050, text=» ADD NBRKBV,='1'«, t00=0x002c, t01=0x014e}
0x461a…4634              Head {h00=0x0016, h01=0x0050, text=» CALL GETTID,TCT01«, t00=0x002c, t01=0x0166}
0x4634…4650              Head {h00=0x0018, h01=0x0050, text=» SUB TCT01,=X'4B40' «, t00=0x002c, t01=0x0180}
0x4650…467e              Head {h00=0x002a, h01=0x0050, text=»* PERF CONF READ & CONVERT CONFIG DATA«, t00=0x002d, t01=0x000c}
0x467e…469e              Head {h00=0x001c, h01=0x0050, text=» MOVE COPNO,CNFHC(TCT01)«, t00=0x002d, t01=0x003a}
0x469e…46bc              Head {h00=0x001a, h01=0x0050, text=» CBL COPNO,='1',KB050 «, t00=0x002d, t01=0x005a}
0x46bc…46d8              Head {h00=0x0018, h01=0x0050, text=» ADD COPNO,=X'4740' «, t00=0x002d, t01=0x0078}
0x46d8…470a              Head {h00=0x002e, h01=0x0050, text=» MOVE STRG2,OFF(TCT01) GET OFFLINE TASK ID«, t00=0x002d, t01=0x0094}
0x470a…4730              Head {h00=0x0022, h01=0x0050, text=» CBE STRG2,=C'  ',KB050 ANY ? «, t00=0x002d, t01=0x00c6}
0x4730…4756              Head {h00=0x0022, h01=0x0050, text=» PAUSE  YES, WAIT FOR RESTART «, t00=0x002d, t01=0x00ec}
0x4756…4764              Head {h00=0x000a, h01=0x0050, text=»KB050 «, t00=0x002d, t01=0x0112}
0x4764…477e              Head {h00=0x0016, h01=0x0050, text=» CALL VDUKB,TCT01 «, t00=0x002d, t01=0x0120}
0x477e…47a8              Head {h00=0x0026, h01=0x0050, text=» PERF OFFLNE BRANCH TO CREDIT CODE«, t00=0x002d, t01=0x013a}
0x47a8…47d6              Head {h00=0x002a, h01=0x0050, text=» B KB050 RETURN TO IBM-3270 EMULATION «, t00=0x002d, t01=0x0164}
0x47d6…47e4 (46, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0004}
0x47e4…47ec              Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0012}
0x47ec…47f4              Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x001a}
0x47f4…482a              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x002e, t01=0x0022}
0x482a…4834              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0058}
0x4834…4866              Head {h00=0x002e, h01=0x0050, text=»*   START ADDRESS FOR GENERAL PRINTER TASK«, t00=0x002e, t01=0x0062}
0x4866…4870              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0094}
0x4870…48a6              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x002e, t01=0x009e}
0x48a6…48ae              Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x00d4}
0x48ae…48bc              Head {h00=0x000a, h01=0x0050, text=»GTPGO «, t00=0x002e, t01=0x00dc}
0x48bc…48d4              Head {h00=0x0014, h01=0x0050, text=» ADD NBRGTP,='1'«, t00=0x002e, t01=0x00ea}
0x48d4…48ee              Head {h00=0x0016, h01=0x0050, text=» CALL GETTID,TCT01«, t00=0x002e, t01=0x0102}
0x48ee…490a              Head {h00=0x0018, h01=0x0050, text=» SUB TCT01,=X'4740' «, t00=0x002e, t01=0x011c}
0x490a…4928              Head {h00=0x001a, h01=0x0050, text=» MOVE PRINTER,=X'0001'«, t00=0x002e, t01=0x0138}
0x4928…493c              Head {h00=0x0010, h01=0x0050, text=»* PERF CONF «, t00=0x002e, t01=0x0156}
0x493c…4956              Head {h00=0x0016, h01=0x0050, text=» CALL PRINT,TCT01 «, t00=0x002e, t01=0x016a}
0x4956…495e              Head {h00=0x0004, h01=0x0050, t00=0x002e, t01=0x0184}
0x495e…496c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x018c}
0x496c…4974              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x000a}
0x4974…497c              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0012}
0x497c…49b4              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x002f, t01=0x001a}
0x49b4…49be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0052}
0x49be…49e4              Head {h00=0x0022, h01=0x0050, text=»*   START ADDRESS FOR DC-TASK «, t00=0x002f, t01=0x005c}
0x49e4…49ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0082}
0x49ee…4a18              Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002f, t01=0x008c}
0x4a18…4a20              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x00b6}
0x4a20…4a2e              Head {h00=0x000a, h01=0x0050, text=»DC1GO «, t00=0x002f, t01=0x00be}
0x4a2e…4a48              Head {h00=0x0016, h01=0x0050, text=» CALL DCTASK,MF1CU«, t00=0x002f, t01=0x00cc}
0x4a48…4a52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00e6}
0x4a52…4a5a              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x00f0}
0x4a5a…4a68              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x00f8}
0x4a68…4a70              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x0106}
0x4a70…4a78              Head {h00=0x0004, h01=0x0050, t00=0x002f, t01=0x010e}
0x4a78…4a9e              Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x002f, t01=0x0116}
0x4a9e…4aa8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x013c}
0x4aa8…4acc              Head {h00=0x0020, h01=0x0050, text=»*     RESTART OFF LINE TASK «, t00=0x002f, t01=0x0146}
0x4acc…4ad6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x016a}
0x4ad6…4afa              Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x002f, t01=0x0174}
0x4afa…4b02              Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x0008}
0x4b02…4b16              Head {h00=0x0010, h01=0x0050, text=»OFFLNE PROC «, t00=0x0030, t01=0x0010}
0x4b16…4b4c              Head {h00=0x0032, h01=0x0050, text=» MOVE STRG2,OFF(TCT01) GET OFF LINE TASK NAME «, t00=0x0030, t01=0x0024}
0x4b4c…4b7a              Head {h00=0x002a, h01=0x0050, text=» CBE STRG2,=C'  ',RETOFF ANY OFFLINE ?«, t00=0x0030, t01=0x005a}
0x4b7a…4b92              Head {h00=0x0014, h01=0x0050, text=» RSTRT STRG2 YES«, t00=0x0030, t01=0x0088}
0x4b92…4ba0              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x0030, t01=0x00a0}
0x4ba0…4bae              Head {h00=0x000a, h01=0x0050, text=»RETOFF«, t00=0x0030, t01=0x00ae}
0x4bae…4bba              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0030, t01=0x00bc}
0x4bba…4bc8              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0030, t01=0x00c8}
0x4bc8…4bd2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d6}
0x4bd2…4be0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00e0}
0x4be0…4be8              Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x00ee}
0x4be8…4bf0              Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x00f6}
0x4bf0…4c12              Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0030, t01=0x00fe}
0x4c12…4c1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0120}
0x4c1c…4c3e              Head {h00=0x001e, h01=0x0050, text=»*     RESTART ON LINE TASK«, t00=0x0030, t01=0x012a}
0x4c3e…4c48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x014c}
0x4c48…4c6e              Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0030, t01=0x0156}
0x4c6e…4c76              Head {h00=0x0004, h01=0x0050, t00=0x0030, t01=0x017c}
0x4c76…4c8a              Head {h00=0x0010, h01=0x0050, text=»ONLINE PROC «, t00=0x0030, t01=0x0184}
0x4c8a…4cc0              Head {h00=0x0032, h01=0x0050, text=» MOVE GSWSTR2,ON(TTASKNR) GET ONLINE TASK NAME«, t00=0x0031, t01=0x0008}
0x4cc0…4cf0              Head {h00=0x002c, h01=0x0050, text=» CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ?«, t00=0x0031, t01=0x003e}
0x4cf0…4d0a              Head {h00=0x0016, h01=0x0050, text=» RSTRT GSWSTR2 YES«, t00=0x0031, t01=0x006e}
0x4d0a…4d18              Head {h00=0x000a, h01=0x0050, text=» PAUSE«, t00=0x0031, t01=0x0088}
0x4d18…4d26              Head {h00=0x000a, h01=0x0050, text=»RETON «, t00=0x0031, t01=0x0096}
0x4d26…4d32              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0031, t01=0x00a4}
0x4d32…4d40              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0031, t01=0x00b0}
0x4d40…4d4a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00be}
0x4d4a…4d52              Head {h00=0x0004, h01=0x0050, t00=0x0031, t01=0x00c8}
0x4d52…4d5e              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0031, t01=0x00d0}
0x4d5e…4d62              Head {h00=0x4004, h01=0x0000}
0x4d62…4d66              00 31 00 dc                                                                                                                                                                                                                                       ┆ 1  ┆
0x4d66…4d6e (50, 1, 8)   20 04 00 00 00 32 00 04                                                                                                                                                                                                                           ┆     2  ┆
0x4d6e…4dbe (51, 0, 400) f6 a1 49 0e 85 94 82 08 54 08 81 20 80 00 8f 20 4d d0 85 50 00 02 83 90 84 84 9a 8a 82 60 00 d0 1a 02 55 30 83 40 00 d0 93 08 81 2c e3 44 00 02 eb 21 23 23 58 16 83 44 00 28 91 20 00 2a 1b 04 5d 22 84 04 94 0c ed 30 5c 0c 87 0e 17 02 ec 1c   ┆  I     T       M  P         `    U0 @     , D   !##X  D (   *  ]"     0        ┆
0x4dbe…4e0e              58 14 57 66 84 60 00 d2 1c 04 55 18 82 40 00 d2 92 10 ed 48 00 02 5c 10 87 10 97 40 00 d2 ef 0e 58 1a 57 46 82 20 80 00 81 18 f6 a1 5b c4 85 20 00 4e 95 18 84 34 a0 35 57 02 84 14 50 12 85 30 20 bf 83 40 57 ba 83 31 84 41 57 ba 28 40 5f 16   ┆X Wf `    U  @     H       @    X WF        [    N   4 5W   P  0   @W  1 AW (@_ ┆
0x4e0e…4e5e              01 04 85 18 95 20 00 31 9d 20 00 06 04 00 28 40 19 01 8e 20 4b f2 82 a0 00 01 20 bf a0 2f a0 4f 00 02 81 18 91 20 00 0e 85 24 50 0c a0 25 81 34 f7 a1 03 a6 85 04 5c 0a 81 12 02 00 e2 46 00 01 85 16 f6 a1 49 0e 07 00 28 40 83 42 00 02 1b 08   ┆       1      (@    K        / O         $P  % 4             F      I   (@ B    ┆
0x4e5e…4eae              f6 a1 84 b8 82 8a 50 08 83 20 ff fe 20 bf a3 39 f6 a1 84 c0 81 1c 88 20 4d e6 95 20 00 06 e7 34 27 ff 88 20 4b 96 27 f8 1f f8 8c 20 4b 96 ec 35 88 20 4b 96 e4 34 83 20 52 62 20 bf 57 02 83 2c a3 20 ff fe 50 26 87 2c 27 01 58 0e ee 0c 58 12   ┆      P        9        M      4'   K '     K  5  K  4  Rb  W  ,    P& ,' X   X ┆
0x4eae…4efe              07 04 82 0c 92 20 00 31 9a 20 00 06 1f 01 5a 22 92 20 00 06 ec 29 88 20 4b 96 5f 10 28 40 e4 43 00 01 07 b8 28 04 00 01 81 42 00 08 21 01 8c 20 4d d0 8f 20 4b 96 82 40 40 81 10 00 00 11 02 02 00 24 00 20 00 40 20 40 48 22 48 00 00 08 00 a5   ┆       1      Z"     )  K _ (@ C    (    B  !   M   K  @@        $   @ @H"H     ┆
0x4efe…4f4e (52, 0, 400) 48 b6 ea 46 00 04 55 0a 01 08 a9 47 00 08 82 46 00 04 82 47 00 06 f6 a1 49 46 8f 20 4d ce 82 d8 00 26 92 d8 00 28 92 94 83 94 81 18 82 46 00 0c 22 ff 83 46 00 0a 04 00 ec 2b 50 18 84 1c 1c 16 50 2a e4 58 00 02 24 20 54 0a f6 a1 5b 7e 84 10   ┆H  F  U    G   F   G    IF  M    &   (       F  "  F     +P     P* X  $ T   [~  ┆
0x4f4e…4f9e              55 1a 57 08 f6 a1 5b 7e 84 10 52 10 01 00 82 1c 1a 0e 50 3e 82 1c 1a 24 50 38 57 08 81 20 20 00 8f 20 4d d0 82 58 00 28 83 58 00 26 93 0e 84 0c 81 46 00 02 83 08 82 10 20 bf 84 58 00 14 b8 50 ff de 84 40 5e f4 b8 51 ff de 28 40 f6 a1 5d da   ┆U W   [~  R       P>   $P8W       M  X ( X &     F         X   P   @^  Q  (@  ] ┆
0x4f9e…4fee              01 ff e1 2b 83 58 00 5e 56 22 82 1c 1a 16 50 0c 82 1c 1a 22 50 38 1f 24 50 34 57 0a 84 58 00 26 ec 58 00 62 54 28 07 05 3b 41 52 02 07 15 81 18 28 04 ff ff 4d 3a 28 04 00 03 f7 a1 49 92 f6 a1 5c c8 81 04 54 8a 81 20 c0 ff a1 59 00 5e 81 18   ┆   + X ^V"    P    "P8 $P4W  X & X bT(  ;AR     (   M:(     I       T      Y ^  ┆
0x4fee…503e              82 46 00 0c 22 ff 83 46 00 0a e3 c6 00 01 87 44 00 06 27 3f 04 16 ef 10 50 5c 04 0e ef 10 50 28 04 24 ef 10 50 22 85 08 81 8c f6 a1 5c 0e 82 88 a0 49 00 08 a0 49 00 0a 82 14 83 06 82 4b 00 04 83 4b 00 06 e3 cb 00 04 04 18 ef 10 50 12 04 12   ┆ F  "  F       D  '?    P     P( $  P"           I   I       K   K          P   ┆
0x503e…508e              ef 10 50 0c 04 26 ef 10 50 06 f6 a1 5b c4 57 1e e4 44 00 02 24 20 54 16 f6 a1 5b 7e 84 10 54 0e f6 a1 5b a8 57 08 e2 45 00 49 83 45 00 4a 01 00 83 58 00 5e 56 06 a3 20 80 0a 00 00 02 10 00 40 00 21 00 00 00 22 80 00 00 02 00 00 02 04 40 0c   ┆  P  &  P   [ W  D  $ T   [~  T   [ W  E I E J   X ^V          @ !   "        @ ┆

Reduced view