VARIABLES USING USER EXIT

Question

Hi,
I am trying to populate a fiscal year period (from and to) dynamically  using a user exit variable. The fiscal year selection is for data slicing at the planning area.
Anyone has an idea of how I can achieve this ?  Some function module lines will be appreciated.
Regards,
uche

Answer 1

Hi Uchenna,
i don't clearly understand your scenario, but i there's a great HOWTO for user exit variable. If you specify your mail i can send you.
However i have created an user exit var filled with the entries on a customer table, follows the code:
FUNCTION z_sem_bps_slice_comp.
""Interfaccia locale:
*"  IMPORTING
*"     REFERENCE(I_AREA) TYPE  UPC_Y_AREA
*"     REFERENCE(I_VARIABLE) TYPE  UPC_Y_VARIABLE
*"     REFERENCE(I_CHANM) TYPE  UPC_Y_CHANM
*"     REFERENCE(ITO_CHANM) TYPE  UPC_YTO_CHA
*"  EXPORTING
*"     REFERENCE(ETO_CHARSEL) TYPE  UPC_YTO_CHARSEL
  CONSTANTS:
*l_source_var TYPE upc_y_variable VALUE 'SOURCE',
*l_source_area TYPE upc_y_area VALUE '4PERF001',
  l_use_restricted_values TYPE boole-boole VALUE ' ',
  l_buffer_call TYPE boole-boole VALUE 'X'.
  DATA:
  l_type LIKE upc_var-vartype,
  lto_varsel_all TYPE upc_yto_charsel,
  lto_varsel TYPE upc_yto_charsel,
  lto_var TYPE upc_yto_charsel,
  lto_chanm TYPE upc_yto_cha,
  z_noslice(1) TYPE n.
BREAK-POINT.
  DATA: ls_varsel TYPE upc_ys_charsel,
        lt_chavl TYPE STANDARD TABLE OF zcompslice,
        ls_chavl TYPE zcompslice.
HERE I FILL LT_CHAVL WITH THE VALUE IN THE CUSTOMER TABLE
  CLEAR:lt_chavl,ls_chavl,z_noslice.
  REFRESH:lt_chavl.
  SELECT zsocieta FROM zcompslice INTO TABLE lt_chavl
  WHERE zflag = 'X'.
  IF sy-subrc <> 0.
    z_noslice = 1.
  ENDIF.
HERE YOU FILL THE "USER EXIT VAR" WITH PROPER VALUE EXTRACTED ABOVE, LT_VARSEL IS THE TABLE FOR THE OUTPUT VALUE OF THE USER EXIT VARIABLE
  IF z_noslice EQ 1.
    ls_varsel-seqno = '0000'.
    ls_varsel-chanm = '0COMP_CODE'.
    ls_varsel-opt = 'EQ'.
    ls_varsel-sign = 'I'.
    ls_varsel-low = '#'.
    APPEND ls_varsel TO eto_charsel.
  ELSE.
    ls_varsel-seqno = '0000'.
    ls_varsel-chanm = '0COMP_CODE'.  
    ls_varsel-opt = 'EQ'.
    ls_varsel-sign = 'I'.
    LOOP AT lt_chavl INTO ls_chavl.
      ls_varsel-seqno = ls_varsel-seqno + 1.
      ls_varsel-low = ls_chavl-zsocieta.
      APPEND ls_varsel TO eto_charsel.
    ENDLOOP.
  ENDIF.
ENDFUNCTION.
Hope it helps
Fabio