To use CULEPOWR as a subroutine, use the name CULEPWR and link it with each calling output module, as shown in the following sample job control language:
// JOB module-name // OPTION CATAL PHASE module-name,* INCLUDE module-name INCLUDE CULEPOWR ENTRY module-name // EXEC LNKEDT /*
Module-name is the name of the output module that is responsible for all printing or punching.
To invoke CULEPWR from an output module:
First—Issue a CALL to CULEPWR from the module:
CALL CULEPWR
Second—Include a calling parameter list that points to the address of the control switch and, if indicated, to the JECL information:
Use this code... |
To indicate that... |
---|---|
'C' |
JECL information is passed through the CALL. A second address is expected in the calling parameter list to point to the JECL information area. |
'R' |
The JECL information is read through the card reader. |
Third—Test for the control switch return code value:
A return code of... |
Means... |
---|---|
'0' |
No errors. VSE/POWER segmentation performed. |
'1' |
Invalid control switch value found. VSE/POWER segmentation not attempted. |
'2' |
No input card or more than one input card was found in SYSRDR. VSE/POWER segmentation not performed. |
'3' |
Internal error. |
'4' |
Invalid JECL keyword. VSE/POWER segmentation not performed. |
'5' |
An unrecognizable error code returned after VSE/POWER segmentation was attempted. |
'6' |
A hex '04' error code returned after VSE/POWER segmentation was attempted. See the Segmentation Macro section of the VSE/POWER manual. |
'7' |
A hex '08' error code returned after VSE/POWER segmentation was attempted. See the Segmentation Macro section of the VSE/POWER manual. |
Copyright © 2014 CA.
All rights reserved.
|
|