Error Handling

[Subhransu]

Hi All,
I would like to know if there is a way to capture the error message without using NO-ERROR and ERROR-STATUS:GET-MESSAGE(n)?

Thanks.
Subhransu

 

[rzr]

from the documentation:

[FONT=courier new]DEFINE VARIABLE iCust AS INTEGER.

ASSIGN iCust = 5000.

FIND Customer WHERE CustNum = iCust. /* Will fail */

/* The associated block for this CATCH block is the main block of the .p */
CATCH eSysError AS Progress.Lang.SysError:
    MESSAGE eSysError:GetMessage(1) VIEW-AS ALERT-BOX BUTTONS OK.
    DELETE OBJECT eSysError.
END CATCH.[/FONT]

 

[Subhransu]

Thanks for this info. However I am using 9.1e. Is there any other way around?

 

[TomBascom]

No.

9.1E is ancient and obsolete. Version 11 is the current release. You should upgrade. Especially if you need features that are simply not available in older releases.

 

[RealHeavyDude]

Tom Bascom's opinion++

 

[Cringer]

Please use valid Progress syntax...

TomBascomOpinion = TomBascomOpinion + 1.

 

[RealHeavyDude]

Sorry for that - did too much Java lately. I did not intend to be offensive ...

 

[Cringer]

Hehe

 

[TomBascom]

I ask for a "++" operator at 4gl info exchanges whenever I get the chance. Someday we may have it.

 

[Cringer]

Knowing Progress it'll end up being something unwieldy like NOW-LET-US-INCREMENT-SOME-VARIABLE-SOMEWHERE(TomBascomOpinion).