Question

我们正在尝试将.txt文件加载到Trillium中进行分析，并尝试将.cbl文件加载为数据架构。

.txt文件包含的数据如下所示：

    Record 1: 1234560001001
    Record 2: 12345670001001

COLUMN_1最多7个字符，COLUMN_2必须为4个字符，COLUMN_3必须为3个字符。

我这样创建了一个COBOL文件：

    02 COLUMN_1 PIC X(07).
    02 COLUMN_2 PIC X(04).
    02 COLUMN_3 PIC X(03).

但延龄草已将其解析为：

    1234560 0010 01
    1234567 0001 001

我不确定如何解决此问题。有什么想法吗？

Answer 1

您将需要正确证明输入记录的合理性。混搭数据的多种方法。最简单的可能是

01 justright PIC X(14) JUSTIFIED RIGHT.

GnuCOBOL（据我所知还有其他）也支持

CALL "C$JUSTIFY" USING source-field "R" END-CALL

修改为字段大小。在这种情况下为14。

但是，如果您所拥有的只是记录布局的外部解析器，那么正如Rick所说，您可能需要根据去往COLUMN_1的数据长度规则编写代码。