This exit is used by CICS applications only. The source code for this exit is in CA Gen CEHBSAMP library, in member TIRCDPTX. The sample exit provided is written in COBOL and uses standard OS Linkage.
The Linkage Parameter list used by TIRCDPTX is as follows:
01 RUNTIME-PARM1 PIC X. 01 RUNTIME-PARM2 PIC X. 01 Q-NAME PIC X(8). 01 ACTION-CODE PIC 9. 01 GLOBDATA size 3645 bytes.
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|