Sample CICS file control EXEC interface API exit XFCREQ
This sample exit has been created to demonstrate how a CICS filename passed to CICS by an application program can be redirected to a different filename at the XFCREQ global user exit (GLUE) point. The exit uses fields in the Global Work Area (GWA) to indicate which files should be changed and how. This allows multiple tasks to be consistent in which files should be used at any one time. Further details on the design of the exit are included in the documentation.pdf.
In addition to the assembler exit SMPFCREQ, there is a sample COBOL program called EXITMAIN which has been written to demonstrate:
- Enabling the exit with a GWA
- Initialising the GWA and starting the exit
- Disabling and stopping the exit
- Show status of a key field in the GWA
- Update the key field in the GWA
- /doc/documentation.pdf - Detailed overview of the XFCREQ sample
- /etc/resources/csd - Sample DFHCSDUP definitions for an AOR/FOR configuration
- /etc/resources/files Sample JCL to create and load the sample VSAM files
- /etc/resources/plt - Sample PLTPI defintion
- /etc/resources/sit - SIT INITPARM definition required if EXITMAIN to be used at PLTPI time
- /src/Assembler - Sample XFCREQ program and associated DSECTs
- /src/Cobol - Sample EXITMAIN program and associated copybooks
For more details on use case, solution and workings of this sample please see the documentation.pdf