COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

• Determining the Sending Operands
The initialize operation determines the sending operand in each implicit MOVE statement:
◦ If you include replacement, the sending operand is the literal or sender associated
with the category of the receiving operand.
◦ If you omit replacement, the sending operand is the implied figurative constant SPACES
or ZEROS, as this table shows:
Sending OperandCategory of Receiving Operand
SPACESALPHABETIC
SPACESALPHANUMERIC
SPACESALPHANUMERIC-EDITED
ZEROSNUMERIC
ZEROSNUMERIC-EDITED
The value of sender is established before the implicit MOVE statement executes.
• Execution of the Implicit MOVE Statements
For each receiving operand, the initialization operation executes an implicit MOVE statement
of the form:
MOVE SENDING-OPERAND TO RECEIVING-OPERAND
The implicit MOVE statements are executed in the order that the receiver s associated with
their receiving operands appear in the INITIALIZE statement (reading from left to right). When
a receiver references a data structure, the affected elementary items are initialized in the
order that they are defined within the data structure. Tables within data structures are initialized
element by element.
• Operand Overlap
The storage area referenced by a sender cannot be the same as or overlap the storage
area referenced by a receiver. If this rule is violated, the operation is undefined.
INSPECT
INSPECT scans a data item and counts and/or replaces occurrences of a single character or groups
of characters
INSPECT TALLYING
INSPECT TALLYING counts occurrences of a sequence of one or more characters in a source string.
source-string
is the identifier of an elementary item or data structure with USAGE DISPLAY. Inspection
proceeds from left to right within source-string.
INSPECT 345