Are you saying that your program did a MODESET AUTH=SUP prior to issuing 
ISGENQ? If not, then you are not running authorized. Otherwise you are correct 
and you should get reason code 040D.

Jon Perryman.



>________________________________
> From: Donald Likens <[email protected]>
> 
>
>My authorized program is checking an if an enque is available and the return 
>code is 4 reason code return is 02340404. 
>My ISGENQ macro follows: 
>
>ISGENQ   REQUEST=OBTAIN,QNAME=WKPROD,RNAME=STCNAME,
>      SCOPE=SYSTEM,ENQTOKEN=TASKTOK,              
>      RNAMELEN=STCNL,CONTROL=EXCLUSIVE,TEST=YES,  
>      COND=YES,RETCODE=(2),RSNCODE=CELLF    
>      
>A dump taken immediately after the macro was issues shows the enque is not 
>available. 
>
>The reason code say:
>
>Equate Symbol: ISGENQRsn_NotImmediatelyAvailable
>Meaning: The ENQ of the resource was not immediately available.
>For REQUEST=OBTAIN CONTENTIONACT=FAIL, the requested
>resource is not obtained. For REQUEST=OBTAIN TEST=YES, the
>holder is a task other than OWNINGTTOKEN.
>Action: No action required.
>
>Any ideas why am I getting this reason code? I expect a 040D reason code.
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to