Library View Topics Framed Contents Revised Topics Previous Topic Next Topic Search Search ResultsPrevious Topic MatchNext Topic Match Notes List Notes Print Download No PDF Handheld DisconnectedHandheld ConnectedHelp

X 6.2.33.5 Format 5: SET for USAGE IS POINTER Data Items




X When this form of the SET statement is executed, the current value of the
X receiving field is replaced by the address value contained in the sending
X field.


 X  ___ Format 5--SET (USAGE IS POINTER Data Items) ________________________ 
 X |                                                                        |
 X |          <______________________________                               |
 X | >>__SET____ _identifier-4_____________ _|____________________________> |
 X |            |_ADDRESS OF__identifier-5_|                                |
   |                                                                        |
 X | >__TO__ _identifier-6_____________ _________________________________>< |
 X |        |_ADDRESS OF__identifier-7_|                                    |
 X |        |_NULL_____________________|                                    |
 X |        |_NULLS____________________|                                    |
   |                                                                        |
   |________________________________________________________________________|

X identifier-4

X Receiving fields.


X Must be described as USAGE IS POINTER.


X ADDRESS OF identifier-5

X Receiving fields.


X identifier-5 must be level-01 or level-77 items defined in the Linkage
X Section. The addresses of these items are set to the value of the
X operand specified in the TO phrase.


X Identifier-5 must not be reference-modified.


X identifier-6

X Sending field.


X Must be described as USAGE IS POINTER.


X Cannot contain an address within the program's own Working-Storage,
X File, or Local-Storage Section.


X ADDRESS OF identifier-7

X Sending field.


X >_Workstation_> Under AIX, OS/2, and Windows, it must name an item in
X either the Linkage Section or the Working-Storage Section of level 01,
X 77, or 02-49. <_Workstation_<


X >_Host_> For OS/390 and VM, it must name an item in the Linkage
X Section of any level except 66 or 88. ADDRESS OF identifier-7
X contains the address of the identifier, and not the content of the
X identifier. <_Host_<


X NULL

X NULLS

X Sending field.


X Sets the receiving field to contain the value of an invalid address.


X Table 49shows valid combinations of sending and receiving fields in a
X Format 5 SET statement.


RevisionX  Table 49. Sending and Receiving Fields for Format 5 SET Statement         
RevisionX                
RevisionX  Sending Field 
RevisionX                
RevisionX                       Receiving Field                      
RevisionX ‘
RevisionX   USAGE IS POINTER 
RevisionX ‘
RevisionX      ADDRESS OF    
RevisionX ‘
RevisionX      NULL/NULLS    
RevisionX     USAGE IS   
RevisionX     POINTER    
RevisionX        Valid       
RevisionX                    
RevisionX        Valid       
RevisionX                    
RevisionX          -         
RevisionX                    
RevisionX    ADDRESS OF   RevisionX        Valid        RevisionX        Valid        RevisionX          -         
RevisionX    NULL/NULLS   RevisionX        Valid        RevisionX        Valid        RevisionX          -         




Previous Topic Next Topic © Copyright IBM Corp. 1991, 1998

IBM Library Server Copyright 1989, 2005 IBM Corporation. All rights reserved.





Return to library:   z/OS | z/OS.e | TPF | z/VSE | z/VM | IBM Hardware | IBM System z Redbooks
Glossary:   IBM terminology
Publications:   How to order publications
Readers:   Download IBM Library Reader | Download IBM Softcopy Reader | Download Adobe® Acrobat® Reader®
Library management:   Download IBM Softcopy Librarian
Contacts:   Contact z/OS


Adobe, the Adobe logo, Acrobat, the Acrobat logo, and Acrobat Reader are registered trademarks of Adobe Systems incorporated.