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

⟦3c3b4634c⟧

    Length: 7636 (0x1dd4)
    Notes: pts_type(SC)
    Names: »C:DBS.SC«

Derivation

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

PTS(SC)

	IDENT C:DBS 	CONPAC REL=1.0 DATE= 80.04.29 
			UPDATE #9
*************************************************************** 
* 
*	CONCENTRATOR APPLICATION PACKAGE  PEAB-T
* 
*	PROGRAMMER:  PER OMAN / PAN 
* 
* 
*	C : D B S 
* 
* 
*   * 
*   THE MODULE CONTAINS DESCRIPTOR BLOCKS FOR LINE, 
*   TC, CC AND COMMON WORK BLOCKS 
* 
*   * 
*   APPLICATION:  XXXX
*   * 
* 
* 
* 
*	
* 
****************************************************************
	EJECT		IDENT C:DBS 
* 
* 
*	ENTRY ADDRESSES 
* 
*************************************************************** 
* 
*		ENTRY	DESCRIPTION
* 
	ENTRY	K:DBNW 
	ENTRY	K:DBL
	ENTRY	K:DBTC 
	ENTRY	K:DBCR 
	ENTRY	K:DBCC 
	ENTRY	K:DBT
	ENTRY	K:DBD
	ENTRY	K:DBCB 
	ENTRY	K:DBCA 
	ENTRY	K:DBCI 
	ENTRY	U:DBPA 
	ENTRY	U:DBPC 
* 
* 
BCD	FORM	4=0,12 
ASCII	FORM	4=8,12 
	EJECT		IDENT C:DBS 
*************************************************************** 
* 
*   DESCRIPTOR BLOCK FOR LINE WORK BLOCK
* 
*************************************************************** 
K:DBL	ASCII	2	LINE NBR
	BCD	2+4	NBR OF TIMES TC BUSY 
	BCD	6+4	NBR OF TRANSACTIONS
	BCD	10+4	NBR OF TRANSMISSION ERRORS
	ASCII	14+2	HOUR LAST TRANSACTION 
	ASCII	16+2	MINUTE     -"-
	ASCII	18+2	SECOND     -"-
	BCD	20+2	REPLY COUNTER 
	EJECT		IDENT C:DBS 
*************************************************************** 
* 
*   DESCRIPTOR BLOCK FOR TC WORK BLOCK
* 
*************************************************************** 
K:DBTC	ASCII	2	TC ADDRESS 
	BCD	2+4	NBR OF TIMES TC BUSY 
	BCD	6+4	NBR OF TRANSACTIONS
	BCD	10+4	NBR OF TRANSMISSION ERRORS
	ASCII	14+2	HOUR LAST TRANSACTION 
	ASCII	16+2	MINUTE     -"-
	ASCII	18+2	SECOND     -"-
	BCD	20+2	REPLY COUNTER 
	EJECT		IDENT C:DBS 
*************************************************************** 
* 
*   DESCRIPTOR BLOCK FOR CC RESPONSETIME
* 
*************************************************************** 
K:DBCR	BCD	4	INTERVAL 1 FOR CC RESPONSETIME COUNTER 
	BCD	4+4	         2 
	BCD	8+4	         3 
	BCD	12+4	         4
	BCD	16+4	         5
	BCD	20+4	         6
	BCD	24+4	         7
	BCD	28+4	         8
	BCD	32+4	         9
	BCD	36+4	        10
	BCD	40+4	        11
	BCD	44+4	        12
	EJECT		IDENT C:DBS 
*************************************************************** 
* 
*   DESCRIPTOR BLOCK FOR CC LINE WORK BLOCK 
* 
*************************************************************** 
K:DBCC	BCD	4	NBR OF TIME-OUTS 
	BCD	4+6	NBR OF CC TRANSACTIONS 
	BCD	10+4	NBR OF CC TRANSMISSION ERRORS 
	BCD	14+4	NBR OF SUPERVISORY MESSAGES 
	ASCII	18+2	TIME OF LAST REPLY  HOUR
	ASCII	20+2	       "         MINUTE 
	ASCII	22+2	        "         SECOND
	EJECT		IDENT C:DBS 
***************************************************************** 
* 
*   DESCRIPTOR BLOCK FOR NETWORK BLOCK
*   AND CC RESPONSE TIME WORKBLOCK
* 
***************************************************************** 
K:DBNW	EQU	*
	BCD	6	 1 INTERVAL
	BCD	6+6	 2 
	BCD	12+6	 3
	BCD	18+6	 4
	BCD	24+6	 5
	BCD	30+6	 6
	BCD	36+6	 7
	BCD	42+6	 8
	BCD	48+6	 9
	BCD	54+6	10
	BCD	60+6	11
	BCD	66+6	12
	BCD	72+6	AVERAGE RESP TIME 
	BCD	78+6	NBR OF TRANS
	BCD	84+6	NBR OF ERRORS 
	BCD	90+6	WORK AREA 1 FOR % 
	EJECT		IDENT C:DBS 
***************************************************************** 
* 
*  DESCRIPTOR BLOCK FOR CC RESPONSE TIME INTERVAL TEXTS 
* 
***************************************************************** 
K:DBCI	BCD	2	INTERVAL 1 
	BCD	2+2	         2 
	BCD	4+2	         3 
	BCD	6+2	         4 
	BCD	8+2	         5 
	BCD	10+2	        6 
	BCD	12+2	        7 
	BCD	14+2	        8 
	BCD	16+2	        9 
	BCD	18+2	       10 
	BCD	20+2	       11 
	BCD	22+2	       12 
	BCD	24+8	% WORK AREA 2 
	EJECT		IDENT C:DBS 
*************************************************************** 
* 
*   DATE AND TIME DB
* 
****************************************************************
K:DBD	ASCII	2	YEAR
	ASCII	2+2	MONTH
	ASCII	4+2	DAY
K:DBT	ASCII	2	HOUR
	ASCII	2+2	MINUTE 
	ASCII	4+2	SECOND 
	EJECT		IDENT C:DBS 

****************************************************************
* 
*   DESCRIPTOR BLOCK FOR APPLICATION
* 
*************************************************************** 
U:DBPA	ASCII	7	CASSETTE DATE LABEL
	EJECT		IDENT C:DBS 

****************************************************************
* 
*   DESCRIPTOR BLOCK FOR CONSTANTS
* 
*************************************************************** 
K:DBCA	ASCII	1	ONE
K:DBCB	BCD	1	ONE
	BCD	1+2	10 
	BCD	3+2	100
	BCD	5+3	1000 
	BCD	8+3	32K
	EJECT		IDENT C:DBS 

****************************************************************
* 
*   DESCRIPTOR BLOCK FOR APPLICATION CONSTANTS
* 
*************************************************************** 
U:DBPC	ASCII	4	WITHDRAWAL LIMIT 
	END

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT C:DBS  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 : D 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…0182              Head {h00=0x0038, h01=0x0050, text=»*   THE MODULE CONTAINS DESCRIPTOR BLOCKS FOR LINE, «, t00=0x0000, t01=0x014a}
0x0182…01ac              Head {h00=0x0026, h01=0x0050, text=»*   TC, CC AND COMMON WORK BLOCKS «, t00=0x0000, t01=0x0186}
0x01ac…01b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0020}
0x01b6…01c4              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0001, t01=0x002a}
0x01c4…01e2              Head {h00=0x001a, h01=0x0050, text=»*   APPLICATION:  XXXX«, t00=0x0001, t01=0x0038}
0x01e2…01f0              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0001, t01=0x0056}
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…020e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0078}
0x020e…0218              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0082}
0x0218…0222              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008c}
0x0222…026a              Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x0096}
0x026a…0286              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x0001, t01=0x00de}
0x0286…0290              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…029a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x029a…02b4              Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0001, t01=0x010e}
0x02b4…02be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0128}
0x02be…0306              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0001, t01=0x0132}
0x0306…0310              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017a}
0x0310…032c              Head {h00=0x0018, h01=0x0050, text=»*  ENTRY DESCRIPTION«, t00=0x0001, t01=0x0184}
0x032c…0336              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0010}
0x0336…034c              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBNW «, t00=0x0002, t01=0x001a}
0x034c…0360              Head {h00=0x0010, h01=0x0050, text=» ENTRY K:DBL«, t00=0x0002, t01=0x0030}
0x0360…0376              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBTC «, t00=0x0002, t01=0x0044}
0x0376…038c              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBCR «, t00=0x0002, t01=0x005a}
0x038c…03a2              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBCC «, t00=0x0002, t01=0x0070}
0x03a2…03b6              Head {h00=0x0010, h01=0x0050, text=» ENTRY K:DBT«, t00=0x0002, t01=0x0086}
0x03b6…03ca              Head {h00=0x0010, h01=0x0050, text=» ENTRY K:DBD«, t00=0x0002, t01=0x009a}
0x03ca…03e0              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBCB «, t00=0x0002, t01=0x00ae}
0x03e0…03f6              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBCA «, t00=0x0002, t01=0x00c4}
0x03f6…040c              Head {h00=0x0012, h01=0x0050, text=» ENTRY K:DBCI «, t00=0x0002, t01=0x00da}
0x040c…0422              Head {h00=0x0012, h01=0x0050, text=» ENTRY U:DBPA «, t00=0x0002, t01=0x00f0}
0x0422…0438              Head {h00=0x0012, h01=0x0050, text=» ENTRY U:DBPC «, t00=0x0002, t01=0x0106}
0x0438…0442              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011c}
0x0442…044c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0126}
0x044c…0464              Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0002, t01=0x0130}
0x0464…047e              Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0002, t01=0x0148}
0x047e…049a              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x0002, t01=0x0162}
0x049a…04e2              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x017e}
0x04e2…04ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0036}
0x04ec…051c              Head {h00=0x002c, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR LINE WORK BLOCK«, t00=0x0003, t01=0x0040}
0x051c…0526              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…056e              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0003, t01=0x007a}
0x056e…058c              Head {h00=0x001a, h01=0x0050, text=»K:DBL ASCII 2 LINE NBR«, t00=0x0003, t01=0x00c2}
0x058c…05b2              Head {h00=0x0022, h01=0x0050, text=» BCD 2+4 NBR OF TIMES TC BUSY «, t00=0x0003, t01=0x00e0}
0x05b2…05d6              Head {h00=0x0020, h01=0x0050, text=» BCD 6+4 NBR OF TRANSACTIONS«, t00=0x0003, t01=0x0106}
0x05d6…0602              Head {h00=0x0028, h01=0x0050, text=» BCD 10+4 NBR OF TRANSMISSION ERRORS«, t00=0x0003, t01=0x012a}
0x0602…062c              Head {h00=0x0026, h01=0x0050, text=» ASCII 14+2 HOUR LAST TRANSACTION «, t00=0x0003, t01=0x0156}
0x062c…064e              Head {h00=0x001e, h01=0x0050, text=» ASCII 16+2 MINUTE     -"-«, t00=0x0003, t01=0x0180}
0x064e…0670              Head {h00=0x001e, h01=0x0050, text=» ASCII 18+2 SECOND     -"-«, t00=0x0004, t01=0x0012}
0x0670…0690              Head {h00=0x001c, h01=0x0050, text=» BCD 20+2 REPLY COUNTER «, t00=0x0004, t01=0x0034}
0x0690…06ac              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x0004, t01=0x0054}
0x06ac…06f4              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0004, t01=0x0070}
0x06f4…06fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b8}
0x06fe…072c              Head {h00=0x002a, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR TC WORK BLOCK«, t00=0x0004, t01=0x00c2}
0x072c…0736              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00f0}
0x0736…077e              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0004, t01=0x00fa}
0x077e…07a0              Head {h00=0x001e, h01=0x0050, text=»K:DBTC ASCII 2 TC ADDRESS «, t00=0x0004, t01=0x0142}
0x07a0…07c6              Head {h00=0x0022, h01=0x0050, text=» BCD 2+4 NBR OF TIMES TC BUSY «, t00=0x0004, t01=0x0164}
0x07c6…07ea              Head {h00=0x0020, h01=0x0050, text=» BCD 6+4 NBR OF TRANSACTIONS«, t00=0x0004, t01=0x018a}
0x07ea…0816              Head {h00=0x0028, h01=0x0050, text=» BCD 10+4 NBR OF TRANSMISSION ERRORS«, t00=0x0005, t01=0x001e}
0x0816…0840              Head {h00=0x0026, h01=0x0050, text=» ASCII 14+2 HOUR LAST TRANSACTION «, t00=0x0005, t01=0x004a}
0x0840…0862              Head {h00=0x001e, h01=0x0050, text=» ASCII 16+2 MINUTE     -"-«, t00=0x0005, t01=0x0074}
0x0862…0884              Head {h00=0x001e, h01=0x0050, text=» ASCII 18+2 SECOND     -"-«, t00=0x0005, t01=0x0096}
0x0884…08a4              Head {h00=0x001c, h01=0x0050, text=» BCD 20+2 REPLY COUNTER «, t00=0x0005, t01=0x00b8}
0x08a4…08c0              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x0005, t01=0x00d8}
0x08c0…0908              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0005, t01=0x00f4}
0x0908…0912              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013c}
0x0912…0942              Head {h00=0x002c, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR CC RESPONSETIME«, t00=0x0005, t01=0x0146}
0x0942…094c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0176}
0x094c…0994              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0005, t01=0x0180}
0x0994…09d0              Head {h00=0x0038, h01=0x0050, text=»K:DBCR BCD 4 INTERVAL 1 FOR CC RESPONSETIME COUNTER «, t00=0x0006, t01=0x0038}
0x09d0…09ec              Head {h00=0x0018, h01=0x0050, text=» BCD 4+4          2 «, t00=0x0006, t01=0x0074}
0x09ec…0a08              Head {h00=0x0018, h01=0x0050, text=» BCD 8+4          3 «, t00=0x0006, t01=0x0090}
0x0a08…0a24              Head {h00=0x0018, h01=0x0050, text=» BCD 12+4          4«, t00=0x0006, t01=0x00ac}
0x0a24…0a40              Head {h00=0x0018, h01=0x0050, text=» BCD 16+4          5«, t00=0x0006, t01=0x00c8}
0x0a40…0a5c              Head {h00=0x0018, h01=0x0050, text=» BCD 20+4          6«, t00=0x0006, t01=0x00e4}
0x0a5c…0a78              Head {h00=0x0018, h01=0x0050, text=» BCD 24+4          7«, t00=0x0006, t01=0x0100}
0x0a78…0a94              Head {h00=0x0018, h01=0x0050, text=» BCD 28+4          8«, t00=0x0006, t01=0x011c}
0x0a94…0ab0              Head {h00=0x0018, h01=0x0050, text=» BCD 32+4          9«, t00=0x0006, t01=0x0138}
0x0ab0…0acc              Head {h00=0x0018, h01=0x0050, text=» BCD 36+4         10«, t00=0x0006, t01=0x0154}
0x0acc…0ae8              Head {h00=0x0018, h01=0x0050, text=» BCD 40+4         11«, t00=0x0006, t01=0x0170}
0x0ae8…0b04              Head {h00=0x0018, h01=0x0050, text=» BCD 44+4         12«, t00=0x0006, t01=0x018c}
0x0b04…0b20              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x0007, t01=0x0018}
0x0b20…0b68              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0007, t01=0x0034}
0x0b68…0b72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x007c}
0x0b72…0ba6              Head {h00=0x0030, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR CC LINE WORK BLOCK «, t00=0x0007, t01=0x0086}
0x0ba6…0bb0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ba}
0x0bb0…0bf8              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0007, t01=0x00c4}
0x0bf8…0c1e              Head {h00=0x0022, h01=0x0050, text=»K:DBCC BCD 4 NBR OF TIME-OUTS «, t00=0x0007, t01=0x010c}
0x0c1e…0c46              Head {h00=0x0024, h01=0x0050, text=» BCD 4+6 NBR OF CC TRANSACTIONS «, t00=0x0007, t01=0x0132}
0x0c46…0c76              Head {h00=0x002c, h01=0x0050, text=» BCD 10+4 NBR OF CC TRANSMISSION ERRORS «, t00=0x0007, t01=0x015a}
0x0c76…0ca4              Head {h00=0x002a, h01=0x0050, text=» BCD 14+4 NBR OF SUPERVISORY MESSAGES «, t00=0x0007, t01=0x018a}
0x0ca4…0cd0              Head {h00=0x0028, h01=0x0050, text=» ASCII 18+2 TIME OF LAST REPLY  HOUR«, t00=0x0008, t01=0x0028}
0x0cd0…0cfc              Head {h00=0x0028, h01=0x0050, text=» ASCII 20+2        "         MINUTE «, t00=0x0008, t01=0x0054}
0x0cfc…0d28              Head {h00=0x0028, h01=0x0050, text=» ASCII 22+2         "         SECOND«, t00=0x0008, t01=0x0080}
0x0d28…0d44              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x0008, t01=0x00ac}
0x0d44…0d8e              Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x0008, t01=0x00c8}
0x0d8e…0d98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0112}
0x0d98…0dc6              Head {h00=0x002a, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR NETWORK BLOCK«, t00=0x0008, t01=0x011c}
0x0dc6…0df0              Head {h00=0x0026, h01=0x0050, text=»*   AND CC RESPONSE TIME WORKBLOCK«, t00=0x0008, t01=0x014a}
0x0df0…0dfa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0174}
0x0dfa…0e44              Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x0008, t01=0x017e}
0x0e44…0e58              Head {h00=0x0010, h01=0x0050, text=»K:DBNW EQU *«, t00=0x0009, t01=0x0038}
0x0e58…0e72              Head {h00=0x0016, h01=0x0050, text=» BCD 6  1 INTERVAL«, t00=0x0009, t01=0x004c}
0x0e72…0e86              Head {h00=0x0010, h01=0x0050, text=» BCD 6+6  2 «, t00=0x0009, t01=0x0066}
0x0e86…0e9a              Head {h00=0x0010, h01=0x0050, text=» BCD 12+6  3«, t00=0x0009, t01=0x007a}
0x0e9a…0eae              Head {h00=0x0010, h01=0x0050, text=» BCD 18+6  4«, t00=0x0009, t01=0x008e}
0x0eae…0ec2              Head {h00=0x0010, h01=0x0050, text=» BCD 24+6  5«, t00=0x0009, t01=0x00a2}
0x0ec2…0ed6              Head {h00=0x0010, h01=0x0050, text=» BCD 30+6  6«, t00=0x0009, t01=0x00b6}
0x0ed6…0eea              Head {h00=0x0010, h01=0x0050, text=» BCD 36+6  7«, t00=0x0009, t01=0x00ca}
0x0eea…0efe              Head {h00=0x0010, h01=0x0050, text=» BCD 42+6  8«, t00=0x0009, t01=0x00de}
0x0efe…0f12              Head {h00=0x0010, h01=0x0050, text=» BCD 48+6  9«, t00=0x0009, t01=0x00f2}
0x0f12…0f26              Head {h00=0x0010, h01=0x0050, text=» BCD 54+6 10«, t00=0x0009, t01=0x0106}
0x0f26…0f3a              Head {h00=0x0010, h01=0x0050, text=» BCD 60+6 11«, t00=0x0009, t01=0x011a}
0x0f3a…0f4e              Head {h00=0x0010, h01=0x0050, text=» BCD 66+6 12«, t00=0x0009, t01=0x012e}
0x0f4e…0f72              Head {h00=0x0020, h01=0x0050, text=» BCD 72+6 AVERAGE RESP TIME «, t00=0x0009, t01=0x0142}
0x0f72…0f90              Head {h00=0x001a, h01=0x0050, text=» BCD 78+6 NBR OF TRANS«, t00=0x0009, t01=0x0166}
0x0f90…0fb0              Head {h00=0x001c, h01=0x0050, text=» BCD 84+6 NBR OF ERRORS «, t00=0x0009, t01=0x0184}
0x0fb0…0fd4              Head {h00=0x0020, h01=0x0050, text=» BCD 90+6 WORK AREA 1 FOR % «, t00=0x000a, t01=0x0014}
0x0fd4…0ff0              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x000a, t01=0x0038}
0x0ff0…103a              Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x000a, t01=0x0054}
0x103a…1044              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x009e}
0x1044…1084              Head {h00=0x003c, h01=0x0050, text=»*  DESCRIPTOR BLOCK FOR CC RESPONSE TIME INTERVAL TEXTS «, t00=0x000a, t01=0x00a8}
0x1084…108e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00e8}
0x108e…10d8              Head {h00=0x0046, h01=0x0050, text=»***************************************************************** «, t00=0x000a, t01=0x00f2}
0x10d8…10f8              Head {h00=0x001c, h01=0x0050, text=»K:DBCI BCD 2 INTERVAL 1 «, t00=0x000a, t01=0x013c}
0x10f8…1114              Head {h00=0x0018, h01=0x0050, text=» BCD 2+2          2 «, t00=0x000a, t01=0x015c}
0x1114…1130              Head {h00=0x0018, h01=0x0050, text=» BCD 4+2          3 «, t00=0x000a, t01=0x0178}
0x1130…114c (11, 0, 400) Head {h00=0x0018, h01=0x0050, text=» BCD 6+2          4 «, t00=0x000b, t01=0x0004}
0x114c…1168              Head {h00=0x0018, h01=0x0050, text=» BCD 8+2          5 «, t00=0x000b, t01=0x0020}
0x1168…1184              Head {h00=0x0018, h01=0x0050, text=» BCD 10+2         6 «, t00=0x000b, t01=0x003c}
0x1184…11a0              Head {h00=0x0018, h01=0x0050, text=» BCD 12+2         7 «, t00=0x000b, t01=0x0058}
0x11a0…11bc              Head {h00=0x0018, h01=0x0050, text=» BCD 14+2         8 «, t00=0x000b, t01=0x0074}
0x11bc…11d8              Head {h00=0x0018, h01=0x0050, text=» BCD 16+2         9 «, t00=0x000b, t01=0x0090}
0x11d8…11f4              Head {h00=0x0018, h01=0x0050, text=» BCD 18+2        10 «, t00=0x000b, t01=0x00ac}
0x11f4…1210              Head {h00=0x0018, h01=0x0050, text=» BCD 20+2        11 «, t00=0x000b, t01=0x00c8}
0x1210…122c              Head {h00=0x0018, h01=0x0050, text=» BCD 22+2        12 «, t00=0x000b, t01=0x00e4}
0x122c…124c              Head {h00=0x001c, h01=0x0050, text=» BCD 24+8 % WORK AREA 2 «, t00=0x000b, t01=0x0100}
0x124c…1268              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x000b, t01=0x0120}
0x1268…12b0              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000b, t01=0x013c}
0x12b0…12ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0184}
0x12ba…12d6              Head {h00=0x0018, h01=0x0050, text=»*   DATE AND TIME DB«, t00=0x000b, t01=0x018e}
0x12d6…12e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001a}
0x12e0…1328              Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x000c, t01=0x0024}
0x1328…1342              Head {h00=0x0016, h01=0x0050, text=»K:DBD ASCII 2 YEAR«, t00=0x000c, t01=0x006c}
0x1342…135a              Head {h00=0x0014, h01=0x0050, text=» ASCII 2+2 MONTH«, t00=0x000c, t01=0x0086}
0x135a…1370              Head {h00=0x0012, h01=0x0050, text=» ASCII 4+2 DAY«, t00=0x000c, t01=0x009e}
0x1370…138a              Head {h00=0x0016, h01=0x0050, text=»K:DBT ASCII 2 HOUR«, t00=0x000c, t01=0x00b4}
0x138a…13a4              Head {h00=0x0016, h01=0x0050, text=» ASCII 2+2 MINUTE «, t00=0x000c, t01=0x00ce}
0x13a4…13be              Head {h00=0x0016, h01=0x0050, text=» ASCII 4+2 SECOND «, t00=0x000c, t01=0x00e8}
0x13be…13da              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x000c, t01=0x0102}
0x13da…13e2              Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x011e}
0x13e2…142a              Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x000c, t01=0x0126}
0x142a…1434              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x016e}
0x1434…1460              Head {h00=0x0028, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR APPLICATION«, t00=0x000c, t01=0x0178}
0x1460…146a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0014}
0x146a…14b2              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000d, t01=0x001e}
0x14b2…14dc              Head {h00=0x0026, h01=0x0050, text=»U:DBPA ASCII 7 CASSETTE DATE LABEL«, t00=0x000d, t01=0x0066}
0x14dc…14f8              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x000d, t01=0x0090}
0x14f8…1500              Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x00ac}
0x1500…1548              Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x000d, t01=0x00b4}
0x1548…1552              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fc}
0x1552…157c              Head {h00=0x0026, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR CONSTANTS«, t00=0x000d, t01=0x0106}
0x157c…1586              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0130}
0x1586…15ce              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000d, t01=0x013a}
0x15ce…15e8              Head {h00=0x0016, h01=0x0050, text=»K:DBCA ASCII 1 ONE«, t00=0x000d, t01=0x0182}
0x15e8…1600              Head {h00=0x0014, h01=0x0050, text=»K:DBCB BCD 1 ONE«, t00=0x000e, t01=0x000c}
0x1600…1614              Head {h00=0x0010, h01=0x0050, text=» BCD 1+2 10 «, t00=0x000e, t01=0x0024}
0x1614…1628              Head {h00=0x0010, h01=0x0050, text=» BCD 3+2 100«, t00=0x000e, t01=0x0038}
0x1628…163e              Head {h00=0x0012, h01=0x0050, text=» BCD 5+3 1000 «, t00=0x000e, t01=0x004c}
0x163e…1652              Head {h00=0x0010, h01=0x0050, text=» BCD 8+3 32K«, t00=0x000e, t01=0x0062}
0x1652…166e              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:DBS «, t00=0x000e, t01=0x0076}
0x166e…1676              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0092}
0x1676…16be              Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x000e, t01=0x009a}
0x16be…16c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00e2}
0x16c8…16fe              Head {h00=0x0032, h01=0x0050, text=»*   DESCRIPTOR BLOCK FOR APPLICATION CONSTANTS«, t00=0x000e, t01=0x00ec}
0x16fe…1708              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0122}
0x1708…1750              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x000e, t01=0x012c}
0x1750…1778              Head {h00=0x0024, h01=0x0050, text=»U:DBPC ASCII 4 WITHDRAWAL LIMIT «, t00=0x000e, t01=0x0174}
0x1778…1784              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000f, t01=0x000c}
0x1784…1788              Head {h00=0x4004, h01=0x0000}
0x1788…178c              00 0f 00 18                                                                                                                                                                                                                                       ┆    ┆
0x178c…1794 (16, 1, 8)   20 04 00 00 00 10 00 04                                                                                                                                                                                                                           ┆        ┆
0x1794…17e4 (17, 0, 400) 2a 20 20 20 41 4e 44 20 50 41 52 41 4d 45 54 45 52 53 20 46 4f 52 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 00 01 90 00 28 00 50 2a 20 20 20 4f 46 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 50 41 43 4b 41 47 45 20   ┆*   AND PARAMETERS FOR CONDITIONAL ASSEMBLY      ( P*   OF CONCENTRATOR PACKAGE ┆
0x17e4…1834              4d 4f 44 55 4c 45 53 20 00 01 00 34 00 0a 00 50 2a 20 20 20 2a 20 00 01 00 60 00 06 00 50 2a 20 00 01 00 6e 00 06 00 50 2a 20 00 01 00 78 00 06 00 50 2a 20 00 01 00 82 00 06 00 50 2a 20 00 01 00 8c 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆MODULES    4   P*   *    `   P*    n   P*    x   P*        P*      D P**********┆
0x1834…1884              2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 01 00 96 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51   ┆******************************************************       P EJECT  IDENT C:EQ┆
0x1884…18d4              55 20 00 01 00 de 00 06 00 50 2a 20 00 01 00 fa 00 06 00 50 2a 20 00 01 01 04 00 34 00 50 2a 20 20 20 4c 49 4e 45 20 4e 42 52 20 35 31 2d 32 39 39 20 41 52 45 20 43 4f 50 49 45 44 20 49 4e 54 4f 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 01   ┆U        P*        P*      4 P*   LINE NBR 51-299 ARE COPIED INTO CONCENTRATOR  ┆
0x18d4…1924              01 0e 00 2c 00 50 2a 20 20 20 4d 4f 44 55 4c 45 53 20 42 59 20 43 41 54 41 4c 4f 47 45 44 20 50 52 4f 43 45 44 55 52 45 20 24 45 51 55 20 00 01 01 46 00 06 00 50 2a 20 00 01 01 76 00 06 00 50 2a 20 00 01 01 80 00 06 00 50 2a 20 00 01 01 8a   ┆   , P*   MODULES BY CATALOGED PROCEDURE $EQU    F   P*    v   P*        P*     ┆
0x1924…1974 (18, 0, 400) 00 06 00 50 2a 20 00 02 00 04 00 06 00 50 2a 20 00 02 00 0e 00 06 00 50 2a 20 00 02 00 18 00 06 00 50 2a 20 00 02 00 22 00 06 00 50 2a 20 00 02 00 2c 00 06 00 50 2a 20 00 02 00 36 00 06 00 50 2a 20 00 02 00 40 00 06 00 50 2a 20 00 02 00 4a   ┆   P*        P*        P*        P*    "   P*    ,   P*    6   P*    @   P*    J┆
0x1974…19c4              00 06 00 50 2a 20 00 02 00 54 00 06 00 50 2a 20 00 02 00 5e 00 06 00 50 2a 20 00 02 00 68 00 06 00 50 2a 20 00 02 00 72 00 06 00 50 2a 20 00 02 00 7c 00 06 00 50 2a 20 00 02 00 86 00 06 00 50 2a 20 00 02 00 90 00 06 00 50 2a 20 00 02 00 9a   ┆   P*    T   P*    ^   P*    h   P*    r   P*    |   P*        P*        P*     ┆
0x19c4…1a14              00 06 00 50 2a 20 00 02 00 a4 00 06 00 50 2a 20 00 02 00 ae 00 06 00 50 2a 20 00 02 00 b8 00 06 00 50 2a 20 00 02 00 c2 00 06 00 50 2a 20 00 02 00 cc 00 2e 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 2a 2a 43 4f 4d 4d   ┆   P*        P*        P*        P*        P*      . P EJECT  IDENT C:EQU **COMM┆
0x1a14…1a64              4f 4e 20 41 52 45 41 20 46 52 41 4d 45 2a 2a 20 00 02 00 d6 00 06 00 50 2a 20 00 02 01 08 00 12 00 50 2a 20 20 20 45 58 54 45 52 4e 41 4c 53 20 00 02 01 12 00 06 00 50 2a 20 00 02 01 28 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 41 44 44 00 02   ┆ON AREA FRAME**        P*        P*   EXTERNALS        P*    (   P EXTRN T:ADD  ┆
0x1a64…1ab4              01 32 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 41 44 44 43 20 00 02 01 46 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 53 55 42 00 02 01 5c 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 53 55 42 43 20 00 02 01 70 00 06 00 50 2a 20 00 02 01 86 00 1c 00 50   ┆ 2   P EXTRN T:ADDC    F   P EXTRN T:SUB       P EXTRN T:SUBC    p   P*        P┆
0x1ab4…1b04 (19, 0, 400) 5c 45 58 54 52 4e 5c 54 3a 4d 55 4c 5c 54 4f 53 53 2d 4d 55 4c 44 49 56 00 02 01 90 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 4d 55 4c 43 20 00 03 00 20 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 44 49 56 00 03 00 36 00 12 00 50 5c 45 58 54 52 4e   ┆ EXTRN T:MUL TOSS-MULDIV       P EXTRN T:MULC        P EXTRN T:DIV   6   P EXTRN┆
0x1b04…1b54              5c 54 3a 44 49 56 43 20 00 03 00 4a 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 45 51 55 20 00 03 00 60 00 06 00 50 2a 20 00 03 00 7c 00 1e 00 50 2a 20 20 20 46 4f 52 4d 53 20 46 4f 52 20 46 4f 52 4d 41 54 20 43 4f 44 45 53   ┆ T:DIVC    J   P EJECT  IDENT C:EQU    `   P*    |   P*   FORMS FOR FORMAT CODES┆
0x1b54…1ba4              00 03 00 86 00 06 00 50 2a 20 00 03 00 a8 00 26 00 50 45 4f 4c 5c 46 4f 52 4d 5c 38 3d 31 2c 38 5c 45 4e 44 20 4f 46 20 46 4f 52 4d 41 54 20 4c 49 53 54 20 00 03 00 b2 00 20 00 50 45 4f 52 5c 46 4f 52 4d 5c 38 3d 39 2c 38 5c 45 4e 44 20 4f   ┆       P*      & PEOL FORM 8=1,8 END OF FORMAT LIST        PEOR FORM 8=9,8 END O┆
0x1ba4…1bf4              46 20 52 45 43 4f 52 44 00 03 00 dc 00 22 00 50 54 58 54 5c 46 4f 52 4d 5c 38 3d 2f 31 30 2c 38 5c 54 45 58 54 20 45 4c 45 4d 45 4e 54 20 00 03 01 00 00 2e 00 50 43 4f 4e 54 58 54 5c 46 4f 52 4d 5c 38 3d 2f 31 32 2c 38 5c 54 45 58 54 20 43   ┆F RECORD     " PTXT FORM 8=/10,8 TEXT ELEMENT      . PCONTXT FORM 8=/12,8 TEXT C┆
0x1bf4…1c44              4f 4e 53 54 41 4e 54 20 45 4c 45 4d 45 4e 54 20 00 03 01 26 00 2e 00 50 49 4d 54 58 54 5c 46 4f 52 4d 5c 38 3d 2f 31 31 2c 38 5c 49 4d 49 44 45 41 54 45 20 54 45 58 54 20 43 4f 4e 53 54 41 4e 54 20 00 03 01 58 00 2a 00 50 45 4e 44 53 55 42   ┆ONSTANT ELEMENT    & . PIMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT    X * PENDSUB┆
0x1c44…1c94 (20, 0, 400) 5c 46 4f 52 4d 5c 31 36 3d 2f 31 37 30 30 5c 45 4e 44 20 4f 46 20 53 55 42 46 4f 52 4d 41 54 20 00 03 01 8a 00 28 00 50 43 4f 4e 44 5c 46 4f 52 4d 5c 38 3d 2f 31 46 2c 38 5c 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 46 4f 52 4d 41 54 00 04 00 28   ┆ FORM 16=/1700 END OF SUBFORMAT      ( PCOND FORM 8=/1F,8 CONDITIONAL FORMAT   (┆
0x1c94…1ce4              00 1a 00 50 46 49 4c 4c 45 52 5c 46 4f 52 4d 5c 38 2c 38 5c 46 49 4c 4c 45 52 00 04 00 54 00 1c 00 50 53 50 41 43 45 5c 46 4f 52 4d 5c 38 3d 2f 32 30 2c 38 5c 53 50 41 43 45 00 04 00 72 00 1e 00 50 50 49 43 54 5c 46 4f 52 4d 5c 31 3d 31 2c   ┆   PFILLER FORM 8,8 FILLER   T   PSPACE FORM 8=/20,8 SPACE   r   PPICT FORM 1=1,┆
0x1ce4…1d34              37 2c 38 5c 50 49 43 54 55 52 45 20 00 04 00 92 00 26 00 50 50 49 43 52 45 46 5c 46 4f 52 4d 5c 38 2c 38 2c 31 36 5c 47 45 4e 45 52 41 54 45 20 46 4f 52 4d 53 20 00 04 00 b4 00 12 00 50 42 59 54 45 5c 46 4f 52 4d 5c 38 2c 38 20 00 04 00 de   ┆7,8 PICTURE      & PPICREF FORM 8,8,16 GENERATE FORMS        PBYTE FORM 8,8     ┆
0x1d34…1d84              00 14 00 50 42 43 44 5c 46 4f 52 4d 5c 34 3d 30 2c 31 32 20 00 04 00 f4 00 16 00 50 41 53 43 49 49 5c 46 4f 52 4d 5c 34 3d 38 2c 31 32 20 00 04 01 0c 00 22 00 50 41 44 44 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 41 44 44   ┆   PBCD FORM 4=0,12        PASCII FORM 4=8,12      " PADD FORM 16=/F6A1,16=T:ADD┆
0x1d84…1dd4              2c 38 2c 38 00 04 01 26 00 24 00 50 41 44 44 43 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 41 44 44 43 2c 38 2c 38 00 04 01 4c 00 22 00 50 53 55 42 5c 46 4f 52 4d 5c 31 36 3d 2f 46 36 41 31 2c 31 36 3d 54 3a 53 55 42 2c 38   ┆,8,8   & $ PADDC FORM 16=/F6A1,16=T:ADDC,8,8   L " PSUB FORM 16=/F6A1,16=T:SUB,8┆

Reduced view