On Tue, 8 Apr 2008 13:25:14 -0500, McKown, John wrote:
>
>77 MYDATA PIC S9(8) BINARY.
>..
>ADD +1 TO MYDATA
>
> In my own code, a simple:
>
>       L       6,MYDATA
>       A       6,PLUS1
>       ST      6,MYDATA
>
>suffices.

John,

When you get your nice new z10 you will be able to simplify it even further:

        ASI   MYDATA,1

http://publibfp.boulder.ibm.com/epubs/pdf/dz9zr006.pdf

Regards,
Roger Bowler
Hercules "the people's mainframe"

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

Reply via email to