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

Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-131
TRANSFORM Statement
•
Offset—0 bytes offset from beginning of the record
•
Length—2 bytes
•
Data type—COMPUTATIONAL numeric data item
You need to specify this clause when the location, length, and data type of the
select-code field is other than the default.
The code-field parameter in this clause specifies a field name in the Working-
Storage Section.
The offset of the specified field from the beginning of its record dictates the offset
of the select-code field from the beginning of the input record.
The length of the specified field dictates the length of the select-code field.
The data type of the specified field dictates the data type of the select-code
field.
CODE select-code
identifies a literal or a data item that specifies which input record is expected.
The position of the select-code in the CODE select-code clause
corresponds to a TERMINATION-STATUS value. One or more select-code
values can be associated with each input record.
A nonnumeric literal must be enclosed within quotation marks.
ON ERROR imperative-statement
specifies action to be taken should an error occur on either the input or output
phase of the TRANSFORM operation. If an error is detected, the imperative-
statement is executed.
If ON ERROR is omitted and an error is detected, the TCP takes standard action
for terminals.
USER [ CONVERSION ] numeric-literal
identifies a user conversion procedure associated with either the input record or
the output record.
The operation of the TRANSFORM statement is similar to that of a SEND MESSAGE
statement, but there is no physical I/O. With TRANSFORM, the output phase (SEND
MESSAGE) is followed by an input phase (REPLY) without the data being output to or
input from a device or process.
When a TRANSFORM statement is invoked, a reference is made to the Working-
Storage Section either directly or through the Message Section. During this output
phase, TRANSFORM prepares the data for output in an internal buffer.