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

⟦20e438564⟧ 

    Length: 6858 (0x1aca)
    Notes: pts_type(SC)
    Names: »C:WBS.SC«

Derivation

└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
    └─⟦this⟧ »BDKAPP/C:WBS.SC«

PTS(SC)

	IDENT C:WBS 	CONPAC REL=1.0 DATE= 80.04.29 
			UPDATE #9
*************************************************************** 
* 
*	CONCENTRATOR APPLICATION PACKAGE  PEAB-T
* 
*	PROGRAMMER:  PER OMAN / PAN 
* 
* 
*	C : W B S 
* 
* 
*   * 
*   THE MODULE CONTAINS WORK AREAS FOR CC AND CONSTANTS 
*   LINE AND TC WORKBLOCK DUMMYS AND NETWORK AREAS
* 
*   APPLICATION : XXXX
*   * 
* 
* 
*************************************************************** 
	EJECT		IDENT C:WBS 
* 
* 
*	ENTRY ADDRESSES 
* 
*************************************************************** 
* 
*		ENTRY	DESCRIPTION
* 
	ENTRY	K:WBNW 
	ENTRY	K:WBCR 
	ENTRY	K:WBCC 
	ENTRY	K:WBD
	ENTRY	K:WBT
	ENTRY	K:WBCA 
	ENTRY	K:WBCB 
	ENTRY	K:DUM
	ENTRY	K:WBCI 
	ENTRY	U:WBPA	POSTEN APPL 
	ENTRY	U:WBPC	POSTEN APPL CONSTANTS 
	ENTRY	CASDAT 
* 
* 
	EJECT		IDENT C:WBS 
*************************************************************** 
* 
*   CC RESPONSE TIME COUNTERS 
* 
***************************************************************	
K:WBCR	DATA	0,/B	INTERVAL 1 FOR CC RESPONSE TIME COUNTER
	DATA	0,/B	2
	DATA	0,/B	         3 
	DATA	0,/B	         4 
	DATA	0,/B	         5 
	DATA	0,/B	         6 
	DATA	0,/B	         7 
	DATA	0,/B	         8 
	DATA	0,/B	         9 
	DATA	0,/B	        10 
	DATA	0,/B	        11 
	DATA	0,/B	        12 
	EJECT		IDENT C:WBS 
*************************************************************** 
* 
*   CC LINE WORKBLOCK 
* 
*************************************************************** 
K:WBCC	DATA	0,/B	NBR OF TIME-OUTS 
	DATA	0,0,/B	TOTAL NBR OF CC TRANSACTIONS 
	DATA	0,/B	NBR OF CC TRANSMISSION ERRORS
	DATA	0,/B	NBR OF SUPERV. MSGS
	DATA	'000000' 	TIME OF LAST REPLY
	EJECT		IDENT C:WBS 
******************************************************************* 
* 
*   NETWORK WORKBLOCK, CC RESPONSE TIME WORKBLOCK IN PERCENT
* 
******************************************************************
K:WBNW	EQU	*
	DATA	0,0,/B	1 INTERVAL CC PERCENT
	DATA	0,0,/B	2
	DATA	0,0,/B	3
	DATA	0,0,/B	4
	DATA	0,0,/B	5
	DATA	0,0,/B	6
	DATA	0,0,/B	7
	DATA	0,0,/B	8

	DATA	0,0,/B	9
	DATA	0,0,/B	10 
	DATA	0,0,/B	11 
	DATA	0,0,/B	12 
	DATA	0,0,/B	AVERAGE RESPONSE TIME CC 
	DATA	0,0,/B	NBR OF TRANS 
	DATA	0,0,/B	NBR OF TRANSMISSION ERRORS 
* 
	DATA	0,0,/B	WORKAREA FOR PERCENT 
	EJECT		IDENT C:WBS 
******************************************************************
* 
*  CC RESPONSE TIME INTERVAL TEXTS
* 
******************************************************************
K:WBCI	DATA	/B	 1 INTERVAL
	DATA	/5B	 2
	DATA	/10B	 3 
	DATA	/15B	 4 
	DATA	/20B	 5 
	DATA	/25B	 6 
	DATA	/30B	 7 
	DATA	/35B	 8 
	DATA	/40B	 9 
	DATA	/45B	10 
	DATA	/50B	11 
	DATA	/55B	12 
	DATA	0,0,0,/B	% WORK AREA 2
	EJECT		IDENT C:WBS 
*************************************************************** 
* 
*   DATE AND TIME WORK BLOCKS 
* 
***************************************************************	
K:WBD	DATA	'YYMMDD'	DATE
K:WBT	DATA	'HHMMSS'	TIME
*************************************************************** 
* 
*   LINE AND TC DUMMY WB
* 
***************************************************************	
K:DUM	DATA	0
*************************************************************** 
* 
*   APPLICATION WORKBLOCK 
* 
***************************************************************	
U:WBPA	EQU	*
CASDAT	DATA	0,0,0,0	CASSETTE DATE LABEL 
	EJECT		IDENT C:WBS 
*************************************************************** 
* 
*   CONSTANTS WORK BLOCK
* 
*************************************************************** 
K:WBCA	DATA	/3100	ONE 
K:WBCB	DATA	/1B01	ONE 
	DATA	/0B10	TEN 
	DATA	/0B01	100 
	DATA	/000B	1000
	DATA	/3276,/8B00	32K 
*************************************************************** 
* 
*   APPLICATION WORKBLOCK 
* 
***************************************************************	
U:WBPC	DATA	'0000'	WITHDRAWAL LIMIT 
	END

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT C:WBS  CONPAC REL=1.0 DATE= 80.04.29 «, t00=0x0000, t01=0x0004}
0x0034…0048              Head {h00=0x0010, h01=0x0050, text=»   UPDATE #9«, t00=0x0000, t01=0x0038}
0x0048…0090              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0000, t01=0x004c}
0x0090…009a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0094}
0x009a…00cc              Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR APPLICATION PACKAGE  PEAB-T«, t00=0x0000, t01=0x009e}
0x00cc…00d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d0}
0x00d6…00fc              Head {h00=0x0022, h01=0x0050, text=»* PROGRAMMER:  PER OMAN / PAN «, t00=0x0000, t01=0x00da}
0x00fc…0106              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x0106…0110              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x0110…0124              Head {h00=0x0010, h01=0x0050, text=»* C : W B S «, t00=0x0000, t01=0x0114}
0x0124…012e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0128}
0x012e…0138              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0132}
0x0138…0146              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0000, t01=0x013c}
0x0146…0186              Head {h00=0x003c, h01=0x0050, text=»*   THE MODULE CONTAINS WORK AREAS FOR CC AND CONSTANTS «, t00=0x0000, t01=0x014a}
0x0186…01c0              Head {h00=0x0036, h01=0x0050, text=»*   LINE AND TC WORKBLOCK DUMMYS AND NETWORK AREAS«, t00=0x0000, t01=0x018a}
0x01c0…01ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0034}
0x01ca…01e8              Head {h00=0x001a, h01=0x0050, text=»*   APPLICATION : XXXX«, t00=0x0001, t01=0x003e}
0x01e8…01f6              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0001, t01=0x005c}
0x01f6…0200              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006a}
0x0200…020a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0074}
0x020a…0252              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0001, t01=0x007e}
0x0252…026e              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x0001, t01=0x00c6}
0x026e…0278              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e2}
0x0278…0282              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ec}
0x0282…029c              Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0001, t01=0x00f6}
0x029c…02a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0110}
0x02a6…02ee              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0001, t01=0x011a}
0x02ee…02f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0162}
0x02f8…0314              Head {h00=0x0018, h01=0x0050, text=»*  ENTRY DESCRIPTION«, t00=0x0001, t01=0x016c}
0x0314…031e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0188}
0x031e…0334 (2, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» ENTRY K:WBNW «, t00=0x0002, t01=0x0004}
0x0334…034a              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:WBCR «, t00=0x0002, t01=0x001a}
0x034a…0360              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:WBCC «, t00=0x0002, t01=0x0030}
0x0360…0374              Head {h00=0x0010, h01=0x0050, text=» ENTRY K:WBD«, t00=0x0002, t01=0x0046}
0x0374…0388              Head {h00=0x0010, h01=0x0050, text=» ENTRY K:WBT«, t00=0x0002, t01=0x005a}
0x0388…039e              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:WBCA «, t00=0x0002, t01=0x006e}
0x039e…03b4              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:WBCB «, t00=0x0002, t01=0x0084}
0x03b4…03c8              Head {h00=0x0010, h01=0x0050, text=» ENTRY K:DUM«, t00=0x0002, t01=0x009a}
0x03c8…03de              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:WBCI «, t00=0x0002, t01=0x00ae}
0x03de…0400              Head {h00=0x001e, h01=0x0050, text=» ENTRY U:WBPA POSTEN APPL «, t00=0x0002, t01=0x00c4}
0x0400…042c              Head {h00=0x0028, h01=0x0050, text=» ENTRY U:WBPC POSTEN APPL CONSTANTS «, t00=0x0002, t01=0x00e6}
0x042c…0442              Head {h00=0x0012, h01=0x0050, text=» ENTRY CASDAT «, t00=0x0002, t01=0x0112}
0x0442…044c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0128}
0x044c…0456              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0132}
0x0456…0472              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x0002, t01=0x013c}
0x0472…04ba              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0158}
0x04ba…04c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0010}
0x04c4…04ea              Head {h00=0x0022, h01=0x0050, text=»*   CC RESPONSE TIME COUNTERS «, t00=0x0003, t01=0x001a}
0x04ea…04f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0040}
0x04f4…053c              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x004a}
0x053c…057c              Head {h00=0x003c, h01=0x0050, text=»K:WBCR DATA 0,/B INTERVAL 1 FOR CC RESPONSE TIME COUNTER«, t00=0x0003, t01=0x0092}
0x057c…0590              Head {h00=0x0010, h01=0x0050, text=» DATA 0,/B 2«, t00=0x0003, t01=0x00d2}
0x0590…05ae              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          3 «, t00=0x0003, t01=0x00e6}
0x05ae…05cc              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          4 «, t00=0x0003, t01=0x0104}
0x05cc…05ea              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          5 «, t00=0x0003, t01=0x0122}
0x05ea…0608              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          6 «, t00=0x0003, t01=0x0140}
0x0608…0626              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          7 «, t00=0x0003, t01=0x015e}
0x0626…0644              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          8 «, t00=0x0003, t01=0x017c}
0x0644…0662              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B          9 «, t00=0x0004, t01=0x000a}
0x0662…0680              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B         10 «, t00=0x0004, t01=0x0028}
0x0680…069e              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B         11 «, t00=0x0004, t01=0x0046}
0x069e…06bc              Head {h00=0x001a, h01=0x0050, text=» DATA 0,/B         12 «, t00=0x0004, t01=0x0064}
0x06bc…06d8              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x0004, t01=0x0082}
0x06d8…0720              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0004, t01=0x009e}
0x0720…072a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e6}
0x072a…0748              Head {h00=0x001a, h01=0x0050, text=»*   CC LINE WORKBLOCK «, t00=0x0004, t01=0x00f0}
0x0748…0752              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x010e}
0x0752…079a              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0004, t01=0x0118}
0x079a…07c4              Head {h00=0x0026, h01=0x0050, text=»K:WBCC DATA 0,/B NBR OF TIME-OUTS «, t00=0x0004, t01=0x0160}
0x07c4…07f6              Head {h00=0x002e, h01=0x0050, text=» DATA 0,0,/B TOTAL NBR OF CC TRANSACTIONS «, t00=0x0004, t01=0x018a}
0x07f6…0826              Head {h00=0x002c, h01=0x0050, text=» DATA 0,/B NBR OF CC TRANSMISSION ERRORS«, t00=0x0005, t01=0x002c}
0x0826…084c              Head {h00=0x0022, h01=0x0050, text=» DATA 0,/B NBR OF SUPERV. MSGS«, t00=0x0005, t01=0x005c}
0x084c…0876              Head {h00=0x0026, h01=0x0050, text=» DATA '000000'  TIME OF LAST REPLY«, t00=0x0005, t01=0x0082}
0x0876…0892              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x0005, t01=0x00ac}
0x0892…08de              Head {h00=0x0048, h01=0x0050, text=»******************************************************************* «, t00=0x0005, t01=0x00c8}
0x08de…08e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0114}
0x08e8…092c              Head {h00=0x0040, h01=0x0050, text=»*   NETWORK WORKBLOCK, CC RESPONSE TIME WORKBLOCK IN PERCENT«, t00=0x0005, t01=0x011e}
0x092c…0936              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0162}
0x0936…0980              Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0005, t01=0x016c}
0x0980…0994              Head {h00=0x0010, h01=0x0050, text=»K:WBNW EQU *«, t00=0x0006, t01=0x0026}
0x0994…09be              Head {h00=0x0026, h01=0x0050, text=» DATA 0,0,/B 1 INTERVAL CC PERCENT«, t00=0x0006, t01=0x003a}
0x09be…09d4              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 2«, t00=0x0006, t01=0x0064}
0x09d4…09ea              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 3«, t00=0x0006, t01=0x007a}
0x09ea…0a00              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 4«, t00=0x0006, t01=0x0090}
0x0a00…0a16              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 5«, t00=0x0006, t01=0x00a6}
0x0a16…0a2c              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 6«, t00=0x0006, t01=0x00bc}
0x0a2c…0a42              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 7«, t00=0x0006, t01=0x00d2}
0x0a42…0a58              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 8«, t00=0x0006, t01=0x00e8}
0x0a58…0a60              Head {h00=0x0004, h01=0x0050, t00=0x0006, t01=0x00fe}
0x0a60…0a76              Head {h00=0x0012, h01=0x0050, text=» DATA 0,0,/B 9«, t00=0x0006, t01=0x0106}
0x0a76…0a8e              Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,/B 10 «, t00=0x0006, t01=0x011c}
0x0a8e…0aa6              Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,/B 11 «, t00=0x0006, t01=0x0134}
0x0aa6…0abe              Head {h00=0x0014, h01=0x0050, text=» DATA 0,0,/B 12 «, t00=0x0006, t01=0x014c}
0x0abe…0aec              Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,/B AVERAGE RESPONSE TIME CC «, t00=0x0006, t01=0x0164}
0x0aec…0b0e (7, 0, 400)  Head {h00=0x001e, h01=0x0050, text=» DATA 0,0,/B NBR OF TRANS «, t00=0x0007, t01=0x0004}
0x0b0e…0b3e              Head {h00=0x002c, h01=0x0050, text=» DATA 0,0,/B NBR OF TRANSMISSION ERRORS «, t00=0x0007, t01=0x0026}
0x0b3e…0b48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0056}
0x0b48…0b72              Head {h00=0x0026, h01=0x0050, text=» DATA 0,0,/B WORKAREA FOR PERCENT «, t00=0x0007, t01=0x0060}
0x0b72…0b8e              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x0007, t01=0x008a}
0x0b8e…0bd8              Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0007, t01=0x00a6}
0x0bd8…0be2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00f0}
0x0be2…0c0c              Head {h00=0x0026, h01=0x0050, text=»*  CC RESPONSE TIME INTERVAL TEXTS«, t00=0x0007, t01=0x00fa}
0x0c0c…0c16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0124}
0x0c16…0c60              Head {h00=0x0046, h01=0x0050, text=»******************************************************************«, t00=0x0007, t01=0x012e}
0x0c60…0c82              Head {h00=0x001e, h01=0x0050, text=»K:WBCI DATA /B  1 INTERVAL«, t00=0x0007, t01=0x0178}
0x0c82…0c96              Head {h00=0x0010, h01=0x0050, text=» DATA /5B  2«, t00=0x0008, t01=0x000a}
0x0c96…0cac              Head {h00=0x0012, h01=0x0050, text=» DATA /10B  3 «, t00=0x0008, t01=0x001e}
0x0cac…0cc2              Head {h00=0x0012, h01=0x0050, text=» DATA /15B  4 «, t00=0x0008, t01=0x0034}
0x0cc2…0cd8              Head {h00=0x0012, h01=0x0050, text=» DATA /20B  5 «, t00=0x0008, t01=0x004a}
0x0cd8…0cee              Head {h00=0x0012, h01=0x0050, text=» DATA /25B  6 «, t00=0x0008, t01=0x0060}
0x0cee…0d04              Head {h00=0x0012, h01=0x0050, text=» DATA /30B  7 «, t00=0x0008, t01=0x0076}
0x0d04…0d1a              Head {h00=0x0012, h01=0x0050, text=» DATA /35B  8 «, t00=0x0008, t01=0x008c}
0x0d1a…0d30              Head {h00=0x0012, h01=0x0050, text=» DATA /40B  9 «, t00=0x0008, t01=0x00a2}
0x0d30…0d46              Head {h00=0x0012, h01=0x0050, text=» DATA /45B 10 «, t00=0x0008, t01=0x00b8}
0x0d46…0d5c              Head {h00=0x0012, h01=0x0050, text=» DATA /50B 11 «, t00=0x0008, t01=0x00ce}
0x0d5c…0d72              Head {h00=0x0012, h01=0x0050, text=» DATA /55B 12 «, t00=0x0008, t01=0x00e4}
0x0d72…0d96              Head {h00=0x0020, h01=0x0050, text=» DATA 0,0,0,/B % WORK AREA 2«, t00=0x0008, t01=0x00fa}
0x0d96…0db2              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x0008, t01=0x011e}
0x0db2…0dfa              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0008, t01=0x013a}
0x0dfa…0e04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0182}
0x0e04…0e2a              Head {h00=0x0022, h01=0x0050, text=»*   DATE AND TIME WORK BLOCKS «, t00=0x0008, t01=0x018c}
0x0e2a…0e34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0022}
0x0e34…0e7c              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0009, t01=0x002c}
0x0e7c…0e9c              Head {h00=0x001c, h01=0x0050, text=»K:WBD DATA 'YYMMDD' DATE«, t00=0x0009, t01=0x0074}
0x0e9c…0ebc              Head {h00=0x001c, h01=0x0050, text=»K:WBT DATA 'HHMMSS' TIME«, t00=0x0009, t01=0x0094}
0x0ebc…0f04              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0009, t01=0x00b4}
0x0f04…0f0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00fc}
0x0f0e…0f2e              Head {h00=0x001c, h01=0x0050, text=»*   LINE AND TC DUMMY WB«, t00=0x0009, t01=0x0106}
0x0f2e…0f38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0126}
0x0f38…0f80              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0009, t01=0x0130}
0x0f80…0f94              Head {h00=0x0010, h01=0x0050, text=»K:DUM DATA 0«, t00=0x0009, t01=0x0178}
0x0f94…0fdc              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0009, t01=0x018c}
0x0fdc…0fe6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0044}
0x0fe6…1008              Head {h00=0x001e, h01=0x0050, text=»*   APPLICATION WORKBLOCK «, t00=0x000a, t01=0x004e}
0x1008…1012              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0070}
0x1012…105a              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000a, t01=0x007a}
0x105a…106e              Head {h00=0x0010, h01=0x0050, text=»U:WBPA EQU *«, t00=0x000a, t01=0x00c2}
0x106e…109e              Head {h00=0x002c, h01=0x0050, text=»CASDAT DATA 0,0,0,0 CASSETTE DATE LABEL «, t00=0x000a, t01=0x00d6}
0x109e…10ba              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:WBS «, t00=0x000a, t01=0x0106}
0x10ba…1102              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000a, t01=0x0122}
0x1102…110c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016a}
0x110c…112c              Head {h00=0x001c, h01=0x0050, text=»*   CONSTANTS WORK BLOCK«, t00=0x000a, t01=0x0174}
0x112c…1136 (11, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0004}
0x1136…117e              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000b, t01=0x000e}
0x117e…119c              Head {h00=0x001a, h01=0x0050, text=»K:WBCA DATA /3100 ONE «, t00=0x000b, t01=0x0056}
0x119c…11ba              Head {h00=0x001a, h01=0x0050, text=»K:WBCB DATA /1B01 ONE «, t00=0x000b, t01=0x0074}
0x11ba…11d2              Head {h00=0x0014, h01=0x0050, text=» DATA /0B10 TEN «, t00=0x000b, t01=0x0092}
0x11d2…11ea              Head {h00=0x0014, h01=0x0050, text=» DATA /0B01 100 «, t00=0x000b, t01=0x00aa}
0x11ea…1202              Head {h00=0x0014, h01=0x0050, text=» DATA /000B 1000«, t00=0x000b, t01=0x00c2}
0x1202…1220              Head {h00=0x001a, h01=0x0050, text=» DATA /3276,/8B00 32K «, t00=0x000b, t01=0x00da}
0x1220…1268              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000b, t01=0x00f8}
0x1268…1272              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0140}
0x1272…1294              Head {h00=0x001e, h01=0x0050, text=»*   APPLICATION WORKBLOCK «, t00=0x000b, t01=0x014a}
0x1294…129e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016c}
0x129e…12e6              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000b, t01=0x0176}
0x12e6…1312              Head {h00=0x0028, h01=0x0050, text=»U:WBPC DATA '0000' WITHDRAWAL LIMIT «, t00=0x000c, t01=0x002e}
0x1312…131e              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000c, t01=0x005a}
0x131e…1322              Head {h00=0x4004, h01=0x0000}
0x1322…1326              00 0c 00 66                                                                                                                                                                                                                                       ┆   f┆
0x1326…132e (13, 1, 8)   20 04 00 00 00 0d 00 04                                                                                                                                                                                                                           ┆        ┆
0x132e…137e (14, 2, 128) 01 14 00 47 50 0c 00 69 01 14 00 6d 54 2c 00 75 54 04 00 7d 00 98 00 87 01 12 00 8d 01 12 00 97 00 d0 00 02 01 6e 00 3c 00 38 04 1b 74 10 00 c1 54 06 00 c5 01 38 00 cd 01 68 00 db 01 14 00 ef 54 0c 01 0d 01 28 01 1d 50 06 01 45 52 1e 01 49   ┆   GP  i   mT, uT  }                 n < 8  t   T    8   h      T    (  P  ER  I┆
0x137e…13ae              50 16 01 4d 52 0a 01 57 57 08 01 5f 01 68 01 6f 50 0a 00 03 00 2a 00 0e 00 0a 07 04 00 00 00 00 01 80 00 00 00 03 00 6a 40 04 00 00 00 03 00 7c                                                                                                   ┆P  MR  WW  _ h oP    *                 j@      |┆
0x13ae…13fe (15, 0, 400) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 54 49 4d 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 38 2e 33 20 37 39 2d 30 36 2d 32 35 20 20 38 37 30 31 30 35 30 34 30 38 33 30 00 00 00 04 00 1c   ┆ J F         IDENT TIMER                    REL 8.3 79-06-25  870105040830      ┆
0x13fe…144e              00 18 01 0b a4 54 49 4d 45 52 c4 53 45 54 49 4d 45 00 c4 53 45 54 49 4d 50 00 00 00 00 52 00 0e 00 0a 05 04 bc 54 49 4d 45 52 00 00 00 00 00 72 00 0c 00 08 02 03 a2 54 44 49 53 50 00 00 00 84 00 0e 00 0a 02 04 c2 46 4e 44 54 49 44 4e 00 00   ┆     TIMER SETIME  SETIMP    R       TIMER     r       TDISP           FNDTIDN  ┆
0x144e…149e              00 94 00 0e 00 0a 02 04 c2 4c 4b 4d 52 51 45 ee 00 00 00 a6 00 2c 00 28 03 13 00 00 00 01 00 24 84 10 54 00 81 14 80 c1 00 00 f7 a1 00 00 00 00 00 00 8f 20 00 00 00 02 f7 a1 00 00 00 04 82 08 00 00 00 b8 00 0e 00 0a 02 04 c2 47 45 54 42 4c   ┆         LKMRQE      , (       $  T                                        GETBL┆
0x149e…14ee              4b 60 00 00 00 e8 00 0e 00 0a 02 04 c2 4c 4b 4d 51 44 49 41 00 00 00 fa 00 2c 00 28 03 13 00 00 00 1d 42 00 88 20 00 00 00 06 83 08 82 10 f7 a1 00 00 00 08 81 10 80 c1 00 00 f7 a1 00 00 00 00 00 00 8f 20 00 00 01 0c 00 0c 00 08 02 03 a2 51   ┆K`           LKMQDIA     , (      B                                            Q┆
0x14ee…153e              54 4a 4f 42 00 00 01 3c 00 0e 00 0a 02 04 c2 46 52 45 42 4c 4b d3 00 00 01 4c 00 0c 00 08 02 03 82 53 52 55 4e 4e 00 00 01 5e 00 2c 00 28 03 13 00 00 00 39 88 44 00 00 00 0a 85 04 f7 a1 00 00 00 0c 5f 30 84 04 f7 a1 00 00 00 0e 85 0c 83 40   ┆TJOB   <       FREBLK    L       SRUNN   ^ , (     9 D            _0           @┆
0x153e…158e (16, 2, 330) 00 00 00 10 50 00 00 00 01 6e 00 0c 00 08 02 03 a2 41 43 54 4f 54 00 01 00 0e 00 10 00 0c 05 05 dc 53 45 54 49 4d 45 00 00 5c 00 01 00 1e 00 10 00 0c 05 05 dc 53 45 54 49 4d 50 00 00 5e 00 01 00 32 00 0c 00 08 02 03 a2 53 41 56 45 38 00 01   ┆    P    n       ACTOT           SETIME              SETIMP  ^   2       SAVE8  ┆
0x158e…15de              00 46 00 2c 00 28 03 13 00 00 00 51 08 40 9a 4c 00 02 07 00 f7 a1 00 00 00 12 5f 4a 04 00 f7 a1 00 00 00 14 86 10 83 10 85 5e 00 14 82 34 00 01 00 56 00 0e 00 0a 02 04 c2 54 49 4d 51 55 45 20 00 01 00 86 00 2c 00 28 03 13 00 00 00 6d 02 12   ┆ F , (     Q @ L          _J             ^   4   V       TIMQUE      , (     m  ┆
0x15de…162e              15 02 80 b4 15 02 85 5f 00 14 f7 a1 00 00 00 08 82 10 f9 02 f7 a1 00 00 00 08 81 40 00 00 00 16 00 01 00 98 00 0e 00 0a 02 04 c2 49 48 52 45 54 38 c4 00 01 00 c8 00 26 00 22 03 10 00 00 00 87 20 10 81 31 84 41 00 00 00 16 14 04 84 5f 00 0a   ┆       _                   @               IHRET8      & "         1 A       _  ┆
0x162e…167e              86 18 50 00 84 39 8f 20 00 00 00 18 00 01 00 da 00 2c 00 28 04 13 7e 00 00 03 54 12 00 09 00 10 00 0d 00 5c 00 0f 00 3a 00 2d 00 34 00 31 00 5c 00 33 00 42 00 4f 50 04 00 95 50 02 00 01 01 04 00 0e 00 0a 07 04 00 00 00 00 00 9c 00 00 00 01   ┆  P  9           , (  ~   T            : - 4 1   3 B OP   P                     ┆
0x167e…1688              01 34 40 04 00 00 00 01 01 46                                                                                                                                                                                                                     ┆ 4@      F┆
0x1688…16d8 (17, 0, 398) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 47 52 42 55 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 38 2e 33 20 37 39 2d 30 36 2d 32 35 20 20 38 37 30 31 30 35 30 34 30 38 33 30 00 00 00 04 00 16   ┆ J F         IDENT GRBUF                    REL 8.3 79-06-25  870105040830      ┆
0x16d8…1728              00 12 01 08 c4 47 45 54 42 55 46 4b c4 52 45 4c 42 55 46 00 00 00 00 52 00 10 00 0c 05 05 dc 47 45 54 42 55 46 4b 00 00 00 00 00 6c 00 0c 00 08 02 03 a2 47 42 51 55 45 00 00 00 80 00 0e 00 0a 02 04 c2 54 54 42 3a 53 41 c4 00 00 00 90 00 2c   ┆     GETBUFK RELBUF    R       GETBUFK     l       GBQUE           TTB:SA      ,┆
0x1728…1778              00 28 03 13 00 00 00 01 42 00 81 20 00 00 00 02 82 24 50 00 83 48 00 00 00 04 ec 4c ff fe 50 00 81 08 5f 12 f7 a1 00 00 84 10 00 00 00 a2 00 0c 00 08 02 03 a2 54 44 49 53 50 00 00 00 d2 00 10 00 0c 05 05 dc 52 45 4c 42 55 46 00 00 30 00 00   ┆ (      B        $P  H     L  P   _                  TDISP           RELBUF  0  ┆
0x1778…17c8              00 e2 00 2c 00 28 03 13 00 00 00 1d 20 20 54 00 81 20 00 00 00 02 82 04 81 24 5c 06 85 29 a0 35 8f 20 00 00 00 06 98 a0 00 02 81 50 00 02 00 00 00 f6 00 2c 00 28 03 13 00 00 00 39 00 10 11 02 82 22 32 01 83 02 93 04 83 23 80 8c eb 08 5c 0c   ┆   , (        T          $   ) 5           P       , (     9     "2      #      ┆
0x17c8…1816              83 14 85 20 00 00 00 02 82 14 85 28 50 00 00 00 01 26 00 2c 00 28 03 13 00 00 00 57 20 10 86 34 81 54 00 00 00 04 ec 44 ff fe 5c 12 82 3f 84 3f 86 3f 87 54 00 0e 00 04 f7 a1 00 00 81 10 00 00 01 56 00 0c 00 08 02 03 a2 51 54 4a 4f 42         ┆           (P    & , (     W   4 T     D     ? ? ? T             V       QTJOB┆
0x1816…1866 (18, 2, 212) 00 00 01 86 00 0e 00 0a 02 04 c2 4c 4b 4d 51 44 49 1f 00 01 00 08 00 2c 00 28 03 13 00 00 00 73 00 84 86 3e 84 3e 82 3e 81 04 50 00 a0 35 86 29 f7 a1 00 00 00 08 5f 34 85 0c 8f 20 00 00 00 0a 06 01 00 01 00 1a 00 2c 00 28 03 13 00 00 00 8f   ┆           LKMQDI      , (     s   > > >  P  5 )      _4               , (      ┆
0x1866…18b6              00 00 84 30 80 90 82 1c 81 10 84 24 50 00 a4 19 5c 0e 1a 01 5c 0e a0 a0 ff fe 2c 01 84 23 90 a0 00 02 00 01 00 4a 00 14 00 10 03 07 00 00 00 af 40 00 80 d5 00 10 00 04 f0 3e 00 01 00 7a 00 28 00 24 04 11 24 00 00 07 50 0e 00 11 50 0c 00 19   ┆   0       $P             ,  #       J          @        >   z ( $  $   P   P   ┆
0x18b6…18ea              00 8c 00 1d 54 6a 00 55 50 30 00 6f 00 8c 00 7b 50 0a 00 99 50 18 00 01 00 92 00 0e 00 0a 07 04 00 00 00 00 00 b4 00 00 00 01 00 be 40 04 00 00 00 01 00 d0                                                                                       ┆    Tj UP0 o   {P   P                       @       ┆
0x18ea…193a (19, 0, 400) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 54 41 42 4f 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 38 2e 33 20 37 39 2d 30 36 2d 32 35 20 20 38 37 30 31 30 35 30 34 30 38 33 30 00 00 00 04 00 0e   ┆ J F         IDENT TABORT                   REL 8.3 79-06-25  870105040830      ┆
0x193a…198a              00 0a 01 04 c4 54 41 42 4f 52 54 4b 00 00 00 52 00 10 00 0c 05 05 dc 54 41 42 4f 52 54 4b 00 00 00 00 00 64 00 0e 00 0a 02 04 c2 46 4e 44 44 57 54 00 00 00 00 78 00 0e 00 0a 02 04 c2 44 57 54 54 41 42 00 00 00 00 8a 00 0c 00 08 02 03 a2 44   ┆     TABORTK   R       TABORTK     d       FNDDWT    x       DWTTAB            D┆
0x198a…19da              57 54 53 54 00 00 00 9c 00 2c 00 28 03 13 00 00 00 01 10 88 83 22 52 00 f7 a1 00 00 00 02 80 98 50 00 ed 58 00 00 00 04 54 00 87 58 00 00 00 06 52 00 3f c2 00 00 00 ac 00 0e 00 0a 02 04 c2 54 45 4e 44 49 4f 40 00 00 00 dc 00 0e 00 0a 02 04   ┆WTST     , (         "R         P  X    T  X    R ?            TENDIO@          ┆
0x19da…1a2a              c2 49 54 41 42 52 54 80 00 00 00 ee 00 0e 00 0a 02 04 c2 44 57 54 57 41 54 1f 00 00 01 00 00 0e 00 0a 02 04 c2 46 52 45 42 4c 4b 4e 00 00 01 12 00 2a 00 26 03 12 00 00 00 1b 08 90 56 00 86 58 00 22 f7 a1 00 00 00 08 86 02 f7 a1 00 00 00 0a   ┆ ITABRT            DWTWAT            FREBLKN     * &        V  X "              ┆
0x1a2a…1a7a              84 58 00 00 00 0c 50 00 f7 a1 00 00 01 24 00 0e 00 0a 02 04 c2 4c 4b 4d 51 44 49 d3 00 00 01 52 00 0e 00 0a 02 04 c2 4c 4b 4d 52 51 45 43 00 00 01 64 00 2c 00 28 03 13 00 00 00 33 90 92 00 00 00 0e a0 59 00 00 00 0c 81 20 c0 00 f7 a1 00 00   ┆ X    P      $       LKMQDI    R       LKMRQEC   d , (     3       Y            ┆
0x1a7a…1aca (20, 2, 80)  00 08 8f 20 00 00 00 10 8f 20 00 00 00 12 00 00 01 76 00 20 00 1c 04 0d 00 00 00 03 52 40 00 0b 50 38 00 11 54 32 00 17 52 2c 00 1b 56 0a 00 2f 50 08 00 01 00 16 00 0e 00 0a 07 04 00 00 00 00 00 48 00 00 00 01 00 3a 40 04 00 00 00 01 00 4c   ┆                 v          R@  P8  T2  R,  V  /P                H     :@      L┆

Reduced view