I was always taught (many moons ago now) never to do calculations in "output format" so I would write that code as:
0001: NET = ICONV(294987.31,'MD2') 0002: VAT = ICONV(51622.78,'MD2') 0003: TOT = NET + VAT 0004: TOT = OCONV(TOT,'MD2') 0005: IF TOT EQ 346610.09 THEN PRINT 'Equal' 0006: ELSE PRINT 'Wide-zero problem ?' 0007: END One of the joys of being an end-user now rather than a consultant I can control what code my systems run! -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Piers Angliss Sent: 22 September 2004 09:26 To: [EMAIL PROTECTED] Subject: RE: [U2] [UV] - Wide Zero Adrian, I'm surprised you haven't seen it (not that I'd wish the subsequent reconciliation and explanation on anyone) If you're interested here's an example : >ED BP TWZ 6 lines long. ----: P 0001: NET = 294987.31 0002: VAT = 51622.78 0003: TOT = NET + VAT 0004: IF TOT EQ 346610.09 THEN PRINT 'Equal' 0005: ELSE PRINT 'Wide-zero problem ?' 0006: END Bottom at line 6. ----: Q >RUN BP TWZ Wide-zero problem ? I've seen it 3 times in the last 3 years, this is the simplest example yet. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Adrian Matthews I'm obviously missing something here. Our system processes thousands of financial transactions a day with most calculations being done to several places. We've never had a need to change the Wide0 settings from the default.... -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Goo'day, We have *always* (since 1998, anyway, 9.3?? on NT) changed WideZero to 0X3eb000000. This way we *always* get 1-1=0 .... ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ The information contained in this email is strictly confidential and for the use of the addressee only, unless otherwise indicated. If you are not the intended recipient, please do not read, copy, use or disclose to others this message or any attachment. Please also notify the sender by replying to this email or by telephone +44 (0)20 7896 0011 and then delete the email and any copies of it. Opinions, conclusions (etc.) that do not relate to the official business of this company shall be understood as neither given nor endorsed by it. IG Markets Limited and IG Index Plc are authorised and regulated by the Financial Services Authority and, in Australia, by the Australian Securities and Investments Commission. ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
