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

Procedure Division Verbs
HP COBOL Manual for TNS/E Programs—520347-003
9-209
SET TO
NULL
NULLS
is a null address guaranteed not to point to any data item. A reference to a
pointer whose value is NULL causes a trap 1 instruction failure.
If you redefine a VS COBOL II pointer variable as a COMPUTATIONAL field and
perform an arithmetic operation on the field to change the value of the pointer, the
pointer does not behave the same as it would in IBM/370 COBOL. The reason is that
pointer format depends on machine architecture, and NonStop servers and IBM/370
machines have different architectures.
Nonpointer Data Items
SET TO can:
•
Set an index-name to one of these values:
°
A value that corresponds to the occurrence number designated by another
index-name
°
A value that corresponds to the occurrence number corresponding to the value
of an integer literal or an integer data item
°
The value of an index data item
•
Set the value of an index data item to the value of an index-name or the value
associated with the contents of another index data item
•
Set the value of an integer data item to the occurrence number of an index
•
Set an external switch to ON or OFF
•
Set a conditional variable to a value that makes an associated condition true
SET
TRUETOcondition-name
ONTOmnemonic-name
OFF
identifier-1
index-name-1
identifier-2
index-name-2
integer
TO
VST211.vsd