如何使用JCL编辑pds的成员名称？

Question

我想使用JCL将PDS的所有成员复制到另一个具有已编辑名称的成员。我已将PDS的所有成员复制到另一个成员，但如何编辑成员名称。

Answer 1

IDCAMS ALTER ... JCL看起来像是：

//STEPX EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSIN    DD *
 ALTER HLQ.MY.PDS(OLDNAME) NEWNAME(HLQ.MY.PDS(NEWNAME))
 ... for as many members as you want to rename
/*

Answer 2

我在底部包含了2个超链接，用于我将简要讨论的实用程序。

  

我想使用JCL将PDS的所有成员复制到另一个具有已编辑名称的成员。

首先确定您是否在内部使用SAS。如果是这样，那么使用PROC SOURCE代替IEBPTPCH [更难]，以便首先获得顺序数据集[对于Rio Linda中的那些人来说，它是一个平面文件]。然后前往TSO 2 [edit]或3.4并使用TSO编辑器编辑此顺序数据集，以根据需要手动更改每个成员的名称。如果你已经使用IEBPTPCH意识到你还必须做一些PROC SOURCE为你做的额外更改。然后保存此顺序数据集，注意每个成员现在都已列出，您甚至可以在TSO编辑器中对每个成员进行批量更改 - 即每个成员的所有工作卡中的帐号更改都很容易使用查找/更改键，因为您将此视为一个长序列文件。

  

我已将PDS的所有成员复制到另一个成员，但如何编辑成员名称。

现在使用IEBUPDTE将重建的顺序数据集作为// SYSIN，将新的输出文件用作新的PDS，使用// SYSUT2作为输出！这太容易了。

现在，在您创建了一个全新的PDS / TSO库后，您会发现完全没有统计数据。哇。不要惊慌。继续前往TSO 3.5并重新开始，你很高兴。

祝你好运。

PROC SOURCE IEBPTPCH & IEBUPDTE