Getting an error " Atleast one entry could not be found in object buffer"

Question

Hi All,
I m facing an peculiar problem while executing a custom Function Module.I have written a custom FM to create a service request and fetch the obj ID and return it back.When i tested the same in debugging mode everything is working fine. But when i execute it directly, It is giving me an error saying " Atleast one entry could not be found in object buffer" at the bottom of the screen and return parameters are not displayed.
Any pointers on this would be of great help.
Thanks,
Eureka

Answer 1

Hi Phani,
PFB the source code. Please look in to this at your convenient time..
FUNCTION ZSERVICE_TICKET_INC_EDIORDERS.
*"*"Local Interface:
*"  IMPORTING
*"     REFERENCE(ZPROCESS_TYPE) TYPE  CRMT_PROCESS_TYPE
*"  EXPORTING
*"     REFERENCE(ZOBJECT_ID) TYPE  CRMT_OBJECT_ID_DB
* PARAMETER QUANTITY TYPE CRMT_SCHEDLIN_QUAN.
* DATA DECLARATION FOR LOCAL VARIABLES
  DATA : lv_header_guid        TYPE                   GUID_32,
         lv_header_guid16      type                   guid_16,
         lv_item_guid          TYPE                   guid_32,
         lv_sched_guid         TYPE                   guid_32,
         lt_header_guid16      type                   CRMT_OBJECT_GUID_TAB,
         wa_header_guid16      like line of           lt_header_guid16.
  DATA:  itab_header           TYPE STANDARD TABLE OF bapibus20001_header_ins,
         itab_created_process  TYPE STANDARD TABLE OF bapibus20001_header_ins,
         itab_objects_to_save  TYPE STANDARD TABLE OF bapibus20001_guid_dis,
         itab_partner          TYPE STANDARD TABLE OF bapibus20001_partner_ins,
         itab_input_fields     TYPE STANDARD TABLE OF bapibus20001_input_fields,
         itab_return           TYPE STANDARD TABLE OF bapiret2,
         lt_orderadm_h         type                   CRMT_ORDERADM_H_WRKT.
* DATA DECLARATION WORKAREAS
DATA:   wa_header             TYPE                   bapibus20001_header_ins,
         wa_partner            TYPE                   bapibus20001_partner_ins,
*         wa_item               TYPE                   bapibus20001_item,
*         WA_SCHEDLIN_I         TYPE                   BAPIBUS20001_SCHEDLIN,
         ls_inputfields        TYPE                   bapibus20001_input_fields,
         wa_objects_to_save    LIKE                   LINE OF itab_objects_to_save.
*         wa_pricing            TYPE                   bapibus20001_pricing,
*         wa_sales              TYPE                   bapibus20001_sales,
*         wa_shipping           TYPE                   bapibus20001_shipping,
*         wa_product_i          TYPE                   bapibus20001_product.
*         wa_schedlin_i    LIKE LINE OF lt_schedlin_i,
*         wa_schedlines   LIKE LINE OF lt_schedlines,
DATA:   wa_created_process    LIKE LINE OF itab_created_process,
         itab_saved_objects    TYPE STANDARD TABLE OF bapibus20001_object_id,
         wa_saved_objects      LIKE LINE OF itab_saved_objects,
         gc_x TYPE c.
         gc_x = 'x'.
* CREATION OF HEADER GUID
  CALL FUNCTION 'GUID_CREATE'
    IMPORTING
      ev_guid_16 = lv_header_guid16
      ev_guid_32 = lv_header_guid.
  CLEAR : wa_header.
data: temp type  CRMT_OBJECT_GUID_TAB.
*temp = (CRMT_OBJECT_GUID_TAB)lv_header_guid16.
* Passing the respective values from the Header table to internal table.
  wa_header-guid          =  lv_header_guid.
*  zprocess_type           = 'ZSC'.
  wa_header-process_type  =  zprocess_type.
*  wa_header-description = 'MY S2D ORDER'.
  APPEND wa_header TO itab_header.
*Appending the values to the ITAB_HEADER.
*      ls_inputfields-ref_guid =  LV_HEADER_GUID.
*      ls_inputfields-REF_KIND = 'A'.
*      ls_inputfields-objectname = 'ORDERADM_H'.
**     ls_inputfields-logical_key = ' '.
*      ls_inputfields-fieldname = 'PROCESS_TYPE'.
*      APPEND ls_inputfields TO ITAB_INPUT_FIELDS.
*      CLEAR ls_inputfields.
* HEADER PARTNER DETAILS
  wa_partner-ref_guid = lv_header_guid.
  wa_partner-ref_kind = 'A'.
  wa_partner-ref_partner_handle = '0001'.
  wa_partner-partner_fct = '00000001'.
  wa_partner-partner_no =  '1000007'.
  wa_partner-no_type = 'BP'.
  wa_partner-display_type  =  'BP'.
  APPEND wa_partner TO itab_partner.
* APPENDING THE ITAB_PARTNER TO INPUT_FIELDS
  ls_inputfields-ref_guid =  lv_header_guid.
  ls_inputfields-ref_kind = 'A'.
  ls_inputfields-objectname = 'PARTNER'.
  ls_inputfields-logical_key = '0001'.
  ls_inputfields-fieldname = 'REF_PARTNER_HANDLE'.
  APPEND ls_inputfields TO itab_input_fields.
  CLEAR ls_inputfields.
****PARTNER_FCT*********************************
  ls_inputfields-ref_guid =  lv_header_guid.
  ls_inputfields-ref_kind = 'A'.
  ls_inputfields-objectname = 'PARTNER'.
  ls_inputfields-logical_key = '0001'.
  ls_inputfields-fieldname = 'PARTNER_FCT'.
  APPEND ls_inputfields TO itab_input_fields.
  CLEAR ls_inputfields.
****PARTNER_NO**********************************
  ls_inputfields-ref_guid =  lv_header_guid.
  ls_inputfields-ref_kind = 'A'.
  ls_inputfields-objectname = 'PARTNER'.
  ls_inputfields-logical_key = '0001'.
  ls_inputfields-fieldname = 'PARTNER_NO'.
  APPEND ls_inputfields TO itab_input_fields.
  CLEAR ls_inputfields.
****NO_TYPE*************************************
  ls_inputfields-ref_guid =  lv_header_guid.
  ls_inputfields-ref_kind = 'A'.
  ls_inputfields-objectname = 'PARTNER'.
  ls_inputfields-logical_key = '0001'.
  ls_inputfields-fieldname = 'NO_TYPE'.
  APPEND ls_inputfields TO itab_input_fields.
  CLEAR ls_inputfields.
****DISPLAY_TYPE********************************
  ls_inputfields-ref_guid =  lv_header_guid.
  ls_inputfields-ref_kind = 'A'.
  ls_inputfields-objectname = 'PARTNER'.
  ls_inputfields-logical_key = '0001'.
  ls_inputfields-fieldname = 'DISPLAY_TYPE'.
  APPEND ls_inputfields TO itab_input_fields.
  CLEAR ls_inputfields.
*****KIND_OF_ENTRY*******************************
*      ls_inputfields-ref_guid =  LV_HEADER_GUID.
*      ls_inputfields-REF_KIND = 'A'.
*      ls_inputfields-objectname = 'PARTNER'.
*      ls_inputfields-logical_key = '0001'.
*      ls_inputfields-fieldname = 'KIND_OF_ENTRY'.
*      APPEND ls_inputfields TO ITAB_INPUT_FIELDS.
*      CLEAR ls_inputfields.
*Calling a standard BAPI to create SALES OREDER using the filled internal tables.
  CALL FUNCTION 'BAPI_BUSPROCESSND_CREATEMULTI'
    TABLES
          header          = itab_header
*          item            = itab_item
          return          = itab_return
          partner         = itab_partner
          input_fields    = itab_input_fields
          created_process = itab_created_process.
*         APPOINTMENT     = ITAB_APPOINTMENT
*         TEXT            = ITAB_TEXT
*          scheduleline    = lt_schedlin_i
*         pricing         = itab_pricing
*          sales           = itab_sales
*          shipping        = itab_shipping
*          product         = itab_product_i.
  READ TABLE itab_created_process INTO wa_created_process WITH KEY guid = lv_header_guid BINARY SEARCH.
  wa_objects_to_save-guid = wa_created_process-guid.
* Appending the Guid of the SALES ORDER to be saved to the internal table
  APPEND wa_objects_to_save TO itab_objects_to_save.
*   Calling standard BAPI to save the process.
  CALL FUNCTION 'BAPI_BUSPROCESSND_SAVE'
    EXPORTING
      update_task_local = space
      save_frame_log    = gc_x
    TABLES
      objects_to_save   = itab_objects_to_save
      saved_objects     = itab_saved_objects
      return            = itab_return.
* Calling the Standard BAPI to Commit the transcation.
  CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
wa_header_guid16 = lv_header_guid16.
append wa_header_guid16 to lt_header_guid16.
* Calling CRM_ORDER_READ to get the object id and add line item to the order
CALL FUNCTION 'CRM_ORDER_READ'
    EXPORTING
     IT_HEADER_GUID                    =  lt_header_guid16
    IMPORTING
      ET_ORDERADM_H                     = lt_orderadm_h
  IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
data: object_id type CRMT_OBJECT_ID_DB,
      wa_orderadm_h like line of lt_orderadm_h.
read table lt_orderadm_h into wa_orderadm_h WITH KEY guid = lv_header_guid.
object_id = wa_orderadm_h-object_id.
Zobject_id = wa_orderadm_h-object_id.
WRITE: / 'Object ID: ',object_id.
ENDFUNCTION.