T
Torben
Guest
Somethink like the following should do what you want: tryblock: do while TRUE on error undo, retry: do on error undo, throw: lint = integer(lText). LEAVE tryblock. catch err as Progress.Lang.Error : if lText > "" then do: substring(lText, 1, 1) = "". NEXT tryblock. end. end catch. end. end.
Continue reading...
Continue reading...