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

⟦8ab8a8bbc⟧

    Length: 7110 (0x1bc6)
    Notes: pts_type(SC)
    Names: »DERROR.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DU/DERROR.SC« 
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
    └─⟦this⟧ »S:DU/DERROR.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DU/DERROR.SC« 

PTS(SC)

	IDENT	DERROR	UPD 80-02-29/CHST 
* 
*  USER = S:DA
*       THIS IS A GENERAL ERRORMESSAGES-ROUTINE 
*       IT - POSITIONS CURSOR AT THE 24TH LINE
*          - DISPLAYS CORRESPNDING ERROR MESSAGE AT THE 24TH LINE 
*          - CORRESPONDING ERROR-NUMBER IS HOLD IN DEBINW4
*          - ERASE 24TH LINE AFTER DEPRESSING VALID KEY 
* 
	DDUM	DDINIT
	PDIV 
	ENTRY	DERROR 
	ENTRY	CANC 
	ENTRY	DESTAT 
	ENTRY	DECHK1 
	ENTRY	DECHK2 
	ENTRY	DECHK3 
	ENTRY	DECHK4 
	ENTRY	DECHK5 
	ENTRY	DECHK6 
	ENTRY	DECHK7 
	ENTRY	DETCHK 
	EJECT
* 
**        ERROR-MESSAGES
* 
DEFTBERR	FTABLE	ERFM01,ERFM02,ERFM03,ERFM04,ERFM05,ERFM06,ERFM07,		C
		ERFM02,ERFM09,ERFM10,ERFM11,ERFM12,ERFM13,ERFM02,		C
		ERFM02,ERFM02,ERFM17,ERFM18,ERFM02,ERFM20,ERFM21,		C
		ERFM22,ERFM18,ERFM24,ERFM25,ERFM18,ERFM18,ERFM02,		C
		ERFM02,ERFM30 
* 
ERFM01	FRMT 
	FSL
	FTEXT	'TOO FEW INPUT CHARACTERS' 
	FMEND
* 
ERFM02	FRMT 
	FSL
	FTEXT	'UNDEFINED ERROR'
	FMEND
* 
ERFM03	FRMT 
	FSL
	FTEXT	'I/O-ERROR'
	FMEND
* 
ERFM04	FRMT 
	FSL
	FTEXT	'FUNCTION NOT ALLOWED' 
	FMEND
* 
ERFM05	FRMT 
	FSL
	FTEXT	'COMPULSORY FIELD NOT FILLED'
	FMEND
* 
ERFM06	FRMT 
	FSL
	FTEXT	'ILLEGAL VALUE'
	FMEND
* 
ERFM07	FRMT 
	FSL
	FTEXT	'FILENAME ALREADY USED'
	FMEND
* 
ERFM09	FRMT 
	FSL
	FTEXT	'SYSTEMFILE NOT CREATED' 
	FMEND
* 
ERFM10	FRMT 
	FSL
	FTEXT	'DISK OVERFLOW'
	FMEND
* 
ERFM11	FRMT 
	FSL
	FTEXT	'VOLUME-NAME MUST BE "SYSVOL"' 
	FMEND
* 
ERFM12	FRMT 
	FSL
	FTEXT	'FILE NAME UNKNOWN'
	FMEND
* 
ERFM13 FRMT 
 FSL
 FTEXT 'NO WORKSPACE IN CORE' 
 FMEND
* 
ERFM17 FRMT 
 FSL
	FTEXT	'OUTPUT FILE TOO SMALL'
 FMEND
* 
ERFM18 FRMT 
 FSL
	FTEXT	'DISK NOT OPERABLE'
 FMEND
* 
ERFM20 FRMT 
 FSL
 FTEXT 'SYSTEMFILE ASSIGN-ERROR'
 FMEND
* 
ERFM21 FRMT 
 FSL
	FTEXT	'USERFILE ASSIGN-ERROR'
 FMEND
* 
ERFM22 FRMT 
 FSL
	FTEXT	'DISC I/O-ERROR' 
	FTAB	58
	FMEL	'XXXXX-',BCD13A 
 FMEND
* 
ERFM24 FRMT 
 FSL
 FTEXT 'DISC READING-ERROR' 
 FMEND
* 
ERFM25 FRMT 
 FSL
 FTEXT 'DISC WRITING-ERROR' 
 FMEND
* 
ERFM30	FRMT 
	FSL
	FTEXT	'WRONG NO. OF SECTORS/RECORD IN OUTPUT FILE' 
	FMEND
* 
	EJECT
DERROR	PROC	KEYT
	PKTAB	KEYT 
* 
*    ERROR HANDLING 
* 
	MOVE	DEBINW2,W1
 EDWRT DEDSSCRN,BELL ACOUSTIC ALARM 
	CMP	DEBINW4,W0 
	BZ	DERR99
	BP	DERR00
	ADD	DEBINW4,=W'51' 
DERR00
 MOVE DEBINW3,=X'1801' ROW 24 COL. 1
 DSC1 DEDSSCRN,6,DEBINW3 SET CURSOR ON LAST ROW 
* 
DERR03
 CBL DEBINW4,=W'50',DERR04
 MOVE DEBINW4,W2
DERR04
 EDWRT DEDSSCRN,DEFTBERR(DEBINW4) 
* 
*    READ AFTER ERROR 
* 
DERR05
 SETCUR		SET CURSOR AT THE BEGINNING
			OF THE CURRENT FIELD 
	B	DERR15	NO BELL FIRST TIME
DERR10
	EDWRT	DEDSSCRN,BELL	ACOUSTIC ALARM 
DERR15
 MOVE DEBINW3,W1 REQUESTED LENGTH 
	NKI	.NE,DEDSDYKB,STR1A,KEYT,DEBINW3,DEBINW2
	BNOK	DERR10
* 
DERR18
	CBNE	DEBINW2,W0,DERR20 
	DISPLAY	0,W1,W0
 B DERR00 
DERR20
	MOVE	DEBINW3,W24	INDICATE LAST LINE
	IB	DEBINW2,DERR30,DERR30		C
		DERR30,DERR40 
	B	DERR10	CONTINUE
* 
*    CLEAR ERROR PRINTOUT 
* 
DERR30
 ERASE 0,DEBINW3,DEBINW3 ERASE LAST LINE
	PERF	CANC
	B	DERR99 
DERR40
	CBE	DEBINW1,W0,DERR10
	ERASE	0,DEBINW3,DEBINW3	ERASE LAST LINE
DERR99
	RET
	PEND 
	EJECT
CANC	PROC 
 MOVE DEINPUT,HEX00 
 MOVE DEINPUT,:FMTITEM SAVE CURRENT CONTENTS
 CBE DEBINW1,W0,CANC10 JUMP IF LENGTH = 0 
 MOVE STATSH,=X'3100' 
 MOVE :FMTITEM,STATSH PUT SOMETHING IN THE FIELD
 GETABX DEBINW4 GET CURRENT INDEX 
 ERASE 10,DEBINW4,DEBINW4 CLEAR FIELD 
CANC10
 IB DEBINW2,CLEAR1,CLEAR2 
CANC15
	MOVE	:FMTITEM,DEINPUT	RESTORE CURRENT CONTENTS 
 RET
CLEAR1
 CBE DEBINW1,W0,CANC15 JUMP IF LENGTH = 0 
 SET DECHANGE INDICATE CHANGED FIELD
 B CANC15 CONTINUE
* 
CLEAR2
 CBE DEBINW1,W0,CANC15
 MOVE :FMTITEM,DEINPUT RESTORE CURRENT CONTENTS 
CLEA20
 GETABX DEBINW4 GET CURRENT TAB INDEX 
 DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD
	RET
	PEND 
	EJECT
DESTAT
DECHK1
DECHK2
DECHK3
DECHK4
DECHK5
DECHK6
DECHK7
DETCHK	PROC 
	RET
	PEND 
	EJECT
* 
BELL FRMT 
 FSL
 FILLR X'07',1
 FMEND
	END

HexDump

0x0000…0028 (0, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» IDENT DERROR UPD 80-02-29/CHST «, t00=0x0000, t01=0x0004}
0x0028…0032              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x002c}
0x0032…0048              Head {h00=0x0012, h01=0x0050, text=»*  USER = S:DA«, t00=0x0000, t01=0x0036}
0x0048…0080              Head {h00=0x0034, h01=0x0050, text=»*       THIS IS A GENERAL ERRORMESSAGES-ROUTINE «, t00=0x0000, t01=0x004c}
0x0080…00b6              Head {h00=0x0032, h01=0x0050, text=»*       IT - POSITIONS CURSOR AT THE 24TH LINE«, t00=0x0000, t01=0x0084}
0x00b6…0100              Head {h00=0x0046, h01=0x0050, text=»*          - DISPLAYS CORRESPNDING ERROR MESSAGE AT THE 24TH LINE «, t00=0x0000, t01=0x00ba}
0x0100…0142              Head {h00=0x003e, h01=0x0050, text=»*          - CORRESPONDING ERROR-NUMBER IS HOLD IN DEBINW4«, t00=0x0000, t01=0x0104}
0x0142…0182              Head {h00=0x003c, h01=0x0050, text=»*          - ERASE 24TH LINE AFTER DEPRESSING VALID KEY «, t00=0x0000, t01=0x0146}
0x0182…018c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0186}
0x018c…01a0              Head {h00=0x0010, h01=0x0050, text=» DDUM DDINIT«, t00=0x0000, t01=0x0190}
0x01a0…01ae              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0001, t01=0x0014}
0x01ae…01c4              Head {h00=0x0012, h01=0x0050, text=» ENTRY DERROR «, t00=0x0001, t01=0x0022}
0x01c4…01d8              Head {h00=0x0010, h01=0x0050, text=» ENTRY CANC «, t00=0x0001, t01=0x0038}
0x01d8…01ee              Head {h00=0x0012, h01=0x0050, text=» ENTRY DESTAT «, t00=0x0001, t01=0x004c}
0x01ee…0204              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK1 «, t00=0x0001, t01=0x0062}
0x0204…021a              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK2 «, t00=0x0001, t01=0x0078}
0x021a…0230              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK3 «, t00=0x0001, t01=0x008e}
0x0230…0246              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK4 «, t00=0x0001, t01=0x00a4}
0x0246…025c              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK5 «, t00=0x0001, t01=0x00ba}
0x025c…0272              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK6 «, t00=0x0001, t01=0x00d0}
0x0272…0288              Head {h00=0x0012, h01=0x0050, text=» ENTRY DECHK7 «, t00=0x0001, t01=0x00e6}
0x0288…029e              Head {h00=0x0012, h01=0x0050, text=» ENTRY DETCHK «, t00=0x0001, t01=0x00fc}
0x029e…02ac              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0112}
0x02ac…02b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0120}
0x02b6…02d6              Head {h00=0x001c, h01=0x0050, text=»**        ERROR-MESSAGES«, t00=0x0001, t01=0x012a}
0x02d6…02e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x02e0…032c              Head {h00=0x0048, h01=0x0050, text=»DEFTBERR FTABLE ERFM01,ERFM02,ERFM03,ERFM04,ERFM05,ERFM06,ERFM07,  C«, t00=0x0001, t01=0x0154}
0x032c…036a              Head {h00=0x003a, h01=0x0050, text=»  ERFM02,ERFM09,ERFM10,ERFM11,ERFM12,ERFM13,ERFM02,  C«, t00=0x0002, t01=0x0010}
0x036a…03a8              Head {h00=0x003a, h01=0x0050, text=»  ERFM02,ERFM02,ERFM17,ERFM18,ERFM02,ERFM20,ERFM21,  C«, t00=0x0002, t01=0x004e}
0x03a8…03e6              Head {h00=0x003a, h01=0x0050, text=»  ERFM22,ERFM18,ERFM24,ERFM25,ERFM18,ERFM18,ERFM02,  C«, t00=0x0002, t01=0x008c}
0x03e6…03fe              Head {h00=0x0014, h01=0x0050, text=»  ERFM02,ERFM30 «, t00=0x0002, t01=0x00ca}
0x03fe…0408              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e2}
0x0408…041c              Head {h00=0x0010, h01=0x0050, text=»ERFM01 FRMT «, t00=0x0002, t01=0x00ec}
0x041c…0428              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0002, t01=0x0100}
0x0428…0452              Head {h00=0x0026, h01=0x0050, text=» FTEXT 'TOO FEW INPUT CHARACTERS' «, t00=0x0002, t01=0x010c}
0x0452…0460              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0002, t01=0x0136}
0x0460…046a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0144}
0x046a…047e              Head {h00=0x0010, h01=0x0050, text=»ERFM02 FRMT «, t00=0x0002, t01=0x014e}
0x047e…048a              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0002, t01=0x0162}
0x048a…04aa              Head {h00=0x001c, h01=0x0050, text=» FTEXT 'UNDEFINED ERROR'«, t00=0x0002, t01=0x016e}
0x04aa…04b8              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0002, t01=0x018e}
0x04b8…04c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x000c}
0x04c2…04d6              Head {h00=0x0010, h01=0x0050, text=»ERFM03 FRMT «, t00=0x0003, t01=0x0016}
0x04d6…04e2              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0003, t01=0x002a}
0x04e2…04fc              Head {h00=0x0016, h01=0x0050, text=» FTEXT 'I/O-ERROR'«, t00=0x0003, t01=0x0036}
0x04fc…050a              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0003, t01=0x0050}
0x050a…0514              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005e}
0x0514…0528              Head {h00=0x0010, h01=0x0050, text=»ERFM04 FRMT «, t00=0x0003, t01=0x0068}
0x0528…0534              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0003, t01=0x007c}
0x0534…055a              Head {h00=0x0022, h01=0x0050, text=» FTEXT 'FUNCTION NOT ALLOWED' «, t00=0x0003, t01=0x0088}
0x055a…0568              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0003, t01=0x00ae}
0x0568…0572              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…0586              Head {h00=0x0010, h01=0x0050, text=»ERFM05 FRMT «, t00=0x0003, t01=0x00c6}
0x0586…0592              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0003, t01=0x00da}
0x0592…05be              Head {h00=0x0028, h01=0x0050, text=» FTEXT 'COMPULSORY FIELD NOT FILLED'«, t00=0x0003, t01=0x00e6}
0x05be…05cc              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0003, t01=0x0112}
0x05cc…05d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0120}
0x05d6…05ea              Head {h00=0x0010, h01=0x0050, text=»ERFM06 FRMT «, t00=0x0003, t01=0x012a}
0x05ea…05f6              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0003, t01=0x013e}
0x05f6…0614              Head {h00=0x001a, h01=0x0050, text=» FTEXT 'ILLEGAL VALUE'«, t00=0x0003, t01=0x014a}
0x0614…0622              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0003, t01=0x0168}
0x0622…062c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0176}
0x062c…0640              Head {h00=0x0010, h01=0x0050, text=»ERFM07 FRMT «, t00=0x0003, t01=0x0180}
0x0640…064c (4, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0004, t01=0x0004}
0x064c…0672              Head {h00=0x0022, h01=0x0050, text=» FTEXT 'FILENAME ALREADY USED'«, t00=0x0004, t01=0x0010}
0x0672…0680              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0004, t01=0x0036}
0x0680…068a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0044}
0x068a…069e              Head {h00=0x0010, h01=0x0050, text=»ERFM09 FRMT «, t00=0x0004, t01=0x004e}
0x069e…06aa              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0004, t01=0x0062}
0x06aa…06d2              Head {h00=0x0024, h01=0x0050, text=» FTEXT 'SYSTEMFILE NOT CREATED' «, t00=0x0004, t01=0x006e}
0x06d2…06e0              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0004, t01=0x0096}
0x06e0…06ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00a4}
0x06ea…06fe              Head {h00=0x0010, h01=0x0050, text=»ERFM10 FRMT «, t00=0x0004, t01=0x00ae}
0x06fe…070a              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0004, t01=0x00c2}
0x070a…0728              Head {h00=0x001a, h01=0x0050, text=» FTEXT 'DISK OVERFLOW'«, t00=0x0004, t01=0x00ce}
0x0728…0736              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0004, t01=0x00ec}
0x0736…0740              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00fa}
0x0740…0754              Head {h00=0x0010, h01=0x0050, text=»ERFM11 FRMT «, t00=0x0004, t01=0x0104}
0x0754…0760              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0004, t01=0x0118}
0x0760…078e              Head {h00=0x002a, h01=0x0050, text=» FTEXT 'VOLUME-NAME MUST BE "SYSVOL"' «, t00=0x0004, t01=0x0124}
0x078e…079c              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0004, t01=0x0152}
0x079c…07a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0160}
0x07a6…07ba              Head {h00=0x0010, h01=0x0050, text=»ERFM12 FRMT «, t00=0x0004, t01=0x016a}
0x07ba…07c6              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0004, t01=0x017e}
0x07c6…07e8              Head {h00=0x001e, h01=0x0050, text=» FTEXT 'FILE NAME UNKNOWN'«, t00=0x0004, t01=0x018a}
0x07e8…07f6              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0005, t01=0x001c}
0x07f6…0800              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002a}
0x0800…0814              Head {h00=0x0010, h01=0x0050, text=»ERFM13 FRMT «, t00=0x0005, t01=0x0034}
0x0814…0820              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0005, t01=0x0048}
0x0820…0846              Head {h00=0x0022, h01=0x0050, text=» FTEXT 'NO WORKSPACE IN CORE' «, t00=0x0005, t01=0x0054}
0x0846…0854              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0005, t01=0x007a}
0x0854…085e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0088}
0x085e…0872              Head {h00=0x0010, h01=0x0050, text=»ERFM17 FRMT «, t00=0x0005, t01=0x0092}
0x0872…087e              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0005, t01=0x00a6}
0x087e…08a4              Head {h00=0x0022, h01=0x0050, text=» FTEXT 'OUTPUT FILE TOO SMALL'«, t00=0x0005, t01=0x00b2}
0x08a4…08b2              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0005, t01=0x00d8}
0x08b2…08bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e6}
0x08bc…08d0              Head {h00=0x0010, h01=0x0050, text=»ERFM18 FRMT «, t00=0x0005, t01=0x00f0}
0x08d0…08dc              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0005, t01=0x0104}
0x08dc…08fe              Head {h00=0x001e, h01=0x0050, text=» FTEXT 'DISK NOT OPERABLE'«, t00=0x0005, t01=0x0110}
0x08fe…090c              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0005, t01=0x0132}
0x090c…0916              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0140}
0x0916…092a              Head {h00=0x0010, h01=0x0050, text=»ERFM20 FRMT «, t00=0x0005, t01=0x014a}
0x092a…0936              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0005, t01=0x015e}
0x0936…095e              Head {h00=0x0024, h01=0x0050, text=» FTEXT 'SYSTEMFILE ASSIGN-ERROR'«, t00=0x0005, t01=0x016a}
0x095e…096c (6, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0006, t01=0x0004}
0x096c…0976              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0012}
0x0976…098a              Head {h00=0x0010, h01=0x0050, text=»ERFM21 FRMT «, t00=0x0006, t01=0x001c}
0x098a…0996              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0006, t01=0x0030}
0x0996…09bc              Head {h00=0x0022, h01=0x0050, text=» FTEXT 'USERFILE ASSIGN-ERROR'«, t00=0x0006, t01=0x003c}
0x09bc…09ca              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0006, t01=0x0062}
0x09ca…09d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x09d4…09e8              Head {h00=0x0010, h01=0x0050, text=»ERFM22 FRMT «, t00=0x0006, t01=0x007a}
0x09e8…09f4              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0006, t01=0x008e}
0x09f4…0a14              Head {h00=0x001c, h01=0x0050, text=» FTEXT 'DISC I/O-ERROR' «, t00=0x0006, t01=0x009a}
0x0a14…0a24              Head {h00=0x000c, h01=0x0050, text=» FTAB 58«, t00=0x0006, t01=0x00ba}
0x0a24…0a42              Head {h00=0x001a, h01=0x0050, text=» FMEL 'XXXXX-',BCD13A «, t00=0x0006, t01=0x00ca}
0x0a42…0a50              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0006, t01=0x00e8}
0x0a50…0a5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f6}
0x0a5a…0a6e              Head {h00=0x0010, h01=0x0050, text=»ERFM24 FRMT «, t00=0x0006, t01=0x0100}
0x0a6e…0a7a              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0006, t01=0x0114}
0x0a7a…0a9e              Head {h00=0x0020, h01=0x0050, text=» FTEXT 'DISC READING-ERROR' «, t00=0x0006, t01=0x0120}
0x0a9e…0aac              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0006, t01=0x0144}
0x0aac…0ab6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0152}
0x0ab6…0aca              Head {h00=0x0010, h01=0x0050, text=»ERFM25 FRMT «, t00=0x0006, t01=0x015c}
0x0aca…0ad6              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0006, t01=0x0170}
0x0ad6…0afa              Head {h00=0x0020, h01=0x0050, text=» FTEXT 'DISC WRITING-ERROR' «, t00=0x0006, t01=0x017c}
0x0afa…0b08              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0007, t01=0x0010}
0x0b08…0b12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001e}
0x0b12…0b26              Head {h00=0x0010, h01=0x0050, text=»ERFM30 FRMT «, t00=0x0007, t01=0x0028}
0x0b26…0b32              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0007, t01=0x003c}
0x0b32…0b6e              Head {h00=0x0038, h01=0x0050, text=» FTEXT 'WRONG NO. OF SECTORS/RECORD IN OUTPUT FILE' «, t00=0x0007, t01=0x0048}
0x0b6e…0b7c              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0007, t01=0x0084}
0x0b7c…0b86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0092}
0x0b86…0b94              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x009c}
0x0b94…0bac              Head {h00=0x0014, h01=0x0050, text=»DERROR PROC KEYT«, t00=0x0007, t01=0x00aa}
0x0bac…0bc0              Head {h00=0x0010, h01=0x0050, text=» PKTAB KEYT «, t00=0x0007, t01=0x00c2}
0x0bc0…0bca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d6}
0x0bca…0be6              Head {h00=0x0018, h01=0x0050, text=»*    ERROR HANDLING «, t00=0x0007, t01=0x00e0}
0x0be6…0bf0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fc}
0x0bf0…0c08              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW2,W1«, t00=0x0007, t01=0x0106}
0x0c08…0c34              Head {h00=0x0028, h01=0x0050, text=» EDWRT DEDSSCRN,BELL ACOUSTIC ALARM «, t00=0x0007, t01=0x011e}
0x0c34…0c4c              Head {h00=0x0014, h01=0x0050, text=» CMP DEBINW4,W0 «, t00=0x0007, t01=0x014a}
0x0c4c…0c5e              Head {h00=0x000e, h01=0x0050, text=» BZ DERR99«, t00=0x0007, t01=0x0162}
0x0c5e…0c70              Head {h00=0x000e, h01=0x0050, text=» BP DERR00«, t00=0x0007, t01=0x0174}
0x0c70…0c8c              Head {h00=0x0018, h01=0x0050, text=» ADD DEBINW4,=W'51' «, t00=0x0007, t01=0x0186}
0x0c8c…0c9a              Head {h00=0x000a, h01=0x0050, text=»DERR00«, t00=0x0008, t01=0x0012}
0x0c9a…0cc6              Head {h00=0x0028, h01=0x0050, text=» MOVE DEBINW3,=X'1801' ROW 24 COL. 1«, t00=0x0008, t01=0x0020}
0x0cc6…0cfe              Head {h00=0x0034, h01=0x0050, text=» DSC1 DEDSSCRN,6,DEBINW3 SET CURSOR ON LAST ROW «, t00=0x0008, t01=0x004c}
0x0cfe…0d08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0084}
0x0d08…0d16              Head {h00=0x000a, h01=0x0050, text=»DERR03«, t00=0x0008, t01=0x008e}
0x0d16…0d38              Head {h00=0x001e, h01=0x0050, text=» CBL DEBINW4,=W'50',DERR04«, t00=0x0008, t01=0x009c}
0x0d38…0d50              Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W2«, t00=0x0008, t01=0x00be}
0x0d50…0d5e              Head {h00=0x000a, h01=0x0050, text=»DERR04«, t00=0x0008, t01=0x00d6}
0x0d5e…0d88              Head {h00=0x0026, h01=0x0050, text=» EDWRT DEDSSCRN,DEFTBERR(DEBINW4) «, t00=0x0008, t01=0x00e4}
0x0d88…0d92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x010e}
0x0d92…0db0              Head {h00=0x001a, h01=0x0050, text=»*    READ AFTER ERROR «, t00=0x0008, t01=0x0118}
0x0db0…0dba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0136}
0x0dba…0dc8              Head {h00=0x000a, h01=0x0050, text=»DERR05«, t00=0x0008, t01=0x0140}
0x0dc8…0df4              Head {h00=0x0028, h01=0x0050, text=» SETCUR  SET CURSOR AT THE BEGINNING«, t00=0x0008, t01=0x014e}
0x0df4…0e14              Head {h00=0x001c, h01=0x0050, text=»   OF THE CURRENT FIELD «, t00=0x0008, t01=0x017a}
0x0e14…0e38              Head {h00=0x0020, h01=0x0050, text=» B DERR15 NO BELL FIRST TIME«, t00=0x0009, t01=0x000a}
0x0e38…0e46              Head {h00=0x000a, h01=0x0050, text=»DERR10«, t00=0x0009, t01=0x002e}
0x0e46…0e72              Head {h00=0x0028, h01=0x0050, text=» EDWRT DEDSSCRN,BELL ACOUSTIC ALARM «, t00=0x0009, t01=0x003c}
0x0e72…0e80              Head {h00=0x000a, h01=0x0050, text=»DERR15«, t00=0x0009, t01=0x0068}
0x0e80…0eaa              Head {h00=0x0026, h01=0x0050, text=» MOVE DEBINW3,W1 REQUESTED LENGTH «, t00=0x0009, t01=0x0076}
0x0eaa…0ede              Head {h00=0x0030, h01=0x0050, text=» NKI .NE,DEDSDYKB,STR1A,KEYT,DEBINW3,DEBINW2«, t00=0x0009, t01=0x00a0}
0x0ede…0ef2              Head {h00=0x0010, h01=0x0050, text=» BNOK DERR10«, t00=0x0009, t01=0x00d4}
0x0ef2…0efc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e8}
0x0efc…0f0a              Head {h00=0x000a, h01=0x0050, text=»DERR18«, t00=0x0009, t01=0x00f2}
0x0f0a…0f2a              Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW2,W0,DERR20 «, t00=0x0009, t01=0x0100}
0x0f2a…0f42              Head {h00=0x0014, h01=0x0050, text=» DISPLAY 0,W1,W0«, t00=0x0009, t01=0x0120}
0x0f42…0f54              Head {h00=0x000e, h01=0x0050, text=» B DERR00 «, t00=0x0009, t01=0x0138}
0x0f54…0f62              Head {h00=0x000a, h01=0x0050, text=»DERR20«, t00=0x0009, t01=0x014a}
0x0f62…0f8e              Head {h00=0x0028, h01=0x0050, text=» MOVE DEBINW3,W24 INDICATE LAST LINE«, t00=0x0009, t01=0x0158}
0x0f8e…0fb2              Head {h00=0x0020, h01=0x0050, text=» IB DEBINW2,DERR30,DERR30  C«, t00=0x0009, t01=0x0184}
0x0fb2…0fca              Head {h00=0x0014, h01=0x0050, text=»  DERR30,DERR40 «, t00=0x000a, t01=0x0018}
0x0fca…0fe4              Head {h00=0x0016, h01=0x0050, text=» B DERR10 CONTINUE«, t00=0x000a, t01=0x0030}
0x0fe4…0fee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x004a}
0x0fee…1010              Head {h00=0x001e, h01=0x0050, text=»*    CLEAR ERROR PRINTOUT «, t00=0x000a, t01=0x0054}
0x1010…101a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0076}
0x101a…1028              Head {h00=0x000a, h01=0x0050, text=»DERR30«, t00=0x000a, t01=0x0080}
0x1028…1058              Head {h00=0x002c, h01=0x0050, text=» ERASE 0,DEBINW3,DEBINW3 ERASE LAST LINE«, t00=0x000a, t01=0x008e}
0x1058…106a              Head {h00=0x000e, h01=0x0050, text=» PERF CANC«, t00=0x000a, t01=0x00be}
0x106a…107c              Head {h00=0x000e, h01=0x0050, text=» B DERR99 «, t00=0x000a, t01=0x00d0}
0x107c…108a              Head {h00=0x000a, h01=0x0050, text=»DERR40«, t00=0x000a, t01=0x00e2}
0x108a…10a8              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW1,W0,DERR10«, t00=0x000a, t01=0x00f0}
0x10a8…10d8              Head {h00=0x002c, h01=0x0050, text=» ERASE 0,DEBINW3,DEBINW3 ERASE LAST LINE«, t00=0x000a, t01=0x010e}
0x10d8…10e6              Head {h00=0x000a, h01=0x0050, text=»DERR99«, t00=0x000a, t01=0x013e}
0x10e6…10f2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x014c}
0x10f2…1100              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000a, t01=0x0158}
0x1100…110e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0166}
0x110e…1120              Head {h00=0x000e, h01=0x0050, text=»CANC PROC «, t00=0x000a, t01=0x0174}
0x1120…113c              Head {h00=0x0018, h01=0x0050, text=» MOVE DEINPUT,HEX00 «, t00=0x000a, t01=0x0186}
0x113c…1170              Head {h00=0x0030, h01=0x0050, text=» MOVE DEINPUT,:FMTITEM SAVE CURRENT CONTENTS«, t00=0x000b, t01=0x0012}
0x1170…11a2              Head {h00=0x002e, h01=0x0050, text=» CBE DEBINW1,W0,CANC10 JUMP IF LENGTH = 0 «, t00=0x000b, t01=0x0046}
0x11a2…11c0              Head {h00=0x001a, h01=0x0050, text=» MOVE STATSH,=X'3100' «, t00=0x000b, t01=0x0078}
0x11c0…11f8              Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,STATSH PUT SOMETHING IN THE FIELD«, t00=0x000b, t01=0x0096}
0x11f8…1222              Head {h00=0x0026, h01=0x0050, text=» GETABX DEBINW4 GET CURRENT INDEX «, t00=0x000b, t01=0x00ce}
0x1222…1250              Head {h00=0x002a, h01=0x0050, text=» ERASE 10,DEBINW4,DEBINW4 CLEAR FIELD «, t00=0x000b, t01=0x00f8}
0x1250…125e              Head {h00=0x000a, h01=0x0050, text=»CANC10«, t00=0x000b, t01=0x0126}
0x125e…1280              Head {h00=0x001e, h01=0x0050, text=» IB DEBINW2,CLEAR1,CLEAR2 «, t00=0x000b, t01=0x0134}
0x1280…128e              Head {h00=0x000a, h01=0x0050, text=»CANC15«, t00=0x000b, t01=0x0156}
0x128e…12c6              Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,DEINPUT RESTORE CURRENT CONTENTS «, t00=0x000b, t01=0x0164}
0x12c6…12d2              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000c, t01=0x000c}
0x12d2…12e0              Head {h00=0x000a, h01=0x0050, text=»CLEAR1«, t00=0x000c, t01=0x0018}
0x12e0…1312              Head {h00=0x002e, h01=0x0050, text=» CBE DEBINW1,W0,CANC15 JUMP IF LENGTH = 0 «, t00=0x000c, t01=0x0026}
0x1312…133e              Head {h00=0x0028, h01=0x0050, text=» SET DECHANGE INDICATE CHANGED FIELD«, t00=0x000c, t01=0x0058}
0x133e…1358              Head {h00=0x0016, h01=0x0050, text=» B CANC15 CONTINUE«, t00=0x000c, t01=0x0084}
0x1358…1362              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009e}
0x1362…1370              Head {h00=0x000a, h01=0x0050, text=»CLEAR2«, t00=0x000c, t01=0x00a8}
0x1370…138e              Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW1,W0,CANC15«, t00=0x000c, t01=0x00b6}
0x138e…13c6              Head {h00=0x0034, h01=0x0050, text=» MOVE :FMTITEM,DEINPUT RESTORE CURRENT CONTENTS «, t00=0x000c, t01=0x00d4}
0x13c6…13d4              Head {h00=0x000a, h01=0x0050, text=»CLEA20«, t00=0x000c, t01=0x010c}
0x13d4…1402              Head {h00=0x002a, h01=0x0050, text=» GETABX DEBINW4 GET CURRENT TAB INDEX «, t00=0x000c, t01=0x011a}
0x1402…1432              Head {h00=0x002c, h01=0x0050, text=» DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD«, t00=0x000c, t01=0x0148}
0x1432…143e              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000c, t01=0x0178}
0x143e…144c              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000c, t01=0x0184}
0x144c…145a (13, 2, 282) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0004}
0x145a…1468              Head {h00=0x000a, h01=0x0050, text=»DESTAT«, t00=0x000d, t01=0x0012}
0x1468…1476              Head {h00=0x000a, h01=0x0050, text=»DECHK1«, t00=0x000d, t01=0x0020}
0x1476…1484              Head {h00=0x000a, h01=0x0050, text=»DECHK2«, t00=0x000d, t01=0x002e}
0x1484…1492              Head {h00=0x000a, h01=0x0050, text=»DECHK3«, t00=0x000d, t01=0x003c}
0x1492…14a0              Head {h00=0x000a, h01=0x0050, text=»DECHK4«, t00=0x000d, t01=0x004a}
0x14a0…14ae              Head {h00=0x000a, h01=0x0050, text=»DECHK5«, t00=0x000d, t01=0x0058}
0x14ae…14bc              Head {h00=0x000a, h01=0x0050, text=»DECHK6«, t00=0x000d, t01=0x0066}
0x14bc…14ca              Head {h00=0x000a, h01=0x0050, text=»DECHK7«, t00=0x000d, t01=0x0074}
0x14ca…14de              Head {h00=0x0010, h01=0x0050, text=»DETCHK PROC «, t00=0x000d, t01=0x0082}
0x14de…14ea              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000d, t01=0x0096}
0x14ea…14f8              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000d, t01=0x00a2}
0x14f8…1506              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x00b0}
0x1506…1510              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00be}
0x1510…1522              Head {h00=0x000e, h01=0x0050, text=»BELL FRMT «, t00=0x000d, t01=0x00c8}
0x1522…152e              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000d, t01=0x00da}
0x152e…1544              Head {h00=0x0012, h01=0x0050, text=» FILLR X'07',1«, t00=0x000d, t01=0x00e6}
0x1544…1552              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000d, t01=0x00fc}
0x1552…155e              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x000d, t01=0x010a}
0x155e…1562              Head {h00=0x4004, h01=0x0000}
0x1562…1566              00 0d 01 16                                                                                                                                                                                                                                       ┆    ┆
0x1566…156e (14, 1, 8)   20 04 00 00 00 0e 00 04                                                                                                                                                                                                                           ┆        ┆
0x156e…15be (15, 0, 400) 00 0a 00 50 43 4c 45 41 32 30 00 0f 00 04 00 2a 00 50 20 47 45 54 41 42 58 20 44 45 42 49 4e 57 34 20 47 45 54 20 43 55 52 52 45 4e 54 20 54 41 42 20 49 4e 44 45 58 20 00 0f 00 12 00 2c 00 50 20 44 49 53 50 4c 41 59 20 31 2c 44 45 42 49 4e   ┆   PCLEA20     * P GETABX DEBINW4 GET CURRENT TAB INDEX      , P DISPLAY 1,DEBIN┆
0x15be…160e              57 34 2c 44 45 42 49 4e 57 34 20 44 49 53 50 4c 41 59 20 46 49 45 4c 44 00 0f 00 40 00 08 00 50 5c 52 45 54 00 0f 00 70 00 0a 00 50 5c 50 45 4e 44 20 00 0f 00 7c 00 0a 00 50 5c 45 4a 45 43 54 00 0f 00 8a 00 0a 00 50 44 45 53 54 41 54 00 0f   ┆W4,DEBINW4 DISPLAY FIELD   @   P RET   p   P PEND    |   P EJECT       PDESTAT  ┆
0x160e…165e              00 98 00 0a 00 50 44 45 43 48 4b 31 00 0f 00 a6 00 0a 00 50 44 45 43 48 4b 32 00 0f 00 b4 00 0a 00 50 44 45 43 48 4b 33 00 0f 00 c2 00 0a 00 50 44 45 43 48 4b 34 00 0f 00 d0 00 0a 00 50 44 45 43 48 4b 35 00 0f 00 de 00 0a 00 50 44 45 43 48   ┆     PDECHK1       PDECHK2       PDECHK3       PDECHK4       PDECHK5       PDECH┆
0x165e…16ae              4b 36 00 0f 00 ec 00 0a 00 50 44 45 43 48 4b 37 00 0f 00 fa 00 10 00 50 44 45 54 43 48 4b 5c 50 52 4f 43 20 00 0f 01 08 00 08 00 50 5c 52 45 54 00 0f 01 1c 00 0a 00 50 5c 50 45 4e 44 20 00 0f 01 28 00 0a 00 50 5c 45 4a 45 43 54 00 0f 01 36   ┆K6       PDECHK7       PDETCHK PROC        P RET       P PEND    (   P EJECT   6┆
0x16ae…16fe              00 06 00 50 2a 20 00 0f 01 44 00 0e 00 50 42 45 4c 4c 20 46 52 4d 54 20 00 0f 01 4e 00 08 00 50 20 46 53 4c 00 0f 01 60 00 12 00 50 20 46 49 4c 4c 52 20 58 27 30 37 27 2c 31 00 0f 01 6c 00 0a 00 50 20 46 4d 45 4e 44 00 0f 01 82 00 08 00 04   ┆   P*    D   PBELL FRMT    N   P FSL   `   P FILLR X'07',1   l   P FMEND        ┆
0x16fe…170e (16, 2, 16)  5c 45 4e 44 00 0f 01 90 40 04 00 00 00 10 00 0c                                                                                                                                                                                                   ┆ END    @       ┆
0x170e…1716 (17, 1, 8)   20 04 00 00 00 11 00 04                                                                                                                                                                                                                           ┆        ┆
0x1716…1766 (18, 0, 400) 00 01 01 8c 00 18 00 50 2a 20 20 20 20 20 20 20 20 53 54 41 52 54 50 4f 49 4e 54 20 00 02 00 08 00 06 00 50 2a 20 00 02 00 24 00 10 00 50 5c 53 54 41 52 54 5c 53 54 41 52 54 00 02 00 2e 00 0e 00 50 5c 53 54 41 43 4b 5c 32 30 30 00 02 00 42   ┆       P*        STARTPOINT        P*    $   P START START   .   P STACK 200   B┆
0x1766…17b6              00 0a 00 06 5c 45 4a 45 43 54 00 02 00 54 00 06 00 03 2a 20 00 02 00 62 00 06 00 03 2a 20 00 02 00 6c 00 0c 00 50 43 42 31 5c 42 4c 4b 20 00 02 00 76 00 06 00 50 2a 20 00 02 00 86 00 24 00 50 4c 52 55 51 55 45 5c 53 54 52 47 5c 31 36 5c 4c   ┆     EJECT   T    *    b    *    l   PCB1 BLK    v   P*      $ PLRUQUE STRG 16 L┆
0x17b6…1806              41 53 54 20 52 45 43 45 4e 54 20 55 53 45 44 20 00 02 00 90 00 24 00 50 42 50 4f 4f 4c 5c 53 54 52 47 49 5c 28 33 32 29 2c 31 38 38 5c 42 55 46 46 45 52 50 4f 4f 4c 20 00 02 00 b8 00 2a 00 50 52 50 4f 4f 4c 5c 53 54 52 47 49 5c 28 33 32 29   ┆AST RECENT USED      $ PBPOOL STRGI (32),188 BUFFERPOOL      * PRPOOL STRGI (32)┆
0x1806…1856              2c 31 39 5c 42 55 46 46 45 52 20 52 45 46 45 52 45 4e 43 45 53 20 00 02 00 e0 00 1a 00 50 5c 5c 5c 31 2d 31 20 55 53 41 47 45 2d 54 59 50 45 20 53 54 52 47 00 02 01 0e 00 10 00 50 5c 5c 5c 32 2d 37 20 4e 41 4d 45 20 00 02 01 2c 00 18 00 50   ┆,19 BUFFER REFERENCES        P   1-1 USAGE-TYPE STRG       P   2-7 NAME    ,   P┆
0x1856…18a6              5c 5c 5c 38 2d 38 20 4e 4f 2e 20 4f 46 20 55 53 45 52 53 20 00 02 01 40 00 1e 00 50 5c 5c 5c 39 2d 39 20 4c 49 4e 4b 20 54 4f 20 4e 45 58 54 20 42 55 46 46 45 52 00 02 01 5c 00 24 00 50 46 49 4c 49 4e 44 55 53 20 42 49 4e 5c 5c 49 4e 44 45   ┆   8-8 NO. OF USERS    @   P   9-9 LINK TO NEXT BUFFER     $ PFILINDUS BIN  INDE┆
0x18a6…18f6 (19, 0, 400) 58 20 46 4f 52 20 55 53 45 52 46 49 4c 45 00 02 01 7e 00 1c 00 17 52 45 54 43 4f 44 5c 42 49 4e 5c 5c 52 45 54 55 52 4e 2d 43 4f 44 45 20 00 03 00 16 00 26 00 50 52 45 43 4c 4e 54 48 5c 42 49 4e 5c 5c 43 55 52 52 45 4e 54 20 52 45 43 4f 52   ┆X FOR USERFILE   ~    RETCOD BIN  RETURN-CODE      & PRECLNTH BIN  CURRENT RECOR┆
0x18f6…1946              44 4c 45 4e 47 54 48 20 00 03 00 36 00 1a 00 50 50 4a 4f 42 43 55 52 5c 42 49 4e 5c 5c 50 4f 4f 4c 49 4e 44 45 58 00 03 00 60 00 22 00 50 4a 4f 42 4e 41 4d 45 5c 53 54 52 47 5c 36 5c 43 55 52 52 45 4e 54 20 4a 4f 42 4e 41 4d 45 00 03 00 7e   ┆DLENGTH    6   PPJOBCUR BIN  POOLINDEX   ` " PJOBNAME STRG 6 CURRENT JOBNAME   ~┆
0x1946…1996              00 26 00 50 46 4f 52 4d 41 54 5c 53 54 52 47 5c 36 5c 43 55 52 52 45 4e 54 20 46 4f 52 4d 41 54 2d 4e 41 4d 45 20 00 03 00 a4 00 0a 00 06 5c 45 4a 45 43 54 00 03 00 ce 00 06 00 03 2a 20 00 03 00 dc 00 1c 00 18 2a 20 20 20 20 20 20 20 20 43   ┆ & PFORMAT STRG 6 CURRENT FORMAT-NAME          EJECT        *         *        C┆
0x1996…19e6              4f 4d 4d 4f 4e 2d 42 4c 4f 43 4b 3a 20 32 00 03 00 e6 00 06 00 03 2a 20 00 03 01 06 00 1e 00 19 2a 20 20 20 20 20 20 20 20 55 53 41 47 45 3a 20 43 4f 4e 53 54 41 4e 54 53 20 00 03 01 10 00 06 00 03 2a 20 00 03 01 32 00 0c 00 50 43 42 32 5c   ┆OMMON-BLOCK: 2        *         *        USAGE: CONSTANTS         *    2   PCB2 ┆
0x19e6…1a36              42 4c 4b 20 00 03 01 3c 00 0e 00 50 50 4f 4f 4c 31 5c 42 4f 4f 4c 00 03 01 4c 00 26 00 50 53 57 49 54 57 54 5c 42 4f 4f 4c 5c 46 5c 53 59 53 42 55 46 20 41 54 54 41 43 48 45 44 20 59 2f 4e 20 00 03 01 5e 00 2a 00 50 53 57 49 54 53 59 5c 42   ┆BLK    <   PPOOL1 BOOL   L & PSWITWT BOOL F SYSBUF ATTACHED Y/N    ^ * PSWITSY B┆
0x1a36…1a86 (20, 0, 400) 4f 4f 4c 5c 46 5c 53 59 53 54 45 4d 46 49 4c 45 20 41 53 53 49 47 4e 45 44 20 59 2f 4e 20 00 03 01 88 00 24 00 50 53 57 49 54 55 53 5c 42 4f 4f 4c 5c 46 5c 55 53 45 52 46 49 4c 45 20 20 20 20 20 20 2d 22 2d 20 00 04 00 26 00 18 00 14 57 30   ┆OOL F SYSTEMFILE ASSIGNED Y/N      $ PSWITUS BOOL F USERFILE      -"-    &    W0┆
0x1a86…1ad6              5c 42 49 4e 5c 57 27 30 27 5c 43 4f 4e 53 54 41 4e 54 00 04 00 4e 00 18 00 14 57 31 5c 42 49 4e 5c 57 27 31 27 5c 43 4f 4e 53 54 41 4e 54 00 04 00 6a 00 18 00 14 57 32 5c 42 49 4e 5c 57 27 32 27 5c 43 4f 4e 53 54 41 4e 54 00 04 00 86 00 18   ┆ BIN W'0' CONSTANT   N    W1 BIN W'1' CONSTANT   j    W2 BIN W'2' CONSTANT      ┆
0x1ad6…1b26              00 14 57 33 5c 42 49 4e 5c 57 27 33 27 5c 43 4f 4e 53 54 41 4e 54 00 04 00 a2 00 18 00 14 57 34 5c 42 49 4e 5c 57 27 34 27 5c 43 4f 4e 53 54 41 4e 54 00 04 00 be 00 18 00 50 57 35 5c 42 49 4e 5c 57 27 35 27 5c 43 4f 4e 53 54 41 4e 54 00 04   ┆  W3 BIN W'3' CONSTANT        W4 BIN W'4' CONSTANT       PW5 BIN W'5' CONSTANT  ┆
0x1b26…1b76              00 da 00 18 00 50 57 36 5c 42 49 4e 5c 57 27 36 27 5c 43 4f 4e 53 54 41 4e 54 00 04 00 f6 00 18 00 50 57 37 5c 42 49 4e 5c 57 27 37 27 5c 43 4f 4e 53 54 41 4e 54 00 04 01 12 00 18 00 50 57 38 5c 42 49 4e 5c 57 27 38 27 5c 43 4f 4e 53 54 41   ┆     PW6 BIN W'6' CONSTANT       PW7 BIN W'7' CONSTANT       PW8 BIN W'8' CONSTA┆
0x1b76…1bc6              4e 54 00 04 01 2e 00 18 00 50 57 39 5c 42 49 4e 5c 57 27 39 27 5c 43 4f 4e 53 54 41 4e 54 00 04 01 4a 00 1a 00 16 57 31 30 5c 42 49 4e 5c 57 27 31 30 27 5c 43 4f 4e 53 54 41 4e 54 00 04 01 66 00 1a 00 50 57 31 31 5c 42 49 4e 5c 57 27 31 31   ┆NT   .   PW9 BIN W'9' CONSTANT   J    W10 BIN W'10' CONSTANT   f   PW11 BIN W'11┆

Reduced view