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

⟦235b91949⟧

    Length: 4492 (0x118c)
    Notes: pts_type(SC)
    Names: »WUDLF.SC«

Derivation

└─⟦f45ea3bc3⟧ Bits:30009713 Philips computer tape "WSM"
    └─⟦this⟧ »WSM:UTIL/WUDLF.SC« 

PTS(SC)

	IDENT	WUDLF	REL=2.3,841001,870155940230
**************************************
*  WORK STATION MANAGEMENT           *
*  UTILITY PROGRAMS                  *
*  3  DELETE FILE                    *
*                                    *
**************************************


**  HISTORY:

** 84-07-12 /MAER    RETURN TO MAIN MENU ONLY BY USING "RETURN"-KEY.
** 83-05-11 /MAER    CHANGED DECORATIONS. 
** 82-10-19 /MAER    WAIT-FORMAT DISPLAYED
** 82-07-26 /DALI    VOLUME-NAME IS CHANGED BEFORE DELETE 
** 82-02-04 /DALI    NEW ERROR MESSAGE "FILENAME UNKNOWN" ADDED 
** 81-11-11 /DALI    CREATION 


	DDUM	WUDIV 
	PDIV 
	ENTRY	WUDLF
* 
	EXPROC	DECLRA	CRE= SCREEN ROUTINE
	EXPROC	DISERR	CRE= ERROR ROUTINE 
	EXPROC	DSKERR,PBIN	CRE= ERROR ROUTINE
	EXPROC	CHVNAM,PSTRG,PBIN	CRE= CHANGE VOLUMENAME
			PARAM: NEW NAME, F.C.

	EXPROC	HALT
	EXPROC	CONT	CRE= DISPLAY WAIT-TEXT 
* 
	EXT	DELFIL	ASS= DELETE FILE
	EXT	OPENF	ASS= OPEN FILE 
	EXT	CLOSEF	ASS= CLOSE FILE 
	EJECT
WUDLF	PROC
******************* 
*  3  DELETE FILE * 
******************* 
DLF000
	ATTFMT	FDEL
	SET	DEPROMPT 
DLF200
	PERF	DECLRA
DLF250
	IB	DEBINW2,DLF200,RETUR,DLF300 
	PERF	DSKERR,W0	'BELL'
	B	DLF250 
DLF300
	PERF	CHVNAM,VOLEX1,FCOD	CHANGE NAME TO TEMP. (111...1) 
	BNOK	DLF345
	CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD 
	BOK	DLF350 
	CBNE	RETCOD,W1,DLF330
DLF320
	PERF	DSKERR,W18	DISC NOT OPERABLE
	B	DLF340 
DLF330
	PERF	DSKERR,W12	FILENAME UNKNOWN 
DLF340
	PERF	CHVNAM,VOLNAM,FCOD	CHANGE NAME
	BOK	DLF250 
DLF345
	PERF	DISERR	I/O-ERROR XXXX 
	B	DLF250 
DLF350
	PERF	CLOFIL,W1 
	MOVE	STR1A,=C'X' 
	XCOPY	PBLOCK,W7,W1,STR1A,W0	F.ORG='S'
	XCOPY	PBLOCK,W8,W8,FILNAM,W0	FILE-NAME 
	XCOPY	PBLOCK,W16,W6,VOLEX1,W0	VOL-NAME 1 
	ERASE	0,W1,W6
	PERF	CONT	DISPLAY WAIT-TEXT... 
	CALL	DELFIL,PBLOCK,BPOOL(W5),BPOOL(W10),RETCOD 
	CBE	RETCOD,W0,DLF400 
	CBE	RETCOD,W5,DLF320	DISC NOT OPERABLE 
	PERF	DISERR	I/O-ERROR XXXX 
	B	DLF340 
DLF400
	PERF	CHVNAM,VOLNAM,FCOD	CHANGE NAME TO ORIGIN
	BNOK	DLF345
*	PERF	HALT 
	B	DLF000 
RETUR 
	RET
	PEND 
****************
*  CLOSE FILE  *
****************
CLOFIL	PROC	FC
	PBIN	FC
CLO100
	CALL CLOSEF,DISK,FILECODE(FC),SYSBUF,W0,DEBINW4
	BOK	CLO100 
	RET
	PEND 
	EJECT
* 
FDEL	FRMT 
	FSL
	FATTR	.HIGH
	FATTR	.INV 
	FCOPY	=C'DELETE' 
	FTAB	8 
	FATTR	.HIGH
	FATTR	.INV 
	FCOPY	=C'FILE     '
	FLINK	FFILE
	FMEND
* 
FFILE	FRMT
	FNL
	FATTR	.HIGH
	FCOPY	=C'UNIT:'
	FKI	6,MINL=3,MAXL=3,ME,ALPHA,NEOI,APPL=5 
	FCOPY	INUNIT 
	FATTR	.HIGH
	FTAB	12
	FCOPY	=C'VOLUME-NAME:' 
	FINP	25
	FCOPY	VOLNAM 
	FNL
	FATTR	.HIGH
	FCOPY	=C'FILENAME:'
	FKI	10,MINL=1,MAXL=8,ME,REWRT,APPL=6,ALPHA,NEOI
	FCOPY	FILNAM 
	FATTR	.HIGH
	FTAB	30
	FLINK	FHEX 
	FMEND
FHEX	FRMT 
	FNL
	FKI	1,MINL=0,MAXL=0
	FCOPY	HEX00
	FMEND
* 
	END

HexDump

0x0000…0030 (0, 0, 400)  Head {h00=0x002c, h01=0x0050, text=» IDENT WUDLF REL=2.3,841001,870155940230«, t00=0x0000, t01=0x0004}
0x0030…005e              Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0000, t01=0x0034}
0x005e…008c              Head {h00=0x002a, h01=0x0050, text=»*  WORK STATION MANAGEMENT           *«, t00=0x0000, t01=0x0062}
0x008c…00ba              Head {h00=0x002a, h01=0x0050, text=»*  UTILITY PROGRAMS                  *«, t00=0x0000, t01=0x0090}
0x00ba…00e8              Head {h00=0x002a, h01=0x0050, text=»*  3  DELETE FILE                    *«, t00=0x0000, t01=0x00be}
0x00e8…0116              Head {h00=0x002a, h01=0x0050, text=»*                                    *«, t00=0x0000, t01=0x00ec}
0x0116…0144              Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0000, t01=0x011a}
0x0144…014c              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0148}
0x014c…0154              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0150}
0x0154…0168              Head {h00=0x0010, h01=0x0050, text=»**  HISTORY:«, t00=0x0000, t01=0x0158}
0x0168…0170              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x016c}
0x0170…01bc              Head {h00=0x0048, h01=0x0050, text=»** 84-07-12 /MAER    RETURN TO MAIN MENU ONLY BY USING "RETURN"-KEY.«, t00=0x0000, t01=0x0174}
0x01bc…01ee              Head {h00=0x002e, h01=0x0050, text=»** 83-05-11 /MAER    CHANGED DECORATIONS. «, t00=0x0001, t01=0x0030}
0x01ee…0220              Head {h00=0x002e, h01=0x0050, text=»** 82-10-19 /MAER    WAIT-FORMAT DISPLAYED«, t00=0x0001, t01=0x0062}
0x0220…0262              Head {h00=0x003e, h01=0x0050, text=»** 82-07-26 /DALI    VOLUME-NAME IS CHANGED BEFORE DELETE «, t00=0x0001, t01=0x0094}
0x0262…02aa              Head {h00=0x0044, h01=0x0050, text=»** 82-02-04 /DALI    NEW ERROR MESSAGE "FILENAME UNKNOWN" ADDED «, t00=0x0001, t01=0x00d6}
0x02aa…02d0              Head {h00=0x0022, h01=0x0050, text=»** 81-11-11 /DALI    CREATION «, t00=0x0001, t01=0x011e}
0x02d0…02d8              Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0144}
0x02d8…02e0              Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x014c}
0x02e0…02f4              Head {h00=0x0010, h01=0x0050, text=» DDUM WUDIV «, t00=0x0001, t01=0x0154}
0x02f4…0302              Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0001, t01=0x0168}
0x0302…0316              Head {h00=0x0010, h01=0x0050, text=» ENTRY WUDLF«, t00=0x0001, t01=0x0176}
0x0316…0320              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018a}
0x0320…034a (2, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» EXPROC DECLRA CRE= SCREEN ROUTINE«, t00=0x0002, t01=0x0004}
0x034a…0374              Head {h00=0x0026, h01=0x0050, text=» EXPROC DISERR CRE= ERROR ROUTINE «, t00=0x0002, t01=0x002e}
0x0374…03a2              Head {h00=0x002a, h01=0x0050, text=» EXPROC DSKERR,PBIN CRE= ERROR ROUTINE«, t00=0x0002, t01=0x0058}
0x03a2…03da              Head {h00=0x0034, h01=0x0050, text=» EXPROC CHVNAM,PSTRG,PBIN CRE= CHANGE VOLUMENAME«, t00=0x0002, t01=0x0086}
0x03da…03fa              Head {h00=0x001c, h01=0x0050, text=»   PARAM: NEW NAME, F.C.«, t00=0x0002, t01=0x00be}
0x03fa…0402              Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00de}
0x0402…0416              Head {h00=0x0010, h01=0x0050, text=» EXPROC HALT«, t00=0x0002, t01=0x00e6}
0x0416…0442              Head {h00=0x0028, h01=0x0050, text=» EXPROC CONT CRE= DISPLAY WAIT-TEXT «, t00=0x0002, t01=0x00fa}
0x0442…044c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0126}
0x044c…0470              Head {h00=0x0020, h01=0x0050, text=» EXT DELFIL ASS= DELETE FILE«, t00=0x0002, t01=0x0130}
0x0470…0492              Head {h00=0x001e, h01=0x0050, text=» EXT OPENF ASS= OPEN FILE «, t00=0x0002, t01=0x0154}
0x0492…04b6              Head {h00=0x0020, h01=0x0050, text=» EXT CLOSEF ASS= CLOSE FILE «, t00=0x0002, t01=0x0176}
0x04b6…04c4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x000a}
0x04c4…04d6              Head {h00=0x000e, h01=0x0050, text=»WUDLF PROC«, t00=0x0003, t01=0x0018}
0x04d6…04f2              Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0003, t01=0x002a}
0x04f2…050e              Head {h00=0x0018, h01=0x0050, text=»*  3  DELETE FILE * «, t00=0x0003, t01=0x0046}
0x050e…052a              Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x0003, t01=0x0062}
0x052a…0538              Head {h00=0x000a, h01=0x0050, text=»DLF000«, t00=0x0003, t01=0x007e}
0x0538…054c              Head {h00=0x0010, h01=0x0050, text=» ATTFMT FDEL«, t00=0x0003, t01=0x008c}
0x054c…0562              Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0003, t01=0x00a0}
0x0562…0570              Head {h00=0x000a, h01=0x0050, text=»DLF200«, t00=0x0003, t01=0x00b6}
0x0570…0584              Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0003, t01=0x00c4}
0x0584…0592              Head {h00=0x000a, h01=0x0050, text=»DLF250«, t00=0x0003, t01=0x00d8}
0x0592…05ba              Head {h00=0x0024, h01=0x0050, text=» IB DEBINW2,DLF200,RETUR,DLF300 «, t00=0x0003, t01=0x00e6}
0x05ba…05d8              Head {h00=0x001a, h01=0x0050, text=» PERF DSKERR,W0 'BELL'«, t00=0x0003, t01=0x010e}
0x05d8…05ea              Head {h00=0x000e, h01=0x0050, text=» B DLF250 «, t00=0x0003, t01=0x012c}
0x05ea…05f8              Head {h00=0x000a, h01=0x0050, text=»DLF300«, t00=0x0003, t01=0x013e}
0x05f8…0638              Head {h00=0x003c, h01=0x0050, text=» PERF CHVNAM,VOLEX1,FCOD CHANGE NAME TO TEMP. (111...1) «, t00=0x0003, t01=0x014c}
0x0638…064c              Head {h00=0x0010, h01=0x0050, text=» BNOK DLF345«, t00=0x0003, t01=0x018c}
0x064c…068e              Head {h00=0x003e, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD «, t00=0x0004, t01=0x0010}
0x068e…06a2              Head {h00=0x0010, h01=0x0050, text=» BOK DLF350 «, t00=0x0004, t01=0x0052}
0x06a2…06c0              Head {h00=0x001a, h01=0x0050, text=» CBNE RETCOD,W1,DLF330«, t00=0x0004, t01=0x0066}
0x06c0…06ce              Head {h00=0x000a, h01=0x0050, text=»DLF320«, t00=0x0004, t01=0x0084}
0x06ce…06f8              Head {h00=0x0026, h01=0x0050, text=» PERF DSKERR,W18 DISC NOT OPERABLE«, t00=0x0004, t01=0x0092}
0x06f8…070a              Head {h00=0x000e, h01=0x0050, text=» B DLF340 «, t00=0x0004, t01=0x00bc}
0x070a…0718              Head {h00=0x000a, h01=0x0050, text=»DLF330«, t00=0x0004, t01=0x00ce}
0x0718…0742              Head {h00=0x0026, h01=0x0050, text=» PERF DSKERR,W12 FILENAME UNKNOWN «, t00=0x0004, t01=0x00dc}
0x0742…0750              Head {h00=0x000a, h01=0x0050, text=»DLF340«, t00=0x0004, t01=0x0106}
0x0750…077c              Head {h00=0x0028, h01=0x0050, text=» PERF CHVNAM,VOLNAM,FCOD CHANGE NAME«, t00=0x0004, t01=0x0114}
0x077c…0790              Head {h00=0x0010, h01=0x0050, text=» BOK DLF250 «, t00=0x0004, t01=0x0140}
0x0790…079e              Head {h00=0x000a, h01=0x0050, text=»DLF345«, t00=0x0004, t01=0x0154}
0x079e…07c2              Head {h00=0x0020, h01=0x0050, text=» PERF DISERR I/O-ERROR XXXX «, t00=0x0004, t01=0x0162}
0x07c2…07d4              Head {h00=0x000e, h01=0x0050, text=» B DLF250 «, t00=0x0004, t01=0x0186}
0x07d4…07e2              Head {h00=0x000a, h01=0x0050, text=»DLF350«, t00=0x0005, t01=0x0008}
0x07e2…07fa              Head {h00=0x0014, h01=0x0050, text=» PERF CLOFIL,W1 «, t00=0x0005, t01=0x0016}
0x07fa…0814              Head {h00=0x0016, h01=0x0050, text=» MOVE STR1A,=C'X' «, t00=0x0005, t01=0x002e}
0x0814…0842              Head {h00=0x002a, h01=0x0050, text=» XCOPY PBLOCK,W7,W1,STR1A,W0 F.ORG='S'«, t00=0x0005, t01=0x0048}
0x0842…0872              Head {h00=0x002c, h01=0x0050, text=» XCOPY PBLOCK,W8,W8,FILNAM,W0 FILE-NAME «, t00=0x0005, t01=0x0076}
0x0872…08a4              Head {h00=0x002e, h01=0x0050, text=» XCOPY PBLOCK,W16,W6,VOLEX1,W0 VOL-NAME 1 «, t00=0x0005, t01=0x00a6}
0x08a4…08ba              Head {h00=0x0012, h01=0x0050, text=» ERASE 0,W1,W6«, t00=0x0005, t01=0x00d8}
0x08ba…08e2              Head {h00=0x0024, h01=0x0050, text=» PERF CONT DISPLAY WAIT-TEXT... «, t00=0x0005, t01=0x00ee}
0x08e2…091a              Head {h00=0x0034, h01=0x0050, text=» CALL DELFIL,PBLOCK,BPOOL(W5),BPOOL(W10),RETCOD «, t00=0x0005, t01=0x0116}
0x091a…0938              Head {h00=0x001a, h01=0x0050, text=» CBE RETCOD,W0,DLF400 «, t00=0x0005, t01=0x014e}
0x0938…0968              Head {h00=0x002c, h01=0x0050, text=» CBE RETCOD,W5,DLF320 DISC NOT OPERABLE «, t00=0x0005, t01=0x016c}
0x0968…098c              Head {h00=0x0020, h01=0x0050, text=» PERF DISERR I/O-ERROR XXXX «, t00=0x0006, t01=0x000c}
0x098c…099e              Head {h00=0x000e, h01=0x0050, text=» B DLF340 «, t00=0x0006, t01=0x0030}
0x099e…09ac              Head {h00=0x000a, h01=0x0050, text=»DLF400«, t00=0x0006, t01=0x0042}
0x09ac…09e2              Head {h00=0x0032, h01=0x0050, text=» PERF CHVNAM,VOLNAM,FCOD CHANGE NAME TO ORIGIN«, t00=0x0006, t01=0x0050}
0x09e2…09f6              Head {h00=0x0010, h01=0x0050, text=» BNOK DLF345«, t00=0x0006, t01=0x0086}
0x09f6…0a0a              Head {h00=0x0010, h01=0x0050, text=»* PERF HALT «, t00=0x0006, t01=0x009a}
0x0a0a…0a1c              Head {h00=0x000e, h01=0x0050, text=» B DLF000 «, t00=0x0006, t01=0x00ae}
0x0a1c…0a2a              Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x0006, t01=0x00c0}
0x0a2a…0a36              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0006, t01=0x00ce}
0x0a36…0a44              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0006, t01=0x00da}
0x0a44…0a5c              Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x0006, t01=0x00e8}
0x0a5c…0a74              Head {h00=0x0014, h01=0x0050, text=»*  CLOSE FILE  *«, t00=0x0006, t01=0x0100}
0x0a74…0a8c              Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x0006, t01=0x0118}
0x0a8c…0aa2              Head {h00=0x0012, h01=0x0050, text=»CLOFIL PROC FC«, t00=0x0006, t01=0x0130}
0x0aa2…0ab2              Head {h00=0x000c, h01=0x0050, text=» PBIN FC«, t00=0x0006, t01=0x0146}
0x0ab2…0ac0              Head {h00=0x000a, h01=0x0050, text=»CLO100«, t00=0x0006, t01=0x0156}
0x0ac0…0af8              Head {h00=0x0034, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(FC),SYSBUF,W0,DEBINW4«, t00=0x0006, t01=0x0164}
0x0af8…0b0c              Head {h00=0x0010, h01=0x0050, text=» BOK CLO100 «, t00=0x0007, t01=0x000c}
0x0b0c…0b18              Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x0020}
0x0b18…0b26              Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x002c}
0x0b26…0b34              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x003a}
0x0b34…0b3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0048}
0x0b3e…0b50              Head {h00=0x000e, h01=0x0050, text=»FDEL FRMT «, t00=0x0007, t01=0x0052}
0x0b50…0b5c              Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0007, t01=0x0064}
0x0b5c…0b70              Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0007, t01=0x0070}
0x0b70…0b84              Head {h00=0x0010, h01=0x0050, text=» FATTR .INV «, t00=0x0007, t01=0x0084}
0x0b84…0b9e              Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'DELETE' «, t00=0x0007, t01=0x0098}
0x0b9e…0bae              Head {h00=0x000c, h01=0x0050, text=» FTAB 8 «, t00=0x0007, t01=0x00b2}
0x0bae…0bc2              Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0007, t01=0x00c2}
0x0bc2…0bd6              Head {h00=0x0010, h01=0x0050, text=» FATTR .INV «, t00=0x0007, t01=0x00d6}
0x0bd6…0bf2              Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'FILE     '«, t00=0x0007, t01=0x00ea}
0x0bf2…0c06              Head {h00=0x0010, h01=0x0050, text=» FLINK FFILE«, t00=0x0007, t01=0x0106}
0x0c06…0c14              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0007, t01=0x011a}
0x0c14…0c1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0128}
0x0c1e…0c30              Head {h00=0x000e, h01=0x0050, text=»FFILE FRMT«, t00=0x0007, t01=0x0132}
0x0c30…0c3c              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0007, t01=0x0144}
0x0c3c…0c50              Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0007, t01=0x0150}
0x0c50…0c68              Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'UNIT:'«, t00=0x0007, t01=0x0164}
0x0c68…0c9a              Head {h00=0x002e, h01=0x0050, text=» FKI 6,MINL=3,MAXL=3,ME,ALPHA,NEOI,APPL=5 «, t00=0x0007, t01=0x017c}
0x0c9a…0cb0              Head {h00=0x0012, h01=0x0050, text=» FCOPY INUNIT «, t00=0x0008, t01=0x001e}
0x0cb0…0cc4              Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0008, t01=0x0034}
0x0cc4…0cd4              Head {h00=0x000c, h01=0x0050, text=» FTAB 12«, t00=0x0008, t01=0x0048}
0x0cd4…0cf4              Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'VOLUME-NAME:' «, t00=0x0008, t01=0x0058}
0x0cf4…0d04              Head {h00=0x000c, h01=0x0050, text=» FINP 25«, t00=0x0008, t01=0x0078}
0x0d04…0d1a              Head {h00=0x0012, h01=0x0050, text=» FCOPY VOLNAM «, t00=0x0008, t01=0x0088}
0x0d1a…0d26              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0008, t01=0x009e}
0x0d26…0d3a              Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0008, t01=0x00aa}
0x0d3a…0d56              Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'FILENAME:'«, t00=0x0008, t01=0x00be}
0x0d56…0d8e              Head {h00=0x0034, h01=0x0050, text=» FKI 10,MINL=1,MAXL=8,ME,REWRT,APPL=6,ALPHA,NEOI«, t00=0x0008, t01=0x00da}
0x0d8e…0da4              Head {h00=0x0012, h01=0x0050, text=» FCOPY FILNAM «, t00=0x0008, t01=0x0112}
0x0da4…0db8              Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0008, t01=0x0128}
0x0db8…0dc8              Head {h00=0x000c, h01=0x0050, text=» FTAB 30«, t00=0x0008, t01=0x013c}
0x0dc8…0ddc              Head {h00=0x0010, h01=0x0050, text=» FLINK FHEX «, t00=0x0008, t01=0x014c}
0x0ddc…0dea              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0008, t01=0x0160}
0x0dea…0dfc              Head {h00=0x000e, h01=0x0050, text=»FHEX FRMT «, t00=0x0008, t01=0x016e}
0x0dfc…0e08              Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0008, t01=0x0180}
0x0e08…0e24              Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x0008, t01=0x018c}
0x0e24…0e38              Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x0009, t01=0x0018}
0x0e38…0e46              Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0009, t01=0x002c}
0x0e46…0e50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x003a}
0x0e50…0e5c              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0009, t01=0x0044}
0x0e5c…0e60              Head {h00=0x4004, h01=0x0000}
0x0e60…0e64              00 09 00 50                                                                                                                                                                                                                                       ┆   P┆
0x0e64…0e6c (10, 1, 8)   20 04 00 00 00 0a 00 04                                                                                                                                                                                                                           ┆        ┆
0x0e6c…0ebc (11, 0, 400) 45 20 00 02 01 76 00 0a 00 50 5c 45 4a 45 43 54 00 03 00 0a 00 0e 00 50 57 55 44 4c 46 5c 50 52 4f 43 00 03 00 18 00 18 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 03 00 2a 00 18 00 50 2a 20 20 33 20 20 44 45 4c 45   ┆E    v   P EJECT       PWUDLF PROC       P*******************    *   P*  3  DELE┆
0x0ebc…0f0c              54 45 20 46 49 4c 45 20 2a 20 00 03 00 46 00 18 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 03 00 62 00 0a 00 50 44 4c 46 30 30 30 00 03 00 7e 00 10 00 50 5c 41 54 54 46 4d 54 5c 46 44 45 4c 00 03 00 8c 00 12 00 50   ┆TE FILE *    F   P*******************    b   PDLF000   ~   P ATTFMT FDEL       P┆
0x0f0c…0f5c              5c 53 45 54 5c 44 45 50 52 4f 4d 50 54 20 00 03 00 a0 00 0a 00 50 44 4c 46 32 30 30 00 03 00 b6 00 10 00 50 5c 50 45 52 46 5c 44 45 43 4c 52 41 00 03 00 c4 00 0a 00 50 44 4c 46 32 35 30 00 03 00 d8 00 24 00 50 5c 49 42 5c 44 45 42 49 4e 57   ┆ SET DEPROMPT        PDLF200       P PERF DECLRA       PDLF250     $ P IB DEBINW┆
0x0f5c…0fac              32 2c 44 4c 46 32 30 30 2c 52 45 54 55 52 2c 44 4c 46 33 30 30 20 00 03 00 e6 00 1a 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57 30 5c 27 42 45 4c 4c 27 00 03 01 0e 00 0e 00 50 5c 42 5c 44 4c 46 32 35 30 20 00 03 01 2c 00 0a 00 50 44 4c   ┆2,DLF200,RETUR,DLF300        P PERF DSKERR,W0 'BELL'       P B DLF250    ,   PDL┆
0x0fac…0ffc              46 33 30 30 00 03 01 3e 00 3c 00 50 5c 50 45 52 46 5c 43 48 56 4e 41 4d 2c 56 4f 4c 45 58 31 2c 46 43 4f 44 5c 43 48 41 4e 47 45 20 4e 41 4d 45 20 54 4f 20 54 45 4d 50 2e 20 28 31 31 31 2e 2e 2e 31 29 20 00 03 01 4c 00 10 00 50 5c 42 4e 4f   ┆F300   > < P PERF CHVNAM,VOLEX1,FCOD CHANGE NAME TO TEMP. (111...1)    L   P BNO┆
0x0ffc…104c (12, 0, 400) 4b 5c 44 4c 46 33 34 35 00 03 01 8c 00 3e 00 50 5c 43 41 4c 4c 20 4f 50 45 4e 46 2c 44 49 53 4b 2c 46 49 4c 45 43 4f 44 45 28 57 31 29 2c 53 59 53 42 55 46 2c 46 49 4c 4e 41 4d 2c 56 4f 4c 45 58 31 2c 52 45 54 43 4f 44 20 00 04 00 10 00 10   ┆K DLF345     > P CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD       ┆
0x104c…109c              00 50 5c 42 4f 4b 5c 44 4c 46 33 35 30 20 00 04 00 52 00 1a 00 50 5c 43 42 4e 45 5c 52 45 54 43 4f 44 2c 57 31 2c 44 4c 46 33 33 30 00 04 00 66 00 0a 00 50 44 4c 46 33 32 30 00 04 00 84 00 26 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57   ┆ P BOK DLF350    R   P CBNE RETCOD,W1,DLF330   f   PDLF320     & P PERF DSKERR,W┆
0x109c…10ec              31 38 5c 44 49 53 43 20 4e 4f 54 20 4f 50 45 52 41 42 4c 45 00 04 00 92 00 0e 00 50 5c 42 5c 44 4c 46 33 34 30 20 00 04 00 bc 00 0a 00 50 44 4c 46 33 33 30 00 04 00 ce 00 26 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57 31 32 5c 46 49 4c   ┆18 DISC NOT OPERABLE       P B DLF340        PDLF330     & P PERF DSKERR,W12 FIL┆
0x10ec…113c              45 4e 41 4d 45 20 55 4e 4b 4e 4f 57 4e 20 00 04 00 dc 00 0a 00 50 44 4c 46 33 34 30 00 04 01 06 00 28 00 50 5c 50 45 52 46 5c 43 48 56 4e 41 4d 2c 56 4f 4c 4e 41 4d 2c 46 43 4f 44 5c 43 48 41 4e 47 45 20 4e 41 4d 45 00 04 01 14 00 10 00 50   ┆ENAME UNKNOWN        PDLF340     ( P PERF CHVNAM,VOLNAM,FCOD CHANGE NAME       P┆
0x113c…118c              5c 42 4f 4b 5c 44 4c 46 32 35 30 20 00 04 01 40 00 0a 00 50 44 4c 46 33 34 35 00 04 01 54 00 20 00 50 5c 50 45 52 46 5c 44 49 53 45 52 52 5c 49 2f 4f 2d 45 52 52 4f 52 20 58 58 58 58 20 00 04 01 62 00 0e 00 50 5c 42 5c 44 4c 46 32 35 30 20   ┆ BOK DLF250    @   PDLF345   T   P PERF DISERR I/O-ERROR XXXX    b   P B DLF250 ┆

Reduced view