It might be advantageous to give a listf BINLD01K.xxxxx,3
just to see what the filecode is.
I'll demostrate by copying an Image dataset,
then purge with STORE.
Keven
:DSCOPY text01.spw to test01;fcode=-401
Source file: TEXT01.SPW.KEVENM
Target file: TEST01.PUB.KEVENM
3 logical record(s) transferred.
:LISTF test01,2
THU, SEP 28, 2006, 12:53 PM
ACCOUNT= KEVENM GROUP= PUB
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
TEST01 PRIV 512W FB 3 3 1 16 1 1
:file n=$null
:store test01;*n;purge
>> TURBO-STORE/RESTORE VERSION C.60.24 B5152AA <<
(C) 1986 HEWLETT-PACKARD CO.
STORE test01;*n;PURGE
THU, SEP 28, 2006, 12:53 PM
FILES STORED : 1
TOTAL MEDIA WRITTEN : 1
:LISTF test01,2
THU, SEP 28, 2006, 12:54 PM
LISTF test01,2;$STDLIST
Non-existent file. (CIERR 907)
:
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|