固定小数点評価と浮動小数点評価の例

固定小数点演算と浮動小数点演算に示されている例において、次の方法でデータ項目を定義すると、

      01  EMPLOYEE-TABLE.
          05  EMP-COUNT           PIC  9(4).
          05  EMPLOYEE-RECORD OCCURS 1 TO 1000 TIMES
                              DEPENDING ON EMP-COUNT.
              10 HOURS            PIC +9(5)E+99.
     .
     .
     .
     01  REPORT-MATRIX-COL       PIC  9(3).
     01  REPORT-MATRIX-MIN       PIC  9(3).
     01  REPORT-MATRIX-MAX       PIC  9(3).
     01  REPORT-MATRIX-TOT       PIC  9(3).
     01  CURRENT-DAY             PIC  9(7).
     01  NUMBER-OF-DAYS          PIC  9(3).