我想使用 JCL 将 PDS 的所有成员复制到另一个具有编辑名称的成员。我已将 PDS 的所有成员复制到另一个，但如何编辑成员名称。
问问题
4233 次
2 回答
3
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
/*
于 2013-06-17T20:43:49.403 回答
0
我在底部包含了 2 个超链接，用于我将简要讨论的实用程序。
我想使用 JCL 将 PDS 的所有成员复制到另一个具有编辑名称的成员。
首先确定您是否有内部 SAS。如果是这样，那么使用 PROC SOURCE 而不是 IEBPTPCH [更困难]，以便首先获得一个顺序数据集 [对于那些在 Rio Linda 的人来说，它是一个平面文件]。然后前往 TSO 2 [编辑] 或 3.4 并使用 TSO 编辑器编辑此顺序数据集，以根据需要手动更改每个成员的名称。如果您使用过 IEBPTPCH，请意识到您还必须进行一些 PROC SOURCE 为您所做的额外更改。然后保存这个顺序数据集，注意现在每个成员都已列出，您甚至可以在 TSO 编辑器中工作时对每个成员本身进行大规模更改 - 即每个成员的所有工作卡中的帐号更改就像使用查找/更改键，因为您将其视为一个长的顺序文件。
我已将 PDS 的所有成员复制到另一个，但如何编辑成员名称。
现在使用 IEBUPDTE 和重建的顺序数据集作为 //SYSIN 和新的输出文件作为你的新 PDS，使用 //SYSUT2 作为你的输出！这太容易了。
现在，在您创建了一个全新的 PDS/TSO 库之后，您会注意到统计数据完全丢失了。哇。不要惊慌。前往 TSO 3.5 并将它们重新放入，你就可以开始了。
祝你好运。
于 2017-07-20T15:13:28.500 回答