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

⟦d911e98fb⟧

    Length: 10660 (0x29a4)
    Notes: pts_type(SC)
    Names: »CDCHKY.SC«

Derivation

└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
    └─⟦this⟧ »PTSDEMO/CDCHKY.SC« 

PTS(SC)

         IDENT    CDCHKY                CHECK FUNCTIONKEY-COMBINATION 
	DDUM	DEMODD
	PDIV 
	EXPROC	XEERR 
	ENTRY	CDCHKY 
************************************************************************
* 
* CHECK THE VALIDITY OF FUNCTION KEY COMBINATIONS 
* 
************************************************************************
CDCHKY	PROC 
CD000 
************************************************************************
**
* CHECKS ON CURRENCY*
**
************************************************************************
CD110					
	CBNE	KDCHECKS(NWKTBIX,KW1),=D'1',CD112			 
	CBNE	SWCCY,=W'0',CD990	ERROR		
	B 	CD120	NEXT CHECK		
**
* SPECIFIC CURRENCY CHECKS*
**
CD112					
	CBNE	KDCHECKS(NWKTBIX,KW1),=D'2',CD120	  NO SPECIFIC CHECK 
	CBE	SWCCY,=W'0',CD115			
**
* CURRENCY IS ON*
**
	TBT	SBCHEQUE,CD990			
	TBT	SBNOBOOK,CD990			
	TBT	SBCARD,CD990			
	TBT	SBRVS,CD990	ERRORS		
	B	CD120	NEXT CHECK		
**
* CURRENCY IS OFF*
**
CD115					
	TBF	SBFLDEMP,CD990	FIELD NOT EMPTY		
************************************************************************
**
* CHECKS ON CHEQUE*
**
************************************************************************
CD120					
	CBNE	KDCHECKS(NWKTBIX,KW2),=D'1',CD122			 
	TBT	SBCHEQUE,CD990	ERROR		
	B	CD130	NEXT CHECK		
**
* SPECIFIC CHEQUE CHECKS*
**
CD122					
	CBNE	KDCHECKS(NWKTBIX,KW2),=D'2',CD130	  NO SPECIFIC CHECK 
	TBF	SBCHEQUE,CD130	 ONLY IF CHEQUE IS ON		
**
* CHEQUE IS ON*
**
	TBT	SBRVS,CD990	'REVERSAL' MUST BE OFF		
	TBT	SBNOBOOK,CD990	'NOBOOK' MUST BE OFF		
	TBT	SBZEK,CD990	'ZEKOSA' MUST BE OFF 
	TBT	SBCARD,CD990	'CARD' MUST BE OFF
	TBF	SBFLDEMP,CD990	FIELD MUST BE EMPTY 
************************************************************************
**
* CHECKS ON NOBOOK*
**
************************************************************************
CD130 
	CBNE	KDCHECKS(NWKTBIX,KW3),=D'1',CD132			 
	TBT	SBNOBOOK,CD990	ERROR		
	B	CD140	NEXT CHECK		
**
* SPECIFIC NOBOOK CHECKS*
**
CD132					
	CBNE	KDCHECKS(NWKTBIX,KW3),=D'2',CD140			 
	TBF	SBNOBOOK,CD140	OK, NEXT CHECK		
	TBT	SBZEK,CD990	'ZEKOSA' MUST BE OFF 
	TBT	SBCARD,CD990	'CARD' MUST BE OFF		
	TBF	SBFLDEMP,CD990	FIELD MUST BE EMPTY 
************************************************************************
**
* CHECKS ON REVERSAL*
**
************************************************************************
CD140					
	CBNE	KDCHECKS(NWKTBIX,KW4),=D'1',CD142			 
	TBT	SBRVS,CD990	ERROR		
	B	CD150	NEXT CHECK		
CD142					
************************************************************************
**
* CHECKS ON CARD*
**
************************************************************************
CD150					
	CBNE	KDCHECKS(NWKTBIX,KW5),=D'1',CD152			 
	TBT	SBCARD,CD990	ERROR		
	B	CD160	NEXT CHECK		
**
* SPECIFIC CARD CHECKS*
**
CD152					
	CBNE	KDCHECKS(NWKTBIX,KW5),=D'2',CD154			 
	TBF	SBCARD,CD160	OK, NEXT CHECK		
	TBT	SBNOBOOK,CD990	'NOBOOK' MUST BE OFF		
	TBT	SBCHEQUE,CD990	'CHEQUE' MUST BE OFF		
	TBF	SBFLDEMP,CD990	FIELD MUST BE EMPTY 
CD154 
	CBNE	KDCHECKS(NWKTBIX,KW5),=D'3',CD160 
	TBF	SBCARD,CD160 
	TBF	SBCHEQUE,CD990 
************************************************************************
**
* CHECKS ON THE INPUT-FIELD*
**
************************************************************************
CD160					
	CBNE	KDCHECKS(NWKTBIX,KW6),=D'1',CD170			 
	TBF	SBFLDEMP,CD990	FIELD NOT EMPTY, ERROR		
************************************************************************
* 
*  CHECKS ON ZEKOSA FUNCTION REQUEST
* 
************************************************************************* 
CD170 

	MOVE	WW1,='7'
	CBNE	KDCHECKS(NWKTBIX,WW1),=D'1',CD172 
	TBT	SBZEK,CD990	ERROR, ZEKOSA ALREADY ON 
	B	CD999
************************************************************************
* 
*  SPECIFIC ZEKOSA CHECKS 
* 
************************************************************************* 
CD172 
	CBNE	KDCHECKS(NWKTBIX,WW1),=D'2',CD174 
	TBF	SBZEK,CD999	OK, NEXT CHECK 
	TBT	SBCARD,CD990	'CARD' OFF
	TBT	SBNOBOOK,CD990	'NOBOOK' OFF
	TBT	SBCHEQUE,CD990	'CHEQUE' OFF
	TBF	SBFLDEMP,CD990	FIELD MUST BE EMPTY 
CD174 
	CBNE	KDCHECKS(NWKTBIX,WW1),=D'3',CD999 
	TBF	SBZEK,CD999	OK, FINISHED 
	TBT	SBCARD,CD990 
	TBT	SBCHEQUE,CD990 
	B	CD999	OK TOO, FINISHED 
CD990 
	PERF	XEERR,=W'10',KW1	UNSERVICEABLE REQUEST
CD999 
	RET
	PEND 
* 
* 
	END

HexDump

0x0000…004e (0, 0, 400)  Head {h00=0x004a, h01=0x0050, text=»         IDENT    CDCHKY                CHECK FUNCTIONKEY-COMBINATION «, t00=0x0000, t01=0x0004}
0x004e…0062              Head {h00=0x0010, h01=0x000c, text=» DDUM DEMODD«, t00=0x0000, t01=0x0052}
0x0062…0070              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0066}
0x0070…0086              Head {h00=0x0012, h01=0x0050, text=» EXPROC XEERR «, t00=0x0000, t01=0x0074}
0x0086…009c              Head {h00=0x0012, h01=0x000d, text=» ENTRY CDCHKY «, t00=0x0000, t01=0x008a}
0x009c…00ec              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x00a0}
0x00ec…00f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f0}
0x00f6…0130              Head {h00=0x0036, h01=0x0050, text=»* CHECK THE VALIDITY OF FUNCTION KEY COMBINATIONS «, t00=0x0000, t01=0x00fa}
0x0130…013a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0134}
0x013a…018a              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x013e}
0x018a…019e              Head {h00=0x0010, h01=0x0050, text=»CDCHKY PROC «, t00=0x0000, t01=0x018e}
0x019e…01ac              Head {h00=0x000a, h01=0x0050, text=»CD000 «, t00=0x0001, t01=0x0012}
0x01ac…01fc              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0001, t01=0x0020}
0x01fc…024c              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0001, t01=0x0070}
0x024c…029c              Head {h00=0x004c, h01=0x0050, text=»* CHECKS ON CURRENCY                                                   *«, t00=0x0001, t01=0x00c0}
0x029c…02ec              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0001, t01=0x0110}
0x02ec…033c              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0001, t01=0x0160}
0x033c…038c              Head {h00=0x004c, h01=0x0050, text=»CD110                                                                   «, t00=0x0002, t01=0x0020}
0x038c…03dc              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW1),=D'1',CD112                                 «, t00=0x0002, t01=0x0070}
0x03dc…042c              Head {h00=0x004c, h01=0x0050, text=» CBNE SWCCY,=W'0',CD990 ERROR                                           «, t00=0x0002, t01=0x00c0}
0x042c…047c              Head {h00=0x004c, h01=0x0050, text=» B  CD120 NEXT CHECK                                                    «, t00=0x0002, t01=0x0110}
0x047c…04cc              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0002, t01=0x0160}
0x04cc…051c              Head {h00=0x004c, h01=0x0050, text=»* SPECIFIC CURRENCY CHECKS                                             *«, t00=0x0003, t01=0x0020}
0x051c…056c              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0003, t01=0x0070}
0x056c…05bc              Head {h00=0x004c, h01=0x0050, text=»CD112                                                                   «, t00=0x0003, t01=0x00c0}
0x05bc…0600              Head {h00=0x0040, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW1),=D'2',CD120   NO SPECIFIC CHECK «, t00=0x0003, t01=0x0110}
0x0600…0650              Head {h00=0x004c, h01=0x0050, text=» CBE SWCCY,=W'0',CD115                                                  «, t00=0x0003, t01=0x0154}
0x0650…06a0              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0004, t01=0x0014}
0x06a0…06f0              Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS ON                                                       *«, t00=0x0004, t01=0x0064}
0x06f0…0740              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0004, t01=0x00b4}
0x0740…0790              Head {h00=0x004c, h01=0x0050, text=» TBT SBCHEQUE,CD990                                                     «, t00=0x0004, t01=0x0104}
0x0790…07e0              Head {h00=0x004c, h01=0x0050, text=» TBT SBNOBOOK,CD990                                                     «, t00=0x0004, t01=0x0154}
0x07e0…0830              Head {h00=0x004c, h01=0x0050, text=» TBT SBCARD,CD990                                                       «, t00=0x0005, t01=0x0014}
0x0830…0880              Head {h00=0x004c, h01=0x0050, text=» TBT SBRVS,CD990 ERRORS                                                 «, t00=0x0005, t01=0x0064}
0x0880…08d0              Head {h00=0x004c, h01=0x0050, text=» B CD120 NEXT CHECK                                                     «, t00=0x0005, t01=0x00b4}
0x08d0…0920              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0005, t01=0x0104}
0x0920…0970              Head {h00=0x004c, h01=0x0050, text=»* CURRENCY IS OFF                                                      *«, t00=0x0005, t01=0x0154}
0x0970…09c0              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0006, t01=0x0014}
0x09c0…0a10              Head {h00=0x004c, h01=0x0050, text=»CD115                                                                   «, t00=0x0006, t01=0x0064}
0x0a10…0a60              Head {h00=0x004c, h01=0x0050, text=» TBF SBFLDEMP,CD990 FIELD NOT EMPTY                                     «, t00=0x0006, t01=0x00b4}
0x0a60…0ab0              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0006, t01=0x0104}
0x0ab0…0b00              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0006, t01=0x0154}
0x0b00…0b50              Head {h00=0x004c, h01=0x0050, text=»* CHECKS ON CHEQUE                                                     *«, t00=0x0007, t01=0x0014}
0x0b50…0ba0              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0007, t01=0x0064}
0x0ba0…0bf0              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0007, t01=0x00b4}
0x0bf0…0c40              Head {h00=0x004c, h01=0x0050, text=»CD120                                                                   «, t00=0x0007, t01=0x0104}
0x0c40…0c90              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW2),=D'1',CD122                                 «, t00=0x0007, t01=0x0154}
0x0c90…0ce0              Head {h00=0x004c, h01=0x0050, text=» TBT SBCHEQUE,CD990 ERROR                                               «, t00=0x0008, t01=0x0014}
0x0ce0…0d30              Head {h00=0x004c, h01=0x0050, text=» B CD130 NEXT CHECK                                                     «, t00=0x0008, t01=0x0064}
0x0d30…0d80              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0008, t01=0x00b4}
0x0d80…0dd0              Head {h00=0x004c, h01=0x0050, text=»* SPECIFIC CHEQUE CHECKS                                               *«, t00=0x0008, t01=0x0104}
0x0dd0…0e20              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0008, t01=0x0154}
0x0e20…0e70              Head {h00=0x004c, h01=0x0050, text=»CD122                                                                   «, t00=0x0009, t01=0x0014}
0x0e70…0eb4              Head {h00=0x0040, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW2),=D'2',CD130   NO SPECIFIC CHECK «, t00=0x0009, t01=0x0064}
0x0eb4…0f04              Head {h00=0x004c, h01=0x0050, text=» TBF SBCHEQUE,CD130  ONLY IF CHEQUE IS ON                               «, t00=0x0009, t01=0x00a8}
0x0f04…0f54              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0009, t01=0x00f8}
0x0f54…0fa4              Head {h00=0x004c, h01=0x0050, text=»* CHEQUE IS ON                                                         *«, t00=0x0009, t01=0x0148}
0x0fa4…0ff4              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000a, t01=0x0008}
0x0ff4…1042              Head {h00=0x004a, h01=0x0050, text=» TBT SBRVS,CD990 'REVERSAL' MUST BE OFF                               «, t00=0x000a, t01=0x0058}
0x1042…1090              Head {h00=0x004a, h01=0x0050, text=» TBT SBNOBOOK,CD990 'NOBOOK' MUST BE OFF                              «, t00=0x000a, t01=0x00a6}
0x1090…10be              Head {h00=0x002a, h01=0x0050, text=» TBT SBZEK,CD990 'ZEKOSA' MUST BE OFF «, t00=0x000a, t01=0x00f4}
0x10be…10ea              Head {h00=0x0028, h01=0x0050, text=» TBT SBCARD,CD990 'CARD' MUST BE OFF«, t00=0x000a, t01=0x0122}
0x10ea…111a              Head {h00=0x002c, h01=0x0050, text=» TBF SBFLDEMP,CD990 FIELD MUST BE EMPTY «, t00=0x000a, t01=0x014e}
0x111a…116a              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000a, t01=0x017e}
0x116a…11ba              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000b, t01=0x003e}
0x11ba…120a              Head {h00=0x004c, h01=0x0050, text=»* CHECKS ON NOBOOK                                                     *«, t00=0x000b, t01=0x008e}
0x120a…125a              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000b, t01=0x00de}
0x125a…12aa              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000b, t01=0x012e}
0x12aa…12b8              Head {h00=0x000a, h01=0x0050, text=»CD130 «, t00=0x000b, t01=0x017e}
0x12b8…1308              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW3),=D'1',CD132                                 «, t00=0x000b, t01=0x018c}
0x1308…1358              Head {h00=0x004c, h01=0x0050, text=» TBT SBNOBOOK,CD990 ERROR                                               «, t00=0x000c, t01=0x004c}
0x1358…13a8              Head {h00=0x004c, h01=0x0050, text=» B CD140 NEXT CHECK                                                     «, t00=0x000c, t01=0x009c}
0x13a8…13f8              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000c, t01=0x00ec}
0x13f8…1448              Head {h00=0x004c, h01=0x0050, text=»* SPECIFIC NOBOOK CHECKS                                               *«, t00=0x000c, t01=0x013c}
0x1448…1498              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000c, t01=0x018c}
0x1498…14e8              Head {h00=0x004c, h01=0x0050, text=»CD132                                                                   «, t00=0x000d, t01=0x004c}
0x14e8…1538              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW3),=D'2',CD140                                 «, t00=0x000d, t01=0x009c}
0x1538…1588              Head {h00=0x004c, h01=0x0050, text=» TBF SBNOBOOK,CD140 OK, NEXT CHECK                                      «, t00=0x000d, t01=0x00ec}
0x1588…15b6              Head {h00=0x002a, h01=0x0050, text=» TBT SBZEK,CD990 'ZEKOSA' MUST BE OFF «, t00=0x000d, t01=0x013c}
0x15b6…1604              Head {h00=0x004a, h01=0x0050, text=» TBT SBCARD,CD990 'CARD' MUST BE OFF                                  «, t00=0x000d, t01=0x016a}
0x1604…1634              Head {h00=0x002c, h01=0x0050, text=» TBF SBFLDEMP,CD990 FIELD MUST BE EMPTY «, t00=0x000e, t01=0x0028}
0x1634…1684              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000e, t01=0x0058}
0x1684…16d4              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000e, t01=0x00a8}
0x16d4…1724              Head {h00=0x004c, h01=0x0050, text=»* CHECKS ON REVERSAL                                                   *«, t00=0x000e, t01=0x00f8}
0x1724…1774              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x000e, t01=0x0148}
0x1774…17c4              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000f, t01=0x0008}
0x17c4…1814              Head {h00=0x004c, h01=0x0050, text=»CD140                                                                   «, t00=0x000f, t01=0x0058}
0x1814…1864              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW4),=D'1',CD142                                 «, t00=0x000f, t01=0x00a8}
0x1864…18b4              Head {h00=0x004c, h01=0x0050, text=» TBT SBRVS,CD990 ERROR                                                  «, t00=0x000f, t01=0x00f8}
0x18b4…1904              Head {h00=0x004c, h01=0x0050, text=» B CD150 NEXT CHECK                                                     «, t00=0x000f, t01=0x0148}
0x1904…1954              Head {h00=0x004c, h01=0x0050, text=»CD142                                                                   «, t00=0x0010, t01=0x0008}
0x1954…19a4              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0010, t01=0x0058}
0x19a4…19f4              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0010, t01=0x00a8}
0x19f4…1a44              Head {h00=0x004c, h01=0x0050, text=»* CHECKS ON CARD                                                       *«, t00=0x0010, t01=0x00f8}
0x1a44…1a94              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0010, t01=0x0148}
0x1a94…1ae4              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0011, t01=0x0008}
0x1ae4…1b34              Head {h00=0x004c, h01=0x0050, text=»CD150                                                                   «, t00=0x0011, t01=0x0058}
0x1b34…1b84              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW5),=D'1',CD152                                 «, t00=0x0011, t01=0x00a8}
0x1b84…1bd4              Head {h00=0x004c, h01=0x0050, text=» TBT SBCARD,CD990 ERROR                                                 «, t00=0x0011, t01=0x00f8}
0x1bd4…1c24              Head {h00=0x004c, h01=0x0050, text=» B CD160 NEXT CHECK                                                     «, t00=0x0011, t01=0x0148}
0x1c24…1c74              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0012, t01=0x0008}
0x1c74…1cc4              Head {h00=0x004c, h01=0x0050, text=»* SPECIFIC CARD CHECKS                                                 *«, t00=0x0012, t01=0x0058}
0x1cc4…1d14              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0012, t01=0x00a8}
0x1d14…1d64              Head {h00=0x004c, h01=0x0050, text=»CD152                                                                   «, t00=0x0012, t01=0x00f8}
0x1d64…1db4              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW5),=D'2',CD154                                 «, t00=0x0012, t01=0x0148}
0x1db4…1e04              Head {h00=0x004c, h01=0x0050, text=» TBF SBCARD,CD160 OK, NEXT CHECK                                        «, t00=0x0013, t01=0x0008}
0x1e04…1e52              Head {h00=0x004a, h01=0x0050, text=» TBT SBNOBOOK,CD990 'NOBOOK' MUST BE OFF                              «, t00=0x0013, t01=0x0058}
0x1e52…1ea0              Head {h00=0x004a, h01=0x0050, text=» TBT SBCHEQUE,CD990 'CHEQUE' MUST BE OFF                              «, t00=0x0013, t01=0x00a6}
0x1ea0…1ed0              Head {h00=0x002c, h01=0x0050, text=» TBF SBFLDEMP,CD990 FIELD MUST BE EMPTY «, t00=0x0013, t01=0x00f4}
0x1ed0…1ede              Head {h00=0x000a, h01=0x0050, text=»CD154 «, t00=0x0013, t01=0x0124}
0x1ede…1f0e              Head {h00=0x002c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW5),=D'3',CD160 «, t00=0x0013, t01=0x0132}
0x1f0e…1f28              Head {h00=0x0016, h01=0x0050, text=» TBF SBCARD,CD160 «, t00=0x0013, t01=0x0162}
0x1f28…1f44              Head {h00=0x0018, h01=0x0050, text=» TBF SBCHEQUE,CD990 «, t00=0x0013, t01=0x017c}
0x1f44…1f94              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0014, t01=0x0008}
0x1f94…1fe4              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0014, t01=0x0058}
0x1fe4…2034              Head {h00=0x004c, h01=0x0050, text=»* CHECKS ON THE INPUT-FIELD                                            *«, t00=0x0014, t01=0x00a8}
0x2034…2084              Head {h00=0x004c, h01=0x0050, text=»*                                                                      *«, t00=0x0014, t01=0x00f8}
0x2084…20d4              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0014, t01=0x0148}
0x20d4…2124              Head {h00=0x004c, h01=0x0050, text=»CD160                                                                   «, t00=0x0015, t01=0x0008}
0x2124…2174              Head {h00=0x004c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,KW6),=D'1',CD170                                 «, t00=0x0015, t01=0x0058}
0x2174…21c4              Head {h00=0x004c, h01=0x0050, text=» TBF SBFLDEMP,CD990 FIELD NOT EMPTY, ERROR                              «, t00=0x0015, t01=0x00a8}
0x21c4…2214              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0015, t01=0x00f8}
0x2214…221e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0148}
0x221e…224a              Head {h00=0x0028, h01=0x0050, text=»*  CHECKS ON ZEKOSA FUNCTION REQUEST«, t00=0x0015, t01=0x0152}
0x224a…2254              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017e}
0x2254…22a6              Head {h00=0x004e, h01=0x0050, text=»************************************************************************* «, t00=0x0015, t01=0x0188}
0x22a6…22b4              Head {h00=0x000a, h01=0x0050, text=»CD170 «, t00=0x0016, t01=0x004a}
0x22b4…22bc              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0058}
0x22bc…22d2              Head {h00=0x0012, h01=0x0050, text=» MOVE WW1,='7'«, t00=0x0016, t01=0x0060}
0x22d2…2302              Head {h00=0x002c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,WW1),=D'1',CD172 «, t00=0x0016, t01=0x0076}
0x2302…2334              Head {h00=0x002e, h01=0x0050, text=» TBT SBZEK,CD990 ERROR, ZEKOSA ALREADY ON «, t00=0x0016, t01=0x00a6}
0x2334…2344              Head {h00=0x000c, h01=0x0050, text=» B CD999«, t00=0x0016, t01=0x00d8}
0x2344…2394              Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0016, t01=0x00e8}
0x2394…239e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0138}
0x239e…23c0              Head {h00=0x001e, h01=0x0050, text=»*  SPECIFIC ZEKOSA CHECKS «, t00=0x0016, t01=0x0142}
0x23c0…23ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0164}
0x23ca…241c              Head {h00=0x004e, h01=0x0050, text=»************************************************************************* «, t00=0x0016, t01=0x016e}
0x241c…242a              Head {h00=0x000a, h01=0x0050, text=»CD172 «, t00=0x0017, t01=0x0030}
0x242a…245a              Head {h00=0x002c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,WW1),=D'2',CD174 «, t00=0x0017, t01=0x003e}
0x245a…2482              Head {h00=0x0024, h01=0x0050, text=» TBF SBZEK,CD999 OK, NEXT CHECK «, t00=0x0017, t01=0x006e}
0x2482…24a6              Head {h00=0x0020, h01=0x0050, text=» TBT SBCARD,CD990 'CARD' OFF«, t00=0x0017, t01=0x0096}
0x24a6…24ce              Head {h00=0x0024, h01=0x0050, text=» TBT SBNOBOOK,CD990 'NOBOOK' OFF«, t00=0x0017, t01=0x00ba}
0x24ce…24f6              Head {h00=0x0024, h01=0x0050, text=» TBT SBCHEQUE,CD990 'CHEQUE' OFF«, t00=0x0017, t01=0x00e2}
0x24f6…2526              Head {h00=0x002c, h01=0x0050, text=» TBF SBFLDEMP,CD990 FIELD MUST BE EMPTY «, t00=0x0017, t01=0x010a}
0x2526…2534              Head {h00=0x000a, h01=0x0050, text=»CD174 «, t00=0x0017, t01=0x013a}
0x2534…2564              Head {h00=0x002c, h01=0x0050, text=» CBNE KDCHECKS(NWKTBIX,WW1),=D'3',CD999 «, t00=0x0017, t01=0x0148}
0x2564…258a              Head {h00=0x0022, h01=0x0050, text=» TBF SBZEK,CD999 OK, FINISHED «, t00=0x0017, t01=0x0178}
0x258a…25a4              Head {h00=0x0016, h01=0x0050, text=» TBT SBCARD,CD990 «, t00=0x0018, t01=0x000e}
0x25a4…25c0              Head {h00=0x0018, h01=0x0050, text=» TBT SBCHEQUE,CD990 «, t00=0x0018, t01=0x0028}
0x25c0…25e2              Head {h00=0x001e, h01=0x0050, text=» B CD999 OK TOO, FINISHED «, t00=0x0018, t01=0x0044}
0x25e2…25f0              Head {h00=0x000a, h01=0x0005, text=»CD990 «, t00=0x0018, t01=0x0066}
0x25f0…2624              Head {h00=0x0030, h01=0x0050, text=» PERF XEERR,=W'10',KW1 UNSERVICEABLE REQUEST«, t00=0x0018, t01=0x0074}
0x2624…2632              Head {h00=0x000a, h01=0x0005, text=»CD999 «, t00=0x0018, t01=0x00a8}
0x2632…263e              Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0018, t01=0x00b6}
0x263e…264c              Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0018, t01=0x00c2}
0x264c…2656              Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0018, t01=0x00d0}
0x2656…2660              Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0018, t01=0x00da}
0x2660…266c              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0018, t01=0x00e4}
0x266c…2670              Head {h00=0x4004, h01=0x0000}
0x2670…2674              00 18 00 f0                                                                                                                                                                                                                                       ┆    ┆
0x2674…267c (25, 1, 8)   20 04 00 00 00 19 00 04                                                                                                                                                                                                                           ┆        ┆
0x267c…2684 (26, 1, 8)   20 04 00 00 00 2a 00 04                                                                                                                                                                                                                           ┆     *  ┆
0x2684…26d4 (27, 0, 400) 30 01 00 2d 30 01 00 2e 00 46 00 01 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 b0 01 00 3a   ┆0  -0  . F                                                                     :┆
0x26d4…2724              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 30 06 00 14 30 06 00 1a 00 20 00 20 30 02 00 40 06 1e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 20 20 20   ┆                                        0   0       0  @                        ┆
0x2724…2774              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                         […0x1…]
0x27c4…2814              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0b   ┆                                                                                ┆
0x2814…2864 (28, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                                                                ┆
                         […0x3…]
0x2954…29a4              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02   ┆                                                                                ┆

Reduced view