|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 6318 (0x18ae)
Notes: pts_type(SC)
Names: »CRESUD.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »S:DU/CRESUD.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DU/CRESUD.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »S:DU/CRESUD.SC«
IDENT CRESUD UPD 80-03-19/CHST ****************** * * * CREATE FILES * * * ****************** DDUM DDINIT PDIV ENTRY CRESUD * EXT DECLRA EXT CLOFIL EXT CHVNAM EXT CREFIL EXT DSKERR EXT RDSECT EXT OPENF EJECT CRESUD PROC ************************************ * NO. OF FREE SECTORS ON VOLUME * ************************************ MOVE FRESEC,W0 * MOVE BIN1,W0 SECTOR NO. CALL RDSECT,DISK,BIN1,SYSBUF READ VOLUME-LABEL XCOPY BIN1,W0,W2,SYSBUF,W10 VTOC BASE MOVE DKBIN2,=W'46' XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 C30 CALL RDSECT,DISK,BIN1,SYSBUF READ ONESECTOR MOVE BIN6,W1 MOVE BIN5,W2 MOVE BIN3,W0 C40 XCOPY BIN7,W0,W2,SYSBUF,BIN3 FIRST WORD IN NO OF FS REC CBNE BIN7,W0,C80 OWERFLOW IF NOT ZERO XCOPY BIN7,W0,W2,SYSBUF,BIN5 ADD FRESEC,BIN7 BOFL C80 BN C80 CBE BIN6,=W'32',C50 ADD BIN5,W8 ADD BIN6,W1 ADD BIN3,W8 B C40 C50 SUB DKBIN1,W1 BZ C90 ADD BIN1,W1 B C30 C80 MOVE FRESEC,=W'32767' MAX NO OF FREE SPACE REC ALL C90 CBE FTYPE,=D'2',F40 IF USERFILE CBE FTYPE,=D'3',F30 IF USERDEF.FILE ***************** * SYSTEMFILE * ***************** MOVE FILNAM,SYSFIL ATTFMT FSYS F10 SET DEPROMPT F15 PERF DECLRA IB DEBINW2,F15,ERR99,F60 B F10 ********************** * USERDEFINED FILE * ********************** F30 ATTFMT FUDEF B F10 EJECT ************** * USERFILE * ************** F40 PERF CLOFIL CALL OPENF,DISK,FILECODE(W1),SYSBUF,SYSFIL,VOLNAM BOK F50 SYSFILE EXISTS * SYSFIL MUST EXIST ON SYSVOL CMP VOLNAM,SYSVOL BE ERR9 F50 PERF CLOFIL MOVE FILNAM,USEFIL ATTFMT FUSE SET DEPROMPT F55 PERF DECLRA IB DEBINW2,F55,ERR99,F60 B F50 EJECT F60 ************************* * CHANGE VOLUME-NAME * * TO:X'171717171717' * ************************* MOVE USELEN,=W'255' PERF CHVNAM,COPNAM MOVE BIN3,NOREC XCOPY PBLOCK,W7,W1,FCOD,W1 DISK-FILE CODE ERASE 0,W1,W5 MOVE STR1A,=C'S' XCOPY PBLOCK,W6,W1,STR1A,W0 F.ORG XCOPY PBLOCK,W8,W8,FILNAM,W0 FILE-NAME COPY PBLOCK,W16,W6,COPNAM,W0 VOL-NAME 1 MOVE BIN1,=W'49' XCOPY PBLOCK,BIN1,W1,W1,W1 BF MOVE BIN2,=W'50' XCOPY PBLOCK,BIN2,W2,USELEN,W0 RECORD LENGTH CBE FTYPE,=D'2',F70 IF USERFILE XCOPY PBLOCK,BIN2,W2,SYSLEN,W0 CBE FTYPE,=D'1',F80 IF SYSTEMFILE * USERDEFINED FILE * MOVE BIN4,BLFACT XCOPY PBLOCK,BIN1,W1,BIN4,W1 BLOCK.FACTOR MOVE BIN4,RSIZE XCOPY PBLOCK,BIN2,W2,BIN4,W0 RECORD LENGTH B F80 * F70 MOVE BIN1,BLFACT MUL BIN3,BIN1 USERFILE EJECT F80 MOVE BIN1,=W'56' S-FILE XCOPY PBLOCK,BIN1,W2,BIN3,W0 NO. OF RECORDS MOVE BIN1,=W'54' XCOPY PBLOCK,BIN1,W2,W0,W0 NIF MOVE BIN1,=W'52' XCOPY PBLOCK,BIN1,W2,W0,W0 KA CALL CREFIL,PBLOCK,BPOOL(W12),BPOOL(W1),RETCOD * * F99 RET PEND * * ERR9 PERF DSKERR,W9 'SYSTEMFILE NOT CREATED' ERR99 MOVE DEBINW4,W99 IND. ERROR B F99 EJECT * FSYS FRMT SYSTEM-FILE FSL FCOPY =C'SYSTEM' FTAB 7 FCOPY =C'FILE' FNL FCOPY =C'NO.' FTAB 5 FCOPY =C'OF RECORDS:' FKI 17,MINL=1,MAXL=5,ME,NEOI,REWRT,APPL=3 NO. OF RECORDS FMEL 'ZZZZX',NOREC FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND * FUSE FRMT USER-FILE FSL FCOPY =C'USER' FTAB 5 FCOPY =C'FILE' FNL FCOPY =C'NO. OF SECTORS/RECORD:' FKI 23,MINL=1,MAXL=1,ME,NEOI,REWRT,APPL=12 FMEL 'ZZX',BLFACT FLINK FNOREC FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND * FUDEF FRMT USERDEFINED-FILE FSL FCOPY =C'USERDEFINED' FTAB 13 FCOPY =C'FILE' FNL FCOPY =C'FILE' FTAB 5 FCOPY =C'NAME:' FKI 11,MINL=1,MAXL=8,ALPHA,ME,NEOI,APPL=6 FCOPY FILNAM FNL FCOPY =C'SIZE' FTAB 6 FCOPY =C'OF RECORDS:' FKI 17,MINL=1,MAXL=4,ME,NEOI,REWRT,APPL=11 FMEL 'ZZZZX',RSIZE FNL FCOPY =C'BLOCKING FACTOR:' FKI 17,MINL=1,MAXL=3,ME,NEOI,REWRT,APPL=15 FMEL 'ZZZZX',BLFACT FLINK FNOREC FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND * FNOREC FRMT FNL FCOPY =C'NO.' FTAB 5 FCOPY =C'OF RECORDS:' FKI 17,MINL=1,MAXL=5,ME,NEOI,REWRT,APPL=4 FMEL 'ZZZZX',NOREC NO. OF RECORDS FMEND * * END
0x0000…0028 (0, 0, 400) Head {h00=0x0024, h01=0x0050, text=» IDENT CRESUD UPD 80-03-19/CHST «, t00=0x0000, t01=0x0004}
0x0028…0042 Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0000, t01=0x002c}
0x0042…005c Head {h00=0x0016, h01=0x0050, text=»* *«, t00=0x0000, t01=0x0046}
0x005c…0076 Head {h00=0x0016, h01=0x0050, text=»* CREATE FILES *«, t00=0x0000, t01=0x0060}
0x0076…0090 Head {h00=0x0016, h01=0x0050, text=»* *«, t00=0x0000, t01=0x007a}
0x0090…00aa Head {h00=0x0016, h01=0x0050, text=»******************«, t00=0x0000, t01=0x0094}
0x00aa…00be Head {h00=0x0010, h01=0x000c, text=» DDUM DDINIT«, t00=0x0000, t01=0x00ae}
0x00be…00cc Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x00c2}
0x00cc…00e2 Head {h00=0x0012, h01=0x0050, text=» ENTRY CRESUD «, t00=0x0000, t01=0x00d0}
0x00e2…00ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e6}
0x00ec…0100 Head {h00=0x0010, h01=0x0050, text=» EXT DECLRA «, t00=0x0000, t01=0x00f0}
0x0100…0114 Head {h00=0x0010, h01=0x0050, text=» EXT CLOFIL «, t00=0x0000, t01=0x0104}
0x0114…0128 Head {h00=0x0010, h01=0x0050, text=» EXT CHVNAM «, t00=0x0000, t01=0x0118}
0x0128…013c Head {h00=0x0010, h01=0x0050, text=» EXT CREFIL «, t00=0x0000, t01=0x012c}
0x013c…0150 Head {h00=0x0010, h01=0x0050, text=» EXT DSKERR «, t00=0x0000, t01=0x0140}
0x0150…0164 Head {h00=0x0010, h01=0x0050, text=» EXT RDSECT «, t00=0x0000, t01=0x0154}
0x0164…0176 Head {h00=0x000e, h01=0x0050, text=» EXT OPENF«, t00=0x0000, t01=0x0168}
0x0176…0184 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x017a}
0x0184…0198 Head {h00=0x0010, h01=0x0050, text=»CRESUD PROC «, t00=0x0000, t01=0x0188}
0x0198…01c4 Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0001, t01=0x000c}
0x01c4…01f0 Head {h00=0x0028, h01=0x0050, text=»* NO. OF FREE SECTORS ON VOLUME *«, t00=0x0001, t01=0x0038}
0x01f0…021c Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0001, t01=0x0064}
0x021c…0234 Head {h00=0x0014, h01=0x0050, text=» MOVE FRESEC,W0 «, t00=0x0001, t01=0x0090}
0x0234…023e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a8}
0x023e…025e Head {h00=0x001c, h01=0x0050, text=» MOVE BIN1,W0 SECTOR NO.«, t00=0x0001, t01=0x00b2}
0x025e…0296 Head {h00=0x0034, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF READ VOLUME-LABEL «, t00=0x0001, t01=0x00d2}
0x0296…02c4 Head {h00=0x002a, h01=0x0050, text=» XCOPY BIN1,W0,W2,SYSBUF,W10 VTOC BASE«, t00=0x0001, t01=0x010a}
0x02c4…02e0 Head {h00=0x0018, h01=0x0050, text=» MOVE DKBIN2,=W'46' «, t00=0x0001, t01=0x0138}
0x02e0…030a Head {h00=0x0026, h01=0x0050, text=» XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 «, t00=0x0001, t01=0x0154}
0x030a…0316 Head {h00=0x0008, h01=0x0050, text=»C30 «, t00=0x0001, t01=0x017e}
0x0316…034a Head {h00=0x0030, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF READ ONESECTOR«, t00=0x0001, t01=0x018a}
0x034a…0360 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN6,W1 «, t00=0x0002, t01=0x002e}
0x0360…0376 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN5,W2 «, t00=0x0002, t01=0x0044}
0x0376…038c Head {h00=0x0012, h01=0x0050, text=» MOVE BIN3,W0 «, t00=0x0002, t01=0x005a}
0x038c…0398 Head {h00=0x0008, h01=0x0050, text=»C40 «, t00=0x0002, t01=0x0070}
0x0398…03d8 Head {h00=0x003c, h01=0x0050, text=» XCOPY BIN7,W0,W2,SYSBUF,BIN3 FIRST WORD IN NO OF FS REC«, t00=0x0002, t01=0x007c}
0x03d8…0406 Head {h00=0x002a, h01=0x0050, text=» CBNE BIN7,W0,C80 OWERFLOW IF NOT ZERO«, t00=0x0002, t01=0x00bc}
0x0406…042c Head {h00=0x0022, h01=0x0050, text=» XCOPY BIN7,W0,W2,SYSBUF,BIN5 «, t00=0x0002, t01=0x00ea}
0x042c…0444 Head {h00=0x0014, h01=0x0050, text=» ADD FRESEC,BIN7«, t00=0x0002, t01=0x0110}
0x0444…0456 Head {h00=0x000e, h01=0x0050, text=» BOFL C80 «, t00=0x0002, t01=0x0128}
0x0456…0466 Head {h00=0x000c, h01=0x0050, text=» BN C80 «, t00=0x0002, t01=0x013a}
0x0466…0482 Head {h00=0x0018, h01=0x0050, text=» CBE BIN6,=W'32',C50«, t00=0x0002, t01=0x014a}
0x0482…0496 Head {h00=0x0010, h01=0x0050, text=» ADD BIN5,W8«, t00=0x0002, t01=0x0166}
0x0496…04aa Head {h00=0x0010, h01=0x0050, text=» ADD BIN6,W1«, t00=0x0002, t01=0x017a}
0x04aa…04be Head {h00=0x0010, h01=0x0050, text=» ADD BIN3,W8«, t00=0x0002, t01=0x018e}
0x04be…04cc Head {h00=0x000a, h01=0x0050, text=» B C40«, t00=0x0003, t01=0x0012}
0x04cc…04d8 Head {h00=0x0008, h01=0x0050, text=»C50 «, t00=0x0003, t01=0x0020}
0x04d8…04ee Head {h00=0x0012, h01=0x0050, text=» SUB DKBIN1,W1«, t00=0x0003, t01=0x002c}
0x04ee…04fe Head {h00=0x000c, h01=0x0050, text=» BZ C90 «, t00=0x0003, t01=0x0042}
0x04fe…0512 Head {h00=0x0010, h01=0x0050, text=» ADD BIN1,W1«, t00=0x0003, t01=0x0052}
0x0512…0520 Head {h00=0x000a, h01=0x0050, text=» B C30«, t00=0x0003, t01=0x0066}
0x0520…052c Head {h00=0x0008, h01=0x0050, text=»C80 «, t00=0x0003, t01=0x0074}
0x052c…0568 Head {h00=0x0038, h01=0x0050, text=» MOVE FRESEC,=W'32767' MAX NO OF FREE SPACE REC ALL «, t00=0x0003, t01=0x0080}
0x0568…0574 Head {h00=0x0008, h01=0x0050, text=»C90 «, t00=0x0003, t01=0x00bc}
0x0574…059c Head {h00=0x0024, h01=0x0050, text=» CBE FTYPE,=D'2',F40 IF USERFILE«, t00=0x0003, t01=0x00c8}
0x059c…05c8 Head {h00=0x0028, h01=0x0050, text=» CBE FTYPE,=D'3',F30 IF USERDEF.FILE«, t00=0x0003, t01=0x00f0}
0x05c8…05e2 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0003, t01=0x011c}
0x05e2…05fc Head {h00=0x0016, h01=0x0050, text=»* SYSTEMFILE * «, t00=0x0003, t01=0x0136}
0x05fc…0616 Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x0003, t01=0x0150}
0x0616…0632 Head {h00=0x0018, h01=0x0050, text=» MOVE FILNAM,SYSFIL «, t00=0x0003, t01=0x016a}
0x0632…0646 Head {h00=0x0010, h01=0x0050, text=» ATTFMT FSYS«, t00=0x0003, t01=0x0186}
0x0646…0652 Head {h00=0x0008, h01=0x0050, text=»F10 «, t00=0x0004, t01=0x000a}
0x0652…0668 Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0004, t01=0x0016}
0x0668…0674 Head {h00=0x0008, h01=0x0050, text=»F15 «, t00=0x0004, t01=0x002c}
0x0674…0688 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0004, t01=0x0038}
0x0688…06aa Head {h00=0x001e, h01=0x0050, text=» IB DEBINW2,F15,ERR99,F60 «, t00=0x0004, t01=0x004c}
0x06aa…06b8 Head {h00=0x000a, h01=0x0050, text=» B F10«, t00=0x0004, t01=0x006e}
0x06b8…06d6 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0004, t01=0x007c}
0x06d6…06f4 Head {h00=0x001a, h01=0x0050, text=»* USERDEFINED FILE *«, t00=0x0004, t01=0x009a}
0x06f4…0712 Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0004, t01=0x00b8}
0x0712…071e Head {h00=0x0008, h01=0x0050, text=»F30 «, t00=0x0004, t01=0x00d6}
0x071e…0734 Head {h00=0x0012, h01=0x0050, text=» ATTFMT FUDEF «, t00=0x0004, t01=0x00e2}
0x0734…0742 Head {h00=0x000a, h01=0x0050, text=» B F10«, t00=0x0004, t01=0x00f8}
0x0742…0750 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0106}
0x0750…0766 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0004, t01=0x0114}
0x0766…077c Head {h00=0x0012, h01=0x0050, text=»* USERFILE *«, t00=0x0004, t01=0x012a}
0x077c…0792 Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x0004, t01=0x0140}
0x0792…079e Head {h00=0x0008, h01=0x0050, text=»F40 «, t00=0x0004, t01=0x0156}
0x079e…07b2 Head {h00=0x0010, h01=0x0050, text=» PERF CLOFIL«, t00=0x0004, t01=0x0162}
0x07b2…07ec Head {h00=0x0036, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W1),SYSBUF,SYSFIL,VOLNAM«, t00=0x0004, t01=0x0176}
0x07ec…080c Head {h00=0x001c, h01=0x0050, text=» BOK F50 SYSFILE EXISTS «, t00=0x0005, t01=0x0020}
0x080c…0832 Head {h00=0x0022, h01=0x0050, text=»* SYSFIL MUST EXIST ON SYSVOL«, t00=0x0005, t01=0x0040}
0x0832…084c Head {h00=0x0016, h01=0x0050, text=» CMP VOLNAM,SYSVOL«, t00=0x0005, t01=0x0066}
0x084c…085c Head {h00=0x000c, h01=0x0050, text=» BE ERR9«, t00=0x0005, t01=0x0080}
0x085c…0868 Head {h00=0x0008, h01=0x0050, text=»F50 «, t00=0x0005, t01=0x0090}
0x0868…087c Head {h00=0x0010, h01=0x0050, text=» PERF CLOFIL«, t00=0x0005, t01=0x009c}
0x087c…0898 Head {h00=0x0018, h01=0x0050, text=» MOVE FILNAM,USEFIL «, t00=0x0005, t01=0x00b0}
0x0898…08ac Head {h00=0x0010, h01=0x0050, text=» ATTFMT FUSE«, t00=0x0005, t01=0x00cc}
0x08ac…08c2 Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0005, t01=0x00e0}
0x08c2…08ce Head {h00=0x0008, h01=0x0050, text=»F55 «, t00=0x0005, t01=0x00f6}
0x08ce…08e2 Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0005, t01=0x0102}
0x08e2…0904 Head {h00=0x001e, h01=0x0050, text=» IB DEBINW2,F55,ERR99,F60 «, t00=0x0005, t01=0x0116}
0x0904…0912 Head {h00=0x000a, h01=0x0050, text=» B F50«, t00=0x0005, t01=0x0138}
0x0912…0920 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x0146}
0x0920…092c Head {h00=0x0008, h01=0x0050, text=»F60 «, t00=0x0005, t01=0x0154}
0x092c…094e Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0005, t01=0x0160}
0x094e…0970 Head {h00=0x001e, h01=0x0050, text=»* CHANGE VOLUME-NAME * «, t00=0x0005, t01=0x0182}
0x0970…0992 Head {h00=0x001e, h01=0x0050, text=»* TO:X'171717171717' * «, t00=0x0006, t01=0x0014}
0x0992…09b4 Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0006, t01=0x0036}
0x09b4…09d0 Head {h00=0x0018, h01=0x0050, text=» MOVE USELEN,=W'255'«, t00=0x0006, t01=0x0058}
0x09d0…09ec Head {h00=0x0018, h01=0x0050, text=» PERF CHVNAM,COPNAM «, t00=0x0006, t01=0x0074}
0x09ec…0a04 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN3,NOREC«, t00=0x0006, t01=0x0090}
0x0a04…0a36 Head {h00=0x002e, h01=0x0050, text=» XCOPY PBLOCK,W7,W1,FCOD,W1 DISK-FILE CODE«, t00=0x0006, t01=0x00a8}
0x0a36…0a4c Head {h00=0x0012, h01=0x0050, text=» ERASE 0,W1,W5«, t00=0x0006, t01=0x00da}
0x0a4c…0a66 Head {h00=0x0016, h01=0x0050, text=» MOVE STR1A,=C'S' «, t00=0x0006, t01=0x00f0}
0x0a66…0a90 Head {h00=0x0026, h01=0x0050, text=» XCOPY PBLOCK,W6,W1,STR1A,W0 F.ORG«, t00=0x0006, t01=0x010a}
0x0a90…0ac0 Head {h00=0x002c, h01=0x0050, text=» XCOPY PBLOCK,W8,W8,FILNAM,W0 FILE-NAME «, t00=0x0006, t01=0x0134}
0x0ac0…0af0 Head {h00=0x002c, h01=0x0050, text=» COPY PBLOCK,W16,W6,COPNAM,W0 VOL-NAME 1«, t00=0x0006, t01=0x0164}
0x0af0…0b0a (7, 0, 400) Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'49' «, t00=0x0007, t01=0x0004}
0x0b0a…0b30 Head {h00=0x0022, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W1,W1,W1 BF«, t00=0x0007, t01=0x001e}
0x0b30…0b4a Head {h00=0x0016, h01=0x0050, text=» MOVE BIN2,=W'50' «, t00=0x0007, t01=0x0044}
0x0b4a…0b80 Head {h00=0x0032, h01=0x0050, text=» XCOPY PBLOCK,BIN2,W2,USELEN,W0 RECORD LENGTH «, t00=0x0007, t01=0x005e}
0x0b80…0ba8 Head {h00=0x0024, h01=0x0050, text=» CBE FTYPE,=D'2',F70 IF USERFILE«, t00=0x0007, t01=0x0094}
0x0ba8…0bd0 Head {h00=0x0024, h01=0x0050, text=» XCOPY PBLOCK,BIN2,W2,SYSLEN,W0 «, t00=0x0007, t01=0x00bc}
0x0bd0…0bfa Head {h00=0x0026, h01=0x0050, text=» CBE FTYPE,=D'1',F80 IF SYSTEMFILE«, t00=0x0007, t01=0x00e4}
0x0bfa…0c18 Head {h00=0x001a, h01=0x0050, text=»* USERDEFINED FILE *«, t00=0x0007, t01=0x010e}
0x0c18…0c32 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN4,BLFACT «, t00=0x0007, t01=0x012c}
0x0c32…0c64 Head {h00=0x002e, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W1,BIN4,W1 BLOCK.FACTOR«, t00=0x0007, t01=0x0146}
0x0c64…0c7c Head {h00=0x0014, h01=0x0050, text=» MOVE BIN4,RSIZE«, t00=0x0007, t01=0x0178}
0x0c7c…0cb0 Head {h00=0x0030, h01=0x0050, text=» XCOPY PBLOCK,BIN2,W2,BIN4,W0 RECORD LENGTH «, t00=0x0007, t01=0x0190}
0x0cb0…0cbe Head {h00=0x000a, h01=0x0050, text=» B F80«, t00=0x0008, t01=0x0034}
0x0cbe…0cc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0042}
0x0cc8…0cd4 Head {h00=0x0008, h01=0x0050, text=»F70 «, t00=0x0008, t01=0x004c}
0x0cd4…0cee Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,BLFACT «, t00=0x0008, t01=0x0058}
0x0cee…0d0e Head {h00=0x001c, h01=0x0050, text=» MUL BIN3,BIN1 USERFILE «, t00=0x0008, t01=0x0072}
0x0d0e…0d1c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0092}
0x0d1c…0d28 Head {h00=0x0008, h01=0x0050, text=»F80 «, t00=0x0008, t01=0x00a0}
0x0d28…0d48 Head {h00=0x001c, h01=0x0050, text=» MOVE BIN1,=W'56' S-FILE«, t00=0x0008, t01=0x00ac}
0x0d48…0d7c Head {h00=0x0030, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,BIN3,W0 NO. OF RECORDS«, t00=0x0008, t01=0x00cc}
0x0d7c…0d96 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'54' «, t00=0x0008, t01=0x0100}
0x0d96…0dbe Head {h00=0x0024, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,W0,W0 NIF «, t00=0x0008, t01=0x011a}
0x0dbe…0dd8 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'52' «, t00=0x0008, t01=0x0142}
0x0dd8…0dfe Head {h00=0x0022, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,W0,W0 KA«, t00=0x0008, t01=0x015c}
0x0dfe…0e36 Head {h00=0x0034, h01=0x0050, text=» CALL CREFIL,PBLOCK,BPOOL(W12),BPOOL(W1),RETCOD «, t00=0x0008, t01=0x0182}
0x0e36…0e40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x002a}
0x0e40…0e4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0034}
0x0e4a…0e56 Head {h00=0x0008, h01=0x0050, text=»F99 «, t00=0x0009, t01=0x003e}
0x0e56…0e62 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x004a}
0x0e62…0e70 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0009, t01=0x0056}
0x0e70…0e7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0064}
0x0e7a…0e84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006e}
0x0e84…0e90 Head {h00=0x0008, h01=0x0050, text=»ERR9«, t00=0x0009, t01=0x0078}
0x0e90…0ec0 Head {h00=0x002c, h01=0x0050, text=» PERF DSKERR,W9 'SYSTEMFILE NOT CREATED'«, t00=0x0009, t01=0x0084}
0x0ec0…0ece Head {h00=0x000a, h01=0x0050, text=»ERR99 «, t00=0x0009, t01=0x00b4}
0x0ece…0ef2 Head {h00=0x0020, h01=0x0050, text=» MOVE DEBINW4,W99 IND. ERROR«, t00=0x0009, t01=0x00c2}
0x0ef2…0f00 Head {h00=0x000a, h01=0x0050, text=» B F99«, t00=0x0009, t01=0x00e6}
0x0f00…0f0e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00f4}
0x0f0e…0f18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0102}
0x0f18…0f36 Head {h00=0x001a, h01=0x0050, text=»FSYS FRMT SYSTEM-FILE«, t00=0x0009, t01=0x010c}
0x0f36…0f42 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0009, t01=0x012a}
0x0f42…0f5c Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'SYSTEM' «, t00=0x0009, t01=0x0136}
0x0f5c…0f6c Head {h00=0x000c, h01=0x0050, text=» FTAB 7 «, t00=0x0009, t01=0x0150}
0x0f6c…0f84 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x0009, t01=0x0160}
0x0f84…0f90 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0009, t01=0x0178}
0x0f90…0fa6 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'NO.'«, t00=0x0009, t01=0x0184}
0x0fa6…0fb6 Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x000a, t01=0x000a}
0x0fb6…0fd4 Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'OF RECORDS:'«, t00=0x000a, t01=0x001a}
0x0fd4…1016 Head {h00=0x003e, h01=0x0050, text=» FKI 17,MINL=1,MAXL=5,ME,NEOI,REWRT,APPL=3 NO. OF RECORDS «, t00=0x000a, t01=0x0038}
0x1016…1032 Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZZX',NOREC «, t00=0x000a, t01=0x007a}
0x1032…103e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000a, t01=0x0096}
0x103e…105a Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x000a, t01=0x00a2}
0x105a…106e Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x000a, t01=0x00be}
0x106e…107c Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000a, t01=0x00d2}
0x107c…1086 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00e0}
0x1086…10a2 Head {h00=0x0018, h01=0x0050, text=»FUSE FRMT USER-FILE«, t00=0x000a, t01=0x00ea}
0x10a2…10ae Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000a, t01=0x0106}
0x10ae…10c6 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'USER' «, t00=0x000a, t01=0x0112}
0x10c6…10d6 Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x000a, t01=0x012a}
0x10d6…10ee Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x000a, t01=0x013a}
0x10ee…10fa Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000a, t01=0x0152}
0x10fa…1124 Head {h00=0x0026, h01=0x0050, text=» FCOPY =C'NO. OF SECTORS/RECORD:' «, t00=0x000a, t01=0x015e}
0x1124…1158 Head {h00=0x0030, h01=0x0050, text=» FKI 23,MINL=1,MAXL=1,ME,NEOI,REWRT,APPL=12 «, t00=0x000a, t01=0x0188}
0x1158…1172 Head {h00=0x0016, h01=0x0050, text=» FMEL 'ZZX',BLFACT«, t00=0x000b, t01=0x002c}
0x1172…1188 Head {h00=0x0012, h01=0x0050, text=» FLINK FNOREC «, t00=0x000b, t01=0x0046}
0x1188…1194 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000b, t01=0x005c}
0x1194…11b0 Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x000b, t01=0x0068}
0x11b0…11c4 Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x000b, t01=0x0084}
0x11c4…11d2 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000b, t01=0x0098}
0x11d2…11dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a6}
0x11dc…1200 Head {h00=0x0020, h01=0x0050, text=»FUDEF FRMT USERDEFINED-FILE«, t00=0x000b, t01=0x00b0}
0x1200…120c Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x000b, t01=0x00d4}
0x120c…122a Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'USERDEFINED'«, t00=0x000b, t01=0x00e0}
0x122a…123a Head {h00=0x000c, h01=0x0050, text=» FTAB 13«, t00=0x000b, t01=0x00fe}
0x123a…1252 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x000b, t01=0x010e}
0x1252…125e Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000b, t01=0x0126}
0x125e…1276 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x000b, t01=0x0132}
0x1276…1286 Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x000b, t01=0x014a}
0x1286…129e Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'NAME:'«, t00=0x000b, t01=0x015a}
0x129e…12d0 Head {h00=0x002e, h01=0x0050, text=» FKI 11,MINL=1,MAXL=8,ALPHA,ME,NEOI,APPL=6«, t00=0x000b, t01=0x0172}
0x12d0…12e6 Head {h00=0x0012, h01=0x0050, text=» FCOPY FILNAM «, t00=0x000c, t01=0x0014}
0x12e6…12f2 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000c, t01=0x002a}
0x12f2…130a Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'SIZE' «, t00=0x000c, t01=0x0036}
0x130a…131a Head {h00=0x000c, h01=0x0050, text=» FTAB 6 «, t00=0x000c, t01=0x004e}
0x131a…1338 Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'OF RECORDS:'«, t00=0x000c, t01=0x005e}
0x1338…136c Head {h00=0x0030, h01=0x0050, text=» FKI 17,MINL=1,MAXL=4,ME,NEOI,REWRT,APPL=11 «, t00=0x000c, t01=0x007c}
0x136c…1388 Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZZX',RSIZE «, t00=0x000c, t01=0x00b0}
0x1388…1394 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000c, t01=0x00cc}
0x1394…13b8 Head {h00=0x0020, h01=0x0050, text=» FCOPY =C'BLOCKING FACTOR:' «, t00=0x000c, t01=0x00d8}
0x13b8…13ec Head {h00=0x0030, h01=0x0050, text=» FKI 17,MINL=1,MAXL=3,ME,NEOI,REWRT,APPL=15 «, t00=0x000c, t01=0x00fc}
0x13ec…1408 Head {h00=0x0018, h01=0x0050, text=» FMEL 'ZZZZX',BLFACT«, t00=0x000c, t01=0x0130}
0x1408…141e Head {h00=0x0012, h01=0x0050, text=» FLINK FNOREC «, t00=0x000c, t01=0x014c}
0x141e…142a Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000c, t01=0x0162}
0x142a…1446 Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x000c, t01=0x016e}
0x1446…145a Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x000c, t01=0x018a}
0x145a…1468 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000d, t01=0x000e}
0x1468…1472 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001c}
0x1472…1486 Head {h00=0x0010, h01=0x0050, text=»FNOREC FRMT «, t00=0x000d, t01=0x0026}
0x1486…1492 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x000d, t01=0x003a}
0x1492…14a8 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'NO.'«, t00=0x000d, t01=0x0046}
0x14a8…14b8 Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x000d, t01=0x005c}
0x14b8…14d6 Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'OF RECORDS:'«, t00=0x000d, t01=0x006c}
0x14d6…1508 Head {h00=0x002e, h01=0x0050, text=» FKI 17,MINL=1,MAXL=5,ME,NEOI,REWRT,APPL=4«, t00=0x000d, t01=0x008a}
0x1508…1532 Head {h00=0x0026, h01=0x0050, text=» FMEL 'ZZZZX',NOREC NO. OF RECORDS«, t00=0x000d, t01=0x00bc}
0x1532…1540 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x000d, t01=0x00e6}
0x1540…154a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f4}
0x154a…1554 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fe}
0x1554…1560 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x000d, t01=0x0108}
0x1560…1564 Head {h00=0x4004, h01=0x0000}
0x1564…1568 00 0d 01 14 ┆ ┆
0x1568…1570 (14, 1, 8) 20 04 00 00 00 0e 00 04 ┆ ┆
0x1570…1572 (15, 0, 2) 15 b8 ┆ ┆
0x1572…157e (16, 0, 12) 00 08 00 48 45 4e 44 20 00 00 00 04 ┆ HEND ┆
0x157e…1586 (17, 1, 8) 20 04 00 00 00 01 00 04 ┆ ┆
0x1586…158e (18, 1, 8) 20 04 00 00 00 02 00 04 ┆ ┆
0x158e…15de (19, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]
0x162e…167e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 3a 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 20 02 00 0e a0 02 00 10 00 03 00 00 a0 02 00 16 00 09 00 00 80 12 00 28 00 10 ┆ : ( ┆
0x167e…16ce 00 00 00 40 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 42 20 02 00 00 20 02 00 02 20 02 00 04 ┆ @ B ┆
0x16ce…171e 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 20 02 00 0e 20 02 00 10 20 02 00 12 00 01 00 14 00 02 00 15 00 06 00 17 00 06 00 1d 00 0a 00 23 00 0f 00 2d 00 2e 20 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 ┆ # - . ┆
0x171e…176e (20, 0, 400) 00 00 a0 02 00 02 00 18 00 00 b0 02 00 32 00 08 00 00 b0 0b 00 42 00 02 00 00 00 78 00 58 80 19 00 d0 00 03 00 00 00 40 01 1b 01 04 00 00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 B x X @ ┆
0x176e…17be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
[…0x1…]
0x180e…185e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 06 01 00 00 00 00 24 00 00 00 00 00 00 00 00 00 00 ┆ $ ┆
0x185e…18ae 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 42 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 20 02 00 0a 20 02 00 0c 20 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 ┆ B ┆