|
查看上一个主题 :: 查看下一个主题
|
| 作者 |
信息 |
jpraveenreddy
新的用户
已加入：2007年11月30日
帖子：28
地点：迈索尔
|
|
|
|
嗨，朋友们，
4020-NEW-RECORD-PARA。
将xxxx-yyy-NBR移动到WS-xxxx-yyy-NBR-SRT
将xxxx-yyyy-CD移动到WS-xxxxx-yyyy-CD-SRT
阅读zzzzzSORT
结束时继续
表现不佳4020-COMPARE-KEY-PARA
结束阅读。
4020-COMPARE-KEY-PARA。
如果xxxxx-DLR-KEY与WS-xxxxx-SRT-KEY相等
执行4030-UPDATE-DATE-PARA。
一旦满足IF语句（即在执行4030-UPDATE-DATE-PARA之后），控制就应该出现。
指导我该怎么做。 |
|
| 回到顶部 |
|
 |
Craq Giegerich
高级会员
加入时间：2007年5月19日
帖子：1512
地点：美国弗吉尼亚
|
|
|
|
| 如果不满意，您想怎么办？ |
|
| 回到顶部 |
|
|
jpraveenreddy
新的用户
已加入：2007年11月30日
帖子：28
地点：迈索尔
|
|
|
|
| 根据我得到的信息，这种情况不会发生。 |
|
| 回到顶部 |
|
|
Craq Giegerich
高级会员
加入时间：2007年5月19日
帖子：1512
地点：美国弗吉尼亚
|
|
|
|
| jpraveenreddy写道： |
| 根据我得到的信息，这种情况不会发生。 |
那为什么要有中频呢？ |
|
| 回到顶部 |
|
|
jpraveenreddy
新的用户
已加入：2007年11月30日
帖子：28
地点：迈索尔
|
|
|
|
| 引用： |
如果xxxxx-DLR-KEY与WS-xxxxx-SRT-KEY相等
|
我必须比较来自不同文件的这两个字段，如果满足条件，则必须填充字段。
有什么办法吗？ |
|
| 回到顶部 |
|
|
Craq Giegerich
高级会员
加入时间：2007年5月19日
帖子：1512
地点：美国弗吉尼亚
|
|
|
|
| 如果不满足if，则程序流将转到IF之后的语句；如果满足if，则将执行4030-UPDATE-DATE-PARA。 |
|
| 回到顶部 |
|
|
阿努·达万（Anuj Dhawan）
高级会员
已加入：2006年4月22日
帖子：6250
地点：印度孟买
|
|
|
|
| jpraveenreddy写道： |
4020-COMPARE-KEY-PARA。
如果xxxxx-DLR-KEY与WS-xxxxx-SRT-KEY相等
执行4030-UPDATE-DATE-PARA。 |
你好
这样，如果将在4030-para之后执行任何这样的语句，则控制将转到COBOL程序的下一个可执行语句。您可以使用EVALUATE，但EVALUTE的范围将持续到下一次WHEN为止，所有内容将在WHEN之间执行。
嗯...我确定你没有在寻找这个答案，所以显示更多的代码&关于“情况”的更多解释可能会带来更好的建议。祝好运.. |
|
| 回到顶部 |
|
|
jpraveenreddy
新的用户
已加入：2007年11月30日
帖子：28
地点：迈索尔
|
|
|
|
这里有更多的解释：
这个
是一个平面文件（PS）。
我正在阅读
从上面的文件。
我在读
从VSAM文件。
如果钥匙
存在于PS中，我必须执行
| 引用： |
| 4030-UPDATE-DATE-PARA |
.
因此，一旦找到匹配的键，就应该停止阅读PS。
否则，这将陷入无限循环（我认为，由于执行JCL时S322异常终止，如果我做错了，请更正我）。 |
|
| 回到顶部 |
|
|
jpraveenreddy
新的用户
已加入：2007年11月30日
帖子：28
地点：迈索尔
|
|
|
|
没有办法吗？  |
|
| 回到顶部 |
|
|
迪克·谢勒
主持人荣誉
已加入：2006年11月23日
帖子：19245
位置：矩阵内部
|
|
|
|
你好，
当然有。 。
为了获得有用的答复，您需要更清楚地说明您的要求。
一个容易做到的是发布一些“输入”数据和输入所需的处理。显示满足输入文件之间所有条件的数据。 |
|
| 回到顶部 |
|
|
Craq Giegerich
高级会员
加入时间：2007年5月19日
帖子：1512
地点：美国弗吉尼亚
|
|
|
|
| 引用： |
| 因此，一旦找到匹配的键，就应该停止阅读PS |
你是在自问自答。 |
|
| 回到顶部 |
|
|
克鲁梅
新的用户
已加入：2008年2月26日
帖子：4
地点：俄亥俄州范维尔特
|
|
|
|
| Read语句上的AT END条件不应为CONTINUE，您没有逻辑地退出READ。根据程序的启动方式，您需要类似STOP RUN或EXIT的内容。 “继续”将带您进入程序的下一部分，即4020-COMPARE-KEY-PARA。 |
|
| 回到顶部 |
|
|
马达哈维克
新的用户
已加入：2007年10月27日
帖子：1
所在地：佛罗里达
|
|
|
|
你好
我希望这个答案对您有帮助。
一旦满足您的IF条件，请尝试将一些变量设置为true。
然后，您可以使用此变量来控制您的PS文件读取段。
如果不清楚，请回复我
马杜 |
|
| 回到顶部 |
|
|
迪克·谢勒
主持人荣誉
已加入：2006年11月23日
帖子：19245
位置：矩阵内部
|
|
|
|
你好，
我对需求的理解（并且我的理解肯定不完整）告诉我需求没有完全定义，因此我怀疑任何解决方案建议也将是不完整的。
再次，如果发布了一些输入数据样本以及应该如何处理这些数据，我们可以提供更好的建议。
如果ps文件中有50条记录，vsam文件中有200条记录，其中有20条“匹配”，那么除了第一个匹配之外的19个“匹配”应该如何处理？ |
|
| 回到顶部 |
|
|
|
|
