BAPI to reject PO (like ME29N functionality to reject PO)

Question

Is there a BAPI to reject PO (like ME29N functionality to reject PO).
The BAPI_PO_CHANGE does not have the functionality to change EKKO-
PROCSTAT. Is there a BAPI that can update EKKO-PROCSTAT?
Thanks,
Apollo

Answer 1

We just implemented an implicit enhancement to include  MM06EFDCM form MEPO_HEADER_FILL_PROCSTAT. This is being called in the BAPI_PO_CHANGE.
Here's a sample code I used in my method that rejects the PO:
  data: l_procstat type ekko-procstat value '08'.
  export l_procstat from l_procstat
      to database indx(st) id 'ZWF_POREJECT'.
  l_ebeln = v_zsc_po_hdr-doc_number.
call function 'BAPI_PO_CHANGE'
    exporting
      purchaseorder = PO number
    tables
      return        = lt_return.
Here's the implicit enhancement that I created in include MM06EFDCM form MEPO_HEADER_FILL_PROCSTAT:
FORM mepo_header_fill_procstat CHANGING ch_procstat TYPE ekko-procstat.
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
data: l_procstat type ekko-procstat.
import l_procstat to l_procstat
    from database indx(st) ID 'ZWF_POREJECT'.
if sy-subrc = 0.
  delete from database indx(st) id 'ZWF_POREJECT'.
  dekko-procstat = l_procstat.
endif.
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  ch_procstat = dekko-procstat.
  IF ch_procstat IS INITIAL.
    DATA: l_ekko TYPE ekko.
    l_ekko = dekko.
    PERFORM procstate_initialize USING trtyp CHANGING l_ekko.
    ch_procstat = l_ekko-procstat.
  ENDIF.
ENDFORM.                    "mepo_header_fill_procstat
Hope this helps.