Example

To insert a work request onto the WLM queue manager queues, specify the following:

         IWM4QIN  CONNTKN=CONNTOKEN,ETOKEN=ENCTOKEN,         X
               USERDATA=USERDATA,APPLENV=APPLENV,SECUSER=NO, X
               WLMWUTKN=WLMWUTKN,RETCODE=RC,RSNCODE=RSN
*
* Storage areas
*
CONNTOKEN DS   FL4             Contains the connect token
*                              associated with the use of WLM
*                              Queuing services as returned by
*                              IWM4CON
*                              (specifying QUEUE_MANAGER=YES
*                              or SERVER_MANAGER=YES
*                                   SERVER_TYPE=QUEUE
ENCTOKEN DS    CL8             Contains the enclave token
*                              associated with the work
*                              request as returned by IWM4ECRE
USERDATA DS    CL16            Contains data maintained by the
*                              user
APPLENV  DS    CL32            Contains the application
*                              environment name
WLMWUTKN DS    CL16            Work unit token
RC       DS    F               Return code
RSN      DS    F               Reason code