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