使用 CICS + Cobol 验证来自 VSAM 文件的数据

【问题标题】：Validation of data from VSAM file using CICS + Cobol使用 CICS + Cobol 验证来自 VSAM 文件的数据
【发布时间】：2015-01-23 00:13:59
【问题描述】：

我有一个包含客户详细信息的 VSAM 文件，客户编号是其中之一。在 CICS 中，用户必须输入客户编号。 当且仅当客户编号出现在 VSAM 文件中时，才会发送下一张地图。

如何验证 VSAM 文件中的客户编号？

【问题讨论】：

只有必须在您的站点上有一个已经在执行此操作的程序。如果您不知道如何找到它，您有同事可以提供帮助。以与已经完成的方式相同的方式去做比想出不同的方式更好（并不是说真的有很多不同的方式可以做到这一点）。
我同意比尔的观点，对于您需要在大型机上编写的任何内容，都会有一个现有的示例，询问并环顾四周，学习基础知识并学习如何使用扫描。大多数大型机程序员“收集”他们可以用作示例/复制的程序。

标签： cobol cics

【解决方案1】：

CUSTOMER NO 听起来好像是一个数字，您应该验证它是一个数字。

要检查它是否存在于 CICS 中，您可以使用 CICS READ 命令参见Cics Read；即

Exec CICS
    Read File(..)
    INTO(data-area) RIDFLD(data-area)
    blah blah blah ...
end exec.

RIDFLD 是记录键

我建议在您工作的地方（我假设您不是学生）找到一个现有计划，并将其用作示例。现在很少在大型机上从头开始编写程序。几乎总是有一个现有的示例可供您查看。

您还应该向我们展示您尝试过什么！！！

【讨论】：

我想不出一种不同的方法来真正做到这一点 :-) 我不喜欢数字只是因为它们的名称中有 NO，但它会发生（很多）。我会先进行查找，然后仅在未找到时才测试数字，但结果是相同的。