RESPONSE and REASON values for WRITE_JOURNAL_DATA:
RESPONSE REASON
OK None
EXCEPTION IO_ERROR
JOURNAL_NOT_FOUND
JOURNAL_NOT_OPEN
LENGTH_ERROR
STATUS_ERROR
DISASTER None
INVALID None
KERNERROR None
PURGED None

Note: For more detail, refer to the explanation of RESPONSE and REASON in

“General form of an XPI call” on page286.

user journaling function

390 CICS TS for OS/390: CICS Customization Guide