Also be aware that I recently shot a bug for a compatriot where having an unsigned binary number defined made a If numeric fail. never went to root cause but it seemed there might be an issue of moves between binary fields being handled by cobol using MVC instead of ZAP.
GOKW IBM Mainframe Discussion List <IBM-MAIN@bama.ua.edu> wrote on 04/16/2010 12:15:53 PM: > From: "Chase, John" <jch...@ussco.com> > Date: 04/16/2010 12:16 PM > Subject: Re: Arithmetic on COBOL usage is pointer > > -----Original Message----- > > From: IBM Mainframe Discussion List On Behalf Of Joe Reichman > > > > I redefined a usage pointer to PIC 9(8) comp to do arithmetic and got > > weird results > > Are there any rules for doing math on > > Usage is pointer > Compiler option TRUNC(BIN) would be "a friend", but specifying COMP-5 on > your REDEFINE would be better. > -jc- ----------------------------------------- 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. 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html