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

如何获取RRDS文件中的最后一个RRN?


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

新的用户


已加入:2006年3月27日
帖子:97
地点:印度

发布发表:2011年8月12日,星期五,下午6:00
引用回复

我想从RRDS文件中检索最后一个RRN,我尝试将-1移到STARTBR语句中RIDFIELD的值。但是在通过READPREV读取文件时,它没有提供正确的RRN。

05 WS-LAST-RRN PIC S9(8)COMP。
将-1移至WS-LAST-RRN

请帮助我到达记录的最后一个RRN。
回到顶部
查看用户资料 发送私信
比尔·伍德格

主持人荣誉


加入时间:2011年3月9日
帖子:7311
位置:矩阵内部

发布发表:2011年8月12日,星期五,下午6:09
引用回复

你为什么要这个?

如果RRDS的行为类似于其他类型的VSAM,则实际上没有最后一个数字。如果您按顺序添加记录,并且数据集得到另一个范围,则“最后一个数字”将更改。我已经使用RRDS来记录大量不同的日期集。不能说我实际上知道使用了多个扩展区,但是如果不这样做,我会感到惊讶。
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

发布发表:2011年8月12日,星期五,下午6:28
引用回复

引用:
但是在通过READPREV读取文件时,它没有提供正确的RRN。
它给你什么?与您得到的相反,正确的RRN是什么?
回到顶部
查看用户资料 发送私信
比尔·奥博伊尔

CICS主持人


已加入:2008年1月14日
帖子:2504
地点:美国乔治亚州亚特兰大

发布发表:2011年8月12日,星期五,下午6:36
引用回复

可能需要事先关闭/打开文件(目录更新)以获得最后的RRN,因为这是在ESDS文件中获得最后的RBA的要求。

法案
回到顶部
查看用户资料 发送私信
rajesh_mbt

新的用户


已加入:2006年3月27日
帖子:97
地点:印度

发布发表:2011年8月12日,星期五,晚上7:14
引用回复

感谢您的迅速反应。该文件正在由其他程序更新,我只想从我的程序中读取它。
假设文件已更新并包含100条记录。我想从第100条记录中往回读。

为此,我应该获得100作为最后一个RRN编号。
我的问题是如何指向/获取文件上的最后一条记录(即100)。
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

发布发表:2011年8月12日,星期五,晚上7:25
引用回复

引用:
假设文件已更新并包含100条记录。
我不知道您是否故意被钝化,还是只是不了解RRDS。

假设您正在处理固定长度的RRDS(因为可变长度的RRDS将使您几乎无法执行任何操作)-RRDS包含固定数量的记录“插槽”-该数量由记录大小以及分配给RRDS的磁道/圆柱体等的数量。这些“插槽”可能包含数据,也可能为空-但它们始终存在。

因此,当您说“包含100条记录”时,是指:
1. RRDS被分配了100个时隙?
2. RRDS分配了未知数量的时隙,并且前100个有数据吗?
3. RRDS分配了未知数量的插槽,并且有100个不为空的插槽散布在整个文件中-这很有可能吗?
4.您还没有完全解释的其他内容?
回到顶部
查看用户资料 发送私信
rajesh_mbt

新的用户


已加入:2006年3月27日
帖子:97
地点:印度

发布发表:2011年8月12日,星期五7:26 pm
引用回复

罗伯特·萨普(Robert Sample)写道:
引用:
但是在通过READPREV读取文件时,它没有提供正确的RRN。
它给你什么?与您得到的相反,正确的RRN是什么?

尽管正在将文件添加到具有下一个序列RRN的记录中,但我却得到一个恒定的相同数字 icon_sad.gif .
我不确定如何获得与上一个记录相同的RRN !!!
我对RIDFIELD的Move语句-1是否正确?我认为这应该是指向最后记录的其他方式。 icon_confused.gif
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

发布发表:2011年8月12日,星期五,下午7:32
引用回复

引用:
我不确定如何获得与上一个记录相同的RRN !!!
好的,所以您不知道RRDS的工作原理。记录已添加到RRDS 必须 适合现有的插槽之一。您将为最后一条记录返回相同的RRN,因为最后一条记录号不会更改-当“添加”记录时,RRDS文件不会像ESDS或KSDS那样扩展自身,因为必须使用给定文件预先分配文件插槽数。

使用-1表示RIDFLD的手动状态将返回最后一个插槽号-但同样,它将是一个固定值,直到删除文件并使用不同数量的磁道或圆柱体重新定义该文件后,该值才会更改。 您不能使用RRDS文件的最后一个RRN查找“添加”的最后一条记录,因为这将取决于该记录放置在哪个插槽中。
回到顶部
查看用户资料 发送私信
rajesh_mbt

新的用户


已加入:2006年3月27日
帖子:97
地点:印度

发布发表:2011年8月12日,星期五,晚上7:35
引用回复

罗伯特·萨普(Robert Sample)写道:
引用:
假设文件已更新并包含100条记录。
我不知道您是否故意被钝化,还是只是不了解RRDS。

假设您正在处理固定长度的RRDS(因为可变长度的RRDS将使您几乎无法执行任何操作)-RRDS包含固定数量的记录“插槽”-该数量由记录大小以及分配给RRDS的磁道/圆柱体等的数量。这些“插槽”可能包含数据,也可能为空-但它们始终存在。

因此,当您说“包含100条记录”时,是指:
1. RRDS被分配了100个时隙?
2. RRDS分配了未知数量的时隙,并且前100个有数据吗?
3. RRDS分配了未知数量的插槽,并且有100个不为空的插槽散布在整个文件中-这很有可能吗?
4.您还没有完全解释的其他内容?


我提到的那100条记录就是一个例子。该文件已经运行了很多年,所以我对此一无所知。另外,我不确定您为什么要这么复杂。
通常,您如何获得上一个RRN?感谢您的答复..
回到顶部
查看用户资料 发送私信
rajesh_mbt

新的用户


已加入:2006年3月27日
帖子:97
地点:印度

发布发表:2011年8月12日,星期五,晚上7:37
引用回复

罗伯特·萨普(Robert Sample)写道:
引用:
我不确定如何获得与上一个记录相同的RRN !!!
好的,所以您不知道RRDS的工作原理。记录已添加到RRDS 必须 适合现有的插槽之一。您将为最后一条记录返回相同的RRN,因为最后一条记录号不会更改-当“添加”记录时,RRDS文件不会像ESDS或KSDS那样扩展自身,因为必须使用给定文件预先分配文件插槽数。

使用-1表示RIDFLD的手动状态将返回最后一个插槽号-但同样,它将是一个固定值,直到删除文件并使用不同数量的磁道或圆柱体重新定义该文件后,该值才会更改。 您不能使用RRDS文件的最后一个RRN查找“添加”的最后一条记录,因为这将取决于该记录放置在哪个插槽中。


感谢罗伯特的答复。实际上,对RRDS并不熟悉,这就是为什么感到困惑。
让我在这里也检查一下
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

发布发表:2011年8月12日,星期五,晚上7:43
引用回复

我花时间解释所有这一切,因为您的问题不在于如何在CICS中获取RRDS的最新记录-这很容易;因为这很简单。将-1移到RIDFLD并进行读取。但是,该记录不是您想要的。您需要最后更新的记录,而这是一大批蠕虫病毒-根据文件的设置和使用方式,FIRST记录(RRN零)可能最后被更新了。

没有更多的信息,并且您对RRDS文件和应用程序没有更多的了解,您想要的东西就无法完成-至少基于到目前为止您给我们的信息。
回到顶部
查看用户资料 发送私信
dbzTHEdinosauer

全球主持人


已加入:2006年10月20日
帖子:6967
位置:瓷宝座

发布发表:2011年8月12日,星期五,晚上7:50
引用回复

我们对rrds文件总是有一个简单的方法。
第一个插槽始终包含一个字段,该字段的值是下一个可用字段。

没有人可以没有某种控制就“只是将记录添加到rrds”。

正如TS所说,“他什么都不知道”。

这是一个特定于站点的事情,应由TS处理 有人在那里!
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

发布发表:2011年8月12日,星期五,晚上7:55
引用回复

迪克-实际上,这甚至不是特定于站点的问题。这是特定于该站点上特定应用程序的问题。我知道一些应用程序将第一个插槽用于控制数据,而我知道一些应用程序将LAST插槽用于控制数据。但是,正如您所说,记录不会“添加”到RRDS中-给定的插槽将从空更新为包含数据,或者从包含数据更新为包含其他数据。
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> JCL& VSAM

 


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


回到顶部