Example: Application exit program
This code example contains an application cluster resource group exit program.
You can find this code example in the QUSRTOOL library.
Sample source code is provided in the QUSRTOOL library,
which can be used as a basis for writing an exit program. See the
TCSTAPPEXT member in the QATTSYSC file. To view the sample source
code, issue one of the following commands:
DSPPFM QUSRTOOL/QATTSYSC TCSTAPPEXT
STRSEU SRCFILE(QUSRTOOL/QATTSYSC) SRCMBR(TCSTAPPEXT)
WRKMBRPDM FILE(QUSRTOOL/QATTSYSC) MBR(TCSTAPPEXT)
, then place a 5 in front of the member name
If you receive CPF8056, EDT0213, or PDM0308 messages
when running the commands, QUSRTOOL files need to be converted from
save files to source physical files. Issue this command, CALL
PGM(QUSRTOOL/UNPACKAGE) PARM('*ALL ' 1)
.