与 cobol 中的重复记录进行文件比较

Question

如何比较 Cobol 中的两个文件，两个文件都有重复记录。 any1 可以给出伪代码。代码必须在重复记录条件下工作

Answer 1

我不确定您到底在追求什么（例如，您希望从比较中报告什么），但一个想法可能是按如下方式进行：

• 使用来自您的目标的数据加上一个连续的行号创建两个新的（临时）文件；将新文件从行号中删除
• 按行号遍历这两个文件，收集您需要的数据。
• 如果按旧密钥，record_1“小于”record_2，则推进file_1
• 如果更大，请提前 file_2
• 如果相等，则同时推进

在一个文件的 EOF 上，您需要检查剩余文件中的尾随唯一记录，这些记录可能在也可能不在 EOF。