|
|
| Returns TRUE if the specified string in a whole holds a numeric value. Be careful as even negative numbers inside strings are considered as non-numeric. |
 |
| TargetString |
The string that will be checked for possible numeric value. |
|
external inner function Boolean IsNumeric(string);
global
procedure OnApplicationStartup()
begin
array string 40 text;
integer i;
text[0] = "412a523";
text[1] = "5152522";
text[2] = "-123456";
while(nonblank(text[i])) begin
if(IsNumeric(text[i])) then begin
stopalert(text[i] & " is numeric value!");
end else begin
stopalert(text[i] & " is not a numeric value!");
end;
i = i + 1;
end;
return;
end;
««