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

⟦4f45eb621⟧

    Length: 23594 (0x5c2a)
    Notes: pts_type(SC)
    Names: »KMD08.SC«

Derivation

└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
    └─⟦this⟧ »OD-KOM/KMD08.SC« 

PTS(SC)

	IDENT KMD08 840308 EV
* 
* 
********************************************************
* 
*     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
 CWB CB7 BATCH TRANSM 
 DWB CD3(CB3) 
	DWB	CD4(CB4) 
 TWB GB1
 TWB GB2
 TWB GB3
 TWB GB4
 TWB TB1
 UWB TB2
 DWB TD2(TB2) 
* 
DCOMM DSET FC=61
DK01 DSET FC=C1	FD999001 CONFDATA 
DK02 DSET FC=C2	FD999002 REGSET 
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 
DK03 DSET FC=C3	FD999003 CYCLE SET
DK04 DSET FC=C4	FD999004 KT PLAN
DSSOPI DSET FC=10 
DSSOPO DSET FC=11 
KCASS DSET FC=12
DK05 DSET FC=C5 
DK06 DSET FC=C6 
DK07 DSET FC=C7 
DK08 DSET FC=C8 
FD03 DSET FC=FA SECOND REGSET (999004)
FD04 DSET FC=FB	VOL 999004
 FMTCTL INDS=KEYB,OUTDS=SCREEN
* 
* 
* 
* 
* 
	START	REGGO
	STACK	256

	EJECT
***************************** 
* 
*              AUTOMATIC BATCH TRANSMISSION 
* 
******************************
	TERM BC
* 
	CWB	CB1
 CWB CB2
 CWB CB3
	CWB	CB4
 CWB CB6
 CWB CB7 BATCH TRANSM 
 DWB CD3(CB3) 
	DWB	CD4(CB4) 
 TWB GB1
 TWB GB2
 TWB GB3
 TWB GB4
 TWB TB1
 UWB TB2
 DWB TD2(TB2) 
* 
DCOMM DSET FC=61
DK01 DSET FC=C1	FD999001 CONFDATA 
DK02 DSET FC=C2	FD999002 REGSET 
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=GP,BUFL=80
KTALLY	DSET	FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH 
SCREEN DSET FC=50,BUFL=56 
KEYB DSET FC=20 
DK03 DSET FC=C3	FD999003 CYCLE SET
DK04 DSET FC=C4	FD999004 KT PLAN
DSSOPI DSET FC=10 
DSSOPO DSET FC=11 
KCASS DSET FC=12
DK05 DSET FC=C5 
DK06 DSET FC=C6 
* 
* 
* 
* 
 FMTCTL INDS=KEYB,OUTDS=SCREEN
* 
* 
* 
* 
* 
 START BCGO 
 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.
* 
********************************************************************


* 
* 
* 
*	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, 
			RDMORE 
STRG2 STRG 8X'00'	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'E2C2'	CU-ADDRESS MF # 1
* 
CNFHC	BINI	(16),'1','2','3','4','5','6','7','8'	HARDCOPY PRINTER
			FOR KB-VDU 1-16
* 
BINWK1	BIN
	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 TRUE T=SPECIAL FIELD 46,TR=8
CFLT48 BOOL TRUE T=SPECIAL FIELD 48,TR=3
CKTAUTO BOOL TRUE T=ASK KORT AFTER TR 4 
CDCFLAG BOOL TRUE 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 FALSE 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
CFLT27 BOOL TRUE T=SPECIAL FIELD 27,TR51,53 
ENDINP	BOOL	FALSE	T=EOF CONVERSION
CDUOVL BOOL FALSE T: DISK OVERLAY 
CDKOFF BOOL FALSE T: DISK STOPPED 
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'
*********************************************************** 
* 
*          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','5','11','12','10','11','12','13',	11-20	C
		'10','11','12','13','14','15','16','1','8','9',	21-30	C 
		'7','4','6','13','14','4','18','19','6','7',	31-40	C
		'18','14','20','21','22','17','6','15','10','1',	41-50	C
		'2','3','4','2','3','4','5','6','7','8',	51-60	C
		'9','10','11','12','13','12','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 ? 
CSPOOL BOOL TRUE T=EL.JOURNAL IS ALLOWED
* 
* 
* 
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
CREGVOL BIN '2' REGISTR. ON VOL 2 
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)
CDUMBUF STRG 512 DUMMY BUFFER FOR VTAM
	EJECT
CB7 BLK 
*          FOR AUTOMATIC BATCH TRANSMISSION 
* 
CBCACTVF BOOL F T: AUTOMATIC BATCH TASK 
			IS ACTIVE
			F: NOT ACTIVE
			ONLY CHANGED IN TASK BC
CBCFLAG	BOOL	F	USED ONLY IN FORMATS 
			T: AUTOMATIC BATCH 
			F: MANUAL BATCH
CBCSENDF	BOOL	F	T: BATCH SENDING IN PROGRESS
			F: NO BATCH SENDING
			RIGHT NOW
CBCWAITF	BOOL	F	T: DO NOT START SENDING 
			A NEW BATCH
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
CBCOPT BIN		OPTION: 
			1: START BC TASK 
			2: STOP BC TASK
			3: INTERRUPT BC TASK 
			4: SEND REST 
			5: ALL SEND
			6: 
			7: 
			8: 
			9: 
* 
* 
* 
CBCFROM BIN		1. RECORD TO SEND, 
			IF >2, MUST BE ADJUSTED
			TO START OF A TRANSACTION

CBCTO	BIN		LAST RECORD TO SEND
			IF ZERO, SEND ALL
CBCANT BIN	'400'	NO OF RECORDS TO SEND
			IN ONE BATCH 
CSENDNR	BIN		CURRENT SEND 
			RECORD NO. 
* 
CBRUGNR BCD 14 BRUGERNAVN 
CKENDNR BCD 6 KENDEORD
* 
CSENDBUF STRG 504 TRANSMIT BUFFER 
CDISKBUF STRG 128 DISK BUFFER 
CPRTBUF STRG 70 PRINT BUFFER FOR TASK BC
* 
* 
* 
* 
* 
	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 
TBCTASK BOOL FALSE T=IN TASK BC 
* 
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 40 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
* 
* 
* 
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 
GTSPECTR BOOL FALSE F=TR 1-12, T= TR 51,53
BDEB BOOL FALSE T=DEBNR, F=NOT DEBNR
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
TSPOOL BOOL FALSE T=EL.JOURNAL IS ON
TERRSKIP BOOL FALSE T: SKIP ERRMES IN ERDK
* 
* 
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
GTRTANT BCD 4D ANTAL RATER TR 51,53 
TWELMIN BIN '0' EL.JOURNAL, BEGIN OF BUFFER 
TWELMAX BIN '900' END OF BUFFER(150SECT.*6) 
TWELPNT BIN '0' POINTER IN OPSTART
TWELSTRT BIN '0' BEFORE NEXT TO PRINT 
TWELSLUT BIN '0' FIRST FREE RECORD
TSELBUF STRG 60 BUFFER FOR EL.JOURNAL 
	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	2	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 
	EXT	OFFLNE	OFFLINE START ADDRESS 
 EXT BCGO AUTOMATIC BATCH TRANSM
* 
	DSC0	DSDC,2	DUMMY REFERENCE T:IO 

****************************************
* 
*     START OF REGISTRATION 
* 
****************************************
* 
REGGO 
REG10 
 MOVE GSWBIN1,CBIN13 LENGTH CTTXT07 
 MOVE GSWBIN2,CBIN0 
 MOVE GSWSTR1,='*'
 MATCH CTTXT07,GSWBIN2,GSWBIN1,GSWSTR1,CBIN0,CBIN1
 BNOK REG20 
 MOVE GSWSTR1,=X'5C'
 XCOPY CTTXT07,GSWBIN2,CBIN1,GSWSTR1,CBIN0
 B REG10 MORE OE'S??
REG20 
 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' 
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
* 


	END

HexDump

0x0000…001e (0, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» IDENT KMD08 840308 EV«, t00=0x0000, t01=0x0004}
0x001e…0028              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0022}
0x0028…0032              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x002c}
0x0032…0072              Head {h00=0x003c, h01=0x0050, text=»********************************************************«, t00=0x0000, t01=0x0036}
0x0072…007c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0076}
0x007c…00b4              Head {h00=0x0034, h01=0x0050, text=»*     THIS IS THE MAIN MODULE FOR KMDAPLICATION «, t00=0x0000, t01=0x0080}
0x00b4…00ea              Head {h00=0x0032, h01=0x0050, text=»*     CONTAINING THE CWB'S, TWB'S AND INITIAL «, t00=0x0000, t01=0x00b8}
0x00ea…0108              Head {h00=0x001a, h01=0x0050, text=»*        START POINTS «, t00=0x0000, t01=0x00ee}
0x0108…0112              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x0112…011c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x011c…0126              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…0160              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x012a}
0x0160…016e              Head {h00=0x000a, h01=0x0050, text=» DDIV «, t00=0x0000, t01=0x0164}
0x016e…0186              Head {h00=0x0014, h01=0x0050, text=»* OPTNS LINES=45«, t00=0x0000, t01=0x0172}
0x0186…01c2              Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x018a}
0x01c2…01cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x01cc…01f4              Head {h00=0x0024, h01=0x0050, text=»*           TRANSACTION TASK  TC«, t00=0x0001, t01=0x0040}
0x01f4…01fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0068}
0x01fe…023a              Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0001, t01=0x0072}
0x023a…024a              Head {h00=0x000c, h01=0x0050, text=» TERM TC«, t00=0x0001, t01=0x00ae}
0x024a…0254              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00be}
0x0254…0264              Head {h00=0x000c, h01=0x0050, text=» CWB CB1«, t00=0x0001, t01=0x00c8}
0x0264…0274              Head {h00=0x000c, h01=0x0050, text=» CWB CB2«, t00=0x0001, t01=0x00d8}
0x0274…0284              Head {h00=0x000c, h01=0x0050, text=» CWB CB3«, t00=0x0001, t01=0x00e8}
0x0284…0294              Head {h00=0x000c, h01=0x0050, text=» CWB CB4«, t00=0x0001, t01=0x00f8}
0x0294…02a4              Head {h00=0x000c, h01=0x0050, text=» CWB CB6«, t00=0x0001, t01=0x0108}
0x02a4…02c2              Head {h00=0x001a, h01=0x0050, text=» CWB CB7 BATCH TRANSM «, t00=0x0001, t01=0x0118}
0x02c2…02d8              Head {h00=0x0012, h01=0x0050, text=» DWB CD3(CB3) «, t00=0x0001, t01=0x0136}
0x02d8…02ee              Head {h00=0x0012, h01=0x0050, text=» DWB CD4(CB4) «, t00=0x0001, t01=0x014c}
0x02ee…02fe              Head {h00=0x000c, h01=0x0050, text=» TWB GB1«, t00=0x0001, t01=0x0162}
0x02fe…030e              Head {h00=0x000c, h01=0x0050, text=» TWB GB2«, t00=0x0001, t01=0x0172}
0x030e…031e              Head {h00=0x000c, h01=0x0050, text=» TWB GB3«, t00=0x0001, t01=0x0182}
0x031e…032e (2, 0, 400)  Head {h00=0x000c, h01=0x0050, text=» TWB GB4«, t00=0x0002, t01=0x0004}
0x032e…033e              Head {h00=0x000c, h01=0x0050, text=» TWB TB1«, t00=0x0002, t01=0x0014}
0x033e…034e              Head {h00=0x000c, h01=0x0050, text=» UWB TB2«, t00=0x0002, t01=0x0024}
0x034e…0364              Head {h00=0x0012, h01=0x0050, text=» DWB TD2(TB2) «, t00=0x0002, t01=0x0034}
0x0364…036e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004a}
0x036e…0386              Head {h00=0x0014, h01=0x0050, text=»DCOMM DSET FC=61«, t00=0x0002, t01=0x0054}
0x0386…03b0              Head {h00=0x0026, h01=0x0050, text=»DK01 DSET FC=C1 FD999001 CONFDATA «, t00=0x0002, t01=0x006c}
0x03b0…03d8              Head {h00=0x0024, h01=0x0050, text=»DK02 DSET FC=C2 FD999002 REGSET «, t00=0x0002, t01=0x0096}
0x03d8…03fa              Head {h00=0x001e, h01=0x0050, text=»FD01 DSET FC=F8 VOL 999001«, t00=0x0002, t01=0x00be}
0x03fa…041c              Head {h00=0x001e, h01=0x0050, text=»FD02 DSET FC=F9 VOL 999002«, t00=0x0002, t01=0x00e0}
0x041c…0446              Head {h00=0x0026, h01=0x0050, text=»KVOUCH DSET FC=31,DEV=TV,BUFL=100 «, t00=0x0002, t01=0x0102}
0x0446…047c              Head {h00=0x0032, h01=0x0050, text=»KJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH «, t00=0x0002, t01=0x012c}
0x047c…04b2              Head {h00=0x0032, h01=0x0050, text=»KTALLY DSET FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH «, t00=0x0002, t01=0x0162}
0x04b2…04d4              Head {h00=0x001e, h01=0x0050, text=»SCREEN DSET FC=50,BUFL=56 «, t00=0x0003, t01=0x0008}
0x04d4…04ec              Head {h00=0x0014, h01=0x0050, text=»KEYB DSET FC=20 «, t00=0x0003, t01=0x002a}
0x04ec…0516              Head {h00=0x0026, h01=0x0050, text=»DK03 DSET FC=C3 FD999003 CYCLE SET«, t00=0x0003, t01=0x0042}
0x0516…053e              Head {h00=0x0024, h01=0x0050, text=»DK04 DSET FC=C4 FD999004 KT PLAN«, t00=0x0003, t01=0x006c}
0x053e…0558              Head {h00=0x0016, h01=0x0050, text=»DSSOPI DSET FC=10 «, t00=0x0003, t01=0x0094}
0x0558…0572              Head {h00=0x0016, h01=0x0050, text=»DSSOPO DSET FC=11 «, t00=0x0003, t01=0x00ae}
0x0572…058a              Head {h00=0x0014, h01=0x0050, text=»KCASS DSET FC=12«, t00=0x0003, t01=0x00c8}
0x058a…05a2              Head {h00=0x0014, h01=0x0050, text=»DK05 DSET FC=C5 «, t00=0x0003, t01=0x00e0}
0x05a2…05ba              Head {h00=0x0014, h01=0x0050, text=»DK06 DSET FC=C6 «, t00=0x0003, t01=0x00f8}
0x05ba…05d2              Head {h00=0x0014, h01=0x0050, text=»DK07 DSET FC=C7 «, t00=0x0003, t01=0x0110}
0x05d2…05ea              Head {h00=0x0014, h01=0x0050, text=»DK08 DSET FC=C8 «, t00=0x0003, t01=0x0128}
0x05ea…0618              Head {h00=0x002a, h01=0x0050, text=»FD03 DSET FC=FA SECOND REGSET (999004)«, t00=0x0003, t01=0x0140}
0x0618…063a              Head {h00=0x001e, h01=0x0050, text=»FD04 DSET FC=FB VOL 999004«, t00=0x0003, t01=0x016e}
0x063a…0660              Head {h00=0x0022, h01=0x0050, text=» FMTCTL INDS=KEYB,OUTDS=SCREEN«, t00=0x0003, t01=0x0190}
0x0660…066a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0026}
0x066a…0674              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0030}
0x0674…067e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003a}
0x067e…0688              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0044}
0x0688…0692              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x004e}
0x0692…06a6              Head {h00=0x0010, h01=0x0050, text=» START REGGO«, t00=0x0004, t01=0x0058}
0x06a6…06b8              Head {h00=0x000e, h01=0x0050, text=» STACK 256«, t00=0x0004, t01=0x006c}
0x06b8…06c0              Head {h00=0x0004, h01=0x0050, t00=0x0004, t01=0x007e}
0x06c0…06ce              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0086}
0x06ce…06f4              Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0004, t01=0x0094}
0x06f4…06fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ba}
0x06fe…0732              Head {h00=0x0030, h01=0x0050, text=»*              AUTOMATIC BATCH TRANSMISSION «, t00=0x0004, t01=0x00c4}
0x0732…073c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f8}
0x073c…0762              Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0004, t01=0x0102}
0x0762…0772              Head {h00=0x000c, h01=0x0050, text=» TERM BC«, t00=0x0004, t01=0x0128}
0x0772…077c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0138}
0x077c…078c              Head {h00=0x000c, h01=0x0050, text=» CWB CB1«, t00=0x0004, t01=0x0142}
0x078c…079c              Head {h00=0x000c, h01=0x0050, text=» CWB CB2«, t00=0x0004, t01=0x0152}
0x079c…07ac              Head {h00=0x000c, h01=0x0050, text=» CWB CB3«, t00=0x0004, t01=0x0162}
0x07ac…07bc              Head {h00=0x000c, h01=0x0050, text=» CWB CB4«, t00=0x0004, t01=0x0172}
0x07bc…07cc              Head {h00=0x000c, h01=0x0050, text=» CWB CB6«, t00=0x0004, t01=0x0182}
0x07cc…07ea (5, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» CWB CB7 BATCH TRANSM «, t00=0x0005, t01=0x0004}
0x07ea…0800              Head {h00=0x0012, h01=0x0050, text=» DWB CD3(CB3) «, t00=0x0005, t01=0x0022}
0x0800…0816              Head {h00=0x0012, h01=0x0050, text=» DWB CD4(CB4) «, t00=0x0005, t01=0x0038}
0x0816…0826              Head {h00=0x000c, h01=0x0050, text=» TWB GB1«, t00=0x0005, t01=0x004e}
0x0826…0836              Head {h00=0x000c, h01=0x0050, text=» TWB GB2«, t00=0x0005, t01=0x005e}
0x0836…0846              Head {h00=0x000c, h01=0x0050, text=» TWB GB3«, t00=0x0005, t01=0x006e}
0x0846…0856              Head {h00=0x000c, h01=0x0050, text=» TWB GB4«, t00=0x0005, t01=0x007e}
0x0856…0866              Head {h00=0x000c, h01=0x0050, text=» TWB TB1«, t00=0x0005, t01=0x008e}
0x0866…0876              Head {h00=0x000c, h01=0x0050, text=» UWB TB2«, t00=0x0005, t01=0x009e}
0x0876…088c              Head {h00=0x0012, h01=0x0050, text=» DWB TD2(TB2) «, t00=0x0005, t01=0x00ae}
0x088c…0896              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c4}
0x0896…08ae              Head {h00=0x0014, h01=0x0050, text=»DCOMM DSET FC=61«, t00=0x0005, t01=0x00ce}
0x08ae…08d8              Head {h00=0x0026, h01=0x0050, text=»DK01 DSET FC=C1 FD999001 CONFDATA «, t00=0x0005, t01=0x00e6}
0x08d8…0900              Head {h00=0x0024, h01=0x0050, text=»DK02 DSET FC=C2 FD999002 REGSET «, t00=0x0005, t01=0x0110}
0x0900…0922              Head {h00=0x001e, h01=0x0050, text=»FD01 DSET FC=F8 VOL 999001«, t00=0x0005, t01=0x0138}
0x0922…0944              Head {h00=0x001e, h01=0x0050, text=»FD02 DSET FC=F9 VOL 999002«, t00=0x0005, t01=0x015a}
0x0944…096e              Head {h00=0x0026, h01=0x0050, text=»KVOUCH DSET FC=31,DEV=TV,BUFL=100 «, t00=0x0005, t01=0x017c}
0x096e…0996              Head {h00=0x0024, h01=0x0050, text=»KJTAPE DSET FC=30,DEV=GP,BUFL=80«, t00=0x0006, t01=0x0016}
0x0996…09cc              Head {h00=0x0032, h01=0x0050, text=»KTALLY DSET FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH «, t00=0x0006, t01=0x003e}
0x09cc…09ee              Head {h00=0x001e, h01=0x0050, text=»SCREEN DSET FC=50,BUFL=56 «, t00=0x0006, t01=0x0074}
0x09ee…0a06              Head {h00=0x0014, h01=0x0050, text=»KEYB DSET FC=20 «, t00=0x0006, t01=0x0096}
0x0a06…0a30              Head {h00=0x0026, h01=0x0050, text=»DK03 DSET FC=C3 FD999003 CYCLE SET«, t00=0x0006, t01=0x00ae}
0x0a30…0a58              Head {h00=0x0024, h01=0x0050, text=»DK04 DSET FC=C4 FD999004 KT PLAN«, t00=0x0006, t01=0x00d8}
0x0a58…0a72              Head {h00=0x0016, h01=0x0050, text=»DSSOPI DSET FC=10 «, t00=0x0006, t01=0x0100}
0x0a72…0a8c              Head {h00=0x0016, h01=0x0050, text=»DSSOPO DSET FC=11 «, t00=0x0006, t01=0x011a}
0x0a8c…0aa4              Head {h00=0x0014, h01=0x0050, text=»KCASS DSET FC=12«, t00=0x0006, t01=0x0134}
0x0aa4…0abc              Head {h00=0x0014, h01=0x0050, text=»DK05 DSET FC=C5 «, t00=0x0006, t01=0x014c}
0x0abc…0ad4              Head {h00=0x0014, h01=0x0050, text=»DK06 DSET FC=C6 «, t00=0x0006, t01=0x0164}
0x0ad4…0ade              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x017c}
0x0ade…0ae8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0186}
0x0ae8…0af2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0190}
0x0af2…0afc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000a}
0x0afc…0b22              Head {h00=0x0022, h01=0x0050, text=» FMTCTL INDS=KEYB,OUTDS=SCREEN«, t00=0x0007, t01=0x0014}
0x0b22…0b2c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003a}
0x0b2c…0b36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0044}
0x0b36…0b40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004e}
0x0b40…0b4a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0058}
0x0b4a…0b54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0062}
0x0b54…0b68              Head {h00=0x0010, h01=0x0050, text=» START BCGO «, t00=0x0007, t01=0x006c}
0x0b68…0b7a              Head {h00=0x000e, h01=0x0050, text=» STACK 160«, t00=0x0007, t01=0x0080}
0x0b7a…0b84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0092}
0x0b84…0b92              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x009c}
0x0b92…0be2              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0007, t01=0x00aa}
0x0be2…0bec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fa}
0x0bec…0c36              Head {h00=0x0046, h01=0x0050, text=»*   D A T D I V  :  DATA DIVISION FOR IBM-3270 EMULATION PACKAGE. «, t00=0x0007, t01=0x0104}
0x0c36…0c7c              Head {h00=0x0042, h01=0x0050, text=»*                   THIS MODULE ALSO CONTAINS THE CREDIT CODED«, t00=0x0007, t01=0x014e}
0x0c7c…0caa (8, 0, 400)  Head {h00=0x002a, h01=0x0050, text=»*                   START-UP ROUTINES.«, t00=0x0008, t01=0x0004}
0x0caa…0cb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0032}
0x0cb4…0d00              Head {h00=0x0048, h01=0x0050, text=»********************************************************************«, t00=0x0008, t01=0x003c}
0x0d00…0d08              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0088}
0x0d08…0d10              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0090}
0x0d10…0d1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0098}
0x0d1a…0d24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00a2}
0x0d24…0d2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ac}
0x0d2e…0d46              Head {h00=0x0014, h01=0x0050, text=»* DATA DIVISION «, t00=0x0008, t01=0x00b6}
0x0d46…0d50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ce}
0x0d50…0d5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d8}
0x0d5a…0d64              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e2}
0x0d64…0d84              Head {h00=0x001c, h01=0x0050, text=»*       KB/VDU TERMINAL «, t00=0x0008, t01=0x00ec}
0x0d84…0d8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x010c}
0x0d8e…0d9e              Head {h00=0x000c, h01=0x0050, text=» TERM KA«, t00=0x0008, t01=0x0116}
0x0d9e…0da8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0126}
0x0da8…0db8              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x0008, t01=0x0130}
0x0db8…0dc8              Head {h00=0x000c, h01=0x0050, text=» TWB TB9«, t00=0x0008, t01=0x0140}
0x0dc8…0dd2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0150}
0x0dd2…0de6              Head {h00=0x0010, h01=0x0050, text=» START KBVGO«, t00=0x0008, t01=0x015a}
0x0de6…0df0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x016e}
0x0df0…0e08              Head {h00=0x0014, h01=0x0050, text=»DSDC DSET FC=61 «, t00=0x0008, t01=0x0178}
0x0e08…0e30              Head {h00=0x0024, h01=0x0050, text=»DSICR DSET FC=E0,DEV=II COPCMD=1«, t00=0x0008, t01=0x0190}
0x0e30…0e50              Head {h00=0x001c, h01=0x0050, text=»DSICW DSET FC=E1,DEV=IO «, t00=0x0009, t01=0x0028}
0x0e50…0e78              Head {h00=0x0024, h01=0x0050, text=»DSVDU DSET FC=50,DEV=DY,BUFL=162«, t00=0x0009, t01=0x0048}
0x0e78…0ea0              Head {h00=0x0024, h01=0x0050, text=»DSKBAN DSET FC=20,DEV=KA,BUFL=2 «, t00=0x0009, t01=0x0070}
0x0ea0…0ec8              Head {h00=0x0024, h01=0x0050, text=»DSKBSD DSET FC=40,DEV=KI,BUFL=2 «, t00=0x0009, t01=0x0098}
0x0ec8…0ed6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00c0}
0x0ed6…0ee0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ce}
0x0ee0…0eea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d8}
0x0eea…0f00              Head {h00=0x0012, h01=0x0050, text=»* GTP TERMINAL«, t00=0x0009, t01=0x00e2}
0x0f00…0f0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f8}
0x0f0a…0f14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0102}
0x0f14…0f24              Head {h00=0x000c, h01=0x0050, text=» TERM GA«, t00=0x0009, t01=0x010c}
0x0f24…0f2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x011c}
0x0f2e…0f3e              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x0009, t01=0x0126}
0x0f3e…0f4e              Head {h00=0x000c, h01=0x0050, text=» TWB TB9«, t00=0x0009, t01=0x0136}
0x0f4e…0f58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0146}
0x0f58…0f6c              Head {h00=0x0010, h01=0x0050, text=» START GTPGO«, t00=0x0009, t01=0x0150}
0x0f6c…0f76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0164}
0x0f76…0f8e              Head {h00=0x0014, h01=0x0050, text=»DSDC DSET FC=61 «, t00=0x0009, t01=0x016e}
0x0f8e…0fae              Head {h00=0x001c, h01=0x0050, text=»DSICR DSET FC=E0,DEV=II «, t00=0x0009, t01=0x0186}
0x0fae…0fd6              Head {h00=0x0024, h01=0x0050, text=»DSICW DSET FC=E1,DEV=IO COPCMD=1«, t00=0x000a, t01=0x0016}
0x0fd6…0ffe              Head {h00=0x0024, h01=0x0050, text=»DSGTP DSET FC=30,DEV=GP,BUFL=162«, t00=0x000a, t01=0x003e}
0x0ffe…100c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0066}
0x100c…1016              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0074}
0x1016…1020              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x007e}
0x1020…1030              Head {h00=0x000c, h01=0x0050, text=»* DCTASK«, t00=0x000a, t01=0x0088}
0x1030…103a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0098}
0x103a…1044              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a2}
0x1044…1054              Head {h00=0x000c, h01=0x0050, text=» TERM D0«, t00=0x000a, t01=0x00ac}
0x1054…105e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00bc}
0x105e…106e              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x000a, t01=0x00c6}
0x106e…1082              Head {h00=0x0010, h01=0x0050, text=» START DC1GO«, t00=0x000a, t01=0x00d6}
0x1082…109a              Head {h00=0x0014, h01=0x0050, text=»DSDC DSET FC=60 «, t00=0x000a, t01=0x00ea}
0x109a…10a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0102}
0x10a4…10b2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x010c}
0x10b2…10bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x011a}
0x10bc…10c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0124}
0x10c6…10fe              Head {h00=0x0034, h01=0x0050, text=»*      WORK AREA FOR KEYBOARD AND DISPLAY TASKS «, t00=0x000a, t01=0x012e}
0x10fe…1108              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0166}
0x1108…1112              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0170}
0x1112…1122              Head {h00=0x000c, h01=0x0050, text=»TB9 BLK «, t00=0x000a, t01=0x017a}
0x1122…112c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x018a}
0x112c…1156 (11, 0, 400) Head {h00=0x0026, h01=0x0050, text=»TCT01 BIN 4X'0' TID AND STACKBASE «, t00=0x000b, t01=0x0004}
0x1156…1184              Head {h00=0x002a, h01=0x0050, text=»PRINTER STRG 4X'0' KEYBARD/VDU/PRINTER«, t00=0x000b, t01=0x002e}
0x1184…11ae              Head {h00=0x0026, h01=0x0050, text=»BVDU STRG 3840X'0' VDU SCREEN BUFF«, t00=0x000b, t01=0x005c}
0x11ae…11da              Head {h00=0x0028, h01=0x0050, text=»PCURS STRG 4X'0' CURSOR ADDR. BINARY«, t00=0x000b, t01=0x0086}
0x11da…120c              Head {h00=0x002e, h01=0x0050, text=»ATTRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER«, t00=0x000b, t01=0x00b2}
0x120c…1236              Head {h00=0x0026, h01=0x0050, text=»CURATT STRG 4X'0' CURSOR ATTRIBUTE«, t00=0x000b, t01=0x00e4}
0x1236…125e              Head {h00=0x0024, h01=0x0050, text=»WCC STRG 4X'0' WCC/CCC CHARACTER«, t00=0x000b, t01=0x010e}
0x125e…128e              Head {h00=0x002c, h01=0x0050, text=»KBINH STRG 4X'0' KEYBOARD INHIBIT INDIC.«, t00=0x000b, t01=0x0136}
0x128e…12a8              Head {h00=0x0016, h01=0x0050, text=»LINCNT STRG 4X'0' «, t00=0x000b, t01=0x0166}
0x12a8…12da              Head {h00=0x002e, h01=0x0050, text=»DCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH«, t00=0x000b, t01=0x0180}
0x12da…12f4              Head {h00=0x0016, h01=0x0050, text=»ICWORK STRG 4X'0' «, t00=0x000c, t01=0x0022}
0x12f4…1322              Head {h00=0x002a, h01=0x0050, text=»INTATT STRG 4X'0' INTENSITY ATTRIBUTE «, t00=0x000c, t01=0x003c}
0x1322…1348              Head {h00=0x0022, h01=0x0050, text=»OFFFLG STRG 4X'0' OFFLINE FLAG«, t00=0x000c, t01=0x006a}
0x1348…136c              Head {h00=0x0020, h01=0x0050, text=»COPNO BIN  TID FOR HARDCOPY «, t00=0x000c, t01=0x0090}
0x136c…1390              Head {h00=0x0020, h01=0x0050, text=»MISCAR STRG 44X'0' CCC,MAIN,«, t00=0x000c, t01=0x00b4}
0x1390…13b4              Head {h00=0x0020, h01=0x0050, text=»   MODE,KEYS,ECBDCC,ECBBLK, «, t00=0x000c, t01=0x00d8}
0x13b4…13c6              Head {h00=0x000e, h01=0x0050, text=»   RDMORE «, t00=0x000c, t01=0x00fc}
0x13c6…13e2              Head {h00=0x0018, h01=0x0050, text=»STRG2 STRG 8X'00' DK«, t00=0x000c, t01=0x010e}
0x13e2…13f0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x012a}
0x13f0…1406              Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000c, t01=0x0138}
0x1406…1410              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014e}
0x1410…143c              Head {h00=0x0028, h01=0x0050, text=»*   COMMON WORK BLOCK FOR ALL TASKS «, t00=0x000c, t01=0x0158}
0x143c…1446              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0184}
0x1446…1478              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x000c, t01=0x018e}
0x1478…1480              Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0030}
0x1480…1490              Head {h00=0x000c, h01=0x0050, text=»CB9 BLK «, t00=0x000d, t01=0x0038}
0x1490…149a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0048}
0x149a…14ae              Head {h00=0x0010, h01=0x0050, text=»CNFIGD BOOL «, t00=0x000d, t01=0x0052}
0x14ae…14c2              Head {h00=0x0010, h01=0x0050, text=»CNFBSY BOOL «, t00=0x000d, t01=0x0066}
0x14c2…14cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007a}
0x14cc…14ea              Head {h00=0x001a, h01=0x0050, text=»*  CONFIGURATION DATA «, t00=0x000d, t01=0x0084}
0x14ea…14f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a2}
0x14f4…151a              Head {h00=0x0022, h01=0x0050, text=»NBRKBV BIN  NUMBER OF KB/VDUS «, t00=0x000d, t01=0x00ac}
0x151a…153c              Head {h00=0x001e, h01=0x0050, text=»NBRGTP BIN  NUMBER OF GTPS«, t00=0x000d, t01=0x00d2}
0x153c…1546              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f4}
0x1546…1584              Head {h00=0x003a, h01=0x0050, text=»MF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV ADDRESSES KB/VDU «, t00=0x000d, t01=0x00fe}
0x1584…15be              Head {h00=0x0036, h01=0x0050, text=»MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADDRESSES GTP«, t00=0x000d, t01=0x013c}
0x15be…160a              Head {h00=0x0048, h01=0x0050, text=»* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED«, t00=0x000d, t01=0x0176}
0x160a…1614              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0032}
0x1614…1640              Head {h00=0x0028, h01=0x0050, text=»MF1CU STRG X'E2C2' CU-ADDRESS MF # 1«, t00=0x000e, t01=0x003c}
0x1640…164a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0068}
0x164a…1692              Head {h00=0x0044, h01=0x0050, text=»CNFHC BINI (16),'1','2','3','4','5','6','7','8' HARDCOPY PRINTER«, t00=0x000e, t01=0x0072}
0x1692…16ac              Head {h00=0x0016, h01=0x0050, text=»   FOR KB-VDU 1-16«, t00=0x000e, t01=0x00ba}
0x16ac…16b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d4}
0x16b6…16c8              Head {h00=0x000e, h01=0x0050, text=»BINWK1 BIN«, t00=0x000e, t01=0x00de}
0x16c8…16d6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00f0}
0x16d6…16ec              Head {h00=0x0012, h01=0x0050, text=»* CWB 1 COMMON«, t00=0x000e, t01=0x00fe}
0x16ec…16f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0114}
0x16f6…1700              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011e}
0x1700…170a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0128}
0x170a…1714              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0132}
0x1714…171e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x013c}
0x171e…172e              Head {h00=0x000c, h01=0x0050, text=»CB1 BLK «, t00=0x000e, t01=0x0146}
0x172e…1760              Head {h00=0x002e, h01=0x0050, text=»CBKOFLG BOOL FALSE T=ALL BKO-CODES ALLOWED«, t00=0x000e, t01=0x0156}
0x1760…1794              Head {h00=0x0030, h01=0x0050, text=»CKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT«, t00=0x000e, t01=0x0188}
0x1794…17c6              Head {h00=0x002e, h01=0x0050, text=»CCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK«, t00=0x000f, t01=0x002c}
0x17c6…17fa              Head {h00=0x0030, h01=0x0050, text=»CTESTFLG BOOL FALSE T=CONVERSION, TEST MODE «, t00=0x000f, t01=0x005e}
0x17fa…182a              Head {h00=0x002c, h01=0x0050, text=»CTRVALG BOOL FALSE T: SKOVBO. F: VIBORG «, t00=0x000f, t01=0x0092}
0x182a…185a              Head {h00=0x002c, h01=0x0050, text=»CFLT46 BOOL TRUE T=SPECIAL FIELD 46,TR=8«, t00=0x000f, t01=0x00c2}
0x185a…188a              Head {h00=0x002c, h01=0x0050, text=»CFLT48 BOOL TRUE T=SPECIAL FIELD 48,TR=3«, t00=0x000f, t01=0x00f2}
0x188a…18ba              Head {h00=0x002c, h01=0x0050, text=»CKTAUTO BOOL TRUE T=ASK KORT AFTER TR 4 «, t00=0x000f, t01=0x0122}
0x18ba…18f0              Head {h00=0x0032, h01=0x0050, text=»CDCFLAG BOOL TRUE T=INCLUDES DATATRANSMISSION «, t00=0x000f, t01=0x0152}
0x18f0…1922              Head {h00=0x002e, h01=0x0050, text=»CCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET «, t00=0x000f, t01=0x0188}
0x1922…1958              Head {h00=0x0032, h01=0x0050, text=»CADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22)«, t00=0x0010, t01=0x002a}
0x1958…197c              Head {h00=0x0020, h01=0x0050, text=»C5MDISK BOOL FALSE T=5M DISK«, t00=0x0010, t01=0x0060}
0x197c…19ac              Head {h00=0x002c, h01=0x0050, text=»CKASFLG BOOL FALSE T=BACKUP ON CASSETTE «, t00=0x0010, t01=0x0084}
0x19ac…19e4              Head {h00=0x0034, h01=0x0050, text=»CSLDFLG BOOL TRUE T=GL.SALDO PRESENT(CKTFLAG=T) «, t00=0x0010, t01=0x00b4}
0x19e4…1a14              Head {h00=0x002c, h01=0x0050, text=»CGLREGFL BOOL FALSE T=GL REGSET PRESENT «, t00=0x0010, t01=0x00ec}
0x1a14…1a42              Head {h00=0x002a, h01=0x0050, text=»CCONVERT BOOL FALSE T=CONVERSION MODE «, t00=0x0010, t01=0x011c}
0x1a42…1a58              Head {h00=0x0012, h01=0x0050, text=»CBIN0 BIN '0' «, t00=0x0010, t01=0x014a}
0x1a58…1a6e              Head {h00=0x0012, h01=0x0050, text=»CBIN1 BIN '1' «, t00=0x0010, t01=0x0160}
0x1a6e…1a84              Head {h00=0x0012, h01=0x0050, text=»CBIN2 BIN '2' «, t00=0x0010, t01=0x0176}
0x1a84…1a9a              Head {h00=0x0012, h01=0x0050, text=»CBIN3 BIN '3' «, t00=0x0010, t01=0x018c}
0x1a9a…1ab0              Head {h00=0x0012, h01=0x0050, text=»CBIN4 BIN '4' «, t00=0x0011, t01=0x0012}
0x1ab0…1ac6              Head {h00=0x0012, h01=0x0050, text=»CBIN5 BIN '5' «, t00=0x0011, t01=0x0028}
0x1ac6…1adc              Head {h00=0x0012, h01=0x0050, text=»CBIN6 BIN '6' «, t00=0x0011, t01=0x003e}
0x1adc…1af2              Head {h00=0x0012, h01=0x0050, text=»CBIN7 BIN '7' «, t00=0x0011, t01=0x0054}
0x1af2…1b08              Head {h00=0x0012, h01=0x0050, text=»CBIN8 BIN '8' «, t00=0x0011, t01=0x006a}
0x1b08…1b1e              Head {h00=0x0012, h01=0x0050, text=»CBIN9 BIN '9' «, t00=0x0011, t01=0x0080}
0x1b1e…1b36              Head {h00=0x0014, h01=0x0050, text=»CBIN10 BIN '10' «, t00=0x0011, t01=0x0096}
0x1b36…1b4e              Head {h00=0x0014, h01=0x0050, text=»CBIN11 BIN '11' «, t00=0x0011, t01=0x00ae}
0x1b4e…1b9a              Head {h00=0x0048, h01=0x0050, text=»WEIGTH BCDI (13),'2','7','6','5','4','3','2','7','6','5','4','3','2'«, t00=0x0011, t01=0x00c6}
0x1b9a…1be8              Head {h00=0x004a, h01=0x0050, text=»WEIGTH1 BCDI (13),'7','6','5','4','3','2','7','6','5','4','3','2','1' «, t00=0x0011, t01=0x0112}
0x1be8…1bf2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0160}
0x1bf2…1c00              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x016a}
0x1c00…1c10              Head {h00=0x000c, h01=0x0050, text=»CB2 BLK «, t00=0x0011, t01=0x0178}
0x1c10…1c1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0188}
0x1c1a…1c44 (18, 0, 400) Head {h00=0x0026, h01=0x0050, text=»CPFLG BOOL FALSE T: DISK OCCUPIED «, t00=0x0012, t01=0x0004}
0x1c44…1c70              Head {h00=0x0028, h01=0x0050, text=»CSPLITFL BOOL FALSE T: SPLIT RECORD «, t00=0x0012, t01=0x002e}
0x1c70…1c96              Head {h00=0x0022, h01=0x0050, text=»CWFLAG BOOL FALSE F=COLD START«, t00=0x0012, t01=0x005a}
0x1c96…1cbc              Head {h00=0x0022, h01=0x0050, text=»CREMITFL BOOL FALSE F=NO REMIT«, t00=0x0012, t01=0x0080}
0x1cbc…1ce6              Head {h00=0x0026, h01=0x0050, text=»CSKIFTFL BOOL FALSE T=FD CHANGING «, t00=0x0012, t01=0x00a6}
0x1ce6…1d12              Head {h00=0x0028, h01=0x0050, text=»CEORFLG BOOL FALSE T=END OF A RECORD«, t00=0x0012, t01=0x00d0}
0x1d12…1d46              Head {h00=0x0030, h01=0x0050, text=»CCOLDFLG BOOL FALSE T=VERY FIRST COLD START «, t00=0x0012, t01=0x00fc}
0x1d46…1d78              Head {h00=0x002e, h01=0x0050, text=»CERRORFL BOOL FALSE T=ERROR IN COLD START «, t00=0x0012, t01=0x0130}
0x1d78…1daa              Head {h00=0x002e, h01=0x0050, text=»CCONVFLG BOOL FALSE T=CONVERSION GOING ON «, t00=0x0012, t01=0x0162}
0x1daa…1dd2 (19, 0, 400) Head {h00=0x0024, h01=0x0050, text=»CSWFLAG BOOL FALSE SCRATCH FLAG «, t00=0x0013, t01=0x0004}
0x1dd2…1e08              Head {h00=0x0032, h01=0x0050, text=»CSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE «, t00=0x0013, t01=0x002c}
0x1e08…1e3a              Head {h00=0x002e, h01=0x0050, text=»CKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN«, t00=0x0013, t01=0x0062}
0x1e3a…1e6e              Head {h00=0x0030, h01=0x0050, text=»CFLT27 BOOL TRUE T=SPECIAL FIELD 27,TR51,53 «, t00=0x0013, t01=0x0094}
0x1e6e…1e98              Head {h00=0x0026, h01=0x0050, text=»ENDINP BOOL FALSE T=EOF CONVERSION«, t00=0x0013, t01=0x00c8}
0x1e98…1ec2              Head {h00=0x0026, h01=0x0050, text=»CDUOVL BOOL FALSE T: DISK OVERLAY «, t00=0x0013, t01=0x00f2}
0x1ec2…1eec              Head {h00=0x0026, h01=0x0050, text=»CDKOFF BOOL FALSE T: DISK STOPPED «, t00=0x0013, t01=0x011c}
0x1eec…1f04              Head {h00=0x0014, h01=0x0050, text=»CBIN12 BIN '12' «, t00=0x0013, t01=0x0146}
0x1f04…1f1c              Head {h00=0x0014, h01=0x0050, text=»CBIN13 BIN '13' «, t00=0x0013, t01=0x015e}
0x1f1c…1f34              Head {h00=0x0014, h01=0x0050, text=»CBIN14 BIN '14' «, t00=0x0013, t01=0x0176}
0x1f34…1f4c              Head {h00=0x0014, h01=0x0050, text=»CBIN15 BIN '15' «, t00=0x0013, t01=0x018e}
0x1f4c…1f64              Head {h00=0x0014, h01=0x0050, text=»CBIN16 BIN '16' «, t00=0x0014, t01=0x0016}
0x1f64…1f7c              Head {h00=0x0014, h01=0x0050, text=»CBIN17 BIN '17' «, t00=0x0014, t01=0x002e}
0x1f7c…1f94              Head {h00=0x0014, h01=0x0050, text=»CBIN18 BIN '18' «, t00=0x0014, t01=0x0046}
0x1f94…1fac              Head {h00=0x0014, h01=0x0050, text=»CBIN19 BIN '19' «, t00=0x0014, t01=0x005e}
0x1fac…1fc4              Head {h00=0x0014, h01=0x0050, text=»CBIN20 BIN '20' «, t00=0x0014, t01=0x0076}
0x1fc4…1fdc              Head {h00=0x0014, h01=0x0050, text=»CBIN21 BIN '21' «, t00=0x0014, t01=0x008e}
0x1fdc…1ff4              Head {h00=0x0014, h01=0x0050, text=»CBIN22 BIN '22' «, t00=0x0014, t01=0x00a6}
0x1ff4…200c              Head {h00=0x0014, h01=0x0050, text=»CBINMAX BIN '26'«, t00=0x0014, t01=0x00be}
0x200c…2050              Head {h00=0x0040, h01=0x0050, text=»*********************************************************** «, t00=0x0014, t01=0x00d6}
0x2050…205a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x011a}
0x205a…2098              Head {h00=0x003a, h01=0x0050, text=»*          TABLE GIVING INDEXES FOR TRANSACTIONFIELDS «, t00=0x0014, t01=0x0124}
0x2098…20d0              Head {h00=0x0034, h01=0x0050, text=»*           FIELD NR GIVES DISPLACEMENT IN TABLE«, t00=0x0014, t01=0x0162}
0x20d0…20da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x000a}
0x20da…211e              Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0015, t01=0x0014}
0x211e…213c              Head {h00=0x001a, h01=0x0050, text=»CFLTDEX BINI (90),  C «, t00=0x0015, t01=0x0058}
0x213c…217a              Head {h00=0x003a, h01=0x0050, text=»  '26','26','26','26','1','2','3','4','5','6', 1-10 C «, t00=0x0015, t01=0x0076}
0x217a…21ba              Head {h00=0x003c, h01=0x0050, text=»  '7','8','9','5','11','12','10','11','12','13', 11-20 C«, t00=0x0015, t01=0x00b4}
0x21ba…21fc              Head {h00=0x003e, h01=0x0050, text=»  '10','11','12','13','14','15','16','1','8','9', 21-30 C «, t00=0x0015, t01=0x00f4}
0x21fc…223a              Head {h00=0x003a, h01=0x0050, text=»  '7','4','6','13','14','4','18','19','6','7', 31-40 C«, t00=0x0015, t01=0x0136}
0x223a…227c              Head {h00=0x003e, h01=0x0050, text=»  '18','14','20','21','22','17','6','15','10','1', 41-50 C«, t00=0x0015, t01=0x0174}
0x227c…22b6              Head {h00=0x0036, h01=0x0050, text=»  '2','3','4','2','3','4','5','6','7','8', 51-60 C«, t00=0x0016, t01=0x0026}
0x22b6…22fa              Head {h00=0x0040, h01=0x0050, text=»  '9','10','11','12','13','12','26','26','26','26', 61-70 C «, t00=0x0016, t01=0x0060}
0x22fa…233e              Head {h00=0x0040, h01=0x0050, text=»  '26','26','26','26','26','26','26','26','26','26', 71-80 C«, t00=0x0016, t01=0x00a4}
0x233e…2380              Head {h00=0x003e, h01=0x0050, text=»  '19','26','26','26','26','26','26','26','26','26' 81-90 «, t00=0x0016, t01=0x00e8}
0x2380…239e              Head {h00=0x001a, h01=0x0050, text=»CCNTDEX BINI (11),  C «, t00=0x0016, t01=0x012a}
0x239e…23d4              Head {h00=0x0032, h01=0x0050, text=»  '1','2','3','4','5','1','5','6','6','5','0' «, t00=0x0016, t01=0x0148}
0x23d4…23e2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x017e}
0x23e2…23f2              Head {h00=0x000c, h01=0x0050, text=»CB3 BLK «, t00=0x0016, t01=0x018c}
0x23f2…23fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x000c}
0x23fc…2406              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0016}
0x2406…2410              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0020}
0x2410…241a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002a}
0x241a…2424              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0034}
0x2424…2438              Head {h00=0x0010, h01=0x0050, text=»CTWBIN1 BIN «, t00=0x0017, t01=0x003e}
0x2438…244c              Head {h00=0x0010, h01=0x0050, text=»CTWBIN2 BIN «, t00=0x0017, t01=0x0052}
0x244c…2466              Head {h00=0x0016, h01=0x0050, text=»CVOUTOP BIN W'56' «, t00=0x0017, t01=0x0066}
0x2466…2480              Head {h00=0x0016, h01=0x0050, text=»CMAXLIN BIN W'54' «, t00=0x0017, t01=0x0080}
0x2480…2498              Head {h00=0x0014, h01=0x0050, text=»CMINLIN BIN W'2'«, t00=0x0017, t01=0x009a}
0x2498…24b6              Head {h00=0x001a, h01=0x0050, text=»CCONBUF0 STRG 398X'FF'«, t00=0x0017, t01=0x00b2}
0x24b6…24d4              Head {h00=0x001a, h01=0x0050, text=»CCONBUF1 STRG 398X'FF'«, t00=0x0017, t01=0x00d0}
0x24d4…24f2              Head {h00=0x001a, h01=0x0050, text=»CCONBUF2 STRG 398X'FF'«, t00=0x0017, t01=0x00ee}
0x24f2…2510              Head {h00=0x001a, h01=0x0050, text=»CCONBUF3 STRG 398X'FF'«, t00=0x0017, t01=0x010c}
0x2510…252e              Head {h00=0x001a, h01=0x0050, text=»CCONBUF4 STRG 398X'FF'«, t00=0x0017, t01=0x012a}
0x252e…254c              Head {h00=0x001a, h01=0x0050, text=»CCONBUF5 STRG 398X'FF'«, t00=0x0017, t01=0x0148}
0x254c…256a              Head {h00=0x001a, h01=0x0050, text=»CCONBUF6 STRG 398X'FF'«, t00=0x0017, t01=0x0166}
0x256a…2588              Head {h00=0x001a, h01=0x0050, text=»CCONBUF7 STRG 398X'FF'«, t00=0x0017, t01=0x0184}
0x2588…25a6              Head {h00=0x001a, h01=0x0050, text=»CCONBUF8 STRG 398X'FF'«, t00=0x0018, t01=0x0012}
0x25a6…25c0              Head {h00=0x0016, h01=0x0050, text=»CTRANBUF STRG 698 «, t00=0x0018, t01=0x0030}
0x25c0…25fc              Head {h00=0x0038, h01=0x0050, text=»CTID STRGI (12),2C'TC','TD','TE','TF','TG','TH',  C «, t00=0x0018, t01=0x004a}
0x25fc…2624              Head {h00=0x0024, h01=0x0050, text=»  'TI','TJ','TK','TL','TM','TN' «, t00=0x0018, t01=0x0086}
0x2624…262e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ae}
0x262e…263c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00b8}
0x263c…264c              Head {h00=0x000c, h01=0x0050, text=»CB4 BLK «, t00=0x0018, t01=0x00c6}
0x264c…2656              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00d6}
0x2656…2660              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00e0}
0x2660…266a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ea}
0x266a…2674              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f4}
0x2674…267e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00fe}
0x267e…26a0              Head {h00=0x001e, h01=0x0050, text=»CMAXTASK BIN  NO OF TASKS «, t00=0x0018, t01=0x0108}
0x26a0…26c6              Head {h00=0x0022, h01=0x0050, text=»CTASKNR BIN  NO. OF 0PEN TASKS«, t00=0x0018, t01=0x012a}
0x26c6…26e0              Head {h00=0x0016, h01=0x0050, text=»CRECLGD BIN W'128'«, t00=0x0018, t01=0x0150}
0x26e0…2708              Head {h00=0x0024, h01=0x0050, text=»CRECNR BIN  PHYSICAL RECORD NR. «, t00=0x0018, t01=0x016a}
0x2708…2726 (25, 0, 400) Head {h00=0x001a, h01=0x0050, text=»CCONBUF9 STRG 398X'FF'«, t00=0x0019, t01=0x0004}
0x2726…2750              Head {h00=0x0026, h01=0x0050, text=»CRECBCD BCD 6D LOGICAL RECORD NR. «, t00=0x0019, t01=0x0022}
0x2750…2772              Head {h00=0x001e, h01=0x0050, text=»CEDATNR BCD 4 DATASET NR. «, t00=0x0019, t01=0x004c}
0x2772…2788              Head {h00=0x0012, h01=0x0050, text=»SOPINP STRG 4 «, t00=0x0019, t01=0x006e}
0x2788…279c              Head {h00=0x0010, h01=0x0050, text=»ASVOL STRG 6«, t00=0x0019, t01=0x0084}
0x279c…27b2              Head {h00=0x0012, h01=0x0050, text=»ASFNAME STRG 8«, t00=0x0019, t01=0x0098}
0x27b2…27d0              Head {h00=0x001a, h01=0x0050, text=»CKMDNAM STRG 6'OD-KOM'«, t00=0x0019, t01=0x00ae}
0x27d0…2800              Head {h00=0x002c, h01=0x0050, text=»CVERSNR BCD 10D'01014610' VERSION NUMBER«, t00=0x0019, t01=0x00cc}
0x2800…281c              Head {h00=0x0018, h01=0x0050, text=»CBLANKS STRG X'2020'«, t00=0x0019, t01=0x00fc}
0x281c…2840              Head {h00=0x0020, h01=0x0050, text=»CPCKBUF STRG 128 PACKBUFFER «, t00=0x0019, t01=0x0118}
0x2840…2860              Head {h00=0x001c, h01=0x0050, text=»*          TEXT FOR BKO «, t00=0x0019, t01=0x013c}
0x2860…288a              Head {h00=0x0026, h01=0x0050, text=»*          ONLY RELEVANT IF EITHER«, t00=0x0019, t01=0x015c}
0x288a…28b6              Head {h00=0x0028, h01=0x0050, text=»*          CBKOFLG=F (CHECK BKO) OR «, t00=0x0019, t01=0x0186}
0x28b6…28e6              Head {h00=0x002c, h01=0x0050, text=»*          CKTFLAG=F (NOT SALDO IN KT.) «, t00=0x001a, t01=0x0022}
0x28e6…2906              Head {h00=0x001c, h01=0x0050, text=»CTTXT07 STRG 13'00008  C«, t00=0x001a, t01=0x0052}
0x2906…291a              Head {h00=0x0010, h01=0x0050, text=»  99     0' «, t00=0x001a, t01=0x0072}
0x291a…2944              Head {h00=0x0026, h01=0x0050, text=»CREGTAB BCDI (25,2),'01','-01',  C«, t00=0x001a, t01=0x0086}
0x2944…295c              Head {h00=0x0014, h01=0x0050, text=»  '02','-01',  C«, t00=0x001a, t01=0x00b0}
0x295c…2974              Head {h00=0x0014, h01=0x0050, text=»  '03','-01',  C«, t00=0x001a, t01=0x00c8}
0x2974…298c              Head {h00=0x0014, h01=0x0050, text=»  '04','-01',  C«, t00=0x001a, t01=0x00e0}
0x298c…29a4              Head {h00=0x0014, h01=0x0050, text=»  '05','-01',  C«, t00=0x001a, t01=0x00f8}
0x29a4…29bc              Head {h00=0x0014, h01=0x0050, text=»  '06','-01',  C«, t00=0x001a, t01=0x0110}
0x29bc…29d4              Head {h00=0x0014, h01=0x0050, text=»  '07','-01',  C«, t00=0x001a, t01=0x0128}
0x29d4…29ec              Head {h00=0x0014, h01=0x0050, text=»  '08','-01',  C«, t00=0x001a, t01=0x0140}
0x29ec…2a04              Head {h00=0x0014, h01=0x0050, text=»  '09','-01',  C«, t00=0x001a, t01=0x0158}
0x2a04…2a1c              Head {h00=0x0014, h01=0x0050, text=»  '10','-01',  C«, t00=0x001a, t01=0x0170}
0x2a1c…2a34              Head {h00=0x0014, h01=0x0050, text=»  '12','-01',  C«, t00=0x001a, t01=0x0188}
0x2a34…2a4e              Head {h00=0x0016, h01=0x0050, text=»  '-40','-01',  C «, t00=0x001b, t01=0x0010}
0x2a4e…2a68              Head {h00=0x0016, h01=0x0050, text=»  '-41','-01',  C «, t00=0x001b, t01=0x002a}
0x2a68…2a82              Head {h00=0x0016, h01=0x0050, text=»  '-42','-01',  C «, t00=0x001b, t01=0x0044}
0x2a82…2a9c              Head {h00=0x0016, h01=0x0050, text=»  '-45','-01',  C «, t00=0x001b, t01=0x005e}
0x2a9c…2ab6              Head {h00=0x0016, h01=0x0050, text=»  '-46','-01',  C «, t00=0x001b, t01=0x0078}
0x2ab6…2ad0              Head {h00=0x0016, h01=0x0050, text=»  '-47','-01',  C «, t00=0x001b, t01=0x0092}
0x2ad0…2aea              Head {h00=0x0016, h01=0x0050, text=»  '-48','-01',  C «, t00=0x001b, t01=0x00ac}
0x2aea…2b04              Head {h00=0x0016, h01=0x0050, text=»  '-49','-01',  C «, t00=0x001b, t01=0x00c6}
0x2b04…2b1e              Head {h00=0x0016, h01=0x0050, text=»  '-50','-01',  C «, t00=0x001b, t01=0x00e0}
0x2b1e…2b36              Head {h00=0x0014, h01=0x0050, text=»  '51','-01',  C«, t00=0x001b, t01=0x00fa}
0x2b36…2b50              Head {h00=0x0016, h01=0x0050, text=»  '-52','-01',  C «, t00=0x001b, t01=0x0112}
0x2b50…2b68              Head {h00=0x0014, h01=0x0050, text=»  '53','-01',  C«, t00=0x001b, t01=0x012c}
0x2b68…2b82              Head {h00=0x0016, h01=0x0050, text=»  '-54','-01',  C «, t00=0x001b, t01=0x0144}
0x2b82…2b98              Head {h00=0x0012, h01=0x0050, text=»  '-01','-01' «, t00=0x001b, t01=0x015e}
0x2b98…2ba2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0174}
0x2ba2…2bb0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x017e}
0x2bb0…2bba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x018c}
0x2bba…2bca              Head {h00=0x000c, h01=0x0050, text=»CB6 BLK «, t00=0x001c, t01=0x0008}
0x2bca…2bd4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0018}
0x2bd4…2c00              Head {h00=0x0028, h01=0x0050, text=»CCYPFLG BOOL FALSE CYSET OCCUPIED ? «, t00=0x001c, t01=0x0022}
0x2c00…2c30              Head {h00=0x002c, h01=0x0050, text=»CSPOOL BOOL TRUE T=EL.JOURNAL IS ALLOWED«, t00=0x001c, t01=0x004e}
0x2c30…2c3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x007e}
0x2c3a…2c44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0088}
0x2c44…2c4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0092}
0x2c4e…2c7e              Head {h00=0x002c, h01=0x0050, text=»CCYSIZE BIN '30' MAX SIZE OF CYCLE PAGE «, t00=0x001c, t01=0x009c}
0x2c7e…2cae              Head {h00=0x002c, h01=0x0050, text=»CKTLAST BIN '0' LAST RECORD USED, KTPLAN«, t00=0x001c, t01=0x00cc}
0x2cae…2ce6              Head {h00=0x0034, h01=0x0050, text=»CMAXREC BIN W'1400' GIVES WARNING OF FULL REGSET«, t00=0x001c, t01=0x00fc}
0x2ce6…2d14              Head {h00=0x002a, h01=0x0050, text=»CGLRECNR BIN '0' LAST RECNR, GL REGSET«, t00=0x001c, t01=0x0134}
0x2d14…2d3e              Head {h00=0x0026, h01=0x0050, text=»CREGVOL BIN '2' REGISTR. ON VOL 2 «, t00=0x001c, t01=0x0162}
0x2d3e…2d70              Head {h00=0x002e, h01=0x0050, text=»CKTINDX BCDI (7),14D KNT.PLAN MASTER INDEX«, t00=0x001c, t01=0x018c}
0x2d70…2d94              Head {h00=0x0020, h01=0x0050, text=»CCYBUF STRG 128 CYSET BUFFER«, t00=0x001d, t01=0x002e}
0x2d94…2dba              Head {h00=0x0022, h01=0x0050, text=»CKTBUF STRG 128 KTPLAN BUFFER «, t00=0x001d, t01=0x0052}
0x2dba…2dec              Head {h00=0x002e, h01=0x0050, text=»CKTTOP BCD 4D'5' FIRST LINE KORT (DEFAULT)«, t00=0x001d, t01=0x0078}
0x2dec…2e1a              Head {h00=0x002a, h01=0x0050, text=»CDUMBUF STRG 512 DUMMY BUFFER FOR VTAM«, t00=0x001d, t01=0x00aa}
0x2e1a…2e28              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x00d8}
0x2e28…2e38              Head {h00=0x000c, h01=0x0050, text=»CB7 BLK «, t00=0x001d, t01=0x00e6}
0x2e38…2e6c              Head {h00=0x0030, h01=0x0050, text=»*          FOR AUTOMATIC BATCH TRANSMISSION «, t00=0x001d, t01=0x00f6}
0x2e6c…2e76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012a}
0x2e76…2ea6              Head {h00=0x002c, h01=0x0050, text=»CBCACTVF BOOL F T: AUTOMATIC BATCH TASK «, t00=0x001d, t01=0x0134}
0x2ea6…2eba              Head {h00=0x0010, h01=0x0050, text=»   IS ACTIVE«, t00=0x001d, t01=0x0164}
0x2eba…2ed2              Head {h00=0x0014, h01=0x0050, text=»   F: NOT ACTIVE«, t00=0x001d, t01=0x0178}
0x2ed2…2ef4              Head {h00=0x001e, h01=0x0050, text=»   ONLY CHANGED IN TASK BC«, t00=0x001d, t01=0x0190}
0x2ef4…2f20              Head {h00=0x0028, h01=0x0050, text=»CBCFLAG BOOL F USED ONLY IN FORMATS «, t00=0x001e, t01=0x0022}
0x2f20…2f3e              Head {h00=0x001a, h01=0x0050, text=»   T: AUTOMATIC BATCH «, t00=0x001e, t01=0x004e}
0x2f3e…2f58              Head {h00=0x0016, h01=0x0050, text=»   F: MANUAL BATCH«, t00=0x001e, t01=0x006c}
0x2f58…2f8c              Head {h00=0x0030, h01=0x0050, text=»CBCSENDF BOOL F T: BATCH SENDING IN PROGRESS«, t00=0x001e, t01=0x0086}
0x2f8c…2faa              Head {h00=0x001a, h01=0x0050, text=»   F: NO BATCH SENDING«, t00=0x001e, t01=0x00ba}
0x2faa…2fbe              Head {h00=0x0010, h01=0x0050, text=»   RIGHT NOW«, t00=0x001e, t01=0x00d8}
0x2fbe…2fee              Head {h00=0x002c, h01=0x0050, text=»CBCWAITF BOOL F T: DO NOT START SENDING «, t00=0x001e, t01=0x00ec}
0x2fee…3004              Head {h00=0x0012, h01=0x0050, text=»   A NEW BATCH«, t00=0x001e, t01=0x011c}
0x3004…300e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0132}
0x300e…3018              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x013c}
0x3018…3022              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0146}
0x3022…302c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0150}
0x302c…3036              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x015a}
0x3036…3040              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0164}
0x3040…304a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x016e}
0x304a…3054              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0178}
0x3054…305e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0182}
0x305e…3068              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x018c}
0x3068…3084              Head {h00=0x0018, h01=0x0050, text=»CBCOPT BIN  OPTION: «, t00=0x001f, t01=0x0008}
0x3084…30a0              Head {h00=0x0018, h01=0x0050, text=»   1: START BC TASK «, t00=0x001f, t01=0x0024}
0x30a0…30ba              Head {h00=0x0016, h01=0x0050, text=»   2: STOP BC TASK«, t00=0x001f, t01=0x0040}
0x30ba…30da              Head {h00=0x001c, h01=0x0050, text=»   3: INTERRUPT BC TASK «, t00=0x001f, t01=0x005a}
0x30da…30f2              Head {h00=0x0014, h01=0x0050, text=»   4: SEND REST «, t00=0x001f, t01=0x007a}
0x30f2…3108              Head {h00=0x0012, h01=0x0050, text=»   5: ALL SEND«, t00=0x001f, t01=0x0092}
0x3108…3116              Head {h00=0x000a, h01=0x0050, text=»   6: «, t00=0x001f, t01=0x00a8}
0x3116…3124              Head {h00=0x000a, h01=0x0050, text=»   7: «, t00=0x001f, t01=0x00b6}
0x3124…3132              Head {h00=0x000a, h01=0x0050, text=»   8: «, t00=0x001f, t01=0x00c4}
0x3132…3140              Head {h00=0x000a, h01=0x0050, text=»   9: «, t00=0x001f, t01=0x00d2}
0x3140…314a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e0}
0x314a…3154              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ea}
0x3154…315e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00f4}
0x315e…3186              Head {h00=0x0024, h01=0x0050, text=»CBCFROM BIN  1. RECORD TO SEND, «, t00=0x001f, t01=0x00fe}
0x3186…31a8              Head {h00=0x001e, h01=0x0050, text=»   IF >2, MUST BE ADJUSTED«, t00=0x001f, t01=0x0126}
0x31a8…31cc              Head {h00=0x0020, h01=0x0050, text=»   TO START OF A TRANSACTION«, t00=0x001f, t01=0x0148}
0x31cc…31d4              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x016c}
0x31d4…31fa              Head {h00=0x0022, h01=0x0050, text=»CBCTO BIN  LAST RECORD TO SEND«, t00=0x001f, t01=0x0174}
0x31fa…3216              Head {h00=0x0018, h01=0x0050, text=»   IF ZERO, SEND ALL«, t00=0x0020, t01=0x000a}
0x3216…3244              Head {h00=0x002a, h01=0x0050, text=»CBCANT BIN '400' NO OF RECORDS TO SEND«, t00=0x0020, t01=0x0026}
0x3244…325c              Head {h00=0x0014, h01=0x0050, text=»   IN ONE BATCH «, t00=0x0020, t01=0x0054}
0x325c…327e              Head {h00=0x001e, h01=0x0050, text=»CSENDNR BIN  CURRENT SEND «, t00=0x0020, t01=0x006c}
0x327e…3294              Head {h00=0x0012, h01=0x0050, text=»   RECORD NO. «, t00=0x0020, t01=0x008e}
0x3294…329e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00a4}
0x329e…32c0              Head {h00=0x001e, h01=0x0050, text=»CBRUGNR BCD 14 BRUGERNAVN «, t00=0x0020, t01=0x00ae}
0x32c0…32de              Head {h00=0x001a, h01=0x0050, text=»CKENDNR BCD 6 KENDEORD«, t00=0x0020, t01=0x00d0}
0x32de…32e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ee}
0x32e8…3312              Head {h00=0x0026, h01=0x0050, text=»CSENDBUF STRG 504 TRANSMIT BUFFER «, t00=0x0020, t01=0x00f8}
0x3312…3338              Head {h00=0x0022, h01=0x0050, text=»CDISKBUF STRG 128 DISK BUFFER «, t00=0x0020, t01=0x0122}
0x3338…3368              Head {h00=0x002c, h01=0x0050, text=»CPRTBUF STRG 70 PRINT BUFFER FOR TASK BC«, t00=0x0020, t01=0x0148}
0x3368…3372              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0178}
0x3372…337c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0182}
0x337c…3386              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x018c}
0x3386…3390              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0008}
0x3390…339a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0012}
0x339a…33a8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x001c}
0x33a8…33b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x002a}
0x33b2…33c2              Head {h00=0x000c, h01=0x0050, text=»TB1 BLK «, t00=0x0021, t01=0x0034}
0x33c2…33cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0044}
0x33cc…33d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004e}
0x33d6…33e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0058}
0x33e0…33ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0062}
0x33ea…3410              Head {h00=0x0022, h01=0x0050, text=»TTCY1FLG BOOL FALSE IN CYCLE? «, t00=0x0021, t01=0x006c}
0x3410…3436              Head {h00=0x0022, h01=0x0050, text=»TTCY2FLG BOOL FALSE IN STABEL?«, t00=0x0021, t01=0x0092}
0x3436…3452              Head {h00=0x0018, h01=0x0050, text=»TTLSTFLG BOOL FALSE «, t00=0x0021, t01=0x00b8}
0x3452…347a              Head {h00=0x0024, h01=0x0050, text=»TTPSEFLG BOOL FALSE PAUSE STATE «, t00=0x0021, t01=0x00d4}
0x347a…34a6              Head {h00=0x0028, h01=0x0050, text=»TTSUMFLG BOOL FALSE SUM ON SCREEN ? «, t00=0x0021, t01=0x00fc}
0x34a6…34d8              Head {h00=0x002e, h01=0x0050, text=»TTTSTFLG BOOL FALSE FIRST ENTRY IN CYKLE ?«, t00=0x0021, t01=0x0128}
0x34d8…3504              Head {h00=0x0028, h01=0x0050, text=»TTINVFLG BOOL FALSE INDICATE MODPOST«, t00=0x0021, t01=0x015a}
0x3504…352e              Head {h00=0x0026, h01=0x0050, text=»TTJTEND BOOL FALSE END OF JOURNAL «, t00=0x0021, t01=0x0186}
0x352e…355c              Head {h00=0x002a, h01=0x0050, text=»TTEORFLG BOOL FALSE *-- END OF RECORD «, t00=0x0022, t01=0x0020}
0x355c…3588              Head {h00=0x0028, h01=0x0050, text=»TTSUPFLG BOOL FALSE SUPPLEMENT POST «, t00=0x0022, t01=0x004e}
0x3588…35b8              Head {h00=0x002c, h01=0x0050, text=»TTSMALL BOOL FALSE *-- SMALL GIRO KVIT? «, t00=0x0022, t01=0x007a}
0x35b8…35e2              Head {h00=0x0026, h01=0x0050, text=»TTR11FLG BOOL FALSE T: KASSE CLOSE«, t00=0x0022, t01=0x00aa}
0x35e2…3610              Head {h00=0x002a, h01=0x0050, text=»TREMFLG BOOL FALSE T= REMOTE TERMINAL «, t00=0x0022, t01=0x00d4}
0x3610…3640              Head {h00=0x002c, h01=0x0050, text=»TTKORTFL BOOL FALSE T: IN KONTOKORT MODE«, t00=0x0022, t01=0x0102}
0x3640…3664              Head {h00=0x0020, h01=0x0050, text=»TTASKAT BOOL FALSE T=BKO 51 «, t00=0x0022, t01=0x0132}
0x3664…368c              Head {h00=0x0024, h01=0x0050, text=»TBCTASK BOOL FALSE T=IN TASK BC «, t00=0x0022, t01=0x0156}
0x368c…3696              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x017e}
0x3696…36aa              Head {h00=0x0010, h01=0x0050, text=»TTDKDEX BIN «, t00=0x0022, t01=0x0188}
0x36aa…36d0              Head {h00=0x0022, h01=0x0050, text=»TTSTYRDX BIN '1' HBOG/DEBP/REM«, t00=0x0023, t01=0x000c}
0x36d0…36f4              Head {h00=0x0020, h01=0x0050, text=»TTTROLD BIN  NO OF OLD TRANS«, t00=0x0023, t01=0x0032}
0x36f4…3708              Head {h00=0x0010, h01=0x0050, text=»TTASKNR BIN «, t00=0x0023, t01=0x0056}
0x3708…3728              Head {h00=0x001c, h01=0x0050, text=»TTDKBCD BCD 2 D/K VALUE «, t00=0x0023, t01=0x006a}
0x3728…3750              Head {h00=0x0024, h01=0x0050, text=»TTARKSAV BCD 12 SAVED ARK KT NR «, t00=0x0023, t01=0x008a}
0x3750…377a              Head {h00=0x0026, h01=0x0050, text=»TTCYKTOT BCD 14 SAVED CYKLE TOTAL «, t00=0x0023, t01=0x00b2}
0x377a…37a4              Head {h00=0x0026, h01=0x0050, text=»TTCYKPOS BCD 4 SAVED CYKLE LINE NR«, t00=0x0023, t01=0x00dc}
0x37a4…37cc              Head {h00=0x0024, h01=0x0050, text=»TTLINNR BCD 4 LINE NR ON VOUCHER«, t00=0x0023, t01=0x0106}
0x37cc…37f4              Head {h00=0x0024, h01=0x0050, text=»TTCNTNR BCD 4 COUNTER TAELLER NR«, t00=0x0023, t01=0x012e}
0x37f4…381a              Head {h00=0x0022, h01=0x0050, text=»TTEJEDB BCD 14 TOTAL OF EJ EDB«, t00=0x0023, t01=0x0156}
0x381a…3834              Head {h00=0x0016, h01=0x0050, text=»GTMSK BCD 6D'999' «, t00=0x0023, t01=0x017c}
0x3834…3854              Head {h00=0x001c, h01=0x0050, text=»GTDATO BCD 8X'FFFFFFFF' «, t00=0x0024, t01=0x0008}
0x3854…386e              Head {h00=0x0016, h01=0x0050, text=»TSWBCD2 BCD 2 *-- «, t00=0x0024, t01=0x0028}
0x386e…3898              Head {h00=0x0026, h01=0x0050, text=»TTCYM STRG 1 CYKLE MARK ON JOURNAL«, t00=0x0024, t01=0x0042}
0x3898…38ca              Head {h00=0x002e, h01=0x0050, text=»GTREGF BCDI (26),16X'F' TRANSACTION FIELDS«, t00=0x0024, t01=0x006c}
0x38ca…38d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x009e}
0x38d4…38e2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x00a8}
0x38e2…38ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b6}
0x38ec…38fc              Head {h00=0x000c, h01=0x0050, text=»GB1 BLK «, t00=0x0024, t01=0x00c0}
0x38fc…3906              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00d0}
0x3906…3910              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00da}
0x3910…391a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e4}
0x391a…3924              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00ee}
0x3924…392e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00f8}
0x392e…394a              Head {h00=0x0018, h01=0x0050, text=»GTEXFLAG BOOL FALSE «, t00=0x0024, t01=0x0102}
0x394a…3966              Head {h00=0x0018, h01=0x0050, text=»GTADUPFL BOOL FALSE «, t00=0x0024, t01=0x011e}
0x3966…3982              Head {h00=0x0018, h01=0x0050, text=»GTAUTODP BOOL FALSE «, t00=0x0024, t01=0x013a}
0x3982…399e              Head {h00=0x0018, h01=0x0050, text=»GTREGFLG BOOL FALSE «, t00=0x0024, t01=0x0156}
0x399e…39b8              Head {h00=0x0016, h01=0x0050, text=»GTCYFLG BOOL FALSE«, t00=0x0024, t01=0x0172}
0x39b8…39da              Head {h00=0x001e, h01=0x0050, text=»GTTFLG BOOL FALSE CLOSE ? «, t00=0x0024, t01=0x018c}
0x39da…3a08              Head {h00=0x002a, h01=0x0050, text=»GTCLRN BOOL FALSE *-- SPCLRN OR SPCLRA«, t00=0x0025, t01=0x001e}
0x3a08…3a26              Head {h00=0x001a, h01=0x0050, text=»GTTYPE2 BOOL FALSE *--«, t00=0x0025, t01=0x004c}
0x3a26…3a44              Head {h00=0x001a, h01=0x0050, text=»GTTYPE3 BOOL FALSE *--«, t00=0x0025, t01=0x006a}
0x3a44…3a7c              Head {h00=0x0034, h01=0x0050, text=»GTKASSE BOOL FALSE *-- TRUE- IN KASSE FUNCTIONS «, t00=0x0025, t01=0x0088}
0x3a7c…3ab4              Head {h00=0x0034, h01=0x0050, text=»GTSLUTFL BOOL TRUE FALSE: SLUT KEY IS SIMULATED «, t00=0x0025, t01=0x00c0}
0x3ab4…3ae0              Head {h00=0x0028, h01=0x0050, text=»GTDIVTR BOOL FALSE T: DIVERSE TRANS «, t00=0x0025, t01=0x00f8}
0x3ae0…3b12              Head {h00=0x002e, h01=0x0050, text=»GTTRSEL BOOL FALSE T: TRANSACTION SELECTED«, t00=0x0025, t01=0x0124}
0x3b12…3b40              Head {h00=0x002a, h01=0x0050, text=»GTMASTFL BOOL FALSE T=MASTER TERMINAL «, t00=0x0025, t01=0x0156}
0x3b40…3b66              Head {h00=0x0022, h01=0x0050, text=»GTASUMFL BOOL FALSE T=AUTO SUM«, t00=0x0025, t01=0x0184}
0x3b66…3b8c              Head {h00=0x0022, h01=0x0050, text=»GTSUBFLG BOOL FALSE T=SUBTOTAL«, t00=0x0026, t01=0x001a}
0x3b8c…3b96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0040}
0x3b96…3baa              Head {h00=0x0010, h01=0x0050, text=»GSWBIN1 BIN «, t00=0x0026, t01=0x004a}
0x3baa…3bbe              Head {h00=0x0010, h01=0x0050, text=»GSWBIN2 BIN «, t00=0x0026, t01=0x005e}
0x3bbe…3bd2              Head {h00=0x0010, h01=0x0050, text=»GSWBIN3 BIN «, t00=0x0026, t01=0x0072}
0x3bd2…3be6              Head {h00=0x0010, h01=0x0050, text=»GSWBIN4 BIN «, t00=0x0026, t01=0x0086}
0x3be6…3bfa              Head {h00=0x0010, h01=0x0050, text=»GSWBIN5 BIN «, t00=0x0026, t01=0x009a}
0x3bfa…3c0e              Head {h00=0x0010, h01=0x0050, text=»GSWBIN6 BIN «, t00=0x0026, t01=0x00ae}
0x3c0e…3c24              Head {h00=0x0012, h01=0x0050, text=»GSWBCD1 BCD 14«, t00=0x0026, t01=0x00c2}
0x3c24…3c3a              Head {h00=0x0012, h01=0x0050, text=»GSWBCD2 BCD 14«, t00=0x0026, t01=0x00d8}
0x3c3a…3c50              Head {h00=0x0012, h01=0x0050, text=»GSWBCD3 BCD 6 «, t00=0x0026, t01=0x00ee}
0x3c50…3c66              Head {h00=0x0012, h01=0x0050, text=»GSWBCD4 BCD 6D«, t00=0x0026, t01=0x0104}
0x3c66…3c7c              Head {h00=0x0012, h01=0x0050, text=»GSWBCD5 BCD 6 «, t00=0x0026, t01=0x011a}
0x3c7c…3c92              Head {h00=0x0012, h01=0x0050, text=»GSWBCD6 BCD 14«, t00=0x0026, t01=0x0130}
0x3c92…3ca8              Head {h00=0x0012, h01=0x0050, text=»GSWBCD7 BCD 14«, t00=0x0026, t01=0x0146}
0x3ca8…3cbe              Head {h00=0x0012, h01=0x0050, text=»GTWBCD1 BCD 14«, t00=0x0026, t01=0x015c}
0x3cbe…3cd4              Head {h00=0x0012, h01=0x0050, text=»GTWBCD2 BCD 14«, t00=0x0026, t01=0x0172}
0x3cd4…3d00              Head {h00=0x0028, h01=0x0050, text=»GTSTRFMT STRG 40 STRING FOR FORMATS «, t00=0x0026, t01=0x0188}
0x3d00…3d0e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0024}
0x3d0e…3d1e              Head {h00=0x000c, h01=0x0050, text=»GB2 BLK «, t00=0x0027, t01=0x0032}
0x3d1e…3d28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0042}
0x3d28…3d32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x004c}
0x3d32…3d3c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0056}
0x3d3c…3d46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0060}
0x3d46…3d50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x006a}
0x3d50…3d6c              Head {h00=0x0018, h01=0x0050, text=»SPPROMPT BOOL FALSE «, t00=0x0027, t01=0x0074}
0x3d6c…3d88              Head {h00=0x0018, h01=0x0050, text=»SPCHANGE BOOL FALSE «, t00=0x0027, t01=0x0090}
0x3d88…3dbe              Head {h00=0x0032, h01=0x0050, text=»SPDUPL BOOL FALSE TRUE: FIELD HAS BEEN DUPPED «, t00=0x0027, t01=0x00ac}
0x3dbe…3df4              Head {h00=0x0032, h01=0x0050, text=»SPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS «, t00=0x0027, t01=0x00e2}
0x3df4…3e28              Head {h00=0x0030, h01=0x0050, text=»SPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR«, t00=0x0027, t01=0x0118}
0x3e28…3e4e              Head {h00=0x0022, h01=0x0050, text=»SPWARNFL BOOL FALSE T: WARNING«, t00=0x0027, t01=0x014c}
0x3e4e…3e58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0172}
0x3e58…3e62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x017c}
0x3e62…3e6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0186}
0x3e6c…3e80              Head {h00=0x0010, h01=0x0050, text=»SPBINW1 BIN «, t00=0x0027, t01=0x0190}
0x3e80…3e94              Head {h00=0x0010, h01=0x0050, text=»SPBINW2 BIN «, t00=0x0028, t01=0x0014}
0x3e94…3ea8              Head {h00=0x0010, h01=0x0050, text=»SPBINW3 BIN «, t00=0x0028, t01=0x0028}
0x3ea8…3ebc              Head {h00=0x0010, h01=0x0050, text=»SPBINW4 BIN «, t00=0x0028, t01=0x003c}
0x3ebc…3ed0              Head {h00=0x0010, h01=0x0050, text=»SPBINW5 BIN «, t00=0x0028, t01=0x0050}
0x3ed0…3ee6              Head {h00=0x0012, h01=0x0050, text=»SPKEY BIN '1' «, t00=0x0028, t01=0x0064}
0x3ee6…3f12              Head {h00=0x0028, h01=0x0050, text=»SPERASE BIN '0' 0:ERASE; 4:NO ERASE «, t00=0x0028, t01=0x007a}
0x3f12…3f26              Head {h00=0x0010, h01=0x0050, text=»SPLINTOP BIN«, t00=0x0028, t01=0x00a6}
0x3f26…3f3a              Head {h00=0x0010, h01=0x0050, text=»SPLINLOW BIN«, t00=0x0028, t01=0x00ba}
0x3f3a…3f60              Head {h00=0x0022, h01=0x0050, text=»GTCLASS BIN '1' TERMINAL CLASS«, t00=0x0028, t01=0x00ce}
0x3f60…3f88              Head {h00=0x0024, h01=0x0050, text=»GTREGDEX BIN '0' TRANSTYPE INDEX«, t00=0x0028, t01=0x00f4}
0x3f88…3fb4              Head {h00=0x0028, h01=0x0050, text=»GTDFLIN BIN '27' DEFAULT LINE NUMBER«, t00=0x0028, t01=0x011c}
0x3fb4…3fce              Head {h00=0x0016, h01=0x0050, text=»GSSWITCH BINI (26)«, t00=0x0028, t01=0x0148}
0x3fce…3fe6              Head {h00=0x0014, h01=0x0050, text=»GTUSED BINI (26)«, t00=0x0028, t01=0x0162}
0x3fe6…3ff0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x017a}
0x3ff0…3ffe              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0184}
0x3ffe…400e (41, 0, 400) Head {h00=0x000c, h01=0x0050, text=»GB3 BLK «, t00=0x0029, t01=0x0004}
0x400e…4018              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0014}
0x4018…4034              Head {h00=0x0018, h01=0x0050, text=»PSIGNFLG BOOL FALSE «, t00=0x0029, t01=0x001e}
0x4034…4058              Head {h00=0x0020, h01=0x0050, text=»BCPR BOOL FALSE T=CPR  F=CIR«, t00=0x0029, t01=0x003a}
0x4058…407e              Head {h00=0x0022, h01=0x0050, text=»BLEV BOOL FALSE T=LEV., F=CPR «, t00=0x0029, t01=0x005e}
0x407e…40a2              Head {h00=0x0020, h01=0x0050, text=»GTDYFLG BOOL FALSE T=DISPLAY«, t00=0x0029, t01=0x0084}
0x40a2…40be              Head {h00=0x0018, h01=0x0050, text=»GTSPGFLG BOOL FALSE «, t00=0x0029, t01=0x00a8}
0x40be…40f4              Head {h00=0x0032, h01=0x0050, text=»GTKORTFL BOOL FALSE T=KONTO FOUND IN KONTOPLAN«, t00=0x0029, t01=0x00c4}
0x40f4…411e              Head {h00=0x0026, h01=0x0050, text=»GTTESTFL BOOL FALSE T=IN TEST MODE«, t00=0x0029, t01=0x00fa}
0x411e…4146              Head {h00=0x0024, h01=0x0050, text=»GTSWFLAG BOOL FALSE SCRATCH FLAG«, t00=0x0029, t01=0x0124}
0x4146…4170              Head {h00=0x0026, h01=0x0050, text=»GTSUMKEY BOOL FALSE SUM INDIKATOR «, t00=0x0029, t01=0x014c}
0x4170…4196              Head {h00=0x0022, h01=0x0050, text=»GTNWFLG BOOL FALSE T= USE .NW «, t00=0x0029, t01=0x0176}
0x4196…41c6              Head {h00=0x002c, h01=0x0050, text=»GTADMFLG BOOL FALSE T= IN ADM FUNCTIONS «, t00=0x002a, t01=0x000c}
0x41c6…41f4              Head {h00=0x002a, h01=0x0050, text=»GTLOKSPG BOOL FALSE T=LOKAL INQUIRIES «, t00=0x002a, t01=0x003c}
0x41f4…422e              Head {h00=0x0036, h01=0x0050, text=»GTSLDFLG BOOL FALSE T=SALDO PRESENT. F=NOT PRESENT«, t00=0x002a, t01=0x006a}
0x422e…4262              Head {h00=0x0030, h01=0x0050, text=»GTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET «, t00=0x002a, t01=0x00a4}
0x4262…4294              Head {h00=0x002e, h01=0x0050, text=»GTSPECTR BOOL FALSE F=TR 1-12, T= TR 51,53«, t00=0x002a, t01=0x00d8}
0x4294…42c0              Head {h00=0x0028, h01=0x0050, text=»BDEB BOOL FALSE T=DEBNR, F=NOT DEBNR«, t00=0x002a, t01=0x010a}
0x42c0…42d4              Head {h00=0x0010, h01=0x0050, text=»GTPPOIN BIN «, t00=0x002a, t01=0x0136}
0x42d4…42e6              Head {h00=0x000e, h01=0x0050, text=»GTPAGE BIN«, t00=0x002a, t01=0x014a}
0x42e6…42fa              Head {h00=0x0010, h01=0x0050, text=»GTRETUR BIN «, t00=0x002a, t01=0x015c}
0x42fa…430e              Head {h00=0x0010, h01=0x0050, text=»GTSUM BCD 14«, t00=0x002a, t01=0x0170}
0x430e…4324              Head {h00=0x0012, h01=0x0050, text=»GTANTAL BCD 4 «, t00=0x002a, t01=0x0184}
0x4324…433a              Head {h00=0x0012, h01=0x0050, text=»GTCYSUM BCD 14«, t00=0x002b, t01=0x000a}
0x433a…435a              Head {h00=0x001c, h01=0x0050, text=»GTREGNR BCD 3 TRANSTYPE «, t00=0x002b, t01=0x0020}
0x435a…4380              Head {h00=0x0022, h01=0x0050, text=»GTDBKRS BCD 2 SIGN FOR AMOUNT «, t00=0x002b, t01=0x0040}
0x4380…43b0              Head {h00=0x002c, h01=0x0050, text=»GTSUMST BCD 6 1. NUMBER FOR SUM FUNCTION«, t00=0x002b, t01=0x0066}
0x43b0…43e0              Head {h00=0x002c, h01=0x0050, text=»GTSUMCNT BCD 14 COUNTER FOR SUMFUNCTION «, t00=0x002b, t01=0x0096}
0x43e0…4406              Head {h00=0x0022, h01=0x0050, text=»GTL8TXT STRG 8 TEXT FOR LINE 8«, t00=0x002b, t01=0x00c6}
0x4406…441e              Head {h00=0x0014, h01=0x0050, text=»SPINPUT STRG 20 «, t00=0x002b, t01=0x00ec}
0x441e…4434              Head {h00=0x0012, h01=0x0050, text=»GSWSTR1 STRG 1«, t00=0x002b, t01=0x0104}
0x4434…444a              Head {h00=0x0012, h01=0x0050, text=»GSWSTR2 STRG 2«, t00=0x002b, t01=0x011a}
0x444a…4460              Head {h00=0x0012, h01=0x0050, text=»GSWSTR9 STRG 9«, t00=0x002b, t01=0x0130}
0x4460…4478              Head {h00=0x0014, h01=0x0050, text=»GSWSTR20 STRG 20«, t00=0x002b, t01=0x0146}
0x4478…4482              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x015e}
0x4482…4490              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0168}
0x4490…449a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0176}
0x449a…44aa              Head {h00=0x000c, h01=0x0050, text=»GB4 BLK «, t00=0x002b, t01=0x0180}
0x44aa…44da              Head {h00=0x002c, h01=0x0050, text=»GTCYWRTF BOOL FALSE T=NO WRITE ON CYSET «, t00=0x002b, t01=0x0190}
0x44da…450a              Head {h00=0x002c, h01=0x0050, text=»GTCYTRPF BOOL FALSE T=TRANSPORT IN CYCLE«, t00=0x002c, t01=0x0030}
0x450a…4536              Head {h00=0x0028, h01=0x0050, text=»TSPOOL BOOL FALSE T=EL.JOURNAL IS ON«, t00=0x002c, t01=0x0060}
0x4536…4568              Head {h00=0x002e, h01=0x0050, text=»TERRSKIP BOOL FALSE T: SKIP ERRMES IN ERDK«, t00=0x002c, t01=0x008c}
0x4568…4572              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00be}
0x4572…457c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00c8}
0x457c…45a8              Head {h00=0x0028, h01=0x0050, text=»GTPSELIN BIN '0' LINE NO. WHEN PAUSE«, t00=0x002c, t01=0x00d2}
0x45a8…45ce              Head {h00=0x0022, h01=0x0050, text=»GTCYIN BIN  NEXT USED, CYCSET «, t00=0x002c, t01=0x00fe}
0x45ce…45f4              Head {h00=0x0022, h01=0x0050, text=»GTCYOUT BIN  NEXT FREE, CYCSET«, t00=0x002c, t01=0x0124}
0x45f4…4618              Head {h00=0x0020, h01=0x0050, text=»GTRECNR BIN  SPG. RECORD NO.«, t00=0x002c, t01=0x014a}
0x4618…463e              Head {h00=0x0022, h01=0x0050, text=»GTLBNR BCD 6D SPG. EKSP.LB.NO.«, t00=0x002c, t01=0x016e}
0x463e…466a (45, 0, 398) Head {h00=0x0028, h01=0x0050, text=»GTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR«, t00=0x002d, t01=0x0004}
0x466a…468c              Head {h00=0x001e, h01=0x0050, text=»GTKTTYP BCD 4D KTPLAN TYPE«, t00=0x002d, t01=0x0030}
0x468c…46b8              Head {h00=0x0028, h01=0x0050, text=»GTRTANT BCD 4D ANTAL RATER TR 51,53 «, t00=0x002d, t01=0x0052}
0x46b8…46ec              Head {h00=0x0030, h01=0x0050, text=»TWELMIN BIN '0' EL.JOURNAL, BEGIN OF BUFFER «, t00=0x002d, t01=0x007e}
0x46ec…4720              Head {h00=0x0030, h01=0x0050, text=»TWELMAX BIN '900' END OF BUFFER(150SECT.*6) «, t00=0x002d, t01=0x00b2}
0x4720…474a              Head {h00=0x0026, h01=0x0050, text=»TWELPNT BIN '0' POINTER IN OPSTART«, t00=0x002d, t01=0x00e6}
0x474a…4778              Head {h00=0x002a, h01=0x0050, text=»TWELSTRT BIN '0' BEFORE NEXT TO PRINT «, t00=0x002d, t01=0x0110}
0x4778…47a2              Head {h00=0x0026, h01=0x0050, text=»TWELSLUT BIN '0' FIRST FREE RECORD«, t00=0x002d, t01=0x013e}
0x47a2…47d0              Head {h00=0x002a, h01=0x0050, text=»TSELBUF STRG 60 BUFFER FOR EL.JOURNAL «, t00=0x002d, t01=0x0168}
0x47d0…47de              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x0008}
0x47de…47ee              Head {h00=0x000c, h01=0x0050, text=»TB2 BLK «, t00=0x002e, t01=0x0016}
0x47ee…47f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0026}
0x47f8…4802              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0030}
0x4802…4826              Head {h00=0x0020, h01=0x0050, text=»GTDBKRC STRG 4 DEB/KRE TEXT «, t00=0x002e, t01=0x003a}
0x4826…483e              Head {h00=0x0014, h01=0x0050, text=»GTTESTMK STRG 1 «, t00=0x002e, t01=0x005e}
0x483e…4866              Head {h00=0x0024, h01=0x0050, text=»TTSUPMRK STRG 1 SUPPLEMENT MARK «, t00=0x002e, t01=0x0076}
0x4866…4886              Head {h00=0x001c, h01=0x0050, text=»TTSUMMRK STRG 1 SUM MARK«, t00=0x002e, t01=0x009e}
0x4886…489c              Head {h00=0x0012, h01=0x0050, text=»GTTEXT STRG 6 «, t00=0x002e, t01=0x00be}
0x489c…48b8              Head {h00=0x0018, h01=0x0050, text=»TTSPARE3 STRG 1C'.' «, t00=0x002e, t01=0x00d4}
0x48b8…48d6              Head {h00=0x001a, h01=0x0050, text=»TCONBUF STRG 398X'FF' «, t00=0x002e, t01=0x00f0}
0x48d6…4900              Head {h00=0x0026, h01=0x0050, text=»TTCYKST BCD 4 1. LINE CYCLE/STABEL«, t00=0x002e, t01=0x010e}
0x4900…4928              Head {h00=0x0024, h01=0x0050, text=»TTKTSLD BCD 14 KONTOKORT, SALDO «, t00=0x002e, t01=0x0138}
0x4928…4952              Head {h00=0x0026, h01=0x0050, text=»TTKTLIN BCD 4 KONTOKORT, LINIE NR «, t00=0x002e, t01=0x0160}
0x4952…497e              Head {h00=0x0028, h01=0x0050, text=»TTKTCHK BCD 2 KONTOKORT, CHECKCIFFER«, t00=0x002e, t01=0x018a}
0x497e…49b0              Head {h00=0x002e, h01=0x0050, text=»TTDBKRM STRG 1C'K' DEB/KRE MARK ON JOURNAL«, t00=0x002f, t01=0x0026}
0x49b0…49d8              Head {h00=0x0024, h01=0x0050, text=»TT16TXT STRG 2 RENTE/GEBYR/RATE «, t00=0x002f, t01=0x0058}
0x49d8…49f8              Head {h00=0x001c, h01=0x0050, text=»TT07TXT STRG 5 BKO TEXTS«, t00=0x002f, t01=0x0080}
0x49f8…4a22              Head {h00=0x0026, h01=0x0050, text=»GTDUPF BCDI (26),16X'F' DUP FIELDS«, t00=0x002f, t01=0x00a0}
0x4a22…4a2c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00ca}
0x4a2c…4a36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00d4}
0x4a36…4a44              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x00de}
0x4a44…4a54              Head {h00=0x000c, h01=0x0050, text=»CD3 DBLK«, t00=0x002f, t01=0x00ec}
0x4a54…4a5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00fc}
0x4a5e…4a68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0106}
0x4a68…4a72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0110}
0x4a72…4a7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x011a}
0x4a7c…4a86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0124}
0x4a86…4a9c              Head {h00=0x0012, h01=0x0050, text=»DUMCD3 STRG 10«, t00=0x002f, t01=0x012e}
0x4a9c…4ab6              Head {h00=0x0016, h01=0x0050, text=»CMASK BCDI (12),4D«, t00=0x002f, t01=0x0144}
0x4ab6…4ae0              Head {h00=0x0026, h01=0x0050, text=»CBACC BCDI (60,3),14D BEHOLDNINGER«, t00=0x002f, t01=0x015e}
0x4ae0…4b12              Head {h00=0x002e, h01=0x0050, text=»CTR12NR BCDI (60),12D EJ-EDB ACCOUNT NOS. «, t00=0x002f, t01=0x0188}
0x4b12…4b2e              Head {h00=0x0018, h01=0x0050, text=»CRELDAY BCD 4X'FFFF'«, t00=0x0030, t01=0x002a}
0x4b2e…4b44              Head {h00=0x0012, h01=0x0050, text=»CCONFREC BCD 6«, t00=0x0030, t01=0x0046}
0x4b44…4b72              Head {h00=0x002a, h01=0x0050, text=»C12ACC BCDI (60,2),14D EJ-EDB COUNTERS«, t00=0x0030, t01=0x005c}
0x4b72…4b7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x008a}
0x4b7c…4b86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0094}
0x4b86…4b90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x009e}
0x4b90…4b9e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x00a8}
0x4b9e…4bae              Head {h00=0x000c, h01=0x0050, text=»CD4 DBLK«, t00=0x0030, t01=0x00b6}
0x4bae…4bb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00c6}
0x4bb8…4bc2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00d0}
0x4bc2…4bcc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00da}
0x4bcc…4bd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00e4}
0x4bd6…4be0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00ee}
0x4be0…4bf8              Head {h00=0x0014, h01=0x0050, text=»DUMCD4 BINI (4) «, t00=0x0030, t01=0x00f8}
0x4bf8…4c2a              Head {h00=0x002e, h01=0x0050, text=»CBEH BINI (12,2) FIRST AND SIZE OF BEHLDN.«, t00=0x0030, t01=0x0110}
0x4c2a…4c5c              Head {h00=0x002e, h01=0x0050, text=»CTR12 BINI (12,2) FIRST AND SIZE OF TR 12 «, t00=0x0030, t01=0x0142}
0x4c5c…4c76              Head {h00=0x0016, h01=0x0050, text=»CFNAME STRGI (8),8«, t00=0x0030, t01=0x0174}
0x4c76…4c98              Head {h00=0x001e, h01=0x0050, text=»CVOLNO BCD 6 VOLUME NUMBER«, t00=0x0030, t01=0x018e}
0x4c98…4cb8              Head {h00=0x001c, h01=0x0050, text=»CKMDNR BCD 6D KOMMUNE NR«, t00=0x0031, t01=0x0020}
0x4cb8…4cda              Head {h00=0x001e, h01=0x0050, text=»CMASKDAT BCD 8X'FFFFFFFF' «, t00=0x0031, t01=0x0040}
0x4cda…4cf2              Head {h00=0x0014, h01=0x0050, text=»CVOL STRGI (4),6«, t00=0x0031, t01=0x0062}
0x4cf2…4cfc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x007a}
0x4cfc…4d0a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0084}
0x4d0a…4d1a              Head {h00=0x000c, h01=0x0050, text=»TD2 DBLK«, t00=0x0031, t01=0x0092}
0x4d1a…4d24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00a2}
0x4d24…4d2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ac}
0x4d2e…4d38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00b6}
0x4d38…4d42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00c0}
0x4d42…4d4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00ca}
0x4d4c…4d62              Head {h00=0x0012, h01=0x0050, text=»TTINF1 STRG 14«, t00=0x0031, t01=0x00d4}
0x4d62…4d94              Head {h00=0x002e, h01=0x0050, text=»TTRECOPN BCD 6 REC. NO. FOR OPEN OR CLOSE «, t00=0x0031, t01=0x00ea}
0x4d94…4dc2              Head {h00=0x002a, h01=0x0050, text=»TTRECCHN BCD 6 REC. NO. FOR FD CHANGE «, t00=0x0031, t01=0x011c}
0x4dc2…4dea              Head {h00=0x0024, h01=0x0050, text=»TTSTLBNR BCD 6D FIRST EKSP. LBNR«, t00=0x0031, t01=0x014a}
0x4dea…4e14              Head {h00=0x0026, h01=0x0050, text=»TTSTCASH BCD 14D PRIMO CASH AMOUNT«, t00=0x0031, t01=0x0172}
0x4e14…4e3a              Head {h00=0x0022, h01=0x0050, text=»TTCASHAC BCD 12D CASH ACC. NR «, t00=0x0032, t01=0x000c}
0x4e3a…4e60              Head {h00=0x0022, h01=0x0050, text=»TVERSUR BCD 12D VERSUR ACC NR «, t00=0x0032, t01=0x0032}
0x4e60…4e8a              Head {h00=0x0026, h01=0x0050, text=»TTCASH BCD 14D CURRENT CASH AMOUNT«, t00=0x0032, t01=0x0058}
0x4e8a…4eb2              Head {h00=0x0024, h01=0x0050, text=»TTLBNR BCD 6D CURRENT EKSP.LBNR «, t00=0x0032, t01=0x0082}
0x4eb2…4ede              Head {h00=0x0028, h01=0x0050, text=»TTACC BCDI (8,2),16D'0' EDB COUNTERS«, t00=0x0032, t01=0x00aa}
0x4ede…4f0e              Head {h00=0x002c, h01=0x0050, text=»TTGLREC BCD 6 SAVE RECORD NO, GL REGSET «, t00=0x0032, t01=0x00d6}
0x4f0e…4f18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0106}
0x4f18…4f22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0110}
0x4f22…4f2c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x011a}
0x4f2c…4f36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0124}
0x4f36…4f44              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0032, t01=0x012e}
0x4f44…4f58              Head {h00=0x0010, h01=0x0050, text=» ENTRY REGGO«, t00=0x0032, t01=0x013c}
0x4f58…4f6c              Head {h00=0x0010, h01=0x0050, text=» ENTRY KBVGO«, t00=0x0032, t01=0x0150}
0x4f6c…4f80              Head {h00=0x0010, h01=0x0050, text=» ENTRY GTPGO«, t00=0x0032, t01=0x0164}
0x4f80…4f94              Head {h00=0x0010, h01=0x0050, text=» ENTRY DC1GO«, t00=0x0032, t01=0x0178}
0x4f94…4f9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x018c}
0x4f9e…4fb0              Head {h00=0x000e, h01=0x0050, text=» EXT T1GO «, t00=0x0033, t01=0x0008}
0x4fb0…4fc4              Head {h00=0x0010, h01=0x0050, text=» EXT DCTASK «, t00=0x0033, t01=0x001a}
0x4fc4…4fd6              Head {h00=0x000e, h01=0x0050, text=» EXT VDUKB«, t00=0x0033, t01=0x002e}
0x4fd6…4fe8              Head {h00=0x000e, h01=0x0050, text=» EXT PRINT«, t00=0x0033, t01=0x0040}
0x4fe8…4ffc              Head {h00=0x0010, h01=0x0050, text=» EXT SWITCH «, t00=0x0033, t01=0x0052}
0x4ffc…5022              Head {h00=0x0022, h01=0x0050, text=» EXT GETTID GET TASK IDENTITY «, t00=0x0033, t01=0x0066}
0x5022…504c              Head {h00=0x0026, h01=0x0050, text=» EXT OFFLNE OFFLINE START ADDRESS «, t00=0x0033, t01=0x008c}
0x504c…5074              Head {h00=0x0024, h01=0x0050, text=» EXT BCGO AUTOMATIC BATCH TRANSM«, t00=0x0033, t01=0x00b6}
0x5074…507e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x00de}
0x507e…50a8              Head {h00=0x0026, h01=0x0050, text=» DSC0 DSDC,2 DUMMY REFERENCE T:IO «, t00=0x0033, t01=0x00e8}
0x50a8…50b0              Head {h00=0x0004, h01=0x0050, t00=0x0033, t01=0x0112}
0x50b0…50e0              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0033, t01=0x011a}
0x50e0…50ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x014a}
0x50ea…510e              Head {h00=0x0020, h01=0x0050, text=»*     START OF REGISTRATION «, t00=0x0033, t01=0x0154}
0x510e…5118              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0178}
0x5118…5148              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0033, t01=0x0182}
0x5148…5152              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0022}
0x5152…5160              Head {h00=0x000a, h01=0x0050, text=»REGGO «, t00=0x0034, t01=0x002c}
0x5160…516e              Head {h00=0x000a, h01=0x0050, text=»REG10 «, t00=0x0034, t01=0x003a}
0x516e…519a              Head {h00=0x0028, h01=0x0050, text=» MOVE GSWBIN1,CBIN13 LENGTH CTTXT07 «, t00=0x0034, t01=0x0048}
0x519a…51b6              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWBIN2,CBIN0 «, t00=0x0034, t01=0x0074}
0x51b6…51d0              Head {h00=0x0016, h01=0x0050, text=» MOVE GSWSTR1,='*'«, t00=0x0034, t01=0x0090}
0x51d0…520a              Head {h00=0x0036, h01=0x0050, text=» MATCH CTTXT07,GSWBIN2,GSWBIN1,GSWSTR1,CBIN0,CBIN1«, t00=0x0034, t01=0x00aa}
0x520a…521e              Head {h00=0x0010, h01=0x0050, text=» BNOK REG20 «, t00=0x0034, t01=0x00e4}
0x521e…523a              Head {h00=0x0018, h01=0x0050, text=» MOVE GSWSTR1,=X'5C'«, t00=0x0034, t01=0x00f8}
0x523a…526c              Head {h00=0x002e, h01=0x0050, text=» XCOPY CTTXT07,GSWBIN2,CBIN1,GSWSTR1,CBIN0«, t00=0x0034, t01=0x0114}
0x526c…5288              Head {h00=0x0018, h01=0x0050, text=» B REG10 MORE OE'S??«, t00=0x0034, t01=0x0146}
0x5288…5296              Head {h00=0x000a, h01=0x0050, text=»REG20 «, t00=0x0034, t01=0x0162}
0x5296…52a6              Head {h00=0x000c, h01=0x0050, text=» B T1GO «, t00=0x0034, t01=0x0170}
0x52a6…52b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0180}
0x52b0…52be              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x018a}
0x52be…52ee              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0035, t01=0x0008}
0x52ee…52f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0038}
0x52f8…5324              Head {h00=0x0028, h01=0x0050, text=»*   START ADDRESS FOR KEYBOARD TASK «, t00=0x0035, t01=0x0042}
0x5324…532e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x006e}
0x532e…535e              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0035, t01=0x0078}
0x535e…5366              Head {h00=0x0004, h01=0x0050, t00=0x0035, t01=0x00a8}
0x5366…5374              Head {h00=0x000a, h01=0x0050, text=»KBVGO «, t00=0x0035, t01=0x00b0}
0x5374…538c              Head {h00=0x0014, h01=0x0050, text=» ADD NBRKBV,='1'«, t00=0x0035, t01=0x00be}
0x538c…53a6              Head {h00=0x0016, h01=0x0050, text=» CALL GETTID,TCT01«, t00=0x0035, t01=0x00d6}
0x53a6…53c2              Head {h00=0x0018, h01=0x0050, text=» SUB TCT01,=X'4B40' «, t00=0x0035, t01=0x00f0}
0x53c2…53f0              Head {h00=0x002a, h01=0x0050, text=»* PERF CONF READ & CONVERT CONFIG DATA«, t00=0x0035, t01=0x010c}
0x53f0…5410              Head {h00=0x001c, h01=0x0050, text=» MOVE COPNO,CNFHC(TCT01)«, t00=0x0035, t01=0x013a}
0x5410…542e              Head {h00=0x001a, h01=0x0050, text=» CBL COPNO,='1',KB050 «, t00=0x0035, t01=0x015a}
0x542e…544a              Head {h00=0x0018, h01=0x0050, text=» ADD COPNO,=X'4740' «, t00=0x0035, t01=0x0178}
0x544a…5458 (54, 0, 400) Head {h00=0x000a, h01=0x0050, text=»KB050 «, t00=0x0036, t01=0x0004}
0x5458…5472              Head {h00=0x0016, h01=0x0050, text=» CALL VDUKB,TCT01 «, t00=0x0036, t01=0x0012}
0x5472…549c              Head {h00=0x0026, h01=0x0050, text=» PERF OFFLNE BRANCH TO CREDIT CODE«, t00=0x0036, t01=0x002c}
0x549c…54ca              Head {h00=0x002a, h01=0x0050, text=» B KB050 RETURN TO IBM-3270 EMULATION «, t00=0x0036, t01=0x0056}
0x54ca…54d2              Head {h00=0x0004, h01=0x0050, t00=0x0036, t01=0x0084}
0x54d2…54da              Head {h00=0x0004, h01=0x0050, t00=0x0036, t01=0x008c}
0x54da…54e2              Head {h00=0x0004, h01=0x0050, t00=0x0036, t01=0x0094}
0x54e2…54f0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x009c}
0x54f0…5526              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0036, t01=0x00aa}
0x5526…5530              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00e0}
0x5530…5562              Head {h00=0x002e, h01=0x0050, text=»*   START ADDRESS FOR GENERAL PRINTER TASK«, t00=0x0036, t01=0x00ea}
0x5562…556c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x011c}
0x556c…55a2              Head {h00=0x0032, h01=0x0050, text=»********************************************* «, t00=0x0036, t01=0x0126}
0x55a2…55aa              Head {h00=0x0004, h01=0x0050, t00=0x0036, t01=0x015c}
0x55aa…55b8              Head {h00=0x000a, h01=0x0050, text=»GTPGO «, t00=0x0036, t01=0x0164}
0x55b8…55d0              Head {h00=0x0014, h01=0x0050, text=» ADD NBRGTP,='1'«, t00=0x0036, t01=0x0172}
0x55d0…55ea              Head {h00=0x0016, h01=0x0050, text=» CALL GETTID,TCT01«, t00=0x0036, t01=0x018a}
0x55ea…5606              Head {h00=0x0018, h01=0x0050, text=» SUB TCT01,=X'4740' «, t00=0x0037, t01=0x0014}
0x5606…5624              Head {h00=0x001a, h01=0x0050, text=» MOVE PRINTER,=X'0001'«, t00=0x0037, t01=0x0030}
0x5624…5638              Head {h00=0x0010, h01=0x0050, text=»* PERF CONF «, t00=0x0037, t01=0x004e}
0x5638…5652              Head {h00=0x0016, h01=0x0050, text=» CALL PRINT,TCT01 «, t00=0x0037, t01=0x0062}
0x5652…565a              Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x007c}
0x565a…5662              Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x0084}
0x5662…566a              Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x008c}
0x566a…5678              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x0094}
0x5678…56b0              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0037, t01=0x00a2}
0x56b0…56ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00da}
0x56ba…56e0              Head {h00=0x0022, h01=0x0050, text=»*   START ADDRESS FOR DC-TASK «, t00=0x0037, t01=0x00e4}
0x56e0…56ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x010a}
0x56ea…5714              Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0037, t01=0x0114}
0x5714…571c              Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x013e}
0x571c…572a              Head {h00=0x000a, h01=0x0050, text=»DC1GO «, t00=0x0037, t01=0x0146}
0x572a…5744              Head {h00=0x0016, h01=0x0050, text=» CALL DCTASK,MF1CU«, t00=0x0037, t01=0x0154}
0x5744…574e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x016e}
0x574e…5756              Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x0178}
0x5756…575e              Head {h00=0x0004, h01=0x0050, t00=0x0037, t01=0x0180}
0x575e…576a              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0037, t01=0x0188}
0x576a…576e (56, 2, 8)   Head {h00=0x4004, h01=0x0000}
0x576e…5772              00 38 00 04                                                                                                                                                                                                                                       ┆ 8  ┆
0x5772…577a (57, 1, 8)   20 04 00 00 00 39 00 04                                                                                                                                                                                                                           ┆     9  ┆
0x577a…57ca (58, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 c5 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 12 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 11 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 10 00 00 00 00   ┆                                                                                ┆
0x57ca…581a              00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 c4 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 c3 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 c0 50 00 00 00 38   ┆                                                                           P   8┆
0x581a…586a              00 00 00 00 00 00 00 00 00 00 00 00 00 00 c0 32 00 00 00 1e 00 02 00 00 00 00 00 00 00 00 00 00 00 00 c0 30 00 00 00 50 00 00 00 00 00 00 00 00 00 00 00 00 00 00 c0 31 00 00 00 64 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 f9 00 00 00 00   ┆               2                   0   P               1   d                    ┆
0x586a…58ba              00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 f8 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 c2 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 c1 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 61 00 00 00 00   ┆                                                                           a    ┆
0x58ba…590a              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 8c 00 00 42 43 00 00 00 00 00 a0 05 b4 05 80 06 dc 05 f8 10 fe 07 20 14 9c 11 46 18 24 14 e4 1b 28 18 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 ff fc   ┆                        BC                     F $   ( T                        ┆
0x590a…595a (59, 0, 400) 21 48 07 20 21 76 11 46 1d 04 1c 9a 1d ca 1d 48 1e 70 1e 0e 1f 0e 1e b4 1c 52 1b 54 21 06 1f 4a 21 ac 1f 4a fe 5c 42 43 00 11 00 0f 00 f8 00 00 fc 00 00 04 2a 00 00 00 00 00 00 03 04 00 00 00 00 00 00 0e ff ff 00 00 00 01 00 06 00 ff 80 60   ┆!H  !v F       H p       R T!  J!  J  BC            *                          `┆
0x595a…59aa              00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 e0 00 00 44 30 00 00 00 00 00 80 05 5c 05 12 00 00 44 30 00 01 00 01 00 00 00 00 80 00 00 00 2a 00 ff ff 00 00 00 01 00 00 22 33 00 08 04 4c 04 d8 02 3e 00 08 1f 4a   ┆                            D0            D0            *         "3   L   >   J┆
0x59aa…59fa              54 42 32 00 00 02 00 4c 00 00 00 00 00 00 40 c1 c2 c3 c4 c5 c6 c7 00 00 00 00 00 00 00 00 c8 c9 4a 4b 4c 4d 4e 4f 00 00 00 00 00 00 00 00 e2 c2 00 01 00 02 00 03 00 04 00 05 00 06 00 07 00 08 00 08 00 08 00 08 00 08 00 08 00 08 00 08 00 08   ┆TB2    L      @                 JKLMNO                                          ┆
0x59fa…5a4a              00 00 00 22 20 02 00 00 20 02 00 02 00 10 00 04 00 10 00 14 00 02 00 24 a0 02 00 26 00 10 00 00 20 02 00 46 00 36 29 e0 00 00 00 01 00 02 00 03 00 04 00 05 00 06 00 07 00 08 00 09 00 0a 00 0b b2 b7 b6 b5 b4 b3 b2 b7 b6 b5 b4 b3 b2 b7 b6 b5   ┆   "                   $   &       F 6)                                         ┆
0x5a4a…5a9a              b4 b3 b2 b7 b6 b5 b4 b3 b2 b1 00 42 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 20 02 00 0e 20 02 00 10 20 02 00 12 20 02 00 14 ff ff c0 00 00 00 08 30 00 5d 00 00 00 00 00 00 00 00 00 00 00 00 00 05   ┆           B                                                   0 ]              ┆
0x5a9a…5aea (60, 0, 400) 20 02 00 16 b0 01 00 18 00 0d 00 00 b0 01 00 25 00 0d 00 00 00 e6 10 00 00 0c 00 0d 00 0e 00 0f 00 10 00 11 00 12 00 13 00 14 00 15 00 16 00 1a 00 1a 00 1a 00 1a 00 1a 00 01 00 02 00 03 00 04 00 05 00 06 00 07 00 08 00 09 00 05 00 0b 00 0c   ┆               %                                                                ┆
0x5aea…5b3a              00 0a 00 0b 00 0c 00 0d 00 0a 00 0b 00 0c 00 0d 00 0e 00 0f 00 10 00 01 00 08 00 09 00 07 00 04 00 06 00 0d 00 0e 00 04 00 12 00 13 00 06 00 07 00 12 00 0e 00 14 00 15 00 16 00 11 00 06 00 0f 00 0a 00 01 00 02 00 03 00 04 00 02 00 03 00 04   ┆                                                                                ┆
0x5b3a…5b8a              00 05 00 06 00 07 00 08 00 09 00 0a 00 0b 00 0c 00 0d 00 0c 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 13 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 1a 00 01 00 02 00 03 00 04 00 05 00 01   ┆                                                                                ┆
0x5b8a…5bda              00 05 00 06 00 06 00 05 00 00 00 42 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 20 02 00 0e 20 02 00 10 20 02 00 12 20 02 00 14 20 02 00 16 a0 02 00 18 00 5a 00 00 a0 02 00 cc 00 0b 00 00 09 e0 00 00   ┆           B                                                     Z              ┆
0x5bda…5c2a              00 00 00 00 00 38 00 36 00 02 ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0c   ┆     8 6                                                                        ┆

Reduced view