CLEAR CLOSE tables all CREATE CURSOR testcrs (fldn N(12,4), fldcur Y) ln=300000 SET DECIMALS TO 10 INSERT INTO testcrs VALUES (ln,ln) n1=43.05 n2=44.06 ?"Variable: ", n2/n1 * m.ln, m.ln * n2/n1 && ~same ?"Variable: ", ROUND(n2/n1,4), n2/n1 && ~same ? "1.0235 * ln" , 1.0235*m.ln ? "1.023461091754 * ln" , 1.023461091754*m.ln ?"Variable: ", ROUND(n2/n1,4) * m.ln, m.ln * n2/n1 && ~same ?"Numeric field: ", n2/n1 * fldn, fldn * n2/n1 && ~same ?"Currency field: ", n2/n1 * fldcur, fldcur * n2/n1 && 307050.0000, 307038.3275 different results ?! ?"Currency2Numeric: ", n2/n1 * MTON(fldcur), MTON(fldcur) * n2/n1 && ~sameAccording to Currency Type
>* Tested in versions VFP5, VFP7, VFP 9 and VFP 9 Sp1 >CLEAR >CLOSE tables all >CREATE CURSOR testcrs (fldn N(12,4), fldcur Y) >ln=300000 > >INSERT INTO testcrs VALUES (ln,ln) >n1=43.05 >n2=44.06 > >?"Variable: ", n2/n1 * ln, ln * n2/n1 && ~same >?"Numeric field: ", n2/n1 * fldn, fldn * n2/n1 && ~same > >?"Currency field: ", n2/n1 * fldcur, fldcur * n2/n1 && 307050.0000, 307038.3275 different results ?! >?"Currency2Numeric: ", n2/n1 * MTON(fldcur), MTON(fldcur) * n2/n1 && ~same >>