TPCANCEL - cancel a communication handle for an outstanding reply
01 TPSVCDEF-REC. COPY TPSVCDEF. 01 TPSTATUS-REC. COPY TPSTATUS. CALL "TPCANCEL" USING TPSVCDEF-REC TPSTATUS-REC.
TPCANCEL cancels a communication handle, COMM-HANDLE IN TPSVCDEF-REC, returned by TPACALL(3cbl). It is an error to attempt to cancel a communication handle associated with a transaction.
Upon success, COMM-HANDLE is no longer valid and any reply received on behalf of COMM-HANDLE will be silently discarded.
Upon successful completion, TPCANCEL sets TP-STATUS to [TPOK].
Under the following conditions, TPCANCEL fails and sets TP-STATUS to: