A mask of 7 loads the low order 3 bytes, so that r1 would contain whatever the 
high order byte it contained
originally plus 000008 in the low order 3 bytes.
L     R2,PARMJOBC
ICM   R1,7,0(R2)

If smf30cps contains 00000001, then the first 4 bytes of wk1 would contain 
00000001 after the move
And r1 would also contain 00000001 after the add, assuming WK1 is on a full 
word boundary.

MVC   WK1(4),SMF30CPS
A     R1,WK1-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Crabtree, Anne D
Sent: Thursday, August 04, 2011 9:02 AM
To: IBM-MAIN@bama.ua.edu
Subject: assembler help!

In our IEFACTRT (accounting exit), an assembler program, it has the following 
commands:

L     R2,PARMJOBC
ICM   R1,7,0(R2)

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?

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


----------------------------------------------------------------------
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

Reply via email to