Example 23 - Copying a CANDE file from an ASeries ISO9660 Data CD as ALIGNED180 |
COPY
*SYMBOL/EDITOR/TEXTBOOK AS TEXTBOOK TO #MYTESTVOLUME(CD,HOSTNAME=LOCAL,SCRATCHPOOL=ASERIES)[T]; IF (T(TASKVALUE)=0) THEN BEGIN T(STATUS=NEVERUSED); T(FILE FILE000001(FILESTRUCTURE=ALIGNED180,FRAMESIZE=48)); COPY TEXTBOOK FROM #MYTESTVOLUME(CD,LOCKEDFILE,SCRATCHPOOL=ISO9660,HOSTNAME=LOCAL)[T]; END; |
![]() |
|