Question

我想使用REXX 将一个加载模块从一个pds复制到另一个。

Answer 1

您可以在Rexx中调用IEBCOPY，在调用IEBCOPY之前将适当的数据集分配给相应的ddnames。

我无法提供示例，因为我没有设施/访问权限。

请注意，这样做会占用您的终端/会话。

您还可以使用更精细的解决方案来构建和提交批处理作业，甚至可能有一个面板前端，驱动文件剪裁/骨架。

Answer 2

正如@cshneid所说，你可以使用IEBCOPY在rexx中使用IEBCOPY与JCL基本相同，但是：

使用TSO Alloc分配文件
致电/调用程序

如果在ISPF下运行，您可以使用LMCOPY。大致以下应该有效，您可能需要在data-id上发出LMOPEN / LMClose ???

Address ISPEXEC
'LMINIT DATAID(DIDFrom) Dataset(in.data.set)'
'LMINIT DATAID(DIDTo) Dataset(to.data.set)'
'LMCOPY FromId('DIDFrom') FROMMEM(mymem) toId('DIDTo') toMem(newMemberName)'
'LMFREE DATAID(DIDFrom)'
'LMFREE DATAID(DIDto)'

如果运行前台，ISPF服务过去具有优势，因为它们与所有其他ISPF用户“协调”了这些操作 - 不太可能破坏PDS目录。不确定这是否有优势。

Answer 3

仅使用REXX无法执行您想要执行的操作，但是，您可以调用IEBCOPY（或您的站点等效项）来执行任务。你可能想调查像IEBCOPY这样的调用程序，并传递适当的控制卡来执行你的任务。

如何使用rexx复制加载模块？

3 个答案: