...
          CALL FUNCTION 'MAP2E_KOMV_TO_BAPICOND'
            EXPORTING
              komv         = ls_tkomv
            CHANGING
              bapimepocond = pocond.
          pocond-cond_value = 18.
          pocond-currency   = '%'.
          pocond-conbaseval = - 50.
          pocond-change_id  = 'U'.

          pocondx-condition_no = pocond-condition_no.
          pocondx-itm_number   = pocond-itm_number.
          pocondx-cond_st_no   = pocond-cond_st_no.
          pocondx-cond_value   = 'X'.
          pocondx-currency     = 'X'.
          pocondx-conbaseval = 'X'.
          pocondx-change_id    = 'X'.
          APPEND pocond.
          APPEND pocondx
         ...
      CALL FUNCTION 'BAPI_PO_CHANGE'
        EXPORTING
          purchaseorder  = p_ebeln
        TABLES
          return         = return
          pocond       = pocond
          pocondx     = pocondx
        EXCEPTIONS
          OTHERS         = 1.
      ...