Assigning values to elementary data items (MOVE)
Use a MOVE
statement to assign a value to an elementary
data
item.
About this task
The following statement assigns the contents of an
elementary data item, Customer-Name
,
to the elementary data item Orig-Customer-Name
:
Move Customer-Name to Orig-Customer-Name
If Customer-Name
is longer than Orig-Customer-Name
,
truncation occurs on the right. If Customer-Name
is
shorter, the extra character positions on
the right in Orig-Customer-Name
are filled with spaces.
For data items that contain numbers, moves can be more
complicated than with character data items because
there are several ways in which numbers can be represented. In
general, the algebraic values of numbers are moved if possible, as
opposed to the digit-by-digit moves that are performed with
character data. For example, after the MOVE
statement
below, Item-x
contains the value 3.0, represented
as 0030:
01 Item-x Pic 999v9.
. . .
Move 3.06 to Item-x
You can move an alphabetic, alphanumeric, alphanumeric-edited, DBCS, integer, or numeric-edited data item to a category national or national-edited data item; the sending item is converted. You can move a national data item to a category national or national-edited data item. If the content of a category national data item has a numeric value, you can move that item to a numeric, numeric-edited, external floating-point, or internal floating-point data item. You can move a national-edited data item only to a category national data item or another national-edited data item. Padding or truncation might occur.
For complete details about elementary moves, see the
related reference below about the MOVE
statement.
The following example shows an alphanumeric data item in the Greek language that is moved to a national data item:
. . .
01 Data-in-Unicode Pic N(100) usage national.
01 Data-in-Greek Pic X(100).
. . .
Read Greek-file into Data-in-Greek
Move Data-in-Greek to Data-in-Unicode
Assigning values to group data items (MOVE)
Converting to or from national (Unicode) representation
Classes and categories of data (COBOL for Linux on x86 Language Reference)
MOVE statement (COBOL for Linux on x86 Language Reference)