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

读取PS文件的内容


IBM大型机论坛 -> JCL& VSAM
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
scorp_rahul23

新的用户


已加入:2008年5月6日
帖子:96
地点:德里

发布发表:2016年3月28日星期一10:28 pm
引用回复

1.我要计算PS文件的内容,如果count是2则处理

码:

// IDR123   EXEC PGM = MDCAMS,REGION = 0M                   
// INFILE   DD DSN = F9340T.IDR.COUNT.FILE,               
//            DISP=SHR                                 
//输出文件  DD DUMMY,                                   
//            DCB=(RECFM = FB,LRECL = 80,BLKSIZE = 0)       
// SYSIN    DD *                                       
  REPRO 资料(INFILE) 输出文件(OUTFILE) COUNT(2)       
/*                                                     


2.读取文件的内容。文件为80字节FB,其中包含PS文件名

3.将在步骤2中找到的第一条记录用作DD,以进行下一步。


我不确定如何实现步骤3。任何建议。
回到顶部
查看用户资料 发送私信
赤胜

全球主持人


已加入:2009年10月3日
职位:1788
地点:伊利诺伊州布卢明顿

发布发表:2016年3月28日星期一10:59 pm
引用回复

您打算用哪种语言实施此过程?
回到顶部
查看用户资料 发送私信
scorp_rahul23

新的用户


已加入:2008年5月6日
帖子:96
地点:德里

发布发表:2016年3月28日星期一11:16 pm
引用回复

just thinking if we can do this in JCLonly without COBOL or REXX
回到顶部
查看用户资料 发送私信
赤胜

全球主持人


已加入:2009年10月3日
职位:1788
地点:伊利诺伊州布卢明顿

发布发表于:2016年3月28日星期一11:43 pm
引用回复

As you should know, JCLdoes and can do nothing except set up environments and execute programs.

由于JCL在提交和解释时是冻结的,因此您不能动态更改它以使用从数据集或其他任何来源读取的DSN。相反,您必须让步骤3中的程序使用Rexx中的TSO ALLOCATE命令或COBOL中的BPXWDYN来读取数据集并动态分配数据集。
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> JCL& VSAM

 


类似主题
话题 论坛 回覆
该主题已锁定:您无法编辑帖子或回复。 将匹配的记录写入输出文件 DFSORT / ICETOOL 11
没有新帖 比较文件记录计数百分比... DFSORT / ICETOOL 4
没有新帖 比较两个文件以查找位置/日期... 同步排序 2
没有新帖 将文件从PD转换为显示... 同步排序 4
没有新帖 RECFM = U磁带文件的记录数 DFSORT / ICETOOL 17
搜索我们的论坛:


回到顶部