PO line item details from BAPI_PO_GETDETAIL1 and append to BAPI_PO_CHANGE

Question

Hi,
The requirement is to get PO line item details from BAPI_PO_GETDETAIL1 and save it in the internal table and append that internal table into  the BAPI_PO_CHANGE.
But i am getting dump in this program.
TABLES: ekpo.
DATA: BEGIN OF po_details.
        INCLUDE STRUCTURE BAPIMEPOITEM. "Include the structure of Dictionary Reference.
DATA: END OF po_details.
DATA: BEGIN OF po_details1.
        INCLUDE STRUCTURE BAPIMEPOITEM. "Include the structure of Dictionary Reference.
data: END OF po_details1.
DATA: it_po_details LIKE STANDARD TABLE OF po_details,
wa_po_details like line of it_po_details.
data: it_po_details1 like standard table of po_details,
wa_po_details1 like line of it_po_details1.
PARAMETERS: p_ebeln LIKE ekpo-ebeln DEFAULT '4500000016'.
CALL FUNCTION 'BAPI_PO_GETDETAIL1'
  EXPORTING
    PURCHASEORDER = p_ebeln
  TABLES
    POITEM        = it_po_details.
loop at it_po_details into po_details.
  read table it_po_details into wa_po_details with key PO_item = p_ebeln.
  move-corresponding po_details to po_details1.
  CALL FUNCTION 'BAPI_PO_CHANGE'
    EXPORTING
      PURCHASEORDER = p_ebeln
    TABLES
      POITEM        = it_po_details.
  append po_details to it_po_details1.
  LOOP AT it_po_details1 INTO wa_po_details1.
    WRITE:/ wa_po_details1-PO_item,
       wa_po_details1-MATERIAL,
       wa_po_details1-SHORT_TEXT,
       wa_po_details1-PLANT.
  ENDLOOP.
endloop.

Answer 1

HI,
1st you check for the following following  authorization objects are checked:                                                                               
M_BEST_BSA (document type in PO)                                                                               
M_BEST_EKG (purchasing group in PO)                                                                               
M_BEST_EKO (purchasing organization in PO)                                                                               
M_BEST_WRK (plant in PO)          
and to change the PO below is the eg for changing the short text:-
TABLES: ekpo.
DATA: BEGIN OF po_details.
        INCLUDE STRUCTURE bapimepoitem. "Include the structure of Dictionary Reference.
DATA: END OF po_details.
DATA: BEGIN OF po_details1.
        INCLUDE STRUCTURE bapimepoitem. "Include the structure of Dictionary Reference.
DATA: END OF po_details1.
DATA: it_po_details LIKE STANDARD TABLE OF po_details,
wa_po_details LIKE LINE OF it_po_details.
DATA: it_po_details1 LIKE STANDARD TABLE OF po_details,
wa_po_details1 LIKE LINE OF it_po_details1,
poheader  LIKE  bapimepoheader,
return  LIKE STANDARD TABLE OF  bapiret2 WITH HEADER LINE,
poitemx LIKE STANDARD TABLE OF  bapimepoitemx WITH HEADER LINE.
PARAMETERS: p_ebeln LIKE ekpo-ebeln DEFAULT '5600010646'.
CALL FUNCTION 'BAPI_PO_GETDETAIL1'
  EXPORTING
    purchaseorder = p_ebeln
  IMPORTING
    poheader      = poheader
  TABLES
    poitem        = it_po_details.
LOOP AT it_po_details INTO po_details.
  READ TABLE it_po_details INTO wa_po_details INDEX 1.
  MOVE-CORRESPONDING po_details TO po_details1.
  MOVE: po_details-po_item TO poitemx-po_item,
        'X' TO poitemx-short_text.
  APPEND poitemx.
  CALL FUNCTION 'BAPI_PO_CHANGE'
    EXPORTING
      purchaseorder = p_ebeln
      poheader      = poheader
    TABLES
      return        = return[]
      poitem        = it_po_details[]
      poitemx     =
      poitemx[].
  CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
  APPEND po_details TO it_po_details1.
  LOOP AT it_po_details1 INTO wa_po_details1.
    WRITE:/ wa_po_details1-po_item,
    wa_po_details1-material,
    wa_po_details1-short_text,
    wa_po_details1-plant.
  ENDLOOP.
ENDLOOP.