Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

9.16 CHECKNUMERIC

Note
titleNote: Built-In Function Rules     Usage Options

...

To get a packed decimal 9,2 result field #P92 from an alphanumeric field #A using 2 intermediate work fields called #P90 and #DEC.

     USE        BUILTIN(CHECKNUMERIC) WITH_ARGS(#A 7 2) TO_GET(#P90 #DEC)
CHANGE     FIELD(#P92) TO('#P90 + #DEC')