Example

      IWMCNTN SUBSYS=SUBSTYPE,SUBSYSNM=SUBSNAME,
              RESOURCEID=RESOURCE,RESOURCEID_LEN=128,
              INVOCATIONTYPE=REPLACE,
              REQUESTLIST=REQUESTS
*
* Storage areas
*
SUBSTYPE DS    CL4             Subsystem type
SUBSNAME DS    CL8             Subsystem name
RESOURCE DS    CL128           Resource id
REQUESTS DS    0D              Request list
EYE      DC    CL8'IWMCNTRL'
VERSION  DC    XL1'01'
RSRV_1   DS    CL3
LENGTH#  DC    F'96'
ENTRY#   DC    F'2'
RSRV_2   DS    CL12
ENTRY_1  DS    0CL32           1st entry
E#1_CODE DC    CL1'A'          code = add
E#1_TYPE DC    CL1'H'          type = holder
E#1_RSRV DS    CL6             reserved
E#1_STKN DC    XL8'0000000000000000' STOKEN not specified
E#1_TCB  DC    A'0'            TCB not specified
E#1_ETKN DS    XL8             enclave token
E#1_RC   DS    H               entity return code
E#1_RSN  DS    H               entity reason code
ENTRY_2  DS    0CL32           2nd entry
E#2_CODE DC    CL1'A'          code = add
E#2_TYPE DC    CL1'W'          type = waiter
E#2_RSRV DS    CL6             reserved
E#2_STKN DS    XL8             STOKEN
E#2_TCB  DC    A'0'            TCB not specified
E#2_ETKN DC    XL8'0000000000000000' enclave token not specified
E#2_RC   DS    H               entity return code
E#2_RSN  DS    H               entity reason code