|
|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 7702 (0x1e16)
Notes: pts_type(SC)
Names: »C:WBS.SC«
└─⟦2a21e4bb5⟧ Bits:30009691 Philips computer tape "600408"
└─⟦this⟧ »BDKAPP/C:WBS.SC«
IDENT C:WBS CONPAC REL=0.0 DATE= 77.10.12 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
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT C:WBS CONPAC REL=0.0 DATE= 77.10.12 «, 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, 0, 398) 52 4e 5c 4b 3a 54 53 31 30 5c 43 3a 53 49 43 20 00 05 01 8c 00 06 00 50 2a 20 00 06 00 18 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 58 4e 57 20 00 06 00 22 00 06 00 50 2a 20 00 06 00 3e 00 4c 00 50 2a 20 20 48 45 52 45 20 ┆RN K:TS10 C:SIC P* P EJECT IDENT C:XNW " P* > L P* HERE ┆
0x137e…13ce 49 53 20 54 48 45 20 4d 4f 44 55 4c 45 20 27 43 3a 45 51 55 27 20 57 49 54 48 20 43 4f 4d 4d 4f 4e 20 45 51 55 41 54 45 53 20 49 4e 43 4c 55 44 45 44 20 57 49 54 48 4f 55 54 20 4c 49 53 54 20 00 06 00 48 00 06 00 50 2a 20 00 06 00 98 00 0a ┆IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST H P* ┆
0x13ce…141e 00 50 5c 4e 4c 49 53 54 00 06 00 a2 00 06 00 50 2a 20 00 06 00 b0 00 06 00 50 2a 20 00 06 00 ba 00 06 00 50 2a 20 00 06 00 c4 00 06 00 50 2a 20 00 06 00 ce 00 06 00 50 2a 20 00 06 00 d8 00 06 00 50 2a 20 00 06 00 e2 00 06 00 50 2a 20 00 06 ┆ P NLIST P* P* P* P* P* P* P* ┆
0x141e…146e 00 ec 00 06 00 50 2a 20 00 06 00 f6 00 06 00 50 2a 20 00 06 01 00 00 06 00 50 2a 20 00 06 01 0a 00 06 00 50 2a 20 00 06 01 14 00 06 00 50 2a 20 00 06 01 1e 00 06 00 50 2a 20 00 06 01 28 00 06 00 50 2a 20 00 06 01 32 00 06 00 50 2a 20 00 06 ┆ P* P* P* P* P* P* ( P* 2 P* ┆
0x146e…14bc 01 3c 00 06 00 50 2a 20 00 06 01 46 00 06 00 50 2a 20 00 06 01 50 00 06 00 50 2a 20 00 06 01 5a 00 06 00 50 2a 20 00 06 01 64 00 06 00 50 2a 20 00 06 01 6e 00 06 00 50 2a 20 00 06 01 78 00 06 00 50 2a 20 00 06 01 82 00 06 00 50 2a 20 ┆ < P* F P* P P* Z P* d P* n P* x P* P* ┆
0x14bc…150c (15, 0, 398) 00 06 01 8c 00 06 00 50 2a 20 00 07 00 08 00 06 00 50 2a 20 00 07 00 12 00 06 00 50 2a 20 00 07 00 1c 00 06 00 50 2a 20 00 07 00 26 00 06 00 50 2a 20 00 07 00 30 00 06 00 50 2a 20 00 07 00 3a 00 06 00 50 2a 20 00 07 00 44 00 06 00 50 2a 20 ┆ P* P* P* P* & P* 0 P* : P* D P* ┆
0x150c…155c 00 07 00 4e 00 06 00 50 2a 20 00 07 00 58 00 06 00 50 2a 20 00 07 00 62 00 06 00 50 2a 20 00 07 00 6c 00 06 00 50 2a 20 00 07 00 76 00 06 00 50 2a 20 00 07 00 80 00 06 00 50 2a 20 00 07 00 8a 00 2e 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e ┆ N P* X P* b P* l P* v P* P* . P EJECT IDEN┆
0x155c…15ac 54 20 43 3a 45 51 55 20 2a 2a 43 4f 4d 4d 4f 4e 20 41 52 45 41 20 46 52 41 4d 45 2a 2a 20 00 07 00 94 00 06 00 50 2a 20 00 07 00 c6 00 12 00 50 2a 20 20 20 45 58 54 45 52 4e 41 4c 53 20 00 07 00 d0 00 2e 00 50 5c 45 4a 45 43 54 5c 5c 49 44 ┆T C:EQU **COMMON AREA FRAME** P* P* EXTERNALS . P EJECT ID┆
0x15ac…15fc 45 4e 54 20 43 3a 45 51 55 20 2a 2a 43 4f 4d 4d 4f 4e 20 41 52 45 41 20 46 52 41 4d 45 2a 2a 20 00 07 00 e6 00 06 00 50 2a 20 00 07 01 18 00 12 00 50 2a 20 20 20 45 58 54 45 52 4e 41 4c 53 20 00 07 01 22 00 06 00 50 2a 20 00 07 01 38 00 10 ┆ENT C:EQU **COMMON AREA FRAME** P* P* EXTERNALS " P* 8 ┆
0x15fc…164a 00 50 5c 45 58 54 52 4e 5c 54 3a 41 44 44 00 07 01 42 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 41 44 44 43 20 00 07 01 56 00 10 00 50 5c 45 58 54 52 4e 5c 54 3a 53 55 42 00 07 01 6c 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 53 55 42 43 20 ┆ P EXTRN T:ADD B P EXTRN T:ADDC V P EXTRN T:SUB l P EXTRN T:SUBC ┆
0x164a…169a (16, 0, 398) 00 07 01 80 00 06 00 50 2a 20 00 08 00 08 00 1c 00 50 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 08 00 12 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 4d 55 4c 43 20 00 08 00 32 00 10 00 50 5c 45 58 54 52 4e 5c 54 ┆ P* P EXTRN T:MUL TOSS-MULDIV P EXTRN T:MULC 2 P EXTRN T┆
0x169a…16ea 3a 44 49 56 00 08 00 48 00 12 00 50 5c 45 58 54 52 4e 5c 54 3a 44 49 56 43 20 00 08 00 5c 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 08 00 72 00 06 00 50 2a 20 00 08 00 8e 00 1c 00 50 2a 20 20 20 43 4f 4e 53 ┆:DIV H P EXTRN T:DIVC P EJECT IDENT C:EQU r P* P* CONS┆
0x16ea…173a 54 41 4e 54 20 54 43 41 20 45 51 55 41 54 45 53 00 08 00 98 00 06 00 50 2a 20 00 08 00 b8 00 10 00 50 43 41 31 5c 45 51 55 5c 2f 31 30 20 00 08 00 c2 00 10 00 50 43 42 31 5c 45 51 55 5c 2f 32 30 20 00 08 00 d6 00 10 00 50 43 42 31 30 5c 45 ┆TANT TCA EQUATES P* PCA1 EQU /10 PCB1 EQU /20 PCB10 E┆
0x173a…178a 51 55 5c 2f 32 31 00 08 00 ea 00 12 00 50 43 42 31 30 30 5c 45 51 55 5c 2f 32 32 20 00 08 00 fe 00 12 00 50 43 42 31 30 30 30 5c 45 51 55 5c 2f 32 33 00 08 01 14 00 12 00 50 43 42 33 32 4b 5c 45 51 55 5c 2f 32 34 20 00 08 01 2a 00 10 00 50 ┆QU /21 PCB100 EQU /22 PCB1000 EQU /23 PCB32K EQU /24 * P┆
0x178a…17d8 59 45 41 52 5c 45 51 55 5c 2f 33 30 00 08 01 40 00 12 00 50 4d 4f 4e 54 48 5c 45 51 55 5c 2f 33 31 20 00 08 01 54 00 10 00 50 44 41 59 5c 45 51 55 5c 2f 33 32 20 00 08 01 6a 00 10 00 50 48 4f 55 52 5c 45 51 55 5c 2f 34 30 00 08 01 7e ┆YEAR EQU /30 @ PMONTH EQU /31 T PDAY EQU /32 j PHOUR EQU /40 ~┆
0x17d8…1828 (17, 0, 400) 00 10 00 50 4d 49 4e 5c 45 51 55 5c 2f 34 31 20 00 09 00 04 00 10 00 50 53 45 43 5c 45 51 55 5c 2f 34 32 20 00 09 00 18 00 06 00 50 2a 20 00 09 00 2c 00 20 00 50 2a 20 20 20 4c 49 4e 45 20 57 4f 52 4b 42 4c 4f 43 4b 53 20 45 51 55 41 54 45 ┆ PMIN EQU /41 PSEC EQU /42 P* , P* LINE WORKBLOCKS EQUATE┆
0x1828…1878 53 20 00 09 00 36 00 06 00 50 2a 20 00 09 00 5a 00 18 00 50 4c 49 4e 5c 45 51 55 5c 2f 31 30 5c 4c 49 4e 45 20 4e 42 52 00 09 00 64 00 1e 00 50 4c 49 4e 42 43 5c 45 51 55 5c 2f 31 31 5c 42 55 53 59 20 43 4f 55 4e 54 45 52 00 09 00 80 00 20 ┆S 6 P* Z PLIN EQU /10 LINE NBR d PLINBC EQU /11 BUSY COUNTER ┆
0x1878…18c8 00 50 4c 49 4e 54 43 5c 45 51 55 5c 2f 31 32 5c 54 52 41 4e 53 20 43 4f 55 4e 54 45 52 20 00 09 00 a2 00 20 00 50 4c 49 4e 45 43 5c 45 51 55 5c 2f 31 33 5c 45 52 52 4f 52 20 43 4f 55 4e 54 45 52 20 00 09 00 c6 00 26 00 50 4c 49 4e 48 55 52 ┆ PLINTC EQU /12 TRANS COUNTER PLINEC EQU /13 ERROR COUNTER & PLINHUR┆
0x18c8…1918 5c 45 51 55 5c 2f 31 34 5c 54 49 4d 45 20 4f 46 20 4c 41 53 54 20 54 52 41 4e 53 20 00 09 00 ea 00 12 00 50 4c 49 4e 4d 49 4e 5c 45 51 55 5c 2f 31 35 00 09 01 14 00 12 00 50 4c 49 4e 53 45 43 5c 45 51 55 5c 2f 31 36 00 09 01 2a 00 06 00 50 ┆ EQU /14 TIME OF LAST TRANS PLINMIN EQU /15 PLINSEC EQU /16 * P┆
0x1918…1968 2a 20 00 09 01 40 00 1c 00 50 2a 20 20 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 20 45 51 55 41 54 45 53 00 09 01 4a 00 06 00 50 2a 20 00 09 01 6a 00 0e 00 50 54 43 5c 45 51 55 5c 2f 32 30 00 09 01 74 00 10 00 50 54 43 42 43 5c 45 51 55 5c 2f ┆* @ P* TC WORKBLOCK EQUATES J P* j PTC EQU /20 t PTCBC EQU /┆
0x1968…19b8 (18, 0, 400) 32 31 00 09 01 86 00 10 00 50 54 43 54 43 5c 45 51 55 5c 2f 32 32 00 0a 00 0a 00 10 00 50 54 43 45 43 5c 45 51 55 5c 2f 32 33 00 0a 00 1e 00 12 00 50 54 43 48 55 52 5c 45 51 55 5c 2f 32 34 20 00 0a 00 32 00 12 00 50 54 43 4d 49 4e 5c 45 51 ┆21 PTCTC EQU /22 PTCEC EQU /23 PTCHUR EQU /24 2 PTCMIN EQ┆
0x19b8…1a08 55 5c 2f 32 35 20 00 0a 00 48 00 12 00 50 54 43 53 45 43 5c 45 51 55 5c 2f 32 36 20 00 0a 00 5e 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 0a 00 74 00 06 00 50 2a 20 00 0a 00 90 00 2a 00 50 2a 20 20 20 43 43 ┆U /25 H PTCSEC EQU /26 ^ P EJECT IDENT C:EQU t P* * P* CC┆
0x1a08…1a58 20 57 4f 52 4b 42 4c 4f 43 4b 20 52 45 53 50 4f 4e 53 45 54 49 4d 45 20 45 51 55 41 54 45 53 20 00 0a 00 9a 00 06 00 50 2a 20 00 0a 00 c8 00 10 00 50 43 43 31 5c 45 51 55 5c 2f 33 30 20 00 0a 00 d2 00 10 00 50 43 43 32 5c 45 51 55 5c 2f 33 ┆ WORKBLOCK RESPONSETIME EQUATES P* PCC1 EQU /30 PCC2 EQU /3┆
0x1a58…1aa8 31 20 00 0a 00 e6 00 10 00 50 43 43 33 5c 45 51 55 5c 2f 33 32 20 00 0a 00 fa 00 10 00 50 43 43 34 5c 45 51 55 5c 2f 33 33 20 00 0a 01 0e 00 10 00 50 43 43 35 5c 45 51 55 5c 2f 33 34 20 00 0a 01 22 00 10 00 50 43 43 36 5c 45 51 55 5c 2f 33 ┆1 PCC3 EQU /32 PCC4 EQU /33 PCC5 EQU /34 " PCC6 EQU /3┆
0x1aa8…1af8 35 20 00 0a 01 36 00 10 00 50 43 43 37 5c 45 51 55 5c 2f 33 36 20 00 0a 01 4a 00 10 00 50 43 43 38 5c 45 51 55 5c 2f 33 37 20 00 0a 01 5e 00 10 00 50 43 43 39 5c 45 51 55 5c 2f 33 38 20 00 0a 01 72 00 10 00 50 43 43 31 30 5c 45 51 55 5c 2f ┆5 6 PCC7 EQU /36 J PCC8 EQU /37 ^ PCC9 EQU /38 r PCC10 EQU /┆
0x1af8…1b48 (19, 0, 400) 33 39 00 0a 01 86 00 10 00 50 43 43 31 31 5c 45 51 55 5c 2f 33 41 00 0b 00 0a 00 10 00 50 43 43 31 32 5c 45 51 55 5c 2f 33 42 00 0b 00 1e 00 06 00 50 2a 20 00 0b 00 32 00 1c 00 50 2a 20 20 20 43 43 20 57 4f 52 4b 42 4c 4f 43 4b 20 45 51 55 ┆39 PCC11 EQU /3A PCC12 EQU /3B P* 2 P* CC WORKBLOCK EQU┆
0x1b48…1b98 41 54 45 53 00 0b 00 3c 00 06 00 50 2a 20 00 0b 00 5c 00 22 00 50 43 43 54 4f 5c 45 51 55 5c 2f 34 30 5c 54 49 4d 45 20 4f 55 54 20 43 4f 55 4e 54 45 52 20 00 0b 00 66 00 10 00 50 43 43 54 43 5c 45 51 55 5c 2f 34 31 00 0b 00 8c 00 10 00 50 ┆ATES < P* " PCCTO EQU /40 TIME OUT COUNTER f PCCTC EQU /41 P┆
0x1b98…1be8 43 43 45 43 5c 45 51 55 5c 2f 34 32 00 0b 00 a0 00 26 00 50 43 43 53 55 50 5c 45 51 55 5c 2f 34 33 5c 53 55 50 45 52 56 20 4d 53 47 53 20 43 4f 55 4e 54 45 52 20 00 0b 00 b4 00 24 00 50 43 43 48 55 52 5c 45 51 55 5c 2f 34 34 5c 54 49 4d 45 ┆CCEC EQU /42 & PCCSUP EQU /43 SUPERV MSGS COUNTER $ PCCHUR EQU /44 TIME┆
0x1be8…1c38 20 4f 46 20 4c 41 53 54 20 52 45 50 4c 59 00 0b 00 de 00 12 00 50 43 43 4d 49 4e 5c 45 51 55 5c 2f 34 35 20 00 0b 01 06 00 12 00 50 43 43 53 45 43 5c 45 51 55 5c 2f 34 36 20 00 0b 01 1c 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 ┆ OF LAST REPLY PCCMIN EQU /45 PCCSEC EQU /46 P EJECT IDENT ┆
0x1c38…1c88 43 3a 45 51 55 20 00 0b 01 32 00 06 00 50 2a 20 00 0b 01 4e 00 22 00 50 2a 20 20 20 20 4e 45 54 57 4f 52 4b 20 57 4f 52 4b 42 4c 4f 43 4b 20 45 51 55 41 54 45 53 00 0b 01 58 00 06 00 50 2a 20 00 0b 01 7e 00 2a 00 50 4e 57 54 43 5c 45 51 55 ┆C:EQU 2 P* N " P* NETWORK WORKBLOCK EQUATES X P* ~ * PNWTC EQU┆
0x1c88…1cd8 (20, 0, 398) 5c 2f 35 44 5c 41 43 43 55 4d 55 4c 41 54 45 44 20 54 52 41 4e 53 20 43 4f 55 4e 54 45 52 00 0b 01 88 00 20 00 50 4e 57 45 43 5c 45 51 55 5c 2f 35 45 5c 41 43 43 20 45 52 52 4f 52 20 43 4f 55 4e 54 00 0c 00 26 00 06 00 50 2a 20 00 0c 00 4a ┆ /5D ACCUMULATED TRANS COUNTER PNWEC EQU /5E ACC ERROR COUNT & P* J┆
0x1cd8…1d28 00 1e 00 50 50 43 4e 54 31 5c 45 51 55 5c 2f 35 30 5c 25 20 49 4e 54 45 52 56 41 4c 53 20 00 0c 00 54 00 12 00 50 50 43 4e 54 32 5c 45 51 55 5c 2f 35 31 20 00 0c 00 76 00 12 00 50 50 43 4e 54 33 5c 45 51 55 5c 2f 35 32 20 00 0c 00 8c 00 12 ┆ PPCNT1 EQU /50 % INTERVALS T PPCNT2 EQU /51 v PPCNT3 EQU /52 ┆
0x1d28…1d78 00 50 50 43 4e 54 34 5c 45 51 55 5c 2f 35 33 20 00 0c 00 a2 00 12 00 50 50 43 4e 54 35 5c 45 51 55 5c 2f 35 34 20 00 0c 00 b8 00 12 00 50 50 43 4e 54 36 5c 45 51 55 5c 2f 35 35 20 00 0c 00 ce 00 12 00 50 50 43 4e 54 37 5c 45 51 55 5c 2f 35 ┆ PPCNT4 EQU /53 PPCNT5 EQU /54 PPCNT6 EQU /55 PPCNT7 EQU /5┆
0x1d78…1dc8 36 20 00 0c 00 e4 00 12 00 50 50 43 4e 54 38 5c 45 51 55 5c 2f 35 37 20 00 0c 00 fa 00 12 00 50 50 43 4e 54 39 5c 45 51 55 5c 2f 35 38 20 00 0c 01 10 00 12 00 50 50 43 4e 54 31 30 5c 45 51 55 5c 2f 35 39 00 0c 01 26 00 12 00 50 50 43 4e 54 ┆6 PPCNT8 EQU /57 PPCNT9 EQU /58 PPCNT10 EQU /59 & PPCNT┆
0x1dc8…1e16 31 31 5c 45 51 55 5c 2f 35 41 00 0c 01 3c 00 12 00 50 50 43 4e 54 31 32 5c 45 51 55 5c 2f 35 42 00 0c 01 52 00 06 00 50 2a 20 00 0c 01 68 00 20 00 50 52 53 50 54 49 4d 5c 45 51 55 5c 2f 35 43 5c 52 45 53 50 4f 4e 53 45 20 54 49 4d 45 ┆11 EQU /5A < PPCNT12 EQU /5B R P* h PRSPTIM EQU /5C RESPONSE TIME┆