fileaid 中的字簿错位
copybook misalignment in fileaid
我正在尝试为我的数据文件创建一个字帖结构。
部分数据是这样的
C 0000.00
因为它有 0000.00 ，在我的字帖中，我们将它声明为 PIC 9(04)v9(02)。
但是当我使用 fileaid 映射它时，出现此错误
15 EF-PURCH-FEE-AMT 6/AN 0000.0
15 EF-FILLER4 975/AN 0
小数点被视为另一个字节，最后一个零溢出到后续字段
我也尝试通过给值 PIC ZZZ9V99 来将图片子句定义为分区十进制。但它仍在蔓延到下一个领域。
预期结果。 :
15 EF-PURCH-FEE-AMT 6/AN 0000.00
15 EF-FILLER4 975/AN 0
实际结果：
15 EF-PURCH-FEE-AMT 6/AN 0000.0
15 EF-FILLER4 975/AN 0
截至目前的 PIC 定义：
15 EF-PURCH-FEE-AMT PIC ZZZ9V99.
15 EF-FILLER4 PIC X(975).
请参考数据定义documentation for the PICTURE clause。在那里你会发现 V 是一个假定的或虚拟的小数点，而不是一个实际的小数点。您可以通过...
获得想要的结果
15 EF-PURCH-FEE-AMT PIC 9999.99.
我正在尝试为我的数据文件创建一个字帖结构。
部分数据是这样的
C 0000.00
因为它有 0000.00 ，在我的字帖中，我们将它声明为 PIC 9(04)v9(02)。
但是当我使用 fileaid 映射它时，出现此错误
15 EF-PURCH-FEE-AMT 6/AN 0000.0
15 EF-FILLER4 975/AN 0
小数点被视为另一个字节，最后一个零溢出到后续字段
我也尝试通过给值 PIC ZZZ9V99 来将图片子句定义为分区十进制。但它仍在蔓延到下一个领域。
预期结果。 :
15 EF-PURCH-FEE-AMT 6/AN 0000.00
15 EF-FILLER4 975/AN 0
实际结果：
15 EF-PURCH-FEE-AMT 6/AN 0000.0
15 EF-FILLER4 975/AN 0
截至目前的 PIC 定义：
15 EF-PURCH-FEE-AMT PIC ZZZ9V99.
15 EF-FILLER4 PIC X(975).
请参考数据定义documentation for the PICTURE clause。在那里你会发现 V 是一个假定的或虚拟的小数点，而不是一个实际的小数点。您可以通过...
获得想要的结果15 EF-PURCH-FEE-AMT PIC 9999.99.