Search results

Hi all. There is an example: run p2. catch e as Progress.Lang.AppError: message e:ReturnValue view-as alert-box. end catch. procedure p2: def var x as int. def var c-tmp as char. _tr: do on error undo, return error 'Error' on endkey undo, return error 'Endkey'...