当前位置 : 主页 > 网络推广 > seo >

读一个平面文件.使用COBOL检索特定行

来源:互联网 收集:自由互联 发布时间:2021-06-16
我有一个像这样的平面文件: 1|sal|manager|2007/01/01|2007/12/312|sal|manager|2008/01/01|2008/12/313|per|abc|manager4|sal|manager|2007/01/01|2007/12/315|per|xyz|ceo 我必须使用COBOL读取文件,并将具有字符串sal的行写
我有一个像这样的平面文件:

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.

网友评论