将成员从一个 pd 复制到另一个？使用 jcl 语句

Posted 2023-02-16

【中文标题】将成员从一个 pd 复制到另一个？使用 jcl 语句

【英文标题】：copy a member from one pds to another? using the jcl statement

【发布时间】：2010-08-14 22:48:25

【问题描述】：

如何使用 IEBGENER 实用程序将成员从一个 pd 复制到另一个。

类似的东西：

//myjob job1
// exec pg=eibgener

??

其他的就不知道了。

【参考方案1】：

假设输出 PDS 已经创建并包含 足够的空间，你 可以试试这样的：

//jobname  your-jobcard-info                               
//stepname EXEC PGM=IEBGENER                    
//SYSUT1   DD DSN=input-pds(member),DISP=OLD 
//SYSUT2   DD DSN=output-pds(member),DISP=OLD
//SYSPRINT DD SYSOUT=*                          
//SYSIN    DD DUMMY                               
//*                                              

我认为 IDCAMS REPRO 现在更常用于这类事情。

【参考方案2】：

大多数人使用IEBCOPY 将成员从一个 PDS(E) 复制到另一个。可通过以下链接获得示例 JCL。