Purchase order item - avoid delete

Question

Hi Expert,
I have to make a control to avoid the deletion of an item of purchase order.
In other word, when the user press the delete button in the item of purchase order, I have to check variable A.
If A = 'X' --> avoid delete item, and pop for info
else.
delete item
endif.
How I can make it ? There's a BADI, or an user exit ?
Tks a lot.

Answer 1

Hello,
Please implement the Badi "ME_PROCESS_PO" in that go to
if_ex_me_process_po_cust~process_item.
Write the code
  DATA : re_data TYPE mepoitem.
  DATA : mmmfd_preq_no       TYPE mmpur_metafield VALUE 003.  "Banfnummer
  INCLUDE mm_messages_mac. "useful macros for message handling
  CALL METHOD im_item->get_data
    RECEIVING
      re_data = re_data.
  IF re_data-lokez ne space.
    CALL METHOD im_item->invalidate( ).
    mmpur_metafield mmmfd_preq_no.
  mmpur_message_forced 'E' 'ME' '083' text-003 'Deletion not allowed' '' ''.  ENDIF.