Numarul zecimalelor dintr-un numar

*nNumericValueWithDecimal = 12345.1234
*GetDecimalNo(nNumericValueWithDecimal) = 4

FUNC GetDecimalNo (nNumericValueWithDecimal)
nPos = At(".",Transform(nNumericValueWithDecimal))
RETURN IIF(nPos>0,Len(Substr(Transf(nNumericValueWithDecimal), nPos+1)),0)