How to display error messages in BAPI_PO_CHANGE with PO and item ?

Question

Hello Friends,
I am calling BAPI_PO_CHANGE to update delivery flag for 50 POs.
Each PO has 4 line items. For ex.
10001     10     5.00     material1      X
10001     20     45.00     material2      X
10001     30     22.00     material15      X     u201Cerror
10001     40     45.00     material41      X
10002     10     46.00     material17      X
10002     20     25.00     material3      X     u201Cerror
10002     30     75.00     material5      X     u201Cerror
10002     40     44.00     material8      X
u2026u2026u2026u2026u2026..
u2026u2026u2026u2026u2026
Now, suppose some line items have error.
I am able to get it from BAPIu2019s    RETURN table.
But how can I display that error message with PO and line item?
NOTE : I am calling BAPI_PO_CHANGE for each PO with ITEM internal table.
Please guide me.
Regards
RH

Answer 1

The it_change_return fields parameter and row identify the PO_ITEM.
Try this...
*&      Form  READ_MESSAGES_OP_CHANGE
      BAPI_PO_CHANGE Return messages
FORM read_messages_op_change .
  DELETE it_change_return WHERE type = 'W'.
  DELETE it_change_return WHERE type = 'I'.
  LOOP AT it_change_return ASSIGNING <is_change_return>.
    IF <is_change_return>-type = 'E'.
      z_error_flg = 'X'.
    ENDIF.
    v_item = v_item + 1.
    it_log_mess-packagenr = v_packagenr.
    it_log_mess-object = v_object.
    it_log_mess-docnum = v_docnum.
    it_log_mess-itemnr = v_item.
    it_log_mess-type = <is_change_return>-type.
    it_log_mess-id = <is_change_return>-id.
    it_log_mess-mnumber = <is_change_return>-number.
    IF <is_change_return>-parameter <> 'POITEM'.
      it_log_mess-message = text-po1.
      REPLACE '&' WITH z_po_number INTO it_log_mess-message.
      CONCATENATE it_log_mess-message <is_change_return>-message
        INTO it_log_mess-message SEPARATED BY space.
    ELSE.
      READ TABLE it_change_poitem ASSIGNING <is_change_poitem>
        INDEX <is_change_return>-row.
      it_log_mess-message = text-pr2.
      REPLACE '&' WITH z_po_number INTO it_log_mess-message.
      REPLACE '@' WITH <is_change_poitem>-po_item
        INTO it_log_mess-message.
      CONCATENATE it_log_mess-message <is_change_return>-message
            INTO it_log_mess-message SEPARATED BY space.
    ENDIF.
    it_log_mess-message_v1 = <is_change_return>-message_v1.
    it_log_mess-message_v2 = <is_change_return>-message_v2.
    it_log_mess-message_v3 = <is_change_return>-message_v3.
    it_log_mess-message_v4 = <is_change_return>-message_v4.
    APPEND it_log_mess.
  ENDLOOP.
ENDFORM.                    " READ_MESSAGES_OP_CHANGE