I vote Rashmi compiles his code, runs it, and learns from his experience.

On Fri, 3 Aug 2007 13:17:03 -0400, Kirk Talman <[EMAIL PROTECTED]> wrote:

>I vote for abend S0C7 on MOVE N2 TO N4.
>
>IBM Mainframe Discussion List <IBM-MAIN@BAMA.UA.EDU> wrote on 
08/01/2007
>07:15:30 AM:
>
>> Hi,
>>
>> I have a query regarding the following group move:
>>
>> 01 GRP1.
>>      05      N1           PIC S9(9) COMP-3 VALUE +0.
>>      05      N2           PIC S9(9) COMP-3 VALUE +0.
>>
>> 01 GRP2.
>>      05      N3           PIC S9(9) COMP-3 VALUE +123.
>>
>> 01 N4      PIC ZZZ,ZZZ,ZZ9.
>>
>> PROCEDURE DIVISION.
>>     INITIALIZE GRP1.
>>     MOVE GRP2 TO GRP1.
>>     MOVE N2 TO N4.
>>     DISPLAY N4.
>>
>> What value is displayed and why?
>>
>> Regards,
>> Rashmi
>
>
>
>-----------------------------------------
>The information contained in this communication (including any
>attachments hereto) is confidential and is intended solely for the
>personal and confidential use of the individual or entity to whom
>it is addressed. The information may also constitute a legally
>privileged confidential communication. If the reader of this
>message is not the intended recipient or an agent responsible for
>delivering it to the intended recipient, you are hereby notified
>that you have received this communication in error and that any
>review, dissemination, copying, or unauthorized use of this
>information, or the taking of any action in reliance on the
>contents of this information is strictly prohibited. If you have
>received this communication in error, please notify us immediately
>by e-mail, and delete the original message. Thank you
>
>----------------------------------------------------------------------
>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

Reply via email to