John: I agree, but if r7 equates to 7 so as long as the first 7 bytes of the user key are equal it will work. Bill > Date: Thu, 17 Apr 2008 08:05:26 -0500> From: [EMAIL PROTECTED]> Subject: Re: > IRREVX01 strangeness> To: [email protected]> > > -----Original > Message-----> > From: IBM Mainframe Discussion List > > [mailto:[EMAIL > PROTECTED] On Behalf Of Chase, John> > Sent: Thursday, April 17, 2008 7:35 > AM> > To: [email protected]> > Subject: Re: IRREVX01 strangeness> > > > > > > > -----Original Message-----> > > From: IBM Mainframe Discussion List On > Behalf Of Paul Whelan> > > > > > [ snip ]> > > > > > The (in)famous CLC > 0(R9,R8),FILTER 'filter('found?> > > was actually based on one of the > IRREVX01 samples included in> > > SYS1.SAMPLIB(RACEXITS):> > > > > > LA > R7,L'USERKEY > > > CLC 0(R7,R5),USERKEY > > > > > > with USERKEY defined as:> > > > > > > USERKEY DC C'USER(' a PASSWORD keyword > > > > Fascinating. I > didn't know CLC was (also) an RX instruction.> > > > I wonder how often the > above code excerpt actually finds 'USER('? :-)> > > > -jc-> > That dog don't > hunt! And the example is in IBM code just that way. As if> the CLC used the > value in the register as the length. Of course, since> R7 is a self-defining > term, the code assembles just fine. But it won't> work as intended!> > --> > John McKown> Senior Systems Programmer> HealthMarkets> Keeping the Promise of > Affordable Coverage> Administrative Services Group> Information Technology> > > The information contained in this e-mail message may be privileged> and/or > confidential. It is for intended addressee(s) only. If you are> not the > intended recipient, you are hereby notified that any disclosure,> > reproduction, distribution or other use of this communication is> strictly > prohibited and could, in certain circumstances, be a criminal> offense. If > you have received this e-mail in error, please notify the> sender by reply > and delete this message without copying or disclosing> it. > > > ----------------------------------------------------------------------> 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> ---------------------------------------------------------------------- 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
