Recent content by Alexander

In general, this is the main thing that interested me. It looks like the only way is to split the blocks.

Not supported in 10.b ROUTINE-LEVEL ON ERROR UNDO, THROW - does not work for endkey (ofc, it is not an error). ROUTINE-LEVEL ON ERROR UNDO, THROW. do trans : run dlg. message 'ok' view-as alert-box. /* still "ok" even if the user presses "endkey" */ catch e as...

If the procedure p2 does not catch and throw the error, then error handling will work in the traditional style, like "on error undo, retutn error" and the error text will not be available in the calling procedure. I usually use my custom "cancelerror" to cancel the operation/transaction...

This is exactly what I am trying to do! But if you use the "update" or "wait-for" more than once in a block, the "wait-for" will throw an error instead of "on endkey undo, throw new MyEndKeyError". The first code snippet demonstrates this with "return error 'Endkey'" just to be compilable...

I mean "update" is "display, wait-for, assign". When "wait-for" used explictly i have same problrem.

I want to show all errors in message box, except returned by "on endkey undo, return error". And i cant use just "on endkey undo, return" because error required, to stop and undo calling block.

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'...

Hi. Is there any way to use piew with koi8-r?