| Example 52 - Using the MOUNT utility function to verify an Archive Volume copied from the network |
COPY *METALOGIC/COPYWRITE
TO #MYTESTVOLUME(CD,HOSTNAME=CPNTA,
USERCODE='anonymous',AUTOUNLOAD=ON)[T];
IF (T(TASKVALUE) = 0) THEN
BEGIN
T(STATUS=NEVERUSED);
COPY [FTP] #MYTESTVOLUME(FTPSTRUCTURE=FTPFILE,FTPTYPE=IMAGE)
FROM DISK(HOSTNAME=CPNTA,USERCODE='anonymous')[T];
IF (T(TASKVALUE) = 0) THEN
RUN *METALOGIC/COPYWRITE("MOUNT " & MYTESTVOLUME);
END; |
| In this example, the response from
COPYWRITE was,
(METALOGIC)FRED on SUPPORT (PACK) has LMCD file system, and is PROMBURNERDATA |
|