On Tue, 25 Apr 2017 07:59:48 -0400 Peter Relson <[email protected]> wrote:
:><snip> :>It would be nice if one could :> :> IF condition1 :> SETRP to return 64 :> if condition2 :> free local lock :> if condition3 :> set retry addr1 :> IF condition4 :> set retry addr2 :> :> BR R14 :></snip> :>Why can't you? Although I assume you meant by "free local lock" instead :>"ask RTM via SETRP to free local lock upon return" (and be aware that that :>with FRLKRTY=YES it will not be freed upon retry). I'm not sure what :>"return 64" means or what you wrote a it earlier "return in AMODE31". :>The only thing anomalous I see in what you pose above is that if by "free :>local lock" you mean SETRP FRELOCK=LOCAL, you have to be aware that that :>is equivalent to SETRP FRELOCK=LOCAL,RC=0 :>It is true that some of the retry-oriented options (such as RETADDR) :>require that you specify RC=4. So if your "SETRP to return 64" meant :>including setting RC=4 (retry) then your "free local lock" would have :>reset it to 0 (percolate). That is what I mean. Let me specify only what I want - if necessary, add a IKNOWWHATIAMDOING=NO(default)/YES keyword which will avoid the checks. -- Binyamin Dissen <[email protected]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
