Hmmmm... having worked for VESOFT for a few years, my initial thought was
"the customer must have created the file in the cmd22 group", but in
checking my copy here I see it as well, so it really is something VESOFT is
distributing.

The silent replacement of commands found in cmd22 in preference to other
sources [i.e., somewhere on you HPPATH as an implied run] is a design
decision they made.  Not reporting it with "help tapecopy" is another

Looking at the command file, I'm surprised to see that it does the restore
WITHOUT the "keep" option -- the general philosophy of VESOFT is not to
disrupt the system as a "side effect", and restoring "old versions"
certainly qualifies as a "side effect".

I suspect this was either originally a "contributed" command file or one
that Vladimir himself designed and added to the distribution -- it may have
even been one that one of the techs built to solve a customer's problem
(such as creating a copy of a tape JUST stored) and as such was deemed
"useful"...

> -----Original Message-----
> From: Doug Werth [mailto:[log in to unmask]]
[...]
>
> PS. Here are the contents of the file for anyone who is interested.
>
> %print tapecopy.cmd22.vesoft
> PARM INDFILE=VEINDIR, [log in to unmask]@.@, LIM=9999
> COMMENT
> COMMENT This command will restore a fileset from tape (using ;CREATE)
> COMMENT and build an indirect file called !INDFILENAME that you can
> COMMENT then pass to STORE to make copies of the tape.
> COMMENT
> comment Save and reset file eq (SYSLIST might be there)
> many %filter listeq,'FILE';start=3>veeq  %reset @
> many %:PURGE !INDFILE>$NULL %BUILD !INDFILE;REC=-26,,,ASCII;DISC=!LIM
> many %SETLVAR VESOFTDEFAULTPRINT ""  %SETLVAR VESOFTDEFAULTALTFILE ""
> %filter "RESTORE;!FILESET;CREATE;SHOW",R MATCHES "@#@" AND
> R[8:1]=".";&
>        FORMAT=STRCHANGE(R[0:26]," ","");OUT=(!INDFILE,OLD)
> veeq
> many %ALTFILE !INDFILE;SQUEEZE  %LISTF !INDFILE,2
>

As I mentioned, adding ";KEEP" somewhere on the restore command would cause
this to be less intrusive when copying "old" tapes, but could restore
several files that are no longer current (and, therefore, no longer exist,
thus not causing a conflct with ;keep) It would also not make "exact" copies
since the files on disk would not match the files on tape, but this could be
a "good thing" if you want the files on tape to always be the current
files...