I would always use numbers converted to internal format when doing financial calculation. We have never ever experienced this problem, and we do have heavy financial calculations.
so my program would look like this: NET = ICONV(294987.31,'MD2') VAT = ICONV(51622.78,'MD2') TOT = OCONV(VAT + NET,'MD2') IF TOT EQ 346610.09 THEN PRINT 'EQUAL!' ELSE PRINT 'WIDE ZERO PROBLEM ? ' END 01 run BP TWZ EQUAL! > Claus Derlien edb-afdelingen direkte : 63 13 86 69 email : [EMAIL PROTECTED] > 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 ? > Frie Funktionfrer - faglig organisation og tvfrfaglig a-kasse - www.f-f.dk *************************************************************************************************************************************** Denne email og alle filer vedlagt som bilag kan indeholde fortroligt materiale, der kun er beregnet for adressaten, og maa ikke udleveres eller kopieres til uvedkommende. Har De ved en fejltagelse modtaget denne email, bedes De venligst omgaaende meddele os dette pr. telefon : 6313 8550. Paa forhaand tak. *************************************************************************************************************************************** This email and any files transmitted with it may contain confidential information intended for the addressee(s) only. The information is not to be surrendered or copied to unauthorised persons. If you have received this communication in error, please notify us immediately by telephone: +45 6313 8550. Thank you. *************************************************************************************************************************************** ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
