Format 5 (Pointer Data Item Phrase) *---------------------------* + + V + ->->---SET--*--identifier-4-------------*------------------> *--ADDRESS OF identifier-5--* ->---TO--*--identifier-6-------------*--------------------><- *--ADDRESS OF identifier-7--* *--NULL---------------------* *--NULLS--------------------*
NULL/NULLS is the sending field. It sets the receiving field to contain the value of an invalid address.
Identifier-1 and index-name-1 are the receiving fields and must name either index data items or elementary numeric integer items.
Index-name-2 is the sending field.
The value before the SET statement is executed must correspond to the occurrence number of its associated table.
Identifier-2 is the sending field and must name either an index data item or an elementary numeric integer item.
Integer-1 is the sending field. It must be a positive integer.
Identifier-3 is the sending field and must name an elementary integer data item.
Integer-2 is the sending field and must be an integer.
Index-name-3 is the receiving field. The index-name value, both before and after the SET statement has been executed, must correspond to the occurrence numbers in an associated table.
You must associate mnemonic-name with an external switch, the status of which can be altered.
You must associate condition-name-1 with a conditional variable. If more than one literal is specified in the VALUE clause of condition-name-1, its associated condition variable is set equal to the first literal.
You must describe identifier-4, the receiving fields, as USAGE IS POINTER.
Identifier-6, the sending field, may not contain an address within the program's own Working Storage or File Section. It must be described as USAGE IS POINTER.
ADDRESS OF identifier-7, the sending field, contains the address of the identifier, not the content of the identifier. It can be subscripted, reference modified, or both. (Click here for information about reference modification.) Identifier-7 must name an item in the Linkage Section of any level except 66 or 88.
ADDRESS OF identifier-5, the receiving field, must be level-01 or level-77 items defined in the Linkage Section. The addresses of these items are set to the value of the operand specified in the TO phrase.
Identifier-5 cannot be subscripted or reference modified.
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.