> -----Original Message----- > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On > Behalf Of Chase, John > Sent: Friday, May 01, 2009 9:39 AM > To: IBM-MAIN@bama.ua.edu > Subject: Re: Enterprise COBOL code generation question <Snipped> > But then there's this in the "Notes" for TRUNC in the Installation & > Customization Guide: > > " 2. TRUNC=BIN is the recommended option when interfacing with other > products that have S/390-format binary data (such as CICS, DB2, FORTRAN, > and PL/I). This is especially true if there is a possibility of having > more than 9 digits in a fullword or more than 4 digits in a halfword." > > So, we're stuck with TRUNC(BIN) in CICS, where arguably we'd want the > "best" performance. :-(
Reading that recommendation more carefully now, I think it fails to add the following rationalization: "ASSUMING you want to keep your BINARY variables limited to their COBOL picture definitions. If you just want to use the full binary range of values, then go ahead and use TRUNC(OPT), keeping in mind that arithmetic overflow from very large values may occur, and preventing or dealing with the consequences of such overflows is your program's responsibility." Peter This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- 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