Overkill solution... function isPositiveInteger pValue replace comma with empty in pValue # Thousands separator replace "$" with empty in pValue # Currency identifier try add 1 to pValue catch errnum return "false" # Not a number end try if trunc(pValue) <> pValue then return "false" # Not an Integer return pValue >= 1 # Is not negative end isPositiveInteger
Underkill solution... function isPositiveInteger pValue return (pValue is a number) AND (pValue >=0) AND (trunc(pValue)=pValue) end isPositiveInteger /H _______________________________________________ use-revolution mailing list use-revolution@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-revolution