使用DFSORT进行大型机编程

Question

我正在尝试向一个大型机文件添加一个头文件，我发现了以下内容：

SORT FIELDS=COPY
OUTFIL REMOVECC,
HEADER1=(1:C'COUNTRY_CODE',13:C',',14:C'CHECK_SEQ_NUMBER',30:C',',
         31:C'FORM_INDICATOR')
OUTREC BUILD=(1:1,2,3:C',',4:4,5,9:C',',10:10,1,80:X)

我需要第二排和第五排吗？5号将会完成什么？

对不起，我正在学习如何为大型机编写代码。

Answer 1

REMOVECC中的'CC‘代表回车控制字符。这些字符是创建可打印报告所必需的。但是如果你不需要这个字符(我们大多不需要)，那么你可以使用REMOVECC来抑制它们。所以，你可能想要保留二线。

HEADER1使用您提到的列、COUNTRY_CODE等构建标题。此标题不存在于您的输入数据集中，因此您将在输出数据集中创建此新记录。

然后，通过OUTREC将输入记录复制到输出(在标题之后)。所以，你也想保留5行代码。

。

Answer 2

@William Edward Sanchez-Week，当你使用数据和头文件构建时，你也不需要通过计算位置来计算。SORT将在内部处理它。

对您邮寄的卡片进行排序：

SORT FIELDS=COPY
OUTFIL REMOVECC,
HEADER1=(1:C'COUNTRY_CODE',13:C',',14:C'CHECK_SEQ_NUMBER',30:C',',
     31:C'FORM_INDICATOR')
OUTREC BUILD=(1:1,2,3:C',',4:4,5,9:C',',10:10,1,80:X)

可以写成

SORT FIELDS=COPY
OUTFIL REMOVECC,
HEADER1=(C'COUNTRY_CODE',C',',C'CHECK_SEQ_NUMBER',C',',C'FORM_INDICATOR')
OUTREC BUILD=(1,2,C',',4,5,C',',10,1,80:X)

两者都会产生相同的结果。