BPX4PTB (pthread_cancel) example

The following code generates a cancelation request for the target thread (THID). For the callable service, see pthread_cancel (BPX1PTB, BPX4PTB) — Cancel a thread. AMODE 31 callers use BPX1PTB (pthread_cancel) example.
                                              
         CALL  BPX4PTB,              pthread_cancel                    +
               (THID,                Input: Thread ID                  +
               RETVAL,               Return Value: 0, -1, or Buf length+
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------