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

⟦5284923e9⟧

    Length: 7858 (0x1eb2)
    Notes: pts_type(SC)
    Names: »ENQ.SC«

Derivation

└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
    └─⟦this⟧ »BARCLAY/ENQ.SC« 
    └─⟦this⟧ »BARCLAY/ENQ.SC« 
└─⟦e276fd206⟧ Bits:30009696 Philips computer tape "600413"
    └─⟦this⟧ »BARCLAY/ENQ.SC« 

PTS(SC)

 IDENT ENQ 80.11.09 NJ
 DDUM NJDDIV






* THE MODULE TAKES CARE OF THE
* ENQUIRY 
* FUNCTIONS OF BARCLAYS TERMINAL SYSTEM 
 PDIV 
 ENTRY ENQ
 EXPROC POSCUR,PBIN,PBIN
 EXPROC KBREAD,PBIN,PKTAB,PBIN,PBIN 
 EXPROC LEAD,PBIN 
 EXPROC DCSEND,PSTRG
 EXPROC UNPCK 
 EXPROC UNPPRT,PSTRG
  EXPROC ERWRIT,PSTRG 
 EXPROC PUSH,PBIN 
 EXPROC PULL,PBIN 
* 
* 
 INCLUDE EQUATE 
* 
* 
 INCLUDE KTABBE 
 EJECT
ENQ PROC
* 
* ENQ HAS BEEN DEPRESSED AND IT WAS A VALID CALL
* 
 PERF PUSH,CBIN4
ENQ010
ENQ011
 EDWRT DSDY,ENQFRM WRITE MENU ON SCREEN 
 MOVE TSCRBUF,ESC FILL WITH ESC 
********************************************
* READ 1. INPUTFIELD (BRANCH) 
* TAKE APPROPRIATE ACTION, DEPENDING ON 
* THE END-OF-ITEM KEY DEPRESSED 
 MOVE TP1,=W'22'
 PERF POSCUR,TP1,CBIN10 
 MOVE TP1,CBIN3 
 PERF KBREAD,TP1,KTABBE,TP2,CBIN1 
 BERR ENQ010
 IB TP2,ENQ012,	ENT	C 
		ENQ011,	CU	C
		ENQ012,	TAB	C 
		ENQ011,	FDE	C 
		ENQ011,	BDE	C 
		ENQ011,	ENQ	C 
		ENQ090,	FR	C
		ENQ011,	TL	C
		ENQ011	PTR
ENQ012
 MOVE TBIN4,CBIN0 
 PERF LEAD,CBIN1 CREATE ESC!ROW!COL!ATT 
 XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0
 ADD TBIN4,CBIN4 INCREMENT BUFFER POINTER 
 XCOPY TSCRBUF,TBIN4,CBIN3,TKBBUF,CBIN0 
			MOVE KEYED-IN DATA 
 MOVE TSTR3,TKBBUF SAVE FOR PACKING ROUTINE 
 ADD TBIN4,CBIN3
 EJECT
*************************************************** 
* 2. INPUTFIELD (ACCOUNTNUMBER) 
 MOVE TP1,=W'22'
 MOVE TP2,=W'23'
 PERF POSCUR,TP1,TP2
 MOVE TP1,CBIN9 
 PERF KBREAD,TP1,KTABBE,TP2,CBIN1 
 BERR ENQ010
 IB TP2,		C 
		ENQ013,	ENT	C 
		ENQ011,	CU	C
		ENQ013,	TAB	C 
		ENQ011,	FDE	C 
		ENQ011,	BDE	C 
		ENQ011,	ENQ	C 
		ENQ090,	FR	C
		ENQ011,	TL	C
		ENQ011	PTR
ENQ013
 PERF LEAD,CBIN1
 XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0
 ADD TBIN4,CBIN4
 XCOPY TSCRBUF,TBIN4,CBIN9,TKBBUF,CBIN0 
 ADD TBIN4,CBIN9
 EJECT
*************************************************** 
* 3. INPUTFIELD (TYPE)
 MOVE TP1,=W'22'
 MOVE TP2,=W'40'
 PERF POSCUR,TP1,TP2
 MOVE TP1,CBIN2 
 PERF KBREAD,TP1,KTABBE,TP2,CBIN1 
 BERR ENQ010
 IB TP2,		C 
		ENQ014,	ENT	C 
		ENQ011,	CU	C
		ENQ014,	TAB	C 
		ENQ071,	FDE	C 
		ENQ071,	BDE	C 
		ENQ071,	ENQ	C 
		ENQ090,	FR	C
		ENQ071,	TL	C
		ENQ071	PTR
ENQ014
 PERF LEAD,CBIN1
 XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0
 ADD TBIN4,CBIN4
 XCOPY TSCRBUF,TBIN4,CBIN2,TKBBUF,CBIN0 
 ADD TBIN4,CBIN2
 EJECT
**************************************************
* 4. INPUTFIELD (PRINTER) (OPTIONAL)
 MOVE TP1,=W'22'
 MOVE TP2,=W'53'
 PERF POSCUR,TP1,TP2
 MOVE TP1,CBIN2 
 PERF KBREAD,TP1,KTABBE,TP2,CBIN1 
 BERR ENQ010
 IB TP2,		C 
		ENQ015,	ENT	C 
		ENQ011,	CU	C
		ENQ015E,	TAB	C
		ENQ090,	FDE	C 
		ENQ090,	BDE	C 
		ENQ090,	ENQ	C 
		ENQ090,	FR	C
		ENQ090,	TL	C
		ENQ090	PTR
ENQ015
 PERF LEAD,CBIN1
 XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0
 ADD TBIN4,CBIN4
 XCOPY TSCRBUF,TBIN4,CBIN2,TKBBUF,CBIN0 
 ADD TBIN4,CBIN2
ENQ015E 
 EJECT
************************************************* 
* 5. INPUTFIELD (VOUCHER) (OPTIONAL)
 MOVE TP1,=W'22'
 MOVE TP2,=W'66'
 PERF POSCUR,TP1,TP2
 MOVE TP1,CBIN12
 PERF KBREAD,TP1,KTABBE,TP2,CBIN2 
 BERR ENQ010
 IB TP2,		C 
		ENQ030,	ENT	C 
		ENQ011,	CU	C
		ENQ016E,	TAB	C
		ENQ090,	FDE	C 
		ENQ090,	BDE	C 
		ENQ090,	ENQ	C 
		ENQ090,	FR	C
		ENQ090,	TL	C
		ENQ090	PTR
ENQ016
 PERF LEAD,CBIN1
 XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0
 ADD TBIN4,CBIN4
 XCOPY TSCRBUF,TBIN4,CBIN12,TKBBUF,CBIN0
 ADD TBIN4,CBIN12 
ENQ016E 
 EJECT
*************************************************** 
ENQ030
* THE BUFFER IS PACKED NOW AND HAS
* TO BE SENT TO THE MAINFRAME 
 MOVE TSTR2K,TSCRBUF
 MOVE TSTR20,='00030     01 ' 
 XCOPY TSTR20,CBIN5,CBIN3,TSTR3,CBIN0 BRANCH
 XCOPY TSTR20,CBIN12,CBIN5,TTERMID,CBIN0 TERMINALID 
 INSRT TSTR2K,CBIN0,CBIN17,TSTR20,CBIN0 
 PERF DCSEND,TSTR2K 
 BERR ENQ072
* ANSWER RECEIVED 
 XCOPY TSTR2,CBIN0,CBIN2,TSTR2K,CBIN10
 CBE TSTR2,='99',ENQ050 WAS IT FOR THE PRINTER
 SET TENQ ENQ GOING ON, DONT SAVE 
 PERF UNPCK 
 MOVE TP1,=W'24'
 PERF POSCUR,TP1,CBIN1
 MOVE TP1,CBIN1 
 PERF KBREAD,TP1,KTABBE,TP2,CBIN2 
 TBT TINT,ENQ090
 CBNG TBIN4,CBIN6,ENQ090 FINISHED WITH INQUIRIES? 
 B ENQ010 
ENQ050			RECEIVED PRINTER OUTPUT
 PERF UNPPRT
 B ENQ090 
ENQ071
 MOVE TSTR80,='QERR1 - INVALID FUNCTION SELECTION ' 
 PERF ERWRIT
 B ENQ095 
ENQ072
 MOVE TSTR80,='QERR2 - ENQUIRY NOT AVAILABLE '
 PERF ERWRIT
 B ENQ095 
ENQ090
 PERF PULL,CBIN4
 CLEAR TENQ 
 CMP CBIN0,CBIN0 SER CR TO OK 
 B ENQ099 
ENQ095
 PERF PULL,CBIN4
 CLEAR TENQ 
 CMP CBIN0,CBIN1 SET CR TO NOT-OK 
ENQ099
 RET
 PEND 
 EJECT
ENQFRM FRMT		ENQUIRY FORMAT 
 FILLR '1',2
 FILLR ' ',30 
 FTEXT 'ENQ - ENQUIRY INPUT'
 FNL
 FNL
 FILLR ' ',30 
 FTEXT 'ENQUIRIES AVAILABLE'
 FNL
 FNL
 FILLR ' ',15 
 FCOPY ='SAVINGS '
 FCOPY ='ACCOUNT '
 FCOPY ='BALANCE '
 FILLR ' ',23 
 FCOPY ='01'
 FNL
 FILLR ' ',15 
 FCOPY ='SAVINGS '
 FCOPY ='ACCOUNT '
 FCOPY ='BALANCE '
 FCOPY ='AND LAST FIVE ENTRIES  ' 
 FCOPY ='02'
 FNL
 FILLR ' ',15 
 FCOPY ='CURRENT '
 FCOPY ='ACCOUNT '
 FCOPY ='BALANCE '
 FILLR ' ',23 
 FCOPY ='03'
 FNL
 FILLR ' ',15 
 FCOPY ='CURRENT '
 FCOPY ='ACCOUNT '
 FCOPY ='BALANCE '
 FCOPY ='AND LAST FIVE ENTRIES  ' 
 FCOPY ='04'
 FNL
 FILLR ' ',15 
 FCOPY ='CURRENT '
 FCOPY ='ACCOUNT '
 FCOPY ='DETAILS '
 FILLR ' ',23 
 FCOPY ='05'
 FNL
 FILLR ' ',15 
 FCOPY ='CURRENT '
 FCOPY ='ACCOUNT '
 FCOPY ='VOUCHERS ' 
 FILLR ' ',22 
 FCOPY ='06'
 FNL
 FILLR ' ',15 
 FCOPY ='ACCOUNT '
 FCOPY ='INTERIM STATEMENT '
 FILLR ' ',21 
 FCOPY ='07'
 FNL 11 
 FCOPY =' BRANCH' 
 FILLR ' ',7
 FCOPY ='ACC NO'
 FILLR ' ',13 
 FCOPY ='TYPE'
 FILLR ' ',6
 FCOPY ='PRINTER' 
 FILLR ' ',6
 FCOPY ='VOUCHER' 
 FNL
 FMEND
 END

HexDump

0x0000…001e (0, 0, 400)  Head {h00=0x001a, h01=0x0050, text=» IDENT ENQ 80.11.09 NJ«, t00=0x0000, t01=0x0004}
0x001e…0032              Head {h00=0x0010, h01=0x0050, text=» DDUM NJDDIV«, t00=0x0000, t01=0x0022}
0x0032…003a              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0036}
0x003a…0042              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003e}
0x0042…004a              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0046}
0x004a…0052              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x004e}
0x0052…005a              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0056}
0x005a…0062              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x005e}
0x0062…0088              Head {h00=0x0022, h01=0x0050, text=»* THE MODULE TAKES CARE OF THE«, t00=0x0000, t01=0x0066}
0x0088…009a              Head {h00=0x000e, h01=0x0050, text=»* ENQUIRY «, t00=0x0000, t01=0x008c}
0x009a…00ca              Head {h00=0x002c, h01=0x0050, text=»* FUNCTIONS OF BARCLAYS TERMINAL SYSTEM «, t00=0x0000, t01=0x009e}
0x00ca…00d8              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x00ce}
0x00d8…00ea              Head {h00=0x000e, h01=0x0050, text=» ENTRY ENQ«, t00=0x0000, t01=0x00dc}
0x00ea…010a              Head {h00=0x001c, h01=0x0050, text=» EXPROC POSCUR,PBIN,PBIN«, t00=0x0000, t01=0x00ee}
0x010a…0136              Head {h00=0x0028, h01=0x0050, text=» EXPROC KBREAD,PBIN,PKTAB,PBIN,PBIN «, t00=0x0000, t01=0x010e}
0x0136…0150              Head {h00=0x0016, h01=0x0050, text=» EXPROC LEAD,PBIN «, t00=0x0000, t01=0x013a}
0x0150…016c              Head {h00=0x0018, h01=0x0050, text=» EXPROC DCSEND,PSTRG«, t00=0x0000, t01=0x0154}
0x016c…0182              Head {h00=0x0012, h01=0x0050, text=» EXPROC UNPCK «, t00=0x0000, t01=0x0170}
0x0182…019e              Head {h00=0x0018, h01=0x0050, text=» EXPROC UNPPRT,PSTRG«, t00=0x0000, t01=0x0186}
0x019e…01bc              Head {h00=0x001a, h01=0x0050, text=»  EXPROC ERWRIT,PSTRG «, t00=0x0001, t01=0x0012}
0x01bc…01d6              Head {h00=0x0016, h01=0x0050, text=» EXPROC PUSH,PBIN «, t00=0x0001, t01=0x0030}
0x01d6…01f0              Head {h00=0x0016, h01=0x0050, text=» EXPROC PULL,PBIN «, t00=0x0001, t01=0x004a}
0x01f0…01fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0064}
0x01fa…0204              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006e}
0x0204…021c              Head {h00=0x0014, h01=0x0050, text=» INCLUDE EQUATE «, t00=0x0001, t01=0x0078}
0x021c…0226              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0090}
0x0226…0230              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009a}
0x0230…0248              Head {h00=0x0014, h01=0x0050, text=» INCLUDE KTABBE «, t00=0x0001, t01=0x00a4}
0x0248…0256              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00bc}
0x0256…0266              Head {h00=0x000c, h01=0x0050, text=»ENQ PROC«, t00=0x0001, t01=0x00ca}
0x0266…0270              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x0270…02a8              Head {h00=0x0034, h01=0x0050, text=»* ENQ HAS BEEN DEPRESSED AND IT WAS A VALID CALL«, t00=0x0001, t01=0x00e4}
0x02a8…02b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x011c}
0x02b2…02ca              Head {h00=0x0014, h01=0x0050, text=» PERF PUSH,CBIN4«, t00=0x0001, t01=0x0126}
0x02ca…02d8              Head {h00=0x000a, h01=0x0050, text=»ENQ010«, t00=0x0001, t01=0x013e}
0x02d8…02e6              Head {h00=0x000a, h01=0x0050, text=»ENQ011«, t00=0x0001, t01=0x014c}
0x02e6…0316              Head {h00=0x002c, h01=0x0050, text=» EDWRT DSDY,ENQFRM WRITE MENU ON SCREEN «, t00=0x0001, t01=0x015a}
0x0316…033e              Head {h00=0x0024, h01=0x0050, text=» MOVE TSCRBUF,ESC FILL WITH ESC «, t00=0x0001, t01=0x018a}
0x033e…0372              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0002, t01=0x0022}
0x0372…0398              Head {h00=0x0022, h01=0x0050, text=»* READ 1. INPUTFIELD (BRANCH) «, t00=0x0002, t01=0x0056}
0x0398…03c8              Head {h00=0x002c, h01=0x0050, text=»* TAKE APPROPRIATE ACTION, DEPENDING ON «, t00=0x0002, t01=0x007c}
0x03c8…03f0              Head {h00=0x0024, h01=0x0050, text=»* THE END-OF-ITEM KEY DEPRESSED «, t00=0x0002, t01=0x00ac}
0x03f0…0408              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'22'«, t00=0x0002, t01=0x00d4}
0x0408…0428              Head {h00=0x001c, h01=0x0050, text=» PERF POSCUR,TP1,CBIN10 «, t00=0x0002, t01=0x00ec}
0x0428…0440              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN3 «, t00=0x0002, t01=0x010c}
0x0440…046a              Head {h00=0x0026, h01=0x0050, text=» PERF KBREAD,TP1,KTABBE,TP2,CBIN1 «, t00=0x0002, t01=0x0124}
0x046a…047e              Head {h00=0x0010, h01=0x0050, text=» BERR ENQ010«, t00=0x0002, t01=0x014e}
0x047e…049c              Head {h00=0x001a, h01=0x0050, text=» IB TP2,ENQ012, ENT C «, t00=0x0002, t01=0x0162}
0x049c…04b2              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, CU C«, t00=0x0002, t01=0x0180}
0x04b2…04ca              Head {h00=0x0014, h01=0x0050, text=»  ENQ012, TAB C «, t00=0x0003, t01=0x0008}
0x04ca…04e2              Head {h00=0x0014, h01=0x0050, text=»  ENQ011, FDE C «, t00=0x0003, t01=0x0020}
0x04e2…04fa              Head {h00=0x0014, h01=0x0050, text=»  ENQ011, BDE C «, t00=0x0003, t01=0x0038}
0x04fa…0512              Head {h00=0x0014, h01=0x0050, text=»  ENQ011, ENQ C «, t00=0x0003, t01=0x0050}
0x0512…0528              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, FR C«, t00=0x0003, t01=0x0068}
0x0528…053e              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, TL C«, t00=0x0003, t01=0x007e}
0x053e…0552              Head {h00=0x0010, h01=0x0050, text=»  ENQ011 PTR«, t00=0x0003, t01=0x0094}
0x0552…0560              Head {h00=0x000a, h01=0x0050, text=»ENQ012«, t00=0x0003, t01=0x00a8}
0x0560…057a              Head {h00=0x0016, h01=0x0050, text=» MOVE TBIN4,CBIN0 «, t00=0x0003, t01=0x00b6}
0x057a…05aa              Head {h00=0x002c, h01=0x0050, text=» PERF LEAD,CBIN1 CREATE ESC!ROW!COL!ATT «, t00=0x0003, t01=0x00d0}
0x05aa…05d8              Head {h00=0x002a, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0«, t00=0x0003, t01=0x0100}
0x05d8…060a              Head {h00=0x002e, h01=0x0050, text=» ADD TBIN4,CBIN4 INCREMENT BUFFER POINTER «, t00=0x0003, t01=0x012e}
0x060a…063a              Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN3,TKBBUF,CBIN0 «, t00=0x0003, t01=0x0160}
0x063a…0658              Head {h00=0x001a, h01=0x0050, text=»   MOVE KEYED-IN DATA «, t00=0x0003, t01=0x0190}
0x0658…068c              Head {h00=0x0030, h01=0x0050, text=» MOVE TSTR3,TKBBUF SAVE FOR PACKING ROUTINE «, t00=0x0004, t01=0x001e}
0x068c…06a4              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN3«, t00=0x0004, t01=0x0052}
0x06a4…06b2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x006a}
0x06b2…06ee              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0004, t01=0x0078}
0x06ee…0716              Head {h00=0x0024, h01=0x0050, text=»* 2. INPUTFIELD (ACCOUNTNUMBER) «, t00=0x0004, t01=0x00b4}
0x0716…072e              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'22'«, t00=0x0004, t01=0x00dc}
0x072e…0746              Head {h00=0x0014, h01=0x0050, text=» MOVE TP2,=W'23'«, t00=0x0004, t01=0x00f4}
0x0746…0762              Head {h00=0x0018, h01=0x0050, text=» PERF POSCUR,TP1,TP2«, t00=0x0004, t01=0x010c}
0x0762…077a              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN9 «, t00=0x0004, t01=0x0128}
0x077a…07a4              Head {h00=0x0026, h01=0x0050, text=» PERF KBREAD,TP1,KTABBE,TP2,CBIN1 «, t00=0x0004, t01=0x0140}
0x07a4…07b8              Head {h00=0x0010, h01=0x0050, text=» BERR ENQ010«, t00=0x0004, t01=0x016a}
0x07b8…07cc              Head {h00=0x0010, h01=0x0050, text=» IB TP2,  C «, t00=0x0004, t01=0x017e}
0x07cc…07e4 (5, 0, 400)  Head {h00=0x0014, h01=0x0050, text=»  ENQ013, ENT C «, t00=0x0005, t01=0x0004}
0x07e4…07fa              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, CU C«, t00=0x0005, t01=0x001c}
0x07fa…0812              Head {h00=0x0014, h01=0x0050, text=»  ENQ013, TAB C «, t00=0x0005, t01=0x0032}
0x0812…082a              Head {h00=0x0014, h01=0x0050, text=»  ENQ011, FDE C «, t00=0x0005, t01=0x004a}
0x082a…0842              Head {h00=0x0014, h01=0x0050, text=»  ENQ011, BDE C «, t00=0x0005, t01=0x0062}
0x0842…085a              Head {h00=0x0014, h01=0x0050, text=»  ENQ011, ENQ C «, t00=0x0005, t01=0x007a}
0x085a…0870              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, FR C«, t00=0x0005, t01=0x0092}
0x0870…0886              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, TL C«, t00=0x0005, t01=0x00a8}
0x0886…089a              Head {h00=0x0010, h01=0x0050, text=»  ENQ011 PTR«, t00=0x0005, t01=0x00be}
0x089a…08a8              Head {h00=0x000a, h01=0x0050, text=»ENQ013«, t00=0x0005, t01=0x00d2}
0x08a8…08c0              Head {h00=0x0014, h01=0x0050, text=» PERF LEAD,CBIN1«, t00=0x0005, t01=0x00e0}
0x08c0…08ee              Head {h00=0x002a, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0«, t00=0x0005, t01=0x00f8}
0x08ee…0906              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN4«, t00=0x0005, t01=0x0126}
0x0906…0936              Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN9,TKBBUF,CBIN0 «, t00=0x0005, t01=0x013e}
0x0936…094e              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN9«, t00=0x0005, t01=0x016e}
0x094e…095c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0186}
0x095c…0998 (6, 0, 400)  Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0006, t01=0x0004}
0x0998…09b6              Head {h00=0x001a, h01=0x0050, text=»* 3. INPUTFIELD (TYPE)«, t00=0x0006, t01=0x0040}
0x09b6…09ce              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'22'«, t00=0x0006, t01=0x005e}
0x09ce…09e6              Head {h00=0x0014, h01=0x0050, text=» MOVE TP2,=W'40'«, t00=0x0006, t01=0x0076}
0x09e6…0a02              Head {h00=0x0018, h01=0x0050, text=» PERF POSCUR,TP1,TP2«, t00=0x0006, t01=0x008e}
0x0a02…0a1a              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN2 «, t00=0x0006, t01=0x00aa}
0x0a1a…0a44              Head {h00=0x0026, h01=0x0050, text=» PERF KBREAD,TP1,KTABBE,TP2,CBIN1 «, t00=0x0006, t01=0x00c2}
0x0a44…0a58              Head {h00=0x0010, h01=0x0050, text=» BERR ENQ010«, t00=0x0006, t01=0x00ec}
0x0a58…0a6c              Head {h00=0x0010, h01=0x0050, text=» IB TP2,  C «, t00=0x0006, t01=0x0100}
0x0a6c…0a84              Head {h00=0x0014, h01=0x0050, text=»  ENQ014, ENT C «, t00=0x0006, t01=0x0114}
0x0a84…0a9a              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, CU C«, t00=0x0006, t01=0x012c}
0x0a9a…0ab2              Head {h00=0x0014, h01=0x0050, text=»  ENQ014, TAB C «, t00=0x0006, t01=0x0142}
0x0ab2…0aca              Head {h00=0x0014, h01=0x0050, text=»  ENQ071, FDE C «, t00=0x0006, t01=0x015a}
0x0aca…0ae2              Head {h00=0x0014, h01=0x0050, text=»  ENQ071, BDE C «, t00=0x0006, t01=0x0172}
0x0ae2…0afa              Head {h00=0x0014, h01=0x0050, text=»  ENQ071, ENQ C «, t00=0x0006, t01=0x018a}
0x0afa…0b10              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, FR C«, t00=0x0007, t01=0x0012}
0x0b10…0b26              Head {h00=0x0012, h01=0x0050, text=»  ENQ071, TL C«, t00=0x0007, t01=0x0028}
0x0b26…0b3a              Head {h00=0x0010, h01=0x0050, text=»  ENQ071 PTR«, t00=0x0007, t01=0x003e}
0x0b3a…0b48              Head {h00=0x000a, h01=0x0050, text=»ENQ014«, t00=0x0007, t01=0x0052}
0x0b48…0b60              Head {h00=0x0014, h01=0x0050, text=» PERF LEAD,CBIN1«, t00=0x0007, t01=0x0060}
0x0b60…0b8e              Head {h00=0x002a, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0«, t00=0x0007, t01=0x0078}
0x0b8e…0ba6              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN4«, t00=0x0007, t01=0x00a6}
0x0ba6…0bd6              Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN2,TKBBUF,CBIN0 «, t00=0x0007, t01=0x00be}
0x0bd6…0bee              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN2«, t00=0x0007, t01=0x00ee}
0x0bee…0bfc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0106}
0x0bfc…0c36              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0007, t01=0x0114}
0x0c36…0c62              Head {h00=0x0028, h01=0x0050, text=»* 4. INPUTFIELD (PRINTER) (OPTIONAL)«, t00=0x0007, t01=0x014e}
0x0c62…0c7a              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'22'«, t00=0x0007, t01=0x017a}
0x0c7a…0c92 (8, 0, 398)  Head {h00=0x0014, h01=0x0050, text=» MOVE TP2,=W'53'«, t00=0x0008, t01=0x0004}
0x0c92…0cae              Head {h00=0x0018, h01=0x0050, text=» PERF POSCUR,TP1,TP2«, t00=0x0008, t01=0x001c}
0x0cae…0cc6              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN2 «, t00=0x0008, t01=0x0038}
0x0cc6…0cf0              Head {h00=0x0026, h01=0x0050, text=» PERF KBREAD,TP1,KTABBE,TP2,CBIN1 «, t00=0x0008, t01=0x0050}
0x0cf0…0d04              Head {h00=0x0010, h01=0x0050, text=» BERR ENQ010«, t00=0x0008, t01=0x007a}
0x0d04…0d18              Head {h00=0x0010, h01=0x0050, text=» IB TP2,  C «, t00=0x0008, t01=0x008e}
0x0d18…0d30              Head {h00=0x0014, h01=0x0050, text=»  ENQ015, ENT C «, t00=0x0008, t01=0x00a2}
0x0d30…0d46              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, CU C«, t00=0x0008, t01=0x00ba}
0x0d46…0d5e              Head {h00=0x0014, h01=0x0050, text=»  ENQ015E, TAB C«, t00=0x0008, t01=0x00d0}
0x0d5e…0d76              Head {h00=0x0014, h01=0x0050, text=»  ENQ090, FDE C «, t00=0x0008, t01=0x00e8}
0x0d76…0d8e              Head {h00=0x0014, h01=0x0050, text=»  ENQ090, BDE C «, t00=0x0008, t01=0x0100}
0x0d8e…0da6              Head {h00=0x0014, h01=0x0050, text=»  ENQ090, ENQ C «, t00=0x0008, t01=0x0118}
0x0da6…0dbc              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, FR C«, t00=0x0008, t01=0x0130}
0x0dbc…0dd2              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, TL C«, t00=0x0008, t01=0x0146}
0x0dd2…0de6              Head {h00=0x0010, h01=0x0050, text=»  ENQ090 PTR«, t00=0x0008, t01=0x015c}
0x0de6…0df4              Head {h00=0x000a, h01=0x0050, text=»ENQ015«, t00=0x0008, t01=0x0170}
0x0df4…0e0c              Head {h00=0x0014, h01=0x0050, text=» PERF LEAD,CBIN1«, t00=0x0008, t01=0x017e}
0x0e0c…0e3a              Head {h00=0x002a, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0«, t00=0x0009, t01=0x0008}
0x0e3a…0e52              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN4«, t00=0x0009, t01=0x0036}
0x0e52…0e82              Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN2,TKBBUF,CBIN0 «, t00=0x0009, t01=0x004e}
0x0e82…0e9a              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN2«, t00=0x0009, t01=0x007e}
0x0e9a…0eaa              Head {h00=0x000c, h01=0x0050, text=»ENQ015E «, t00=0x0009, t01=0x0096}
0x0eaa…0eb8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00a6}
0x0eb8…0ef2              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0009, t01=0x00b4}
0x0ef2…0f1e              Head {h00=0x0028, h01=0x0050, text=»* 5. INPUTFIELD (VOUCHER) (OPTIONAL)«, t00=0x0009, t01=0x00ee}
0x0f1e…0f36              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'22'«, t00=0x0009, t01=0x011a}
0x0f36…0f4e              Head {h00=0x0014, h01=0x0050, text=» MOVE TP2,=W'66'«, t00=0x0009, t01=0x0132}
0x0f4e…0f6a              Head {h00=0x0018, h01=0x0050, text=» PERF POSCUR,TP1,TP2«, t00=0x0009, t01=0x014a}
0x0f6a…0f82              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN12«, t00=0x0009, t01=0x0166}
0x0f82…0fac              Head {h00=0x0026, h01=0x0050, text=» PERF KBREAD,TP1,KTABBE,TP2,CBIN2 «, t00=0x0009, t01=0x017e}
0x0fac…0fc0              Head {h00=0x0010, h01=0x0050, text=» BERR ENQ010«, t00=0x000a, t01=0x0018}
0x0fc0…0fd4              Head {h00=0x0010, h01=0x0050, text=» IB TP2,  C «, t00=0x000a, t01=0x002c}
0x0fd4…0fec              Head {h00=0x0014, h01=0x0050, text=»  ENQ030, ENT C «, t00=0x000a, t01=0x0040}
0x0fec…1002              Head {h00=0x0012, h01=0x0050, text=»  ENQ011, CU C«, t00=0x000a, t01=0x0058}
0x1002…101a              Head {h00=0x0014, h01=0x0050, text=»  ENQ016E, TAB C«, t00=0x000a, t01=0x006e}
0x101a…1032              Head {h00=0x0014, h01=0x0050, text=»  ENQ090, FDE C «, t00=0x000a, t01=0x0086}
0x1032…104a              Head {h00=0x0014, h01=0x0050, text=»  ENQ090, BDE C «, t00=0x000a, t01=0x009e}
0x104a…1062              Head {h00=0x0014, h01=0x0050, text=»  ENQ090, ENQ C «, t00=0x000a, t01=0x00b6}
0x1062…1078              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, FR C«, t00=0x000a, t01=0x00ce}
0x1078…108e              Head {h00=0x0012, h01=0x0050, text=»  ENQ090, TL C«, t00=0x000a, t01=0x00e4}
0x108e…10a2              Head {h00=0x0010, h01=0x0050, text=»  ENQ090 PTR«, t00=0x000a, t01=0x00fa}
0x10a2…10b0              Head {h00=0x000a, h01=0x0050, text=»ENQ016«, t00=0x000a, t01=0x010e}
0x10b0…10c8              Head {h00=0x0014, h01=0x0050, text=» PERF LEAD,CBIN1«, t00=0x000a, t01=0x011c}
0x10c8…10f6              Head {h00=0x002a, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN4,TSTR4,CBIN0«, t00=0x000a, t01=0x0134}
0x10f6…110e              Head {h00=0x0014, h01=0x0050, text=» ADD TBIN4,CBIN4«, t00=0x000a, t01=0x0162}
0x110e…113e              Head {h00=0x002c, h01=0x0050, text=» XCOPY TSCRBUF,TBIN4,CBIN12,TKBBUF,CBIN0«, t00=0x000a, t01=0x017a}
0x113e…1158              Head {h00=0x0016, h01=0x0050, text=» ADD TBIN4,CBIN12 «, t00=0x000b, t01=0x001a}
0x1158…1168              Head {h00=0x000c, h01=0x0050, text=»ENQ016E «, t00=0x000b, t01=0x0034}
0x1168…1176              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0044}
0x1176…11b2              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x000b, t01=0x0052}
0x11b2…11c0              Head {h00=0x000a, h01=0x0050, text=»ENQ030«, t00=0x000b, t01=0x008e}
0x11c0…11ea              Head {h00=0x0026, h01=0x0050, text=»* THE BUFFER IS PACKED NOW AND HAS«, t00=0x000b, t01=0x009c}
0x11ea…1210              Head {h00=0x0022, h01=0x0050, text=»* TO BE SENT TO THE MAINFRAME «, t00=0x000b, t01=0x00c6}
0x1210…122c              Head {h00=0x0018, h01=0x0050, text=» MOVE TSTR2K,TSCRBUF«, t00=0x000b, t01=0x00ec}
0x122c…1252              Head {h00=0x0022, h01=0x0050, text=» MOVE TSTR20,='00030     01 ' «, t00=0x000b, t01=0x0108}
0x1252…1286              Head {h00=0x0030, h01=0x0050, text=» XCOPY TSTR20,CBIN5,CBIN3,TSTR3,CBIN0 BRANCH«, t00=0x000b, t01=0x012e}
0x1286…12c2              Head {h00=0x0038, h01=0x0050, text=» XCOPY TSTR20,CBIN12,CBIN5,TTERMID,CBIN0 TERMINALID «, t00=0x000b, t01=0x0162}
0x12c2…12f2              Head {h00=0x002c, h01=0x0050, text=» INSRT TSTR2K,CBIN0,CBIN17,TSTR20,CBIN0 «, t00=0x000c, t01=0x000e}
0x12f2…130e              Head {h00=0x0018, h01=0x0050, text=» PERF DCSEND,TSTR2K «, t00=0x000c, t01=0x003e}
0x130e…1322              Head {h00=0x0010, h01=0x0050, text=» BERR ENQ072«, t00=0x000c, t01=0x005a}
0x1322…133c              Head {h00=0x0016, h01=0x0050, text=»* ANSWER RECEIVED «, t00=0x000c, t01=0x006e}
0x133c…136a              Head {h00=0x002a, h01=0x0050, text=» XCOPY TSTR2,CBIN0,CBIN2,TSTR2K,CBIN10«, t00=0x000c, t01=0x0088}
0x136a…13a0              Head {h00=0x0032, h01=0x0050, text=» CBE TSTR2,='99',ENQ050 WAS IT FOR THE PRINTER«, t00=0x000c, t01=0x00b6}
0x13a0…13ca              Head {h00=0x0026, h01=0x0050, text=» SET TENQ ENQ GOING ON, DONT SAVE «, t00=0x000c, t01=0x00ec}
0x13ca…13de              Head {h00=0x0010, h01=0x0050, text=» PERF UNPCK «, t00=0x000c, t01=0x0116}
0x13de…13f6              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,=W'24'«, t00=0x000c, t01=0x012a}
0x13f6…1414              Head {h00=0x001a, h01=0x0050, text=» PERF POSCUR,TP1,CBIN1«, t00=0x000c, t01=0x0142}
0x1414…142c              Head {h00=0x0014, h01=0x0050, text=» MOVE TP1,CBIN1 «, t00=0x000c, t01=0x0160}
0x142c…1456              Head {h00=0x0026, h01=0x0050, text=» PERF KBREAD,TP1,KTABBE,TP2,CBIN2 «, t00=0x000c, t01=0x0178}
0x1456…146e              Head {h00=0x0014, h01=0x0050, text=» TBT TINT,ENQ090«, t00=0x000d, t01=0x0012}
0x146e…14a8              Head {h00=0x0036, h01=0x0050, text=» CBNG TBIN4,CBIN6,ENQ090 FINISHED WITH INQUIRIES? «, t00=0x000d, t01=0x002a}
0x14a8…14ba              Head {h00=0x000e, h01=0x0050, text=» B ENQ010 «, t00=0x000d, t01=0x0064}
0x14ba…14e2              Head {h00=0x0024, h01=0x0050, text=»ENQ050   RECEIVED PRINTER OUTPUT«, t00=0x000d, t01=0x0076}
0x14e2…14f6              Head {h00=0x0010, h01=0x0050, text=» PERF UNPPRT«, t00=0x000d, t01=0x009e}
0x14f6…1508              Head {h00=0x000e, h01=0x0050, text=» B ENQ090 «, t00=0x000d, t01=0x00b2}
0x1508…1516              Head {h00=0x000a, h01=0x0050, text=»ENQ071«, t00=0x000d, t01=0x00c4}
0x1516…1552              Head {h00=0x0038, h01=0x0050, text=» MOVE TSTR80,='QERR1 - INVALID FUNCTION SELECTION ' «, t00=0x000d, t01=0x00d2}
0x1552…1566              Head {h00=0x0010, h01=0x0050, text=» PERF ERWRIT«, t00=0x000d, t01=0x010e}
0x1566…1578              Head {h00=0x000e, h01=0x0050, text=» B ENQ095 «, t00=0x000d, t01=0x0122}
0x1578…1586              Head {h00=0x000a, h01=0x0050, text=»ENQ072«, t00=0x000d, t01=0x0134}
0x1586…15bc              Head {h00=0x0032, h01=0x0050, text=» MOVE TSTR80,='QERR2 - ENQUIRY NOT AVAILABLE '«, t00=0x000d, t01=0x0142}
0x15bc…15d0              Head {h00=0x0010, h01=0x0050, text=» PERF ERWRIT«, t00=0x000d, t01=0x0178}
0x15d0…15e2              Head {h00=0x000e, h01=0x0050, text=» B ENQ095 «, t00=0x000d, t01=0x018c}
0x15e2…15f0              Head {h00=0x000a, h01=0x0050, text=»ENQ090«, t00=0x000e, t01=0x000e}
0x15f0…1608              Head {h00=0x0014, h01=0x0050, text=» PERF PULL,CBIN4«, t00=0x000e, t01=0x001c}
0x1608…161c              Head {h00=0x0010, h01=0x0050, text=» CLEAR TENQ «, t00=0x000e, t01=0x0034}
0x161c…1642              Head {h00=0x0022, h01=0x0050, text=» CMP CBIN0,CBIN0 SER CR TO OK «, t00=0x000e, t01=0x0048}
0x1642…1654              Head {h00=0x000e, h01=0x0050, text=» B ENQ099 «, t00=0x000e, t01=0x006e}
0x1654…1662              Head {h00=0x000a, h01=0x0050, text=»ENQ095«, t00=0x000e, t01=0x0080}
0x1662…167a              Head {h00=0x0014, h01=0x0050, text=» PERF PULL,CBIN4«, t00=0x000e, t01=0x008e}
0x167a…168e              Head {h00=0x0010, h01=0x0050, text=» CLEAR TENQ «, t00=0x000e, t01=0x00a6}
0x168e…16b8              Head {h00=0x0026, h01=0x0050, text=» CMP CBIN0,CBIN1 SET CR TO NOT-OK «, t00=0x000e, t01=0x00ba}
0x16b8…16c6              Head {h00=0x000a, h01=0x0050, text=»ENQ099«, t00=0x000e, t01=0x00e4}
0x16c6…16d2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000e, t01=0x00f2}
0x16d2…16e0              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000e, t01=0x00fe}
0x16e0…16ee              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x010c}
0x16ee…1712              Head {h00=0x0020, h01=0x0050, text=»ENQFRM FRMT  ENQUIRY FORMAT «, t00=0x000e, t01=0x011a}
0x1712…1726              Head {h00=0x0010, h01=0x0050, text=» FILLR '1',2«, t00=0x000e, t01=0x013e}
0x1726…173c              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',30 «, t00=0x000e, t01=0x0152}
0x173c…1760              Head {h00=0x0020, h01=0x0050, text=» FTEXT 'ENQ - ENQUIRY INPUT'«, t00=0x000e, t01=0x0168}
0x1760…176c              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000e, t01=0x018c}
0x176c…1778              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000f, t01=0x0008}
0x1778…178e              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',30 «, t00=0x000f, t01=0x0014}
0x178e…17b2              Head {h00=0x0020, h01=0x0050, text=» FTEXT 'ENQUIRIES AVAILABLE'«, t00=0x000f, t01=0x002a}
0x17b2…17be              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000f, t01=0x004e}
0x17be…17ca              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000f, t01=0x005a}
0x17ca…17e0              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x000f, t01=0x0066}
0x17e0…17fa              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='SAVINGS '«, t00=0x000f, t01=0x007c}
0x17fa…1814              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x000f, t01=0x0096}
0x1814…182e              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BALANCE '«, t00=0x000f, t01=0x00b0}
0x182e…1844              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',23 «, t00=0x000f, t01=0x00ca}
0x1844…1858              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='01'«, t00=0x000f, t01=0x00e0}
0x1858…1864              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000f, t01=0x00f4}
0x1864…187a              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x000f, t01=0x0100}
0x187a…1894              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='SAVINGS '«, t00=0x000f, t01=0x0116}
0x1894…18ae              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x000f, t01=0x0130}
0x18ae…18c8              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BALANCE '«, t00=0x000f, t01=0x014a}
0x18c8…18f2              Head {h00=0x0026, h01=0x0050, text=» FCOPY ='AND LAST FIVE ENTRIES  ' «, t00=0x000f, t01=0x0164}
0x18f2…1906              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='02'«, t00=0x000f, t01=0x018e}
0x1906…1912              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0010, t01=0x0012}
0x1912…1928              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x0010, t01=0x001e}
0x1928…1942              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='CURRENT '«, t00=0x0010, t01=0x0034}
0x1942…195c              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x0010, t01=0x004e}
0x195c…1976              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BALANCE '«, t00=0x0010, t01=0x0068}
0x1976…198c              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',23 «, t00=0x0010, t01=0x0082}
0x198c…19a0              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='03'«, t00=0x0010, t01=0x0098}
0x19a0…19ac              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0010, t01=0x00ac}
0x19ac…19c2              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x0010, t01=0x00b8}
0x19c2…19dc              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='CURRENT '«, t00=0x0010, t01=0x00ce}
0x19dc…19f6              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x0010, t01=0x00e8}
0x19f6…1a10              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='BALANCE '«, t00=0x0010, t01=0x0102}
0x1a10…1a3a              Head {h00=0x0026, h01=0x0050, text=» FCOPY ='AND LAST FIVE ENTRIES  ' «, t00=0x0010, t01=0x011c}
0x1a3a…1a4e              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='04'«, t00=0x0010, t01=0x0146}
0x1a4e…1a5a              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0010, t01=0x015a}
0x1a5a…1a70              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x0010, t01=0x0166}
0x1a70…1a8a              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='CURRENT '«, t00=0x0010, t01=0x017c}
0x1a8a…1aa4              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x0011, t01=0x0008}
0x1aa4…1abe              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='DETAILS '«, t00=0x0011, t01=0x0022}
0x1abe…1ad4              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',23 «, t00=0x0011, t01=0x003c}
0x1ad4…1ae8              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='05'«, t00=0x0011, t01=0x0052}
0x1ae8…1af4              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0011, t01=0x0066}
0x1af4…1b0a              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x0011, t01=0x0072}
0x1b0a…1b24              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='CURRENT '«, t00=0x0011, t01=0x0088}
0x1b24…1b3e              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x0011, t01=0x00a2}
0x1b3e…1b5a              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='VOUCHERS ' «, t00=0x0011, t01=0x00bc}
0x1b5a…1b70              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',22 «, t00=0x0011, t01=0x00d8}
0x1b70…1b84              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='06'«, t00=0x0011, t01=0x00ee}
0x1b84…1b90              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0011, t01=0x0102}
0x1b90…1ba6              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',15 «, t00=0x0011, t01=0x010e}
0x1ba6…1bc0              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='ACCOUNT '«, t00=0x0011, t01=0x0124}
0x1bc0…1be4              Head {h00=0x0020, h01=0x0050, text=» FCOPY ='INTERIM STATEMENT '«, t00=0x0011, t01=0x013e}
0x1be4…1bfa              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',21 «, t00=0x0011, t01=0x0162}
0x1bfa…1c0e              Head {h00=0x0010, h01=0x0050, text=» FCOPY ='07'«, t00=0x0011, t01=0x0178}
0x1c0e…1c1e              Head {h00=0x000c, h01=0x0050, text=» FNL 11 «, t00=0x0011, t01=0x018c}
0x1c1e…1c38              Head {h00=0x0016, h01=0x0050, text=» FCOPY =' BRANCH' «, t00=0x0012, t01=0x000c}
0x1c38…1c4c              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',7«, t00=0x0012, t01=0x0026}
0x1c4c…1c64              Head {h00=0x0014, h01=0x0050, text=» FCOPY ='ACC NO'«, t00=0x0012, t01=0x003a}
0x1c64…1c7a              Head {h00=0x0012, h01=0x0050, text=» FILLR ' ',13 «, t00=0x0012, t01=0x0052}
0x1c7a…1c90              Head {h00=0x0012, h01=0x0050, text=» FCOPY ='TYPE'«, t00=0x0012, t01=0x0068}
0x1c90…1ca4              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x0012, t01=0x007e}
0x1ca4…1cbe              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='PRINTER' «, t00=0x0012, t01=0x0092}
0x1cbe…1cd2              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',6«, t00=0x0012, t01=0x00ac}
0x1cd2…1cec              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='VOUCHER' «, t00=0x0012, t01=0x00c0}
0x1cec…1cf8              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0012, t01=0x00da}
0x1cf8…1d06              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0012, t01=0x00e6}
0x1d06…1d12              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0012, t01=0x00f4}
0x1d12…1d16              Head {h00=0x4004, h01=0x0000}
0x1d16…1d1a              00 12 01 00                                                                                                                                                                                                                                       ┆    ┆
0x1d1a…1d22 (19, 1, 8)   20 04 00 00 00 13 00 04                                                                                                                                                                                                                           ┆        ┆
0x1d22…1d72 (20, 0, 400) 00 14 20 02 00 16 20 02 00 18 20 02 00 1a 20 02 00 1c 20 02 00 1e 20 02 00 20 20 02 00 22 20 02 00 24 20 02 00 26 20 02 00 28 20 02 00 2a 20 02 00 2c 20 02 00 2e 00 01 00 30 00 01 00 31 00 01 00 32 00 01 00 33 00 01 00 34 00 01 00 35 00 01   ┆                             "   $   &   (   *   ,   .   0   1   2   3   4   5  ┆
0x1d72…1dc2              00 36 00 01 00 37 00 01 00 38 00 01 00 39 00 02 00 3a 00 02 00 3c 00 02 00 3e 00 02 00 40 00 02 00 42 00 02 00 44 00 02 00 46 00 02 00 48 00 02 00 4a 00 02 00 4c 00 03 00 4e 00 03 00 51 00 03 00 54 00 04 00 57 00 04 00 5b 00 04 00 5f 00 05   ┆ 6   7   8   9   :   <   >   @   B   D   F   H   J   L   N   Q   T   W   [   _  ┆
0x1dc2…1e12              00 63 00 06 00 68 00 06 00 6e 00 07 00 74 00 07 00 7b 00 07 00 82 00 08 00 89 00 08 00 91 00 08 00 99 00 08 00 a1 00 08 00 a9 00 09 00 b1 00 0b 00 ba 00 0b 00 c5 00 0b 00 d0 00 0c 00 db 00 0c 00 e7 00 0c 00 f3 00 0d 00 ff 00 0e 01 0c 00 10   ┆ c   h   n   t   {                                                              ┆
0x1e12…1e62              01 1a 00 12 01 2a 00 15 01 3c 00 17 01 51 00 1e 01 68 00 23 01 86 10 03 00 00 00 0f 00 00 00 0c 00 00 00 aa 00 0c 1d 36 1a c4 1e 66 1c 6d 1e 6a 1c 70 1e 6e 1c 7f f6 a1 27 bc 23 30 1b 20 54 18 82 a6 f6 a1 27 bc 23 30 1b 20 54 0c 82 56 00 02   ┆     *   <   Q   h #                   6   f m j p n    ' #0  T     ' #0  T  V  ┆
0x1e62…1eb2              a2 a6 f2 01 8f 20 25 26 01 02 8f 20 3c 46 06 02 57 02 06 03 f6 a1 20 fa 8f 20 1f f2 04 00 9e 18 f6 a1 1e d0 2f 06 8f 20 1f f6 04 00 06 01 5f 10 f6 a1 21 7c f6 a1 22 30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1f e8 20 12 14 48 50   ┆      %&    <F  W                   /         _   !|  "0                      HP┆

Reduced view