sorting - 如何从 SYSOUT 中删除 DFSORT 消息

Question

有几个来自 DFSORT 的消息，它被具有多个排序操作的 COBOL 程序内部使用。我想删除那些 DFSORT 消息并仅保留来自 COBOL 程序的消息。

Answer 1

您有三个选择。

使用 OUTDD(ddname) Enterprise COBOL 编译器选项更改用于 DISPLAY 输出的 DDName。

如您所见，使用 DFSPARM 来更改 DDName SORT 在从程序调用(调用)时用于其消息(就像在 COBOL 中使用 SORT 或 MERGE 动词时一样)。

使用 SORT-MESSAGE 专用寄存器。

如果您的 SORT 是独立的，您还可以使用 OPTION 控制语句 OPTION MSGDDN=ddname 更改 SORT 消息文件。 DFSPARM 是允许为调用的 SORT/MERGE 提供选项的方法。

您还有语言环境，它可以在运行单元期间使用 SYSOUT，用于来自语言环境的消息(运行时错误、异常终止、请求的信息)。有一个 MSGFILE(ddname) 运行时选项可以让 LE 使用不同的 ddname。

解决问题的最简单方法是使用 OUTDD(ddname) 编译器选项。这样您就不必担心 DFSORT(或不同站点的 SyncSORT)或语言环境。

您可以使用 MSGPRT 选项抑制所有 DFSORT 消息。您可以通过为每次调用指定带 FREE=CLOSE 的 DFSPARM DD 来区别对待 DFSORT 的多次调用。