Display item level Error in ME21N

Question

i want to display an Item level message in ME21N.
Currently the messages are been displayed but all the messages are displayed at the header level.
im using an exit for the custom validation which I am doing.
how can we indicate the message for each item at item level.
please help.

Answer 1

Use this badi.
ME_PROCESS_PO_CUST
method PROCESS_ITEM
      CHECK doctype NE 'UB'. "stock transport purchase order no restriction
      lt_accounts = im_item->get_accountings( ).
      LOOP AT lt_accounts INTO st_account.
        l_accounting = st_account-accounting.
        ls_mepoaccounting = l_accounting->get_data( ).
        CHECK ls_mepoaccounting-ps_psp_pnr NE space.
        SELECT SINGLE stufe FROM prps INTO v_stufe
        WHERE pspnr = ls_mepoaccounting-ps_psp_pnr.
        IF sy-subrc EQ 0.
          CHECK v_stufe LE 3.
          CONCATENATE 'WBS Element of Level greater than 3:'
          'IN Item:' ls_mepoaccounting-ebelp INTO l_text.
          mmpur_message_forced 'E' 'ME' '083' l_text ' '  ' '  ' '.
          CALL METHOD im_item->invalidate( ).
        ENDIF.
      ENDLOOP.