gtpg2m1iGeneral Macros

DECBC-Manage Data Event Control Blocks

Use this general macro to perform the following actions:

Format




label
A symbolic name can be assigned to the macro statement.

FUNC
Specifies the requested DECB action. The following values are allowed:

CREATE
Create a new DECB.

LOCATE
Locates a previously allocated DECB with a name matching the value specified in the NAME parameter or locates the next DECB in the chain specified by the CHAIN parameter.

RELEASE
Releases the DECB referenced in the DECB or NAME parameters (if the DECB is not currently in use).

SWAPBLK
Exchanges core block and related information between a DECB and a specified ECB data level.

VALIDATE
Determines if the DECB specified is a valid DECB.

DECB=(reg)|label1
For FUNC=CREATE and FUNC=LOCATE, specifies the label or general register where the address of the DECB is to be returned. For all other actions, specifies the label or general register containing the address of a valid DECB for which the specified action is to be performed. For E-type programs, allowable register values are R1-R7. For control programs (CPs), allowable register values are R1-R7, R14, or R15.

NAME=(reg)|label2
The general register containing the address (or a label indicating the address) of a 16-byte name associated with a DECB. For E-type programs, allowable register values are R0-R7. For CPs, allowable register values are R0-R7, R14, or R15.

CHAIN
Specifies the next DECB entry to be returned.

INUSE
Returns the next active DECB chained to the current DECB. The register specified by the DECB parameter indicates the address of the current DECB. If the register specified by the DECB parameter contains a value of zero, it returns the first active DECB.

ANY
Returns the next allocated DECB without first verifying that the DECB is active. The register specified by the DECB parameter indicates the address of the current DECB. If the register specified by the DECB parameter contains a value of zero, the first DECB will be returned without verifying the active state of the DECB.

WKREG=(reg)
Specifies an available general register (R1-R7, R14, or R15) to be used on the macro call. If no register is specified, the default register is R14.

LEVEL=level
Specifies a valid ECB data level (D0-DF).

ERROR=label3
The label in which to branch if an error occurs during processing of the macro. If ERROR is not specified and an error occurs, control will return to the next sequential instruction (NSI). The caller then checks the contents of the register specified on the RC parameter for the associated return code.

RC=(reg)
Specifies the general register (R0-R7, R14, or R15) where the return code is placed when the macro ends. For E-type programs, R15 must be specified.

Entry Requirements

R9 must contain the address of the ECB being processed.

Return Conditions

Programming Considerations

Examples