用於創建PDS和成員的JCL文件

Question

如何編寫將在同一PDS內創建PDS和成員的JCL文件？

Answer 1

只有在您寫信給新PDS的情況下，才能建立成員。如果你這樣做：

//S1  EXEC PGM=IEFBR14          
//PDS  DD DSN=USER.TEST.PDS(NEWMEM),DISP=(NEW,CATLG),  
//   SPACE=(TRK,(1,1,24)),UNIT=DISK,      
//   LRECL=80,RECFM=FB,BLKSIZE=6080 

...你將得到PDS編目，但會員不會被保存。如果您執行寫入該成員的程序，例如：

//S2  EXEC PGM=IEBGENER          
//SYSUT1 DD *             
//SYSUT2 DD DSN=USER.TEST.PDS(NEWMEM),DISP=(NEW,CATLG),  
//   SPACE=(TRK,(1,1,24)),UNIT=DISK,      
//   LRECL=80,RECFM=FB,BLKSIZE=6080      
//SYSPRINT DD SYSOUT=*           
//SYSIN DD DUMMY 

...然後成員將被保存。

聽起來好像你想爲以後的工作或步驟創建一個空的成員。通常這是不必要的，因爲BPAM將創建一個成員，如果它不存在並覆蓋現有成員（如果它存在）。

Answer 2

IEBCOPY也適合你。它用於創建PDS或通過選擇或省略PDS所需的記憶體將PDS部分或全部複製到其他PDS。它將上面提到的兩個步驟合併爲一個......我希望我已經說清楚了。回來，如果你需要JOB語法..