问题描述
是否有将 z/OS 上的文件转换为显示格式的通用过程？ 我在 z/OS 上有几百个文件，我需要先将它们转换为 display 格式，然后再将它们 NDM 转换为中端/Linux。这些文件包含压缩字段。我这样做是因为我希望文件以 ASCII 格式而不是 EBCDIC/二进制格式出现在中端。我还试图避免为每个文件编写 COBOL 转换例程。在此先感谢您的帮助。
解决方法
大型机 SORT 实用程序通常擅长数据转换。与其他实用程序相比，它们通常使用更少的 CPU 并在更短的时钟时间内运行，这对于一次性进程来说可能不太重要。
,IBM 在大型机上有一个实用程序，它可能可以满足您的要求。该实用程序称为 IEBPTCH（IEB Print Punch）。文档是 here
它不是自动的，但可能比编写代码更容易。来自文档
您可以使用 IEBPTPCH 打印或打孔所有或选定部分， 顺序或分区数据集或 PDSE。数据也可以“打印” 或“打孔”到磁盘或磁带。
IEBPTPCH 可用于打印或打孔：
- 完整的顺序或分区数据集或 PDSE
- 从分区数据集或 PDSE 中选择的成员
- 从顺序或分区数据集或 PDSE 中选择的记录
- 分区数据集或 PDSE 的目录
- 序列或分区数据集或 PDSE 的编辑版本
- 包含双字节字符集数据的数据集
- 您可以为正在打印或打孔的记录指定格式，也可以使用 IEBPTPCH 的默认格式。
- 默认格式为：
- 每条逻辑输出记录都从新的印刷行或穿孔卡片开始。
- 每个打印行由由两个空格分隔的八个字符组成。
- 打印行中最多可包含 96 个数据字符。
- 每张打孔卡最多包含 80 个连续字节的信息。
- 无法打印的字符显示为空白。
- 当输入被阻塞时，每个逻辑输出记录用“*”分隔，每个块用“**”分隔。 每页将打印 60 行。
请参阅 RECORD 声明 here
我知道您想避免编写新的 COBOL 程序。但是看看 RENDER 关键字。 我将在一行代码中将 COBOL 01 ... 分组转换为有效的 XML 结构。使用 SORT 或 IEBPTCH 只是用一种奇怪的语言编程。