Ansicht
Dokumentation

EXIT_RJJGA002_001 - IS-M: Customer Potential: Make Entries in Index Tables for Free Attributes

EXIT_RJJGA002_001 - IS-M: Customer Potential: Make Entries in Index Tables for Free Attributes

PERFORM Short Reference   rdisp/max_wprun_time - Maximum work process run time  
This documentation is copyright by SAP AG.
SAP E-Book

Functionality

This function module is connected to enhancement JJGA0014 as a customer exit.

Entries are made in the index tables using report RJJGA002 to determine customer potential for the sales agent. These entries can be evaluated subsequently in report RJJGA003. Checkboxes in report RJJGA002 can be used to select whether free attributes are also used to assign sales agents to customers. If this is the case, the customer assignment to the free attributes must be made in this function exit.

Import parameter:

  • IV_FATBB1,,,,Indicator: Make entries in table for free attribute 1
  • IV_FATBB2,,,,Indicator: Make entries in table for free attribute 2
  • IV_FATBB3,,,,Indicator: Make entries in table for free attribute 3
  • IV_FATBB4,,,,Indicator: Make entries in table for free attribute 4
  • IV_FATBB5,,,,Indicator: Make entries in table for free attribute 5
  • IV_FATBB6,,,,Indicator: Make entries in table for free attribute 6
  • IV_FATBB7,,,,Indicator: Make entries in table for free attribute 7

Changing parameter:

  • IT_GPNR,,,,Table containing business partner numbers
  • ET_JJTGPBTF1,,Table for assigning free attribute 1 to customer
  • ET_JJTGPBTF2,,Table for assigning free attribute 2 to customer
  • ET_JJTGPBTF3,,Table for assigning free attribute 3 to customer
  • ET_JJTGPBTF4,,Table for assigning free attribute 4 to customer
  • ET_JJTGPBTF5,,Table for assigning free attribute 5 to customer
  • ET_JJTGPBTF6,,Table for assigning free attribute 6 to customer
  • ET_JJTGPBTF7,,Table for assigning free attribute 7 to customer

If one of the IV_FATBB1, ..., IV_FATBB7 indicators is selected in the import parameters, entries must also be made in export parameters ET_JJTGPBTF1, ..., ET_JJTGPBT7.

Example

DATA: ls_gpnr LIKE LINE OF pt_gpnr,

      lv_brsch LIKE jgtgpnr-brsch,

      ls_jjtgpbtf1 TYPE jjtgpbtf1.

LOOP AT pt_gpnr INTO ls_gpnr.

  IF pv_fatbb1 = 'X'.

      SELECT SINGLE brsch INTO lv_brsch

          FROM jgtgpnr

          WHERE gpnr = ls_gpnr.

      CASE lv_brsch.

        WHEN '0001'.

          ls_jjtgpbtf1-gpnr = ls_gpnr-gpnr.

          ls_jjtgpbtf1-fatbb1 = '1'.

        WHEN '0002'.

          ls_jjtgpbtf1-gpnr = ls_gpnr-gpnr.

          ls_jjtgpbtf1-fatbb1 = '2'.

        WHEN OTHERS.

          ls_jjtgpbtf1-gpnr = ls_gpnr-gpnr.

          ls_jjtgpbtf1-fatbb1 = '3'.

      ENDCASE.

      APPEND ls_jjtgpbtf1 TO pt_jjtgpbtf1.

  ENDIF.

ENDLOOP.





Parameters

PT_GPNR
PT_JJTGPBTF1
PT_JJTGPBTF2
PT_JJTGPBTF3
PT_JJTGPBTF4
PT_JJTGPBTF5
PT_JJTGPBTF6
PT_JJTGPBTF7
PV_FATBB1
PV_FATBB2
PV_FATBB3
PV_FATBB4
PV_FATBB5
PV_FATBB6
PV_FATBB7

Exceptions

Function Group

XJJ1

rdisp/max_wprun_time - Maximum work process run time   General Material Data  
This documentation is copyright by SAP AG.

Length: 5475 Date: 20240523 Time: 054943     sap01-206 ( 47 ms )