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

part-1
is an alphanumeric literal or identifier of a DISPLAY data item. The concatenation of their values
is stored in the data item named by result. If a data item is numeric, it must be described
as an integer without P in its PICTURE character-string. When a figurative constant is used, it
represents a one-character nonnumeric literal.
delimiter
is an alphanumeric literal or the identifier of a DISPLAY data item. It specifies the portion of
part-1 that is moved. It also specifies that all characters up to but not including the value of
delimiter are moved.
If the literal is a figurative constant, it represents the equivalent one-character nonnumeric literal.
If the data item is numeric, it must be described as an integer whose PICTURE character-string
does not include P.
SIZE
specifies that all the characters in part-1 are moved.
result
is an identifier for an alphanumeric data item where the characters chosen from the part-1
s are stored. If result is an elementary item, its PICTURE character-string must not contain editing
symbols or a JUSTIFIED clause. Reference modification is not permitted.
Storing begins at the position identified by the initial value of pointer. When pointer is
not used, the leftmost position is the beginning place. An internal index keeps track of the next
available position in result. result cannot reference a special register.
pointer
is the identifier of an integer data item whose PICTURE character-string does not include P.
The initial value of pointer (which you must set) is the position in result to which the first
character of data will be moved. The value of the first position is 1. At the conclusion of STRING,
STRING 463