Maintains the status of an asynchronous request running on an OpenEdge application server or Web service.
                    IF VALID-OBJECT(SELF:ERROR-OBJECT) THEN DO:
    // Perhaps display the error
    MESSAGE SELF:ERROR-OBJECT:GetMessage(1) VIEW-AS ALERT-BOX.
END.
/* That's probably sufficient unless you are using STOP-AFTER. 
   It could also possibly be LockConflict, though that would
   normally be handled on the server side. If both are
   possible, check the type to know what it is. */  
ELSE IF VALID-OBJECT(SELF:STOP-OBJECT) THEN DO:
    IF TYPE-OF(SELF:STOP-OBJECT, Progress.Lang.StopAfter) THEN 
        . . .
END.
                   | 
                
Note that references to all objects that implement the Progress.Lang.Error interface are returned using the ERROR-OBJECT attribute, including Progress.Lang.StopError. The STOP-OBJECT attribute returns only stop object references for Progress.Lang.Stop or one of its subclasses, such as Progress.Lang.StopAfter in the example.