>>lnNumber = 1.000 >>lcStr = PADL(lnNumber,20) >>IF AT(".", lcStr) = 0 >> ? 0 >>ELSE >> ? LEN(SUBSTR(lcStr, AT(".", lcStr)+1)) >>ENDIF