IS Retail, Promo Discounts, KA02, WGRU1

Question

I am trying to set up a promotional discount at Merchandise Category 1 (WGRU1) level. The promotion discount condition (KA02) requires a table containing the field WGRU1 in order to hold the % discount. Even though this field is in the field catalogue, it isn't available when creating the condition table. I tried creating a copy of this field (ZZWGRU1) but there isn't an appropriate user exit to populate this field from the standard one through WAK1. I also looked at the promotion BADI but had the same problem.
Does anyone know how best to resolve this?
Thank you,
Stephen Parsons

Answer 1

Hi
Have you tried these 2 standard BADIs using SE18 Transaction ?
WAKT_BADI_001
or
WAKT_BADI_002
Documenatation of BADI - WAKT_BADI_001 -
*</u>
Use
You use this Business Add-In (BAdI) to change how the system responds to customer-specific requirements when you enter new items in the retail promotion.
You can use the following methods: SUGGEST_ITEM_DATA, SUGGEST_STANDARD_SALES_PRICE, SUGGEST_PLANTGROUP_DATA, and INTERFACE_PROMOTION_DATA.
The method, SUGGEST_ITEM_DATA, allows you to preassign item data that is ready to be entered in the promotion processing to customer-specific requirements and to change the standard assignment determined by the system.
The method, SUGGEST_STANDARD_SALES_PRICE, is used to adjust the standard sales price defaulted by the system for customer-specific needs. The method <DS:IO.IF_EX_WAKT_BADI_001           SUGGEST_PLANTGROUP_DATA>SUGGEST_PLANTGROUP_DATA enables you to preassign plant group data ready for input in promotion processing according to customer-specific needs or change the standard assignment determined by the system. The method <DS:IO.IF_EX_WAKT_BADI_001           INTERFACE_PROMOTION_DATA>INTERFACE_PROMOTION_DATA transfers certain data that are due for update within the promotion to external applications or systems.
The methods: SUGGEST_ITEM_DATA and <DS:IO.IF_EX_WAKT_BADI_001           SUGGEST_STANDARD_SALES_PRICE>SUGGEST_STANDARD_SALES_PRICE are called if new items are included in a promotion in transactions WAK1, WAK2 or WAK12, or if a promotion is created with reference to a reference promotion. The method, SUGGEST_STANDARD_SALES_PRICE, is also called in the BAPI methods, Promotion.CreateFromData and Promotion.Change. It is also called if the user allows the system to determine the standard sales price again.
The method SUGGEST_PLANTGROUP_DATA is called if new plant groups are included in the transactions WAK1 or WAK2 or if a promotion is created in reference to a reference promotion. The method is called for all transactions that subsequently call a database change.
The standard procedure is run before the BAdI is called. The results can be changed in the BAdI implementation.
Standard settings
This BAdI is not active in the standard system. In the standard procedure, the system preassigns some of the item data from the header data in the retail promotion. When copying a promotion, selected item data is copied from the reference promotion. The standard sales price is determined in accordance with the settings in Customizing for the promotion type.
Example
You want to preassign the planned sales quantity to a promotion item.
Sample code for BADI - WAKT_BADI_001
method if_ex_wakt_badi_001~interface_promotion_data .
*** SAP implementation ***
  data l_s_wsaf_artmast_rem type wsaf_artmast_rem.
  data l_s_wsaf_promo_delta type wsaf_promo_delta.
  data l_t_wsaf_promo_delta type
                            standard table of wsaf_promo_delta.
  data l_s_d_waled          type waled.
  data l_s_d_wagud          type wagud.
  data l_s_x_waled          type waled.
  data l_s_x_wagud          type wagud.
  data l_s_db_wagu          type wagu.
  data l_werks              type t001w-werks.
  data l_timestampl         type timestampl.
  data l_datum_min          type date.
  data l_datum_max          type date.
  data l_datum_min_1        type date.
  data l_datum_min_2        type date.
  data l_datum_max_1        type date.
  data l_datum_max_2        type date.
* Bei Aufrufen mit Kennzeichen '2' Änderungen an Aktionen
* wird die Delta-Tabelle für Aktionen versorgt ...
  if pi_selkz <> '2'.
    exit.
  endif.
* Löschsätze verarbeiten ...
  loop at pi_t_d_waled into l_s_d_waled.
*   .. für die Filiale
    clear l_s_wsaf_promo_delta.
    select single werks from t001w into l_werks
     where kunnr = l_s_d_waled-kunnr.
*   Prüfung ob Artikel an SAF übertragen wurde ..
    select single * from wsaf_artmast_rem into l_s_wsaf_artmast_rem
     where werks = l_werks
       and matnr = l_s_d_waled-artnr.
    if sy-subrc = 0.
*     Gültigkeitsdatum bestimmen ..
      read table pi_t_d_wagud into l_s_d_wagud
        with key clint = l_s_d_waled-clint.
      if sy-subrc = 0.
        l_datum_min_1 = l_s_d_wagud-avkvo.
        l_datum_max_1 = l_s_d_wagud-avkbi.
      else.
        l_datum_min_1 = '99999999'.
        l_datum_max_1 = '00000000'.
      endif.
      read table pi_t_db_wagu into l_s_db_wagu
        with key clint = l_s_d_waled-clint.
      if sy-subrc = 0.
        l_datum_min_2 = l_s_db_wagu-avkvo.
        l_datum_max_2 = l_s_db_wagu-avkbi.
      else.
        l_datum_min_2 = '99999999'.
        l_datum_max_2 = '00000000'.
      endif.
      if l_datum_min_1 < l_datum_min_2.
        l_datum_min = l_datum_min_1.
      else.
        l_datum_min = l_datum_min_2.
      endif.
      if l_datum_max_1 > l_datum_max_2.
        l_datum_max = l_datum_max_1.
      else.
        l_datum_max = l_datum_max_2.
      endif.
      get time stamp field l_timestampl.
*     Delta-Satz für Filiale schreiben ..
      l_s_wsaf_promo_delta-mandt      = sy-mandt.
      l_s_wsaf_promo_delta-werks      = l_werks.
      l_s_wsaf_promo_delta-aktnr      = pi_wakhd-aktnr.
      l_s_wsaf_promo_delta-matnr      = l_s_d_waled-artnr.
      l_s_wsaf_promo_delta-timestampl = l_timestampl.
      l_s_wsaf_promo_delta-aktyp      = pi_wakhd-aktyp.
      l_s_wsaf_promo_delta-validfrom  = l_datum_min.
      l_s_wsaf_promo_delta-validto    = l_datum_max.
      l_s_wsaf_promo_delta-predictval = '0'.
      append l_s_wsaf_promo_delta to l_t_wsaf_promo_delta.
    endif.
*   .. für das Verteilzentrum
    check not l_s_d_waled-vzwrk is initial.
*   Prüfung ob Artikel an SAF übertragen wurde ..
    select single * from wsaf_artmast_rem into l_s_wsaf_artmast_rem
     where werks = l_s_d_waled-vzwrk
       and matnr = l_s_d_waled-artnr.
    if sy-subrc = 0.
      clear l_s_wsaf_promo_delta.
      get time stamp field l_timestampl.
*     Delta-Satz für Verteilzentrum schreiben ..
      l_s_wsaf_promo_delta-mandt      = sy-mandt.
      l_s_wsaf_promo_delta-werks      = l_s_d_waled-vzwrk.
      l_s_wsaf_promo_delta-aktnr      = pi_wakhd-aktnr.
      l_s_wsaf_promo_delta-matnr      = l_s_d_waled-artnr.
      l_s_wsaf_promo_delta-timestampl = l_timestampl.
      l_s_wsaf_promo_delta-aktyp      = pi_wakhd-aktyp.
      l_s_wsaf_promo_delta-validfrom  = pi_wakhd-alivo.
      l_s_wsaf_promo_delta-validto    = pi_wakhd-alibi.
      l_s_wsaf_promo_delta-predictval = '0'.
      append l_s_wsaf_promo_delta to l_t_wsaf_promo_delta.
    endif.
  endloop.
  insert wsaf_promo_delta from table l_t_wsaf_promo_delta[].
* Änderungssätze verarbeiten ...
  loop at pi_t_x_waled into l_s_x_waled.
    check not l_s_x_waled-updkz is initial.
*   .. für die Filiale
    clear l_s_wsaf_promo_delta.
    select single werks from t001w into l_werks
     where kunnr = l_s_x_waled-kunnr.
*   Prüfung ob Artikel an SAF übertragen wurde ..
    select single * from wsaf_artmast_rem into l_s_wsaf_artmast_rem
     where werks = l_werks
       and matnr = l_s_x_waled-artnr.
    if sy-subrc = 0.
*     Gültigkeitsdatum bestimmen ..
      read table pi_t_x_wagud into l_s_x_wagud
        with key clint = l_s_x_waled-clint.
      if sy-subrc = 0.
        l_datum_min_1 = l_s_x_wagud-avkvo.
        l_datum_max_1 = l_s_x_wagud-avkbi.
      else.
        l_datum_min_1 = '99999999'.
        l_datum_max_1 = '00000000'.
      endif.
      read table pi_t_db_wagu into l_s_db_wagu
        with key clint = l_s_x_waled-clint.
      if sy-subrc = 0.
        l_datum_min_2 = l_s_db_wagu-avkvo.
        l_datum_max_2 = l_s_db_wagu-avkbi.
      else.
        l_datum_min_2 = '99999999'.
        l_datum_max_2 = '00000000'.
      endif.
      if l_datum_min_1 < l_datum_min_2.
        l_datum_min = l_datum_min_1.
      else.
        l_datum_min = l_datum_min_2.
      endif.
      if l_datum_max_1 > l_datum_max_2.
        l_datum_max = l_datum_max_1.
      else.
        l_datum_max = l_datum_max_2.
      endif.
      get time stamp field l_timestampl.
*     Delta-Satz für Filiale schreiben ..
      l_s_wsaf_promo_delta-mandt      = sy-mandt.
      l_s_wsaf_promo_delta-werks      = l_werks.
      l_s_wsaf_promo_delta-aktnr      = pi_wakhd-aktnr.
      l_s_wsaf_promo_delta-matnr      = l_s_x_waled-artnr.
      l_s_wsaf_promo_delta-timestampl = l_timestampl.
      l_s_wsaf_promo_delta-aktyp      = pi_wakhd-aktyp.
      l_s_wsaf_promo_delta-validfrom  = l_datum_min.
      l_s_wsaf_promo_delta-validto    = l_datum_max.
      if l_s_x_waled-updkz = 'U'.
        l_s_wsaf_promo_delta-predictval = '0'.
      else.
        l_s_wsaf_promo_delta-predictval = '1'.
      endif.
      append l_s_wsaf_promo_delta to l_t_wsaf_promo_delta.
    endif.
*   .. für das Verteilzentrum
    check not l_s_x_waled-vzwrk is initial.
*   Prüfung ob Artikel an SAF übertragen wurde ..
    select single * from wsaf_artmast_rem into l_s_wsaf_artmast_rem
     where werks = l_s_x_waled-vzwrk
       and matnr = l_s_x_waled-artnr.
    if sy-subrc = 0.
      clear l_s_wsaf_promo_delta.
      get time stamp field l_timestampl.
*     Delta-Satz für Verteilzentrum schreiben ..
      l_s_wsaf_promo_delta-mandt      = sy-mandt.
      l_s_wsaf_promo_delta-werks      = l_s_x_waled-vzwrk.
      l_s_wsaf_promo_delta-aktnr      = pi_wakhd-aktnr.
      l_s_wsaf_promo_delta-matnr      = l_s_x_waled-artnr.
      l_s_wsaf_promo_delta-timestampl = l_timestampl.
      l_s_wsaf_promo_delta-aktyp      = pi_wakhd-aktyp.
      l_s_wsaf_promo_delta-validfrom  = pi_wakhd-alivo.
      l_s_wsaf_promo_delta-validto    = pi_wakhd-alibi.
      if l_s_x_waled-updkz = 'U'.
        l_s_wsaf_promo_delta-predictval = '0'.
      else.
        l_s_wsaf_promo_delta-predictval = '1'.
      endif.
      append l_s_wsaf_promo_delta to l_t_wsaf_promo_delta.
    endif.
  endloop.
  insert wsaf_promo_delta from table l_t_wsaf_promo_delta[].
endmethod.
Hope this will help.
Regards
- Atul