gtps1m5tSystem Macros

WRSTC-Get Load Module Writable Static Data Length

Use this system macro to get the writable static data length from a load module's IDSLST.

Required Authorizations
Key0 Restricted System Common Storage

X

Format




REG=Rx
A register other than R0 in which the length of the writable static data is returned. This is a required input parameter.

IFANY=anylabel
The symbolic name of a label to which control is transfered if writable static data is present.

IFNONE=nonelabel
The symbolic name of a label to which control is transfered if writable static data is not present.

Entry Requirements

Return Conditions

Programming Considerations

Examples

The following example shows how to get a load module's writable static data length.

***********************************************************************
* Register R4 points to the beginning of the load module.             *
***********************************************************************
         IDSLST REG=R4
         WRSTC REG=R15,IFNONE=NOSTATIC
***********************************************************************
* If control falls through to here, R15 contains the writable static  *
* data length.                                                        *
***********************************************************************
NOSTATIC DS    0H
***********************************************************************
* If control branches to here, there is no writable static data.  R15 *
* contains zero.                                                      *
***********************************************************************