Int Funtion

[santango]

please help
cal = -10.00
i need 10 (bolt)
abs is working ok but int is not

if {PART.QTY_ON_HAND}-{@calculo de qty} >0 then
formula = "Qty OK"
else
dim cal as Number
'cal = Int({PART.QTY_ON_HAND}) - Int({@calculo de qty})
cal = {PART.QTY_ON_HAND} - {@calculo de qty}
'formula = ToText(abs(cal))
formula = totext(abs(Int(cal)))

end if