This macro generates the initialization code. $JCLENT generates all code CA JCLCheck requires to save registers, set up a base register, and call $JCLGETM to acquire a save area. If you specify the WA and WALEN operands, the $JCLGETMed area is WALEN bytes in length, and a USING statement for WA off register 13 is generated. Use this macro for exits CA JCLCheck invokes.
This macro has the following format:
$JCLENT -BASE=R11/reg-
[WA=]
[LEN=]
DSECT name of work area to obtain.
Length of work area DSECT.
(If you omit this parameter, CA JCLCheck obtains a default 72‑byte area to save the registers.)
Note: When defining the WA DSECT, be sure to identify the first field as an area of 18F (fullwords). CA JCLCheck uses this for establishing the standard IBM save area at the address pointed to by register 13. Your variables can follow the standard save area.
|
Copyright © 2014 CA.
All rights reserved.
|
|