■ データセットをコピー・移動するサンプル
▲その1~コピーの例
//COPY JOB CLASS=x,MSGCLASS=x,REGION=4M //STEP01 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=* //FROM DD UNIT=3390,DISP=SHR,VOL=SER=DEV001 //TO DD UNIT=3390,DISP=SHR,VOL=SER=DEV002 //SYSIN DD * COPY DATASET(INCLUDE(SYS1.**)) - INDDNAME(FROM) OUTDDNAME(TO) /*
▲その2~移動の例 (マニュアルより記載)
//MOVER JOB CLASS=x,MSGCLASS=x,REGION=4M //STEP1 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY DATASET( - INCLUDE(USER1.**) - BY(MULTI,=,NO)) - INDYNAM (338000) - OUTDYNAM(338001) - DELETE /*
この例では、338000 というラベルのソース・ボリュームのデータ・セットのうち 第 1 レベル修飾子が USER1 のすべての単一ボリューム・データ・セットを、 338001 というラベルのターゲット・ボリュームにコピーするデータ・セット・コ ピー操作を示します。選択されたすべてのソース・データ・セットは削除されま す。コピーされる非 SMS、非 VSAM データ・セットはカタログされません。