Anne / Rick, If you guys have this resolved, great .. else shoot me an email offline with the definition of PARMJOBC.
Further, please note that the mask value for an ICM represent the locations of the receiving register. If the sending address is x'00000008', then ICM is going to look at address x'00000000' thru x'00000002'. Please also verify that your new module is loaded and being picked up. Kind Regards Jim Thomas 617-233-4130 (mobile) 636-294-1014 (res) j...@thethomasresidence.us (Email) -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Crabtree, Anne D Sent: Friday, August 05, 2011 7:27 AM To: IBM-MAIN@bama.ua.edu Subject: Re: assembler help! What is your email address Rick? Another person has looked at my code and is being very helpful, but I still don't get what I want when I run a multi step job... Comparing mine to yours might help.. Anne D. Crabtree System Programmer WV Office of Technology Data Center 1900 Kanawha Blvd East Charleston, WV 25305 (304)558-5914 ext 58292 (304)558-1441 fax -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Rick Fochtman Sent: Thursday, August 04, 2011 6:39 PM To: IBM-MAIN@bama.ua.edu Subject: Re: assembler help! ------------------------------<snip>---------------------------------------- --- >In our IEFACTRT (accounting exit), an assembler program, it has the following commands: > >L R2,PARMJOBC > > ----------------> R2 now contains PARMJOBC, X'00000008' >ICM R1,7,0(R2) > > ----------------> R1 now contains X'..zzzzzz', where .. are the origincal contents of R1 and zzzzzz are the contents of storage location X'00000008' >If PARMJOBC contains a binary integer length of 4 with 00 00 00 08, what ends up in all bits of R1? I am trying to add additional values to what is in R1 by doing: > >MVC WK1(4),SMF30CPS >A R1,WK1 > >This is not doing what I want it to do! If SMF30CPS, also a binary integer length of 4, has 00 00 00 01, what ends up in R1? > > ----------------------------------------> R1 now contains God only knows what. Shoot me an Assembler listing of the source code (ZIP'ped) and I'll take a look at it. I suspect I know what's wrong but don't want to clutter the list with a long drawn-out explanation. Rick ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ----- No virus found in this message. Checked by AVG - www.avg.com Version: 10.0.1391 / Virus Database: 1518/3811 - Release Date: 08/04/11 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
