如何从SYSOUT中删除DFSORT消息

Question

有几条来自DFSORT的消息，它由具有几个排序操作的COBOL程序在内部使用。我想删除那些DFSORT消息，只保留COBOL程序中的那些消息。

Answer 1

您有三个选择。

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

正如您已经发现的，当从程序调用(调用) DFSPARM时，可以更改DDName SORT对其消息的使用(就像在COBOL中使用SORT或MERGE动词时一样)。

使用SORT-MESSAGE特殊寄存器。

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

您还拥有Language Environment，它可以在运行单元期间使用SYSOUT处理来自Language Environment的消息(运行时错误、abends、请求的信息)。有一个MSGFILE( ddname )运行时选项可以让LE使用不同的ddname。

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

您可以使用MSGPRT选项禁止所有DFSORT消息。您可以通过为每个调用指定一个带有FREE=CLOSE的DFSPARM DD，以不同的方式处理多个DFSORT调用。