iTS 1.0+)

Procedure Division

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

6-97

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 ... ]