Joined: 14 Jan 2008 Posts: 985 Location: South Carolina, USA
Zoned Decimal (a/k/a Display Numeric) can be either signed or unsigned. Example -
Code:
03 WS-ZONED-SIGNED PIC S9(10) VALUE +0123456789.
03 WS-ZONED-UNSIGNED PIC 9(10) VALUE 0123456789.
When signed, the last byte (in this example, a 9) is a value of X'C9' (the 'C' zone nibble is the overpunch character). If it were a negative value, then it would equal X'D9'.
When unsigned (again, a 9) the value is X'F9' (no overpunch).
In both value clauses above, 012345678 are the same, with each byte having an 'F' zone nibble.
the principle of operations manual will tell the all You need to know about the numeric data representations.
searching for it by Yourself will deepen Your knowledge on the ways of finding faster the info You need
