Numeric or Numeric-Edited

IBM Extension
IBM Extension
  • When the sending item is date-time, the date-time item is first de-editied. The unedited value of the date-time item is then moved to the receiving numeric or numeric-edited data item.
  • If the receiver is numeric-edited, it may be specified with or without a LOCALE phrase. If the LOCALE phrase of the PICTURE clause has not been specified in its data description entry, the data moved to the edited data item is aligned by decimal point with zero fill or truncation at either end as required within the receiving character positions of the data item, except where editing requirements cause replacement of the leading zeroes. If the LOCALE phrase has been specified, alignment and zero-fill truncation take place as described in LOCALE Phrase.
  • If the receiving item is alphanumeric or numeric-edited, and the sending item is a scaled integer (that is, has a P as the rightmost character in its PICTURE character-string), the scaling positions are treated as trailing zeros when the MOVE statement is executed.
  • Start of changeIf the receiving item is numeric and the sending item is alphanumeric literal, national literal, or ALL literal, then all characters of the literal must be numeric characters.End of change
End of IBM Extension
End of IBM Extension