Hey George

I don't know if this is the best way to calculate it but it works!

LPARAMETER lcString
LOCAL i, lnNum, lnDom, lnMax, lnDecimal
lnMax = 64
lnNum = 1
lnDecimal = VAL(lcString)
* Decimal part only
FOR i = 1 to lnMax
  lnNum = lnDecimal * i
  IF ROUND(lnNum,0) == lnNum
    lnDom = i
    EXIT
  ENDIF
ENDFOR
RETURN ALLTRIM(STR(lnNum)) + "/" + ALLTRIM(STR(lnDom))+["]

All I have to add is the part to round it out if it falls outside of the lnMax range...

What do you think??