Example 10: Copying a HFS using logical COPY

//DSSJOB JOB  accounting information,REGION=nnnnK
//COPYSTEP EXEC PGM=ADRDSSU
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
COPY DATASET(INCLUDE(OMVS.SB.MVS090.JV390.HFS, -
       OMVS.SB.MVS090.XML.HFS)) -
       RENAMEU((OMVS.SB.MVS090.JV390.HFS, -
       OMVS.SB.MVS030.ROOT.HFS) -
       (OMVS.SB.MVS090.XML.HFS, -
       OMVS.SB.MVS030.XML.HFS)) -
       NULLSTORCLAS BYPASSACS(**) -
       ALLDATA(*) ALLEXCP CANCELERROR -
       LOGINDDNAME(MVS091) OUTDDNAME(MVS023) -
       SHARE -
       WRITECHECK
/*

Example 10 shows the required JCL for DFSMSdss to perform a logical copy of a HFS.