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

⟦7b48d47a5⟧

    Length: 7914 (0x1eea)
    Notes: pts_type(SC)
    Names: »DEATNY.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DE/DEATNY.SC« 
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
    └─⟦this⟧ »DEN10/DEATNY.SC« 
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
    └─⟦this⟧ »DEN10/DEATNY.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DE/DEATNY.SC« 

PTS(SC)

 IDENT DEATTF	REL 1.0 80-04-09/JAER 
* 
*        THIS ROUTINE ATTACHES ACTUAL FORMAT DEFINITION FORMAT
* 
	DDUM	DEDDIV
	PDIV 
	ENTRY	DEATTF 
	EJECT
DEATTF	PROC 
	TBT	BOOL6,ATT10	JUMP IF BALANCE FORMAT 
	ATTFMT	F21FD	ATTACH USER FORMAT DEF
	B	ATT99
ATT10 
	ATTFMT	F22FD	ATTACH BALANCE FORMAT DEF 
ATT99 
	RET
	PEND 
	EJECT
F21FD	FRMT
	FSL
	FTEXT	'21 USER ' 
	FCOPY	='FORMAT'
	FILLR	' ',1
	FCOPY	='DEFINITION'
	FBF	BOOL7,F21A	JUMP IF NEW-REG.
	FTAB	35
	FHIGH
	FCOPY	='CORRECTION'
	FLOW 
F21A
	FNL
	FLINK	F20COM 
	FNL
	FNL
	FCOPY	='FIELD' 
	FTEXT	=': F' 
	FINP	9 
	FMEL	'XXX',FDVBCD(W4)
	FNL
	FTAB	5 
	FCOPY	='FIELD' 
	FTEXT	'START:' 
	FINP	20
	FMEL	'ZZ',FDVBCD(W5) 
	FTAB	25
	FCOPY	='FIELD' 
	FCOPY	='LENGTH'
	FILLR	':',1
	FINP	40
	FMEL	'ZZ',FDVBCD(W6) 
	FTAB	46
	FTEXT	'OCCUPIED '
	FCOPY	='RECORD'
	FCOPY	='LENGTH'
	FILLR	':',1
	FINP	69
	FMEL	'TTTT',FDVBCD(W8) 
	FNL
	FNL
	FTAB	10
	FTEXT	'KEYED INPUT ' 
	FCOPY	='(Y/N/C):'
	FKI	32,APPL=108,ALPHA,MAXL=1,NEOI,CTAB 
	FCOPY	FDVSTR(W1) 
	FTAB	46
	FTEXT	'MINIMUM ' 
	FCOPY	='LENGTH'
	FILLR	':',1
	FKI	64,APPL=105,MAXL=2,REWRT,NEOI,CTAB 
	FMEL	'XX',FDVBCD(W7) 
	FNL
	FTAB	10
	FTEXT	'MUST ENTER  ' 
	FCOPY	='(Y/N/C):'
	FKI	32,APPL=114,MAXL=1,ALPHA,NEOI,CTAB 
	FCOPY	FDVSTR(W2) 
	FTAB	46
	FTEXT	'AUTO TAB (Y/N):'
	FKI	64,APPL=115,MAXL=1,ALPHA,NEOI,CTAB 
	FCOPY	FDVSTR(W3) 
	FNL
	FTAB	10
	FTEXT	'DUPLICATE ' 
	FTAB	29
	FILLR	':',1
	FKI	32,APPL=106,ALPHA,MAXL=6,MINL=1,NEOI,CTAB
	FCOPY	DUPL 
	FTAB	46
	FTEXT	'VERIFY' 
	FTAB	55
	FTEXT	'(Y/N):' 
	FKI	64,APPL=116,MAXL=1,ALPHA,NEOI,CTAB 
	FCOPY	FDVSTR(W4) 
	FNL
	FTAB	10
	FTEXT	'INITIAL CLEAR (Y/N):' 
	FKI	32,APPL=117,MAXL=1,ALPHA,NEOI,CTAB 
	FCOPY	FDVSTR(W5) 
	FNL
	FNL
	FTEXT	'SPECIAL HANDLING:'
	FKI	19,APPL=107,MAXL=5,REWRT,NEOI,CTAB 
	FMEL	'ZZVZZZ',SPEC 
	FNL
	FCOPY	='VALIDATION ' 
	FCOPY	='(#V:...)'
	FTAB	25
	FCOPY	='GENERATION ' 
	FCOPY	='(#G:...)'
	FTAB	50
	FCOPY	='ACCUMULATION ' 
	FCOPY	='(#A:...)'
	FNL
	FKI	1,APPL=111,MAXL=80,ALPHA,NEOI,CTAB 
	FCOPY	FORTAB(W1)	VAL-GEN-ACC-STRING1 
	FNL
	FKI	1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB 
	FCOPY	FORTAB(W2)	VAL-GEN-ACC-STRING2 
	FNL
	FKI	1,CTAB 
	FCOPY	HEX00
	FMEND
	EJECT
F22FD	FRMT
	FSL
	FTEXT	'22 BALANCE '
	FCOPY	='FORMAT'
	FILLR	' ',1
	FCOPY	='DEFINITION'
	FBF	BOOL7,F22A	JUMP IF NEW-REG.
	FTAB	35
	FHIGH
	FCOPY	='CORRECTION'
FLOW
F22A
	FNL
	FLINK	F20COM 
	FNL
	FNL
	FTAB	5 
	FTEXT	'STARTPOSITION:' 
	FINP	20
	FMEL	'ZZ',FDVBCD(W5) 
	FTAB	30
	FCOPY	='LENGTH'
	FILLR	':',1
	FINP	40
	FMEL	'ZZ',FDVBCD(W6) 
	FNL
	FNL
	FTAB	10
	FCOPY	='BATCH' 
	FTEXT	'-ACCUMULATOR: A'
	FKI	31,APPL=109,MAXL=2,REWRT,NEOI,CTAB 
	FMEL	'XX',FDVBCD(W8) 
	FNL
	FNL
	FTEXT	'SPECIAL HANDLING:'
	FKI	19,APPL=107,MAXL=5,REWRT,NEOI,CTAB 
	FMEL	'ZZVZZZ',SPEC 
	FNL
	FCOPY	='VALIDATION ' 
	FCOPY	='(#V:...)'
	FTAB	25
	FCOPY	='GENERATION ' 
	FCOPY	='(#G:...)'
	FNL
	FKI	1,APPL=111,MAXL=80,ALPHA,NEOI,CTAB 
	FCOPY	FORTAB(W1)	VAL-GEN-ACC-STRING1 
	FNL
	FKI	1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB 
	FCOPY	FORTAB(W2)	VAL-GEN-ACC-STRING2 
	FNL
	FKI	1,CTAB 
	FCOPY	HEX00
	FMEND
	EJECT
F20COM	FRMT 
	FCOPY	='FORMAT'
	FILLR	':',1
	FKI	9,APPL=101,MINL=1,MAXL=6,ALPHA,ME,NEOI,NCLR,CTAB 
	FCOPY	FORMAT 
	FTAB	16
	FCOPY	='PAGE'
	FTEXT	' SIZE:' 
	FKI	27,APPL=102,NEOI,MINL=1,MAXL=2,ME,NCLR,CTAB
	FMEL	'AA',FDVBCD(W1) 
	FTAB	30
	FCOPY	='LINE ' 
	FCOPY	='NUMBER'
	FILLR	':',1
	FINP	43
	FMEL	'Z9',FDVBCD(W2) 
	FTAB	46
	FCOPY	='NUMBER'
	FTEXT	' OF POOL-UNITS:'
	FINP	68
	FMEL	'XE+XX',FDVBCD(W3)
	FNL
	FTAB	10
	FILLR	'1',1
	FTAB	20
	FILLR	'2',1
	FTAB	30
	FILLR	'3',1
	FTAB	40
	FILLR	'4',1
	FTAB	50
	FILLR	'5',1
	FTAB	60
	FILLR	'6',1
	FTAB	70
	FILLR	'7',1
	FILLR	' ',1
	FILLR	X'80',1
	FNL
	FCOPY	='1234567890'
	FCOPY	='1234567890'
	FCOPY	='1234567890'
	FCOPY	='1234567890'
	FCOPY	='1234567890'
	FCOPY	='1234567890'
	FCOPY	='1234567890'
	FCOPY	='123456789 '
	FILLR	X'80',1
	FNL
	FINP	1 
	FCOPY	LDISP
	FNL
	FKI	1,APPL=110,ALPHA,MAXL=80,DUPL=LDISP,NEOI,CTAB
	FCOPY	LDES 
	FMEND
 END

HexDump

0x0000…002c (0, 0, 400)  Head {h00=0x0028, h01=0x0050, text=» IDENT DEATTF REL 1.0 80-04-09/JAER «, t00=0x0000, t01=0x0004}
0x002c…0036              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0030}
0x0036…007c              Head {h00=0x0042, h01=0x0050, text=»*        THIS ROUTINE ATTACHES ACTUAL FORMAT DEFINITION FORMAT«, t00=0x0000, t01=0x003a}
0x007c…0086              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0080}
0x0086…009a              Head {h00=0x0010, h01=0x0050, text=» DDUM DEDDIV«, t00=0x0000, t01=0x008a}
0x009a…00a8              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x009e}
0x00a8…00be              Head {h00=0x0012, h01=0x0050, text=» ENTRY DEATTF «, t00=0x0000, t01=0x00ac}
0x00be…00cc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x00c2}
0x00cc…00e0              Head {h00=0x0010, h01=0x0050, text=»DEATTF PROC «, t00=0x0000, t01=0x00d0}
0x00e0…0110              Head {h00=0x002c, h01=0x0050, text=» TBT BOOL6,ATT10 JUMP IF BALANCE FORMAT «, t00=0x0000, t01=0x00e4}
0x0110…013c              Head {h00=0x0028, h01=0x0050, text=» ATTFMT F21FD ATTACH USER FORMAT DEF«, t00=0x0000, t01=0x0114}
0x013c…014c              Head {h00=0x000c, h01=0x0050, text=» B ATT99«, t00=0x0000, t01=0x0140}
0x014c…015a              Head {h00=0x000a, h01=0x0050, text=»ATT10 «, t00=0x0000, t01=0x0150}
0x015a…018a              Head {h00=0x002c, h01=0x0050, text=» ATTFMT F22FD ATTACH BALANCE FORMAT DEF «, t00=0x0000, t01=0x015e}
0x018a…0198              Head {h00=0x000a, h01=0x0050, text=»ATT99 «, t00=0x0000, t01=0x018e}
0x0198…01a4              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0001, t01=0x000c}
0x01a4…01b2              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0001, t01=0x0018}
0x01b2…01c0              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0001, t01=0x0026}
0x01c0…01d2              Head {h00=0x000e, h01=0x000a, text=»F21FD FRMT«, t00=0x0001, t01=0x0034}
0x01d2…01de              Head {h00=0x0008, h01=0x0004, text=» FSL«, t00=0x0001, t01=0x0046}
0x01de…01f8              Head {h00=0x0016, h01=0x0011, text=» FTEXT '21 USER ' «, t00=0x0001, t01=0x0052}
0x01f8…0210              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='FORMAT'«, t00=0x0001, t01=0x006c}
0x0210…0224              Head {h00=0x0010, h01=0x000c, text=» FILLR ' ',1«, t00=0x0001, t01=0x0084}
0x0224…0240              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='DEFINITION'«, t00=0x0001, t01=0x0098}
0x0240…0268              Head {h00=0x0024, h01=0x0050, text=» FBF BOOL7,F21A JUMP IF NEW-REG.«, t00=0x0001, t01=0x00b4}
0x0268…0278              Head {h00=0x000c, h01=0x0050, text=» FTAB 35«, t00=0x0001, t01=0x00dc}
0x0278…0286              Head {h00=0x000a, h01=0x0050, text=» FHIGH«, t00=0x0001, t01=0x00ec}
0x0286…02a2              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='CORRECTION'«, t00=0x0001, t01=0x00fa}
0x02a2…02b0              Head {h00=0x000a, h01=0x0050, text=» FLOW «, t00=0x0001, t01=0x0116}
0x02b0…02bc              Head {h00=0x0008, h01=0x0050, text=»F21A«, t00=0x0001, t01=0x0124}
0x02bc…02c8              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0001, t01=0x0130}
0x02c8…02de              Head {h00=0x0012, h01=0x0050, text=» FLINK F20COM «, t00=0x0001, t01=0x013c}
0x02de…02ea              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0001, t01=0x0152}
0x02ea…02f6              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0001, t01=0x015e}
0x02f6…030e              Head {h00=0x0014, h01=0x000f, text=» FCOPY ='FIELD' «, t00=0x0001, t01=0x016a}
0x030e…0324              Head {h00=0x0012, h01=0x000d, text=» FTEXT =': F' «, t00=0x0001, t01=0x0182}
0x0324…0334              Head {h00=0x000c, h01=0x0007, text=» FINP 9 «, t00=0x0002, t01=0x0008}
0x0334…0352              Head {h00=0x001a, h01=0x0050, text=» FMEL 'XXX',FDVBCD(W4)«, t00=0x0002, t01=0x0018}
0x0352…035e              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0002, t01=0x0036}
0x035e…036e              Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x0002, t01=0x0042}
0x036e…0386              Head {h00=0x0014, h01=0x000f, text=» FCOPY ='FIELD' «, t00=0x0002, t01=0x0052}
0x0386…039e              Head {h00=0x0014, h01=0x000f, text=» FTEXT 'START:' «, t00=0x0002, t01=0x006a}
0x039e…03ae              Head {h00=0x000c, h01=0x0050, text=» FINP 20«, t00=0x0002, t01=0x0082}
0x03ae…03cc              Head {h00=0x001a, h01=0x0050, text=» FMEL 'ZZ',FDVBCD(W5) «, t00=0x0002, t01=0x0092}
0x03cc…03dc              Head {h00=0x000c, h01=0x0050, text=» FTAB 25«, t00=0x0002, t01=0x00b0}
0x03dc…03f4              Head {h00=0x0014, h01=0x000f, text=» FCOPY ='FIELD' «, t00=0x0002, t01=0x00c0}
0x03f4…040c              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='LENGTH'«, t00=0x0002, t01=0x00d8}
0x040c…0420              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x0002, t01=0x00f0}
0x0420…0430              Head {h00=0x000c, h01=0x0050, text=» FINP 40«, t00=0x0002, t01=0x0104}
0x0430…044e              Head {h00=0x001a, h01=0x0050, text=» FMEL 'ZZ',FDVBCD(W6) «, t00=0x0002, t01=0x0114}
0x044e…045e              Head {h00=0x000c, h01=0x0050, text=» FTAB 46«, t00=0x0002, t01=0x0132}
0x045e…0478              Head {h00=0x0016, h01=0x0050, text=» FTEXT 'OCCUPIED '«, t00=0x0002, t01=0x0142}
0x0478…0490              Head {h00=0x0014, h01=0x0050, text=» FCOPY ='RECORD'«, t00=0x0002, t01=0x015c}
0x0490…04a8              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='LENGTH'«, t00=0x0002, t01=0x0174}
0x04a8…04bc              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x0002, t01=0x018c}
0x04bc…04cc              Head {h00=0x000c, h01=0x0050, text=» FINP 69«, t00=0x0003, t01=0x0010}
0x04cc…04ec              Head {h00=0x001c, h01=0x0050, text=» FMEL 'TTTT',FDVBCD(W8) «, t00=0x0003, t01=0x0020}
0x04ec…04f8              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0003, t01=0x0040}
0x04f8…0504              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0003, t01=0x004c}
0x0504…0514              Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x0003, t01=0x0058}
0x0514…0532              Head {h00=0x001a, h01=0x0050, text=» FTEXT 'KEYED INPUT ' «, t00=0x0003, t01=0x0068}
0x0532…054c              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(Y/N/C):'«, t00=0x0003, t01=0x0086}
0x054c…057c              Head {h00=0x002c, h01=0x0050, text=» FKI 32,APPL=108,ALPHA,MAXL=1,NEOI,CTAB «, t00=0x0003, t01=0x00a0}
0x057c…0596              Head {h00=0x0016, h01=0x0050, text=» FCOPY FDVSTR(W1) «, t00=0x0003, t01=0x00d0}
0x0596…05a6              Head {h00=0x000c, h01=0x0050, text=» FTAB 46«, t00=0x0003, t01=0x00ea}
0x05a6…05c0              Head {h00=0x0016, h01=0x0050, text=» FTEXT 'MINIMUM ' «, t00=0x0003, t01=0x00fa}
0x05c0…05d8              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='LENGTH'«, t00=0x0003, t01=0x0114}
0x05d8…05ec              Head {h00=0x0010, h01=0x000c, text=» FILLR ':',1«, t00=0x0003, t01=0x012c}
0x05ec…061c              Head {h00=0x002c, h01=0x0050, text=» FKI 64,APPL=105,MAXL=2,REWRT,NEOI,CTAB «, t00=0x0003, t01=0x0140}
0x061c…063a              Head {h00=0x001a, h01=0x0050, text=» FMEL 'XX',FDVBCD(W7) «, t00=0x0003, t01=0x0170}
0x063a…0646              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0003, t01=0x018e}
0x0646…0656              Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x0004, t01=0x000a}
0x0656…0674              Head {h00=0x001a, h01=0x0050, text=» FTEXT 'MUST ENTER  ' «, t00=0x0004, t01=0x001a}
0x0674…068e              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(Y/N/C):'«, t00=0x0004, t01=0x0038}
0x068e…06be              Head {h00=0x002c, h01=0x0050, text=» FKI 32,APPL=114,MAXL=1,ALPHA,NEOI,CTAB «, t00=0x0004, t01=0x0052}
0x06be…06d8              Head {h00=0x0016, h01=0x0050, text=» FCOPY FDVSTR(W2) «, t00=0x0004, t01=0x0082}
0x06d8…06e8              Head {h00=0x000c, h01=0x0050, text=» FTAB 46«, t00=0x0004, t01=0x009c}
0x06e8…0708              Head {h00=0x001c, h01=0x0050, text=» FTEXT 'AUTO TAB (Y/N):'«, t00=0x0004, t01=0x00ac}
0x0708…0738              Head {h00=0x002c, h01=0x0050, text=» FKI 64,APPL=115,MAXL=1,ALPHA,NEOI,CTAB «, t00=0x0004, t01=0x00cc}
0x0738…0752              Head {h00=0x0016, h01=0x0050, text=» FCOPY FDVSTR(W3) «, t00=0x0004, t01=0x00fc}
0x0752…075e              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0004, t01=0x0116}
0x075e…076e              Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x0004, t01=0x0122}
0x076e…078a              Head {h00=0x0018, h01=0x0050, text=» FTEXT 'DUPLICATE ' «, t00=0x0004, t01=0x0132}
0x078a…079a              Head {h00=0x000c, h01=0x0050, text=» FTAB 29«, t00=0x0004, t01=0x014e}
0x079a…07ae              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x0004, t01=0x015e}
0x07ae…07e4              Head {h00=0x0032, h01=0x0050, text=» FKI 32,APPL=106,ALPHA,MAXL=6,MINL=1,NEOI,CTAB«, t00=0x0004, t01=0x0172}
0x07e4…07f8              Head {h00=0x0010, h01=0x000b, text=» FCOPY DUPL «, t00=0x0005, t01=0x0018}
0x07f8…0808              Head {h00=0x000c, h01=0x0050, text=» FTAB 46«, t00=0x0005, t01=0x002c}
0x0808…0820              Head {h00=0x0014, h01=0x0050, text=» FTEXT 'VERIFY' «, t00=0x0005, t01=0x003c}
0x0820…0830              Head {h00=0x000c, h01=0x0050, text=» FTAB 55«, t00=0x0005, t01=0x0054}
0x0830…0848              Head {h00=0x0014, h01=0x0050, text=» FTEXT '(Y/N):' «, t00=0x0005, t01=0x0064}
0x0848…0878              Head {h00=0x002c, h01=0x0050, text=» FKI 64,APPL=116,MAXL=1,ALPHA,NEOI,CTAB «, t00=0x0005, t01=0x007c}
0x0878…0892              Head {h00=0x0016, h01=0x0050, text=» FCOPY FDVSTR(W4) «, t00=0x0005, t01=0x00ac}
0x0892…089e              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0005, t01=0x00c6}
0x089e…08ae              Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x0005, t01=0x00d2}
0x08ae…08d4              Head {h00=0x0022, h01=0x0050, text=» FTEXT 'INITIAL CLEAR (Y/N):' «, t00=0x0005, t01=0x00e2}
0x08d4…0904              Head {h00=0x002c, h01=0x0050, text=» FKI 32,APPL=117,MAXL=1,ALPHA,NEOI,CTAB «, t00=0x0005, t01=0x0108}
0x0904…091e              Head {h00=0x0016, h01=0x0050, text=» FCOPY FDVSTR(W5) «, t00=0x0005, t01=0x0138}
0x091e…092a              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0005, t01=0x0152}
0x092a…0936              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0005, t01=0x015e}
0x0936…0958              Head {h00=0x001e, h01=0x001a, text=» FTEXT 'SPECIAL HANDLING:'«, t00=0x0005, t01=0x016a}
0x0958…0988              Head {h00=0x002c, h01=0x0050, text=» FKI 19,APPL=107,MAXL=5,REWRT,NEOI,CTAB «, t00=0x0005, t01=0x018c}
0x0988…09a4              Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZVZZZ',SPEC «, t00=0x0006, t01=0x002c}
0x09a4…09b0              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0006, t01=0x0048}
0x09b0…09ce              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='VALIDATION ' «, t00=0x0006, t01=0x0054}
0x09ce…09e8              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(#V:...)'«, t00=0x0006, t01=0x0072}
0x09e8…09f8              Head {h00=0x000c, h01=0x0050, text=» FTAB 25«, t00=0x0006, t01=0x008c}
0x09f8…0a16              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='GENERATION ' «, t00=0x0006, t01=0x009c}
0x0a16…0a30              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(#G:...)'«, t00=0x0006, t01=0x00ba}
0x0a30…0a40              Head {h00=0x000c, h01=0x0050, text=» FTAB 50«, t00=0x0006, t01=0x00d4}
0x0a40…0a60              Head {h00=0x001c, h01=0x0050, text=» FCOPY ='ACCUMULATION ' «, t00=0x0006, t01=0x00e4}
0x0a60…0a7a              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(#A:...)'«, t00=0x0006, t01=0x0104}
0x0a7a…0a86              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0006, t01=0x011e}
0x0a86…0ab6              Head {h00=0x002c, h01=0x0050, text=» FKI 1,APPL=111,MAXL=80,ALPHA,NEOI,CTAB «, t00=0x0006, t01=0x012a}
0x0ab6…0ae4              Head {h00=0x002a, h01=0x0050, text=» FCOPY FORTAB(W1) VAL-GEN-ACC-STRING1 «, t00=0x0006, t01=0x015a}
0x0ae4…0af0              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0006, t01=0x0188}
0x0af0…0b20 (7, 0, 398)  Head {h00=0x002c, h01=0x0050, text=» FKI 1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB «, t00=0x0007, t01=0x0004}
0x0b20…0b4e              Head {h00=0x002a, h01=0x0050, text=» FCOPY FORTAB(W2) VAL-GEN-ACC-STRING2 «, t00=0x0007, t01=0x0034}
0x0b4e…0b5a              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0007, t01=0x0062}
0x0b5a…0b6e              Head {h00=0x0010, h01=0x0050, text=» FKI 1,CTAB «, t00=0x0007, t01=0x006e}
0x0b6e…0b82              Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0007, t01=0x0082}
0x0b82…0b90              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x0007, t01=0x0096}
0x0b90…0b9e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00a4}
0x0b9e…0bb0              Head {h00=0x000e, h01=0x0050, text=»F22FD FRMT«, t00=0x0007, t01=0x00b2}
0x0bb0…0bbc              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0007, t01=0x00c4}
0x0bbc…0bd8              Head {h00=0x0018, h01=0x0050, text=» FTEXT '22 BALANCE '«, t00=0x0007, t01=0x00d0}
0x0bd8…0bf0              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='FORMAT'«, t00=0x0007, t01=0x00ec}
0x0bf0…0c04              Head {h00=0x0010, h01=0x000c, text=» FILLR ' ',1«, t00=0x0007, t01=0x0104}
0x0c04…0c20              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='DEFINITION'«, t00=0x0007, t01=0x0118}
0x0c20…0c48              Head {h00=0x0024, h01=0x0050, text=» FBF BOOL7,F22A JUMP IF NEW-REG.«, t00=0x0007, t01=0x0134}
0x0c48…0c58              Head {h00=0x000c, h01=0x0050, text=» FTAB 35«, t00=0x0007, t01=0x015c}
0x0c58…0c66              Head {h00=0x000a, h01=0x0050, text=» FHIGH«, t00=0x0007, t01=0x016c}
0x0c66…0c82              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='CORRECTION'«, t00=0x0007, t01=0x017a}
0x0c82…0c8e              Head {h00=0x0008, h01=0x0050, text=»FLOW«, t00=0x0008, t01=0x0008}
0x0c8e…0c9a              Head {h00=0x0008, h01=0x0050, text=»F22A«, t00=0x0008, t01=0x0014}
0x0c9a…0ca6              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0008, t01=0x0020}
0x0ca6…0cbc              Head {h00=0x0012, h01=0x0050, text=» FLINK F20COM «, t00=0x0008, t01=0x002c}
0x0cbc…0cc8              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0008, t01=0x0042}
0x0cc8…0cd4              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0008, t01=0x004e}
0x0cd4…0ce4              Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x0008, t01=0x005a}
0x0ce4…0d04              Head {h00=0x001c, h01=0x0050, text=» FTEXT 'STARTPOSITION:' «, t00=0x0008, t01=0x006a}
0x0d04…0d14              Head {h00=0x000c, h01=0x0050, text=» FINP 20«, t00=0x0008, t01=0x008a}
0x0d14…0d32              Head {h00=0x001a, h01=0x0050, text=» FMEL 'ZZ',FDVBCD(W5) «, t00=0x0008, t01=0x009a}
0x0d32…0d42              Head {h00=0x000c, h01=0x0008, text=» FTAB 30«, t00=0x0008, t01=0x00b8}
0x0d42…0d5a              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='LENGTH'«, t00=0x0008, t01=0x00c8}
0x0d5a…0d6e              Head {h00=0x0010, h01=0x0050, text=» FILLR ':',1«, t00=0x0008, t01=0x00e0}
0x0d6e…0d7e              Head {h00=0x000c, h01=0x0050, text=» FINP 40«, t00=0x0008, t01=0x00f4}
0x0d7e…0d9c              Head {h00=0x001a, h01=0x0050, text=» FMEL 'ZZ',FDVBCD(W6) «, t00=0x0008, t01=0x0104}
0x0d9c…0da8              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0008, t01=0x0122}
0x0da8…0db4              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0008, t01=0x012e}
0x0db4…0dc4              Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x0008, t01=0x013a}
0x0dc4…0ddc              Head {h00=0x0014, h01=0x0050, text=» FCOPY ='BATCH' «, t00=0x0008, t01=0x014a}
0x0ddc…0dfc              Head {h00=0x001c, h01=0x0050, text=» FTEXT '-ACCUMULATOR: A'«, t00=0x0008, t01=0x0162}
0x0dfc…0e2c              Head {h00=0x002c, h01=0x0050, text=» FKI 31,APPL=109,MAXL=2,REWRT,NEOI,CTAB «, t00=0x0008, t01=0x0182}
0x0e2c…0e4a              Head {h00=0x001a, h01=0x0050, text=» FMEL 'XX',FDVBCD(W8) «, t00=0x0009, t01=0x0022}
0x0e4a…0e56              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0009, t01=0x0040}
0x0e56…0e62              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0009, t01=0x004c}
0x0e62…0e84              Head {h00=0x001e, h01=0x001a, text=» FTEXT 'SPECIAL HANDLING:'«, t00=0x0009, t01=0x0058}
0x0e84…0eb4              Head {h00=0x002c, h01=0x0050, text=» FKI 19,APPL=107,MAXL=5,REWRT,NEOI,CTAB «, t00=0x0009, t01=0x007a}
0x0eb4…0ed0              Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZVZZZ',SPEC «, t00=0x0009, t01=0x00aa}
0x0ed0…0edc              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x0009, t01=0x00c6}
0x0edc…0efa              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='VALIDATION ' «, t00=0x0009, t01=0x00d2}
0x0efa…0f14              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(#V:...)'«, t00=0x0009, t01=0x00f0}
0x0f14…0f24              Head {h00=0x000c, h01=0x0050, text=» FTAB 25«, t00=0x0009, t01=0x010a}
0x0f24…0f42              Head {h00=0x001a, h01=0x0050, text=» FCOPY ='GENERATION ' «, t00=0x0009, t01=0x011a}
0x0f42…0f5c              Head {h00=0x0016, h01=0x0050, text=» FCOPY ='(#G:...)'«, t00=0x0009, t01=0x0138}
0x0f5c…0f68              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0009, t01=0x0152}
0x0f68…0f98              Head {h00=0x002c, h01=0x0050, text=» FKI 1,APPL=111,MAXL=80,ALPHA,NEOI,CTAB «, t00=0x0009, t01=0x015e}
0x0f98…0fc6              Head {h00=0x002a, h01=0x0050, text=» FCOPY FORTAB(W1) VAL-GEN-ACC-STRING1 «, t00=0x0009, t01=0x018e}
0x0fc6…0fd2              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000a, t01=0x002c}
0x0fd2…1002              Head {h00=0x002c, h01=0x0050, text=» FKI 1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB «, t00=0x000a, t01=0x0038}
0x1002…1030              Head {h00=0x002a, h01=0x0050, text=» FCOPY FORTAB(W2) VAL-GEN-ACC-STRING2 «, t00=0x000a, t01=0x0068}
0x1030…103c              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x000a, t01=0x0096}
0x103c…1050              Head {h00=0x0010, h01=0x0050, text=» FKI 1,CTAB «, t00=0x000a, t01=0x00a2}
0x1050…1064              Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x000a, t01=0x00b6}
0x1064…1072              Head {h00=0x000a, h01=0x0006, text=» FMEND«, t00=0x000a, t01=0x00ca}
0x1072…1080              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00d8}
0x1080…1094              Head {h00=0x0010, h01=0x0050, text=»F20COM FRMT «, t00=0x000a, t01=0x00e6}
0x1094…10ac              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='FORMAT'«, t00=0x000a, t01=0x00fa}
0x10ac…10c0              Head {h00=0x0010, h01=0x000c, text=» FILLR ':',1«, t00=0x000a, t01=0x0112}
0x10c0…10fe              Head {h00=0x003a, h01=0x0050, text=» FKI 9,APPL=101,MINL=1,MAXL=6,ALPHA,ME,NEOI,NCLR,CTAB «, t00=0x000a, t01=0x0126}
0x10fe…1114              Head {h00=0x0012, h01=0x000d, text=» FCOPY FORMAT «, t00=0x000a, t01=0x0164}
0x1114…1124              Head {h00=0x000c, h01=0x0008, text=» FTAB 16«, t00=0x000a, t01=0x017a}
0x1124…113a              Head {h00=0x0012, h01=0x000e, text=» FCOPY ='PAGE'«, t00=0x000a, t01=0x018a}
0x113a…1152              Head {h00=0x0014, h01=0x000f, text=» FTEXT ' SIZE:' «, t00=0x000b, t01=0x0010}
0x1152…118a              Head {h00=0x0034, h01=0x0050, text=» FKI 27,APPL=102,NEOI,MINL=1,MAXL=2,ME,NCLR,CTAB«, t00=0x000b, t01=0x0028}
0x118a…11a8              Head {h00=0x001a, h01=0x0050, text=» FMEL 'AA',FDVBCD(W1) «, t00=0x000b, t01=0x0060}
0x11a8…11b8              Head {h00=0x000c, h01=0x0008, text=» FTAB 30«, t00=0x000b, t01=0x007e}
0x11b8…11d0              Head {h00=0x0014, h01=0x0050, text=» FCOPY ='LINE ' «, t00=0x000b, t01=0x008e}
0x11d0…11e8              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='NUMBER'«, t00=0x000b, t01=0x00a6}
0x11e8…11fc              Head {h00=0x0010, h01=0x000c, text=» FILLR ':',1«, t00=0x000b, t01=0x00be}
0x11fc…120c              Head {h00=0x000c, h01=0x0008, text=» FINP 43«, t00=0x000b, t01=0x00d2}
0x120c…122a              Head {h00=0x001a, h01=0x0050, text=» FMEL 'Z9',FDVBCD(W2) «, t00=0x000b, t01=0x00e2}
0x122a…123a              Head {h00=0x000c, h01=0x0008, text=» FTAB 46«, t00=0x000b, t01=0x0100}
0x123a…1252              Head {h00=0x0014, h01=0x0010, text=» FCOPY ='NUMBER'«, t00=0x000b, t01=0x0110}
0x1252…1272              Head {h00=0x001c, h01=0x0050, text=» FTEXT ' OF POOL-UNITS:'«, t00=0x000b, t01=0x0128}
0x1272…1282              Head {h00=0x000c, h01=0x0050, text=» FINP 68«, t00=0x000b, t01=0x0148}
0x1282…12a2              Head {h00=0x001c, h01=0x0050, text=» FMEL 'XE+XX',FDVBCD(W3)«, t00=0x000b, t01=0x0158}
0x12a2…12ae              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x000b, t01=0x0178}
0x12ae…12be              Head {h00=0x000c, h01=0x0008, text=» FTAB 10«, t00=0x000b, t01=0x0184}
0x12be…12d2 (12, 0, 398) Head {h00=0x0010, h01=0x000c, text=» FILLR '1',1«, t00=0x000c, t01=0x0004}
0x12d2…12e2              Head {h00=0x000c, h01=0x0008, text=» FTAB 20«, t00=0x000c, t01=0x0018}
0x12e2…12f6              Head {h00=0x0010, h01=0x000c, text=» FILLR '2',1«, t00=0x000c, t01=0x0028}
0x12f6…1306              Head {h00=0x000c, h01=0x0008, text=» FTAB 30«, t00=0x000c, t01=0x003c}
0x1306…131a              Head {h00=0x0010, h01=0x000c, text=» FILLR '3',1«, t00=0x000c, t01=0x004c}
0x131a…132a              Head {h00=0x000c, h01=0x0008, text=» FTAB 40«, t00=0x000c, t01=0x0060}
0x132a…133e              Head {h00=0x0010, h01=0x000c, text=» FILLR '4',1«, t00=0x000c, t01=0x0070}
0x133e…134e              Head {h00=0x000c, h01=0x0008, text=» FTAB 50«, t00=0x000c, t01=0x0084}
0x134e…1362              Head {h00=0x0010, h01=0x000c, text=» FILLR '5',1«, t00=0x000c, t01=0x0094}
0x1362…1372              Head {h00=0x000c, h01=0x0008, text=» FTAB 60«, t00=0x000c, t01=0x00a8}
0x1372…1386              Head {h00=0x0010, h01=0x000c, text=» FILLR '6',1«, t00=0x000c, t01=0x00b8}
0x1386…1396              Head {h00=0x000c, h01=0x0008, text=» FTAB 70«, t00=0x000c, t01=0x00cc}
0x1396…13aa              Head {h00=0x0010, h01=0x000c, text=» FILLR '7',1«, t00=0x000c, t01=0x00dc}
0x13aa…13be              Head {h00=0x0010, h01=0x0050, text=» FILLR ' ',1«, t00=0x000c, t01=0x00f0}
0x13be…13d4              Head {h00=0x0012, h01=0x0050, text=» FILLR X'80',1«, t00=0x000c, t01=0x0104}
0x13d4…13e0              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x000c, t01=0x011a}
0x13e0…13fc              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000c, t01=0x0126}
0x13fc…1418              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000c, t01=0x0142}
0x1418…1434              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000c, t01=0x015e}
0x1434…1450              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000c, t01=0x017a}
0x1450…146c              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000d, t01=0x0008}
0x146c…1488              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000d, t01=0x0024}
0x1488…14a4              Head {h00=0x0018, h01=0x0014, text=» FCOPY ='1234567890'«, t00=0x000d, t01=0x0040}
0x14a4…14c0              Head {h00=0x0018, h01=0x0050, text=» FCOPY ='123456789 '«, t00=0x000d, t01=0x005c}
0x14c0…14d6              Head {h00=0x0012, h01=0x0050, text=» FILLR X'80',1«, t00=0x000d, t01=0x0078}
0x14d6…14e2              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x000d, t01=0x008e}
0x14e2…14f2              Head {h00=0x000c, h01=0x0050, text=» FINP 1 «, t00=0x000d, t01=0x009a}
0x14f2…1506              Head {h00=0x0010, h01=0x000c, text=» FCOPY LDISP«, t00=0x000d, t01=0x00aa}
0x1506…1512              Head {h00=0x0008, h01=0x0004, text=» FNL«, t00=0x000d, t01=0x00be}
0x1512…154c              Head {h00=0x0036, h01=0x0050, text=» FKI 1,APPL=110,ALPHA,MAXL=80,DUPL=LDISP,NEOI,CTAB«, t00=0x000d, t01=0x00ca}
0x154c…1560              Head {h00=0x0010, h01=0x000b, text=» FCOPY LDES «, t00=0x000d, t01=0x0104}
0x1560…156e              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000d, t01=0x0118}
0x156e…157a              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x000d, t01=0x0126}
0x157a…157e              Head {h00=0x4004, h01=0x0000}
0x157e…1582              00 0d 01 32                                                                                                                                                                                                                                       ┆   2┆
0x1582…158a (14, 1, 8)   20 04 00 00 00 0e 00 04                                                                                                                                                                                                                           ┆        ┆
0x158a…15da (15, 0, 400) 00 06 00 50 2a 20 00 0f 00 04 00 0e 00 50 20 42 20 44 45 44 33 35 30 20 00 0f 00 0e 00 0a 00 50 44 45 44 33 33 30 00 0f 00 20 00 1e 00 50 20 43 41 4c 4c 20 43 4d 50 49 4e 44 2c 42 49 4e 38 2c 55 53 45 56 28 57 31 29 00 0f 00 2e 00 1e 00 50   ┆   P*        P B DED350        PDED330       P CALL CMPIND,BIN8,USEV(W1)   .   P┆
0x15da…162a              20 42 4e 4f 4b 20 44 45 44 35 30 30 20 4f 55 54 20 4f 46 20 52 41 4e 47 45 20 00 0f 00 50 00 1e 00 50 20 45 44 53 55 42 20 44 45 49 4e 50 55 54 2c 42 49 4e 37 2c 46 4f 52 4d 55 20 00 0f 00 72 00 0a 00 50 44 45 44 33 35 30 00 0f 00 94 00 16   ┆ BNOK DED500 OUT OF RANGE    P   P EDSUB DEINPUT,BIN7,FORMU    r   PDED350      ┆
0x162a…167a              00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 42 49 4e 37 00 0f 00 a2 00 0e 00 50 20 42 20 44 45 44 34 37 30 20 00 0f 00 bc 00 0a 00 50 44 45 44 33 39 30 00 0f 00 ce 00 12 00 50 20 4d 4f 56 45 20 42 49 4e 31 30 2c 57 30 00 0f 00 dc 00 0a   ┆ P MOVE DEBINW1,BIN7       P B DED470        PDED390       P MOVE BIN10,W0      ┆
0x167a…16ca              00 50 44 45 44 34 30 30 00 0f 00 f2 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 57 30 00 0f 01 00 00 16 00 50 20 4d 4f 56 45 20 42 49 4e 37 2c 3d 57 27 38 30 27 20 00 0f 01 18 00 2c 00 50 20 4d 41 54 43 48 20 44 45 49 4e 50 55 54   ┆ PDED400       P MOVE DEBINW1,W0       P MOVE BIN7,=W'80'      , P MATCH DEINPUT┆
0x16ca…171a              2c 44 45 42 49 4e 57 31 2c 42 49 4e 37 2c 48 45 58 30 30 2c 57 30 2c 57 31 20 00 0f 01 32 00 0a 00 50 44 45 44 34 35 30 00 0f 01 62 00 16 00 50 20 53 55 42 20 44 45 42 49 4e 57 31 2c 42 49 4e 31 30 00 0f 01 70 00 22 00 50 20 42 4e 4e 20 44   ┆,DEBINW1,BIN7,HEX00,W0,W1    2   PDED450   b   P SUB DEBINW1,BIN10   p " P BNN D┆
0x171a…176a (16, 0, 400) 45 44 34 37 30 20 4a 55 4d 50 20 49 46 20 4e 4f 54 20 4d 49 4e 55 53 20 00 0f 01 8a 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 57 30 00 10 00 20 00 0a 00 50 44 45 44 34 37 30 00 10 00 38 00 1c 00 50 20 43 4d 50 20 57 31 2c 57 31   ┆ED470 JUMP IF NOT MINUS        P MOVE DEBINW1,W0       PDED470   8   P CMP W1,W1┆
0x176a…17ba              20 45 44 49 54 49 4e 47 20 4f 4b 45 59 20 00 10 00 46 00 08 00 50 20 52 45 54 00 10 00 66 00 0a 00 50 44 45 44 35 30 30 00 10 00 72 00 1e 00 50 20 43 4d 50 20 57 31 2c 57 32 20 45 44 49 54 49 4e 47 20 46 41 49 4c 45 44 20 00 10 00 80 00 08   ┆ EDITING OKEY    F   P RET   f   PDED500   r   P CMP W1,W2 EDITING FAILED       ┆
0x17ba…180a              00 50 20 52 45 54 00 10 00 a2 00 0a 00 50 20 50 45 4e 44 20 00 10 00 ae 00 0a 00 50 20 45 4a 45 43 54 00 10 00 bc 00 2a 00 50 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 20   ┆ P RET       P PEND        P EJECT     * P************************************* ┆
0x180a…185a              00 10 00 ca 00 2a 00 50 2a 20 44 49 53 50 4c 41 59 20 41 4e 44 20 52 45 41 44 20 4f 46 20 46 55 4e 43 54 49 4f 4e 2d 4b 45 59 53 20 2a 20 00 10 00 f8 00 2a 00 50 2a 20 45 4e 54 45 52 45 44 20 4f 4e 20 54 48 45 20 4c 41 53 54 20 4c 49 4e 45   ┆     * P* DISPLAY AND READ OF FUNCTION-KEYS *      * P* ENTERED ON THE LAST LINE┆
0x185a…18aa              2e 20 20 20 20 20 20 20 20 20 2a 20 00 10 01 26 00 2a 00 50 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 20 00 10 01 54 00 1a 00 50 44 45 4c 41 53 54 5c 50 52 4f 43 5c 46 43   ┆.         *    & * P*************************************    T   PDELAST PROC FC┆
0x18aa…18fa (17, 0, 400) 2c 4b 45 59 54 41 42 20 00 10 01 82 00 12 00 50 5c 50 4b 54 41 42 5c 4b 45 59 54 41 42 20 00 11 00 10 00 12 00 50 20 4d 4f 56 45 20 42 49 4e 31 35 2c 46 43 00 11 00 26 00 1c 00 50 4c 41 53 54 44 30 20 4d 4f 56 45 20 44 45 42 49 4e 57 34 2c   ┆,KEYTAB        P PKTAB KEYTAB        P MOVE BIN15,FC   &   PLASTD0 MOVE DEBINW4,┆
0x18fa…194a              57 32 34 20 00 11 00 3c 00 1c 00 50 20 45 52 41 53 45 20 30 2c 44 45 42 49 4e 57 34 2c 44 45 42 49 4e 57 34 00 11 00 5c 00 1e 00 50 20 45 44 57 52 54 20 44 45 44 53 53 43 52 4e 2c 46 4c 41 53 54 28 46 43 29 20 00 11 00 7c 00 0a 00 50 4c 41   ┆W24    <   P ERASE 0,DEBINW4,DEBINW4       P EDWRT DEDSSCRN,FLAST(FC)    |   PLA┆
0x194a…199a              53 54 30 35 00 11 00 9e 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 57 30 00 11 00 ac 00 0a 00 50 4c 41 53 54 44 31 00 11 00 c4 00 20 00 50 20 49 42 20 46 43 20 4a 55 4d 50 20 4f 4e 20 46 55 4e 43 54 49 4f 4e 4b 45 59 5c 43 00 11   ┆ST05       P MOVE DEBINW1,W0       PLASTD1       P IB FC JUMP ON FUNCTIONKEY C  ┆
0x199a…19ea              00 d2 00 18 00 50 5c 5c 4c 50 52 4f 47 5c 46 50 52 4f 47 20 3d 20 31 5c 43 20 00 11 00 f6 00 16 00 50 5c 5c 4c 44 45 4c 5c 46 44 45 4c 31 20 3d 20 32 5c 43 00 11 01 12 00 16 00 50 5c 5c 4c 44 45 4c 5c 46 44 45 4c 32 20 3d 20 33 5c 43 00 11   ┆     P  LPROG FPROG = 1 C        P  LDEL FDEL1 = 2 C       P  LDEL FDEL2 = 3 C  ┆
0x19ea…1a3a              01 2c 00 16 00 50 5c 5c 4c 49 4e 53 5c 46 4c 49 4e 31 20 3d 20 34 5c 43 00 11 01 46 00 16 00 50 5c 5c 4c 56 41 4c 5c 46 4c 56 41 4c 20 3d 20 35 5c 43 00 11 01 60 00 16 00 50 5c 5c 4c 49 4e 53 5c 46 4c 49 4e 53 20 3d 20 36 5c 43 00 11 01 7a   ┆ ,   P  LINS FLIN1 = 4 C   F   P  LVAL FLVAL = 5 C   `   P  LINS FLINS = 6 C   z┆
0x1a3a…1a8a (18, 0, 400) 00 1a 00 50 5c 5c 4c 41 53 52 45 54 32 5c 46 52 45 43 4f 56 20 3d 20 37 5c 43 00 12 00 04 00 1a 00 50 5c 5c 4c 41 53 52 45 54 33 5c 46 43 4f 52 52 20 3d 20 38 5c 43 20 00 12 00 22 00 18 00 50 5c 5c 4c 41 53 56 45 52 5c 46 56 45 52 20 3d 20   ┆   P  LASRET2 FRECOV = 7 C       P  LASRET3 FCORR = 8 C    "   P  LASVER FVER = ┆
0x1a8a…1ada              39 5c 43 20 00 12 00 40 00 1a 00 50 5c 5c 4c 41 53 52 45 54 32 5c 46 52 45 43 30 32 20 3d 31 30 5c 43 00 12 00 5c 00 18 00 50 5c 5c 4c 49 4e 53 5c 46 46 4f 52 43 45 20 3d 20 31 31 5c 43 00 12 00 7a 00 18 00 50 5c 5c 4c 49 4e 53 5c 46 43 4f   ┆9 C    @   P  LASRET2 FREC02 =10 C       P  LINS FFORCE = 11 C   z   P  LINS FCO┆
0x1ada…1b2a              4e 56 4e 4f 20 3d 31 32 5c 43 00 12 00 96 00 18 00 50 5c 5c 4c 49 4e 53 5c 46 43 4f 4e 56 31 20 3d 31 33 5c 43 20 00 12 00 b2 00 18 00 50 5c 5c 4c 41 53 52 45 54 32 5c 46 41 53 44 20 3d 31 34 5c 43 00 12 00 ce 00 18 00 50 5c 5c 4c 52 46 42   ┆NVNO =12 C       P  LINS FCONV1 =13 C        P  LASRET2 FASD =14 C       P  LRFB┆
0x1b2a…1b7a              57 44 20 46 52 46 42 57 44 20 3d 31 35 20 00 12 00 ea 00 0c 00 50 20 42 20 4c 49 4e 53 20 00 12 01 06 00 0a 00 50 4c 50 52 4f 47 20 00 12 01 16 00 32 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 53 59 4d 52 45 43 28 57 31 32 29 20 47 45   ┆WD FRFBWD =15        P B LINS        PLPROG      2 P MOVE DEBINW1,SYMREC(W12) GE┆
0x1b7a…1bca              54 20 4d 41 58 20 53 59 4d 42 2e 4c 45 4e 47 54 48 20 00 12 01 24 00 1a 00 50 20 43 42 47 20 44 45 42 49 4e 57 31 2c 57 30 2c 4c 50 52 4f 47 32 00 12 01 5a 00 24 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 32 2c 57 32 20 53 49 4d 55 4c 41 54   ┆T MAX SYMB.LENGTH    $   P CBG DEBINW1,W0,LPROG2   Z $ P MOVE DEBINW2,W2 SIMULAT┆
0x1bca…1c1a (19, 0, 400) 45 20 43 41 4e 43 45 4c 00 12 01 78 00 1c 00 50 20 45 52 41 53 45 20 30 2c 44 45 42 49 4e 57 34 2c 44 45 42 49 4e 57 34 00 13 00 10 00 0e 00 50 20 42 20 4c 41 53 56 45 52 20 00 13 00 30 00 0a 00 50 4c 50 52 4f 47 32 00 13 00 42 00 30 00 50   ┆E CANCEL   x   P ERASE 0,DEBINW4,DEBINW4       P B LASVER    0   PLPROG2   B 0 P┆
0x1c1a…1c6a              5c 4b 49 5c 44 45 44 53 44 59 4b 42 2c 44 45 49 4e 50 55 54 2c 4b 45 59 54 41 42 2c 44 45 42 49 4e 57 31 2c 44 45 42 49 4e 57 32 20 00 13 00 50 00 0e 00 50 20 42 20 4c 41 53 54 35 30 20 00 13 00 84 00 08 00 50 4c 56 41 4c 00 13 00 96 00 14   ┆ KI DEDSDYKB,DEINPUT,KEYTAB,DEBINW1,DEBINW2    P   P B LAST50        PLVAL      ┆
0x1c6a…1cba              00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 57 32 00 13 00 a2 00 0e 00 50 20 42 20 4c 50 52 4f 47 32 20 00 13 00 ba 00 0a 00 50 4c 52 46 42 57 44 00 13 00 cc 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 57 37 00 13 00 da 00 0e   ┆ P MOVE DEBINW1,W2       P B LPROG2        PLRFBWD       P MOVE DEBINW1,W7      ┆
0x1cba…1d0a              00 50 20 42 20 4c 50 52 4f 47 32 20 00 13 00 f2 00 08 00 50 4c 44 45 4c 00 13 01 04 00 08 00 50 4c 49 4e 53 00 13 01 10 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 31 2c 57 31 00 13 01 1c 00 0a 00 50 4c 41 53 54 44 32 00 13 01 34 00 34   ┆ P B LPROG2        PLDEL       PLINS       P MOVE DEBINW1,W1       PLASTD2   4 4┆
0x1d0a…1d5a              00 50 5c 4b 49 5c 2e 4e 45 2c 44 45 44 53 44 59 4b 42 2c 44 45 49 4e 50 55 54 2c 4b 45 59 54 41 42 2c 44 45 42 49 4e 57 31 2c 44 45 42 49 4e 57 32 20 00 13 01 42 00 0a 00 50 4c 41 53 54 35 30 00 13 01 7a 00 1c 00 50 5c 50 45 52 46 5c 44 45   ┆ P KI .NE,DEDSDYKB,DEINPUT,KEYTAB,DEBINW1,DEBINW2    B   PLAST50   z   P PERF DE┆
0x1d5a…1daa (20, 0, 400) 4c 4f 43 4b 2c 57 31 2c 44 45 42 49 4e 57 32 20 00 13 01 88 00 24 00 50 5c 49 42 5c 44 45 42 49 4e 57 33 2c 50 4f 57 4f 46 46 2c 4c 41 53 54 45 52 2c 4c 41 53 54 44 30 00 14 00 18 00 0e 00 50 5c 42 5c 4c 41 53 54 44 33 20 00 14 00 40 00 06   ┆LOCK,W1,DEBINW2      $ P IB DEBINW3,POWOFF,LASTER,LASTD0       P B LASTD3    @  ┆
0x1daa…1dfa              00 50 2a 20 00 14 00 52 00 30 00 50 2a 20 4e 4f 4b 2e 20 4e 4f 54 49 43 45 20 54 48 41 54 20 49 4e 43 4f 52 52 45 43 54 20 4c 45 4e 47 54 48 20 49 53 20 4f 4b 45 59 20 00 14 00 5c 00 06 00 50 2a 20 00 14 00 90 00 0a 00 50 4c 41 53 54 45 52   ┆ P*    R 0 P* NOK. NOTICE THAT INCORRECT LENGTH IS OKEY        P*        PLASTER┆
0x1dfa…1e4a              00 14 00 9a 00 1c 00 50 20 58 53 54 41 54 20 44 45 44 53 44 59 4b 42 2c 44 45 42 49 4e 57 33 20 00 14 00 a8 00 1a 00 50 20 43 41 4c 4c 20 4d 41 53 4b 2c 44 45 42 49 4e 57 33 2c 57 38 20 00 14 00 c8 00 0e 00 50 20 42 5a 20 4c 41 53 42 45 4c   ┆       P XSTAT DEDSDYKB,DEBINW3        P CALL MASK,DEBINW3,W8        P BZ LASBEL┆
0x1e4a…1e9a              00 14 00 e6 00 22 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 32 2c 57 36 20 53 49 4d 55 4c 41 54 45 20 45 4f 49 20 00 14 00 f8 00 0e 00 50 20 42 20 50 52 4f 45 4e 32 20 00 14 01 1e 00 0a 00 50 4c 41 53 54 44 33 00 14 01 30 00 30 00 50 20 49   ┆     " P MOVE DEBINW2,W6 SIMULATE EOI        P B PROEN2        PLASTD3   0 0 P I┆
0x1e9a…1eea              42 20 46 43 2c 4c 41 53 52 45 54 2c 4c 41 53 52 45 54 2c 4c 41 53 54 30 36 2c 4c 41 53 52 45 54 2c 4c 41 53 52 45 54 5c 5c 43 00 14 01 3e 00 28 00 50 5c 5c 4c 41 53 54 30 36 2c 44 55 4d 4d 59 2c 44 55 4d 4d 59 2c 44 55 4d 4d 59 2c 44 55 4d   ┆B FC,LASRET,LASRET,LAST06,LASRET,LASRET  C   > ( P  LAST06,DUMMY,DUMMY,DUMMY,DUM┆

Reduced view