Example
To call a resource adjustment exit, specify the following:
IWMMXRA X
RES_ADJ_EXIT@=ADJEXIT@, X
OWNER_TKN=OWNERTKN, X
RESOURCE_TYPE=BUFFER_POOL, X
RESOURCE_TKN=RSCTOKEN, X
RES_CUR_SIZE=RESCURSIZE, X
RES_NEW_SIZE=RESNEWSIZE, X
RETCODE=RC,RSNCODE=RSN
*
* Storage areas
*
RESCURSIZE DS FL4 contains the current size of the
* specified resource in 4K pages
RESNEWSIZE DS FL4 contains the new target size of the
* specified resource in 4K pages
ADJEXIT@ DS AL4 contains the address of the
* Resource Adjustment Exit
* to be invoked
OWNERTKN DS CL8 Contains data maintained by
* the user
RSCTOKEN DS CL8 WLM resource token
RC DS F Return code
RSN DS F Reason code
|