T(FILE #MYTESTVOLUME(FILENAME=#MYTESTVOLUME/SPECIAL,
FAMILYNAME=LIBRARY));
COPY *METALOGIC/COPYWRITE AS *JUNK
TO #MYTESTVOLUME(CD,HOSTNAME=LOCAL)[T];
IF (T(TASKVALUE)=0) THEN
BEGIN
T(STATUS=NEVERUSED);
T(FILE #MYTESTVOLUME(FILENAME=#MYTESTVOLUME/SPECIAL,
FAMILYNAME=LIBRARY));
COPY *JUNK AS JUNK
FROM #MYTESTVOLUME(CD,LOCKEDFILE,HOSTNAME=LOCAL)[T];
END; |
- If the CD-ROM archive volume should have a
filename other than the name given as the
<destination volume> in the COPY statement,
or the family should be different from the
current path of the WFL, then the <destination
volume> can be used as theNTNAME
of a label equated file which specifies a FILENAME and FAMILYNAME.
- In this example, #MYTESTVOLUME was given a multi
level filename, and located on a family different
from the WFL.
- This is the only way a multi-level filename can
be created, as the WFL COPY statement disallows
multi level family names.
|