CONTROL BLOCK NAME = DFHPCUES
DESCRIPTIVE NAME = CICS TS Program control user exits DSECT
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1990, 2012
This data block describes the fields passed to the program
control user exits XPCFTCH, XPCTA and XPCHAIR. .
The storage is acquired, and the fields filled, in DFHLI1.
LIFETIME = The storage area is created when an enabled program
control exit is called and released when control is
returned from the exit to program control.
LOCATION =
The storage is in GETMAINed in DFHLI1.
INNER CONTROL BLOCKS = none
NOTES :
DEPENDENCIES = S/370
RESTRICTIONS =
MODULE TYPE = Control block definition
------------------------------------------------------------------
EXTERNAL REFERENCES = none
DATA AREAS = none
CONTROL BLOCKS = none
GLOBAL VARIABLES (Macro pass) = none
------------------------------------------------------------------
Table 1.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
80 |
DFHPCUES |
program conrol user exits work area |
| (0) |
HALFWORD |
2 |
PCUE_LENGTH_OF_DSECT |
| (2) |
BIT(8) |
1 |
PCUE_CONTROL_BITS |
| (2) |
1... .... |
|
PCUECBTE |
task has a terminal id |
| (2) |
.1.. .... |
|
PCUENOTX |
program is not EXEC level |
| (2) |
..1. .... |
|
PCUE_REAL |
real entry point exists |
| (2) |
...1 .... |
|
PCUE_NO_RESUME |
Resume addr not supported |
| (2) |
.... 1... |
|
PCUE_NO_MODIFY |
Modified entry addr not supported |
| (2) |
.... .1.. |
|
PCUE_NO_RESUME_ AMODE64 |
AMODE 64 resume address not supported |
| (2) |
.... ..11 |
|
* |
reserved |
| (3) |
BIT(8) |
1 |
* |
reserved |
| (4) |
CHARACTER |
3 |
PCUE_TASK_NUMBER |
task identification number |
| (7) |
CHARACTER |
1 |
* |
reserved |
| (8) |
CHARACTER |
4 |
PCUE_TRANSACTION_ID |
Transaction ID |
| (C) |
CHARACTER |
4 |
PCUE_TERMINAL_ID |
Terminal ID |
| (10) |
CHARACTER |
8 |
PCUE_PROGRAM_NAME |
Program name |
| (18) |
CHARACTER |
3 |
PCUE_PROGRAM_LANGUAGE |
Program language |
| (1B) |
CHARACTER |
1 |
* |
reserved |
| (1C) |
ADDRESS |
4 |
PCUE_LOAD_POINT |
Program load address |
| (20) |
ADDRESS |
4 |
PCUE_ENTRY_POINT |
Program entry point addr |
| (20) |
1... .... |
|
PCUEAMOD |
AMODE (31) |
| (20) |
1... .... |
|
PCAEAMOD_31 |
AMODE (31) |
| (20) |
BIT(30) POS(2) |
4 |
* |
| (23) |
.... ...1 |
|
PCUEAMOD_64 |
AMODE (64) |
| (24) |
FULLWORD |
4 |
PCUE_PROGRAM_SIZE |
Program size |
| (28) |
ADDRESS |
4 |
PCUE_COMMAREA_ADDRESS |
Commarea address, if any |
| (2C) |
FULLWORD |
4 |
PCUE_COMMAREA_SIZE |
Commarea size |
| (30) |
FULLWORD |
4 |
PCUE_LOGICAL_LEVEL |
chained DFHRSADS |
| (34) |
ADDRESS |
4 |
PCUE_BRANCH_ADDRESS |
Alternate branch address |
| (34) |
1... .... |
|
PCUE_BRANCH_AMODE |
AMODE of program at branch |
| (34) |
BIT(31) POS(2) |
4 |
* |
| (38) |
BIT(8) |
1 |
PCUE_BRANCH_EXECKEY |
Execution key to be used at modified address |
| (39) |
CHARACTER |
3 |
* |
Reserved |
| (3C) |
ADDRESS |
4 |
PCUE_REAL_ENTRY |
Real entry point for LE program |
| (40) |
CHARACTER |
16 |
PCUE_CHANNEL_NAME |
Channel name |
Table 2.
| Len |
Type |
Value |
Name |
Description |
Constants used by XPCFTCH, XPCHAIR and XPCTA
|
| 1 |
HEX |
80 |
PCUE_BRANCH_USER |
User Key, for XPCTA |
| 1 |
HEX |
40 |
PCUE_BRANCH_CICS |
CICS Key, for XPCTA |