The storage of a packed numeric field is most efficient when you code an odd number of digits in the PICTURE description, so that the leftmost byte
is fully used. Packed-decimal items are handled as fixed-point numbers for arithmetic purposes.
Noncompliant code example
01 VAL PIC 9(6) COMP-3.
Compliant solution
01 VAL PIC 9(5) COMP-3.