On Tue, 22 Feb 2011 12:53:45 -0500 Tony Lubrano <[email protected]> wrote:
:>Another - and maybe better - way to do it: :>L Rx,PSATOLD-PSA(,R0) :>L Rx,TCBJSTCB-TCB(,Rx) :>L Rx,TCBFSA-TCB(,Rx) :>L Rx,SA_R1(,Rx) :>CLC =CL4'ECP',0(Rx) :>JE >>> IMS BMP Safe, as worst case R1-> Word :>CLC =CL6'DFSRRC',20(Rx) :>JE >>> IMS MPP Problematic, as R1 area may be too short. Thank you. -- 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: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html

