|
DECLARE A PICTURE '$$$$,$$$.99-';
declares A as a 12-character item consisting of 8 decimal digits,
a "floating" currency-symbol, a trailing sign, and the editing characters
comma and decimal-point. Data will be edited and de-edited automatically
when moved from and to the field.
SUBSTR(a,1,2)=' ';
Last modified 26 May, 2013.