X'2018' PURGE NON 0 RC ON QMGR ENQ CALL

Explanation
 The message is being purged (enqueued to a temporary
destination), and a nonzero return code was received from the message
queue manager on the enqueue call.

Programmer response
 The message queue manager return
code is in REG15 of the REG14-12 save area. The message queue buffer
is in the QMBA area. This is probably an internal IMS error.