Exception 'error_message' in ABAP Objects

Question

I've got a heterogeneous scenario with new program parts in ABAP objects and older parts in classical ABAP.
In the older parts some R/3 standard functions are called which dump dialog messages which are not allowed at that state of the program flow ('on commit').
The simple solution in classical ABAP was to use standard exception 'error_message' in the top level 'call function' statement thus catch all dialog messages in lower levels.
I am looking for an analog solution in object oriented ABAP. But exception 'error_message' is not allowed with 'call method'. It cannot be defined statically in the methods declaration. And the system exception caused by the dialog error message is not included in the set of catchable system errors.
I would be grateful for any hints concerning this problem.

Answer 1

Hi
Excuse me! But I didn't want to sent you my answer.
Anyway:
CLASS lcl_my_class DEFINITION.
  PUBLIC SECTION.
    METHODS my_method
              EXPORTING
                EXCEPTION TYPE CHAR1
              EXCEPTIONS error_messages.
ENDCLASS.                    "LCL_MY_CLASS DEFINITION
CLASS lcl_my_class IMPLEMENTATION.
  METHOD my_method.
    IF EXCEPTION = 'X'.
      MESSAGE e208(00) WITH 'Message error'
                  RAISING error_messages.
    ELSE.
      MESSAGE I208(00) WITH 'OK!'.
    ENDIF.
  ENDMETHOD.                    "MY_METHOD
ENDCLASS.                    "LCL_MY_CLASS IMPLEMENTATION
So you did want to do a call like this:
CALL METHOD lcl_my_class=>my_method
   EXCEPTIONS
     error_messages = 1
     error_message  = 2
     OTHERS         = 3.
No! you can't do it, but you try to insert your call in fm where you use ERROR_MESSAGE addition. I think you can do it if your methods are std.
Max
Message was edited by: max bianchi