文件中的字帖错位

Question

我正在尝试为我的数据文件创建一个副本结构.

部分数据如下所示

          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).  

Answer 1

请参阅数据定义的PICTURE子句的文档.在那里你会发现V是假定的或虚拟的小数点,而不是物理小数点.您可以通过...获得所需的结果

15  EF-PURCH-FEE-AMT PIC 9999.99.