10、COBOL文件处理全解析

COBOL文件处理全解析

1. JCL参数与文件处理基础

在文件处理操作中，一些JCL（作业控制语言）参数起着关键作用：
- RECFM=FB ：表示记录格式为固定块格式。
- SPACE ：用于请求驱动器上的空间。
- SYSOUT= ：用于将记录写入磁盘驱动器的文件，这里的 * 指向输出将被写入的假脱机类。
- DISP参数 *：用于指定文件的使用方式，常见取值如下：
| 值 | 含义 |
| — | — |
| SHR | 共享，适用于不进行更新的文件 |
| OLD | 根据自身进程锁定文件中的记录，但不常用 |
| NEW | 指定要创建的文件 |
| CATLG | 为数据集创建目录条目 |
| DELETE | 在作业步骤异常处理时删除数据集 |

在使用JCL时，每个 ddname 都必须有一个 DD 语句，且它们在脚本中的顺序并不重要。使用 ddname 看似复杂，但实际上很有用，当系统程序员更改大型机驱动器上的文件名时，只需修改JCL脚本，而无需重新编写COBOL代码。

2. 库存更新程序示例

下面是一个库存更新程序的示例，该程序涉及主库存文件、交易文件、新库存主文件和错误日志文件的处理。