cobol - 读取平面文件。使用 COBOL 检索特定行

我有一个像这样的平面文件:

1|sal|manager|2007/01/01|2007/12/31
2|sal|manager|2008/01/01|2008/12/31
3|per|abc|manager
4|sal|manager|2007/01/01|2007/12/31
5|per|xyz|ceo

我必须使用 COBOL 读取文件，并将包含字符串 sal 的行写入临时文件。
unstring 是一个不错的选择吗？请建议我解决这个问题的方法。

提前致谢。

最佳答案

您是否考虑过使用 INSPECT ？以下内容也适用于您...

MOVE ZERO TO COUNTER
INSPECT INPUT-RECORD TALLYING COUNTER FOR ALL '|SAL|'
IF COUNTER > ZERO
   write to temp file
END-IF

COUNTER 是一些用于接收计数的数字工作存储变量
中找到的字符串 |SAL| 的非重叠出现次数的数量INPUT-RECORD 。

关于cobol - 读取平面文件。使用 COBOL 检索特定行，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/6314697/