■  ソースモジュールコピーサンプル

▲その１（ライブラリー単位）

//STEP1		EXEC	PGM=IEBCOPY
//SYSPRINT		DD	SYSOUT=*
//IN1		DD	DSN=INLIB,DISP=SHR
//OT1		DD	DSN=OUTLIB,DISP=SHR
//SYSIN		DD	*
	COPY INDD=((IN1,R)),OUTDD=OT1
/*

※INDDにRを指定しないと、既に存在するメンバーは置き換わりません。

---

▲その２（メンバー単位）

//STEP1		EXEC	PGM=IEBCOPY
//SYSPRINT		DD	SYSOUT=*
//IN1		DD	DSN=INLIB,DISP=SHR
//OT1		DD	DSN=OUTLIB,DISP=SHR
//SYSIN		DD	*
	COPY INDD=((IN1,R)),OUTDD=OT1
	SELECT MEMBER=((AAA001,BBB001))
/*

※INDDにRを指定しないと、既に存在するメンバーは置き換わりません。

※MEMBERに第２パラメータを指定するとその名前でコピーされます。
  同名でコピーする場合は、 MEMBER=(AAA001) のように指定します。

※ロードモジュールをコピーする場合は、COPYでなくCOPYMODを使います。
  同名でコピーする場合は、 MEMBER=(AAA001) のように指定します。

BEFORE PAGE

TOP PAGE