Я пытаюсь создать структуру тетради для моего файла данных.
Часть данных выглядит следующим образом
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).