Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-130
TRANSFORM Statement
TRANSFORM Statement
The TRANSFORM statement replaces a set of Working-Storage Section data items
with another set of Working-Storage Section data items.
trans-rec-out
specifies the output record that TRANSFORM is to build and is made up of:
out-item-n
is a Working-Storage Section or Message Section 01 level item, group item, or
elementary data item.
out-item-1 through out-item-n must all be of one type, either Working-
Storage Section or Message Section items, not a combination.
YIELDS trans-rec-in
specifies the input record that is to be the result of the TRANSFORM operation and
is made up of:
in-item-1
is a Working-Storage Section or MessageSection 01 level item, group item, or
elementary data item. in-item-1 through in-item-n must all be of one
type, either Working-Storage Section or Message Section items, not a
combination of types.
SELECT CODE FIELD [ IS ] code-field
defines the location, length, and data type of the select-code field in the input
record.
The absence of this clause causes the default to be used:
TRANSFORM trans-rec-out
[ SELECT CODE FIELD [ IS ] code-field ]
{YIELDS trans-rec-in }
{ }
{{CODE select-code [, select-code ]...YIELDS trans-rec-in }...}
[ON ERROR imperative-statement ]
[USER [ CONVERSION ] numeric-literal ]
out-item-1 [, out-item-n ... ]
in-item-1 [, in-item-n ... ]