FM_SELECT_MULTIPLE SAP Function module - Mass selection of master data

DATA:
ld_e_f_fkrs  
 
 TYPE FKRS
,
ld_e_f_fvar  
 
 TYPE FVAR
,
it_t_fmslbsp  
 
 TYPE STANDARD TABLE OF FMSLBSP,"TABLES PARAM
wa_t_fmslbsp
 
 LIKE LINE OF it_t_fmslbsp
,
it_t_fmsltrp  
 
 TYPE STANDARD TABLE OF FMSLTRP,"TABLES PARAM
wa_t_fmsltrp
 
 LIKE LINE OF it_t_fmsltrp
,
it_t_fmslfctr  
 
 TYPE STANDARD TABLE OF FMSLFCTR,"TABLES PARAM
wa_t_fmslfctr
 
 LIKE LINE OF it_t_fmslfctr
,
it_t_fmslfpex  
 
 TYPE STANDARD TABLE OF FM_T_CISL,"TABLES PARAM
wa_t_fmslfpex
 
 LIKE LINE OF it_t_fmslfpex
,
it_t_fmslffnd  
 
 TYPE STANDARD TABLE OF FMSLFFND,"TABLES PARAM
wa_t_fmslffnd
 
 LIKE LINE OF it_t_fmslffnd
,
it_t_fmslpara  
 
 TYPE STANDARD TABLE OF FMSLPARA,"TABLES PARAM
wa_t_fmslpara
 
 LIKE LINE OF it_t_fmslpara
,
it_t_fmslheader  
 
 TYPE STANDARD TABLE OF FMSLHEADER,"TABLES PARAM
wa_t_fmslheader
 
 LIKE LINE OF it_t_fmslheader
,
it_t_fmslfields  
 
 TYPE STANDARD TABLE OF FMSLFIELDS,"TABLES PARAM
wa_t_fmslfields
 
 LIKE LINE OF it_t_fmslfields
,
it_t_fmslfbdp  
 
 TYPE STANDARD TABLE OF FMSLFBDP,"TABLES PARAM
wa_t_fmslfbdp
 
 LIKE LINE OF it_t_fmslfbdp
,
it_t_fmslffbp  
 
 TYPE STANDARD TABLE OF FMSLFFBP,"TABLES PARAM
wa_t_fmslffbp
 
 LIKE LINE OF it_t_fmslffbp
.

 

SELECT single FIKRS 
  FROM FMCI 
  INTO @DATA(ld_i_fikrs).

 

SELECT single GJAHR 
  FROM FMCI 
  INTO @DATA(ld_i_gjahr).

 

SELECT single VARNT 
  FROM FMHICI 
  INTO @DATA(ld_i_varnt).

 

SELECT single HIVARNT 
  FROM FMHISV 
  INTO @DATA(ld_i_hivarnt).

 

SELECT single POPER 
  FROM T009B 
  INTO @DATA(ld_i_poper).



DATA(ld_i_fipex_only) = some text here


DATA(ld_i_fictr_only) = some text here


DATA(ld_i_fonds_bp_only) = some text here


DATA(ld_i_fonds_only) = some text here


DATA(ld_i_fipex_fictr_fonds) = some text here


DATA(ld_i_budgetpd_only) = some text here


DATA(ld_i_bsp_element) = some text here


DATA(ld_i_bsp_element_bcs) = some text here


DATA(ld_i_select_without_fonds) = some text here


DATA(ld_i_select_without_budgetpd) = some text here


DATA(ld_i_select_without_function) = some text here


DATA(ld_i_select_without_measure) = some text here


DATA(ld_i_select_without_grant) = some text here


DATA(ld_i_status) = some text here

DATA(ld_i_list_title) = 'some text here'.


DATA(ld_i_flg_no_list) = some text here


DATA(ld_i_flg_no_overtake) = some text here


DATA(ld_i_flg_maint_sequent) = some text here


DATA(ld_i_flg_maint_multiple) = some text here


DATA(ld_i_flg_del) = some text here


DATA(ld_i_flg_check_budget) = some text here
 

SELECT single FUNCNAME 
  FROM TFDIR 
  INTO @DATA(ld_i_maint_funcname).



DATA(ld_i_prog_varnt) = some text here

DATA(ld_i_flg_blank_dim_bcs) = 'some text here'.
 

"populate fields of struture and append to itab
append wa_t_fmslbsp to it_t_fmslbsp.
 

"populate fields of struture and append to itab
append wa_t_fmsltrp to it_t_fmsltrp.
 

"populate fields of struture and append to itab
append wa_t_fmslfctr to it_t_fmslfctr.
 

"populate fields of struture and append to itab
append wa_t_fmslfpex to it_t_fmslfpex.
 

"populate fields of struture and append to itab
append wa_t_fmslffnd to it_t_fmslffnd.
 

"populate fields of struture and append to itab
append wa_t_fmslpara to it_t_fmslpara.
 

"populate fields of struture and append to itab
append wa_t_fmslheader to it_t_fmslheader.
 

"populate fields of struture and append to itab
append wa_t_fmslfields to it_t_fmslfields.
 

"populate fields of struture and append to itab
append wa_t_fmslfbdp to it_t_fmslfbdp.
 

"populate fields of struture and append to itab
append wa_t_fmslffbp to it_t_fmslffbp.
.

CALL FUNCTION 'FM_SELECT_MULTIPLE'
  EXPORTING
    i_fikrs =                    ld_i_fikrs
    i_gjahr =                    ld_i_gjahr
*   i_varnt =                    ld_i_varnt
*   i_hivarnt =                  ld_i_hivarnt
*   i_poper =                    ld_i_poper
*   i_fipex_only =               ld_i_fipex_only
*   i_fictr_only =               ld_i_fictr_only
*   i_fonds_bp_only =            ld_i_fonds_bp_only
*   i_fonds_only =               ld_i_fonds_only
*   i_fipex_fictr_fonds =        ld_i_fipex_fictr_fonds
*   i_budgetpd_only =            ld_i_budgetpd_only
*   i_bsp_element =              ld_i_bsp_element
*   i_bsp_element_bcs =          ld_i_bsp_element_bcs
*   i_select_without_fonds =     ld_i_select_without_fonds
*   i_select_without_budgetpd =    ld_i_select_without_budgetpd
*   i_select_without_function =    ld_i_select_without_function
*   i_select_without_measure =    ld_i_select_without_measure
*   i_select_without_grant =     ld_i_select_without_grant
*   i_status =                   ld_i_status
*   i_list_title =               ld_i_list_title
*   i_flg_no_list =              ld_i_flg_no_list
*   i_flg_no_overtake =          ld_i_flg_no_overtake
*   i_flg_maint_sequent =        ld_i_flg_maint_sequent
*   i_flg_maint_multiple =       ld_i_flg_maint_multiple
*   i_flg_del =                  ld_i_flg_del
*   i_flg_check_budget =         ld_i_flg_check_budget
*   i_maint_funcname =           ld_i_maint_funcname
*   i_prog_varnt =               ld_i_prog_varnt
*   i_flg_blank_dim_bcs =        ld_i_flg_blank_dim_bcs
  IMPORTING
    e_f_fkrs =                   ld_e_f_fkrs
    e_f_fvar =                   ld_e_f_fvar
* TABLES
*   t_fmslbsp =                  it_t_fmslbsp
*   t_fmsltrp =                  it_t_fmsltrp
*   t_fmslfctr =                 it_t_fmslfctr
*   t_fmslfpex =                 it_t_fmslfpex
*   t_fmslffnd =                 it_t_fmslffnd
*   t_fmslpara =                 it_t_fmslpara
*   t_fmslheader =               it_t_fmslheader
*   t_fmslfields =               it_t_fmslfields
*   t_fmslfbdp =                 it_t_fmslfbdp
*   t_fmslffbp =                 it_t_fmslffbp
  EXCEPTIONS
    INPUT_ERROR =                1
    NO_ENTRY_FOUND =             2
    PROG_VARNT_ERROR =           3
    .  "  FM_SELECT_MULTIPLE

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 2. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 3. "Exception
  "Add code for exception here
ENDIF.