The following code executes the assembler routine EXITRTN
on the IPT of the requesting thread, and passes EXITPARM
as input in R1. The requesting thread is blocked until EXITRTN
runs. For the callable service, see
mvsiptaffinity (BPX1IPT, BPX4IPT) — Run a program on the IPT thread.
AMODE 31 callers use
BPX1IPT (mvsiptaffinity) example.
MVC EXITRTNA,=AD(EXITRTN) ->Routine address
* MVC EXITPLA,=AD(EXITPARM) ->Input parameter list
SPACE ,
CALL BPX4IPT, +
(EXITRTNA, Input: Routine address +
EXITPLA, Input: Parm list address or 0 +
RETVAL, Return value: -1 or not return +
RETCODE, Return code +
RSNCODE), Reason code +
MF=(E,PLIST) ----------------------------------