FUNCTION _DecToFraction(nDec1) *----------------------------------- * Transforma de Decimal a Fraccion * Uso: _DecToFraction(nDec1) * Devuelve: Caracter *----------------------------------- LOCAL cRes, nCon nCon = 0 cRes = "No Fraction" DO WHILE nCon<1000000 nCon = nCon+1 DO CASE CASE MOD(nCon,nDec1)=0 cRes=ALLTRIM(STR(nCon))+"/"+ALLTRIM(STR(nCon/nDec1)) EXIT ENDCASE ENDDO RETURN cRes ENDFUNC>I need to convert a decimal to a fraction... anyone have/know of a function for this?