DTRHELP.HLB  —  Commands Statements Clauses, SCALE Clause, Examples
       The following example uses a positive scale factor to store a
       large number in a small field:

       03 BARRELS_PER_DAY WORD
          SCALE 6
          EDIT_STRING Z(5)" Million".

       The following example uses a negative scale factor to store a
       minute number in a small field:

       03 PROJECT.
          05 PROBABILITY_OF_FINISHING.
             07 EVER DEFAULT VALUE IS 1
                PIC 99 SCALE -2.
             07 ON_TIME 99 SCALE -6
                MISSING VALUE 0
                EDIT_STRING 0.9(6)?"Better late than never".
Close Help