IBM大型机论坛索引
 
登录
 
IBM大型机论坛索引 大型机:搜索 IBM Mainframe论坛:常见问题解答 寄存器
 

通过共享卷跨LPARS移动文件


IBM大型机论坛 -> JCL& VSAM
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
巴拉特·拉贾兰(Bharath Rajaram)

新的用户


已加入:2012年12月10日
帖子:20
所在地:澳大利亚

发布发表:2013年6月26日星期三上午10:32
引用回复

你好

我需要将文件从一个LPAR(GSYS)传输到另一个LPAR(TSYS)。我们有一个卷VOL001,该卷在TSYS和GSYS之间共享。此卷是非SMS管理的。

要求是通过在GSYS LPAR中的作业中执行来创建的目录文件(始终AB将是HLQ-顺序文件,PDS,VSAM等),需要复制到VOL001,然后在VOL001中复制目录,然后在GSYS LPAR中删除。
为此,我使用了以下JCL,但没有得到所需的输出。数据集将移至其他卷,但不会移至我指定的卷。

请帮助我确定问题并纠正。当我检查作业输出时,没有看到任何警告和错误消息。

码:
//复制     EXEC PGM = ADRDSSU,PARM =('UTILMSG=YES')               
// SYSPRINT  DD  SYSOUT=*                                       
// SYSIN     DD  *                                             
   COPY DATASET(INCLUDE(AB.**)) -                             
   OUTDYNAM(VOL001)   / *动态分配ALLOC VOL VOL001    */ -
   删除目录力-                                     
   TGTALLOC(SOURCE)                                           
/*       
回到顶部
查看用户资料 发送私信
外籍人士

全球主持人


已加入:2007年3月14日
帖子:8794
地点:威尔士威尔士

发布发表:2013年6月26日星期三上午11:44
引用回复

您需要使用特殊的STORCLAS创建非SMS管理的数据集。

这是特定于站点的,因此请询问存储库。
回到顶部
查看用户资料 发送私信
巴拉特·拉贾兰(Bharath Rajaram)

新的用户


已加入:2012年12月10日
帖子:20
所在地:澳大利亚

发布发表:2013年6月26日星期三下午2点20分
引用回复

你好

使用以下工作来完成要求。

码:
//复制   EXEC PGM = ADRDSSU,PARM =('UTILMSG=YES')
// SYSPRINT DD  SYSOUT=*                                       
// SYSUDUMP DD  SYSOUT=*                                       
// SYSIN    DD  *                                             
  复制数据集(INCLUDE(AB.**)) -               
       OUTDY(VOL001) -                                       
       NULLMGMTCLAS  -                                       
       NULLSTORCLAS  -                                       
       BYPASSACS(**) -                                       
       CANCELERROR   -                                       
       CAT           -                                       
       DELETE        -                                       
       FORCECP(0)    -                                       
       PURGE         -                                       
       SPHERE        -                                       
       WAIT(10,10)                                           
// *     
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> JCL& VSAM

 


类似主题
话题 论坛 回覆
该主题已锁定:您无法编辑帖子或回复。 将文件列表从PS复制到另一个... 清单和REXX 11
没有新帖 JOINKEYS匹配两个输入文件... DFSORT / ICETOOL 3
没有新帖 两个文件之间的组比较/更新 DFSORT / ICETOOL 10
没有新帖 加入时需要协助格式化... 同步排序 8
没有新帖 将更多4个文件与已排序或已合并... DFSORT / ICETOOL 3
搜索我们的论坛:


回到顶部