CALLING BUSINESS OBJECT FROM AN ABAP REPORT

Question

Hi friends,
           I have a business object to which a Custom Function Module is assigned in one of its method.This Function Module calls a Bapi to update a Service Order.I need to capture the status of Idocs regarding success or failure from the function Module in the ABAP Report.I would like to know if there is any way to call this business object from my report and get the status of IDOC.
Regards,
Dev Reddy

Answer 1

sorry I think i was not clear in explaining .I am calling a BAPI to update 'Priority' field of service orders in a custom function module(remote enabled) and I have assigned this bapi to a custom business object. Also I have developed an ALE interface thru BDBG transaction which automatically generates custom basic idoc type,messsage type ,Ale i/b and o/b function modules.
Actually my requirement deals with a report where we have list of service orders in an internal table and pass each service order to update Priority field.
Is there any way to create an IDOC from the report and update the priority field and pass back the status of IDOC.
I have tried calling ALE O/B function function module generated thru BDBG transaction in my report but as a result i am unable to get any of the message whether idoc is created or not.
Here is my report code.
data: it_methods type table of BAPI_ALM_ORDER_METHOD with header line,
      it_header type table of BAPI_ALM_ORDER_HEADERS_I with header line,
      it_header_up type table of BAPI_ALM_ORDER_HEADERS_UP with header line,
      RECEIVERS TYPE TABLE OF BDI_LOGSYS WITH HEADER LINE.
T_METHODS-REFNUMBER = '000001'.
IT_METHODS-OBJECTTYPE = 'HEADER'.
IT_METHODS-METHOD = 'CHANGE'.
IT_METHODS-OBJECTKEY = '000004000768'.
APPEND IT_METHODS.
CLEAR IT_METHODS.
IT_METHODS-REFNUMBER = '000000'.
IT_METHODS-METHOD = 'SAVE'.
APPEND IT_METHODS.
IT_HEADER-ORDERID = '000004000768'.
IT_HEADER-PRIORITY = '2'.
APPEND IT_HEADER.
IT_HEADER_UP-ORDERID = '000004000768'.
IT_HEADER_UP-PRIORITY = 'X'.
APPEND IT_HEADER_UP.
CALL FUNCTION 'ZZ_FM_SM_ORD_PRIOR_UPDATE'
EXPORTING
   OBJ_TYPE                      = 'ZBOSMPRUPD'
   SERIAL_ID                     = '0'
  TABLES
    ITMETHODS                     = IT_METHODS
    ITHEADER                      = IT_HEADER
    ITHEADERUP                    = IT_HEADER_UP
    RECEIVERS                     = RECEIVERS
  COMMUNICATION_DOCUMENTS       =
  APPLICATION_OBJECTS           =
EXCEPTIONS
   ERROR_CREATING_IDOCS          = 1
   OTHERS                        = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Thanks,
Dev Reddy