NUMERIC Directive
The NUMERIC directive causes the subsequent field to be treated as a numeric if it is declared as alphanumeric.
or
or
Example
The field customer-code will be stored as numeric data type in the table.
$EFD NUMERIC 03 CUSTOMER-CODE PIC X(7). |