RFID_PTVPRADPR_FORMS SAP ABAP INCLUDE - Include RFID_PTVPRADPR_FORMS
RFID_PTVPRADPR_FORMS is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.
If you would like to execute this report or see the full code listing simply enter RFID_PTVPRADPR_FORMS into the relevant SAP transactions such as SE38 or SE80
ABAP code to call this SAP report using the submit statement
This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.
SUBMIT RFID_PTVPRADPR_FORMS. "Basic submit
SUBMIT RFID_PTVPRADPR_FORMS AND RETURN. "Return to original report after report execution complete
SUBMIT RFID_PTVPRADPR_FORMS VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Include RFID_PTVPRADPR_FORMS
INCLUDES used within this REPORT RFID_PTVPRADPR_FORMS
No INCLUDES are used within this REPORT code!
TABLES used within REPORT and the associated SELECT statement:
No SAP DATABASE tables are accessed within this REPORT code!
Function Modules used within report and the associated call statement:
RFIDPT_DISTRIBUTE_TOT_AMOUNT CALL FUNCTION 'RFIDPT_DISTRIBUTE_TOT_AMOUNT' EXPORTING i_total = '100' TABLES t_item = lt_perc EXCEPTIONS arithmetic_error = 1 OTHERS = 2.
RFIDPT_DISTRIBUTE_TOT_AMOUNT CALL FUNCTION 'RFIDPT_DISTRIBUTE_TOT_AMOUNT' EXPORTING i_total = l_total TABLES t_item = lt_base EXCEPTIONS arithmetic_error = 1 OTHERS = 2.
RFIDPT_DISTRIBUTE_TOT_AMOUNT CALL FUNCTION 'RFIDPT_DISTRIBUTE_TOT_AMOUNT' EXPORTING i_total = l_total TABLES t_item = lt_n_ded EXCEPTIONS arithmetic_error = 1 OTHERS = 2.
RFIDPT_DISTRIBUTE_TOT_AMOUNT CALL FUNCTION 'RFIDPT_DISTRIBUTE_TOT_AMOUNT' EXPORTING i_total = l_total TABLES t_item = lt_ded EXCEPTIONS arithmetic_error = 1 OTHERS = 2.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = p_percentage text = p_txt.
CUSTOMIZED_MESSAGE CALL FUNCTION 'CUSTOMIZED_MESSAGE' EXPORTING i_arbgb = 'IDFI_VAT_PR' i_dtype = 'E' i_msgnr = '022' i_var01 = p_year.
RFIDPT_CALC_ENTITY_GET CALL FUNCTION 'RFIDPT_CALC_ENTITY_GET' EXPORTING i_land1 = tab_001-land1 i_pryear = gd_gjahr i_prper = p_prper i_bkpf = p_bkpf i_bseg = p_bseg i_defcf = par_proz IMPORTING e_pr_ent_calc = l_tab_ep-prclc e_pr_coef = l_tab_ep-coef e_subrc = l_calc_subrc.
RFIDPT_SEL_DPR * CALL FUNCTION 'RFIDPT_SEL_DPR' * EXPORTING * i_land1 = tab_001-land1 ** i_pryear = l_tab_ep-gjahr_acq * i_pryear = l_tab_ep-budat(4) * i_prclc = l_tab_ep-prclc * i_defcf = ld_dpr_acq_year * IMPORTING * e_prdcf = l_tab_ep-proz_acq * e_subrc = f_subrc.
RFIDPT_SEL_DPR CALL FUNCTION 'RFIDPT_SEL_DPR' EXPORTING i_land1 = tab_001-land1 i_pryear = l_tab_ep-vatdate(4) i_prclc = l_tab_ep-prclc i_defcf = ld_dpr_acq_year IMPORTING e_prdcf = l_tab_ep-proz_acq e_subrc = f_subrc.
RFIDPT_VALID_ENTITY_CHECK CALL FUNCTION 'RFIDPT_VALID_ENTITY_CHECK' EXPORTING i_land1 = tab_001-land1 i_bkpf = p_bkpf i_bseg = p_bseg IMPORTING e_subrc = l_valid_subrc.
DATE_TO_PERIOD_CONVERT CALL FUNCTION 'DATE_TO_PERIOD_CONVERT' EXPORTING i_date = p_budat * I_MONMIT = 00 i_periv = l_periv IMPORTING e_buper = l_buper e_gjahr = l_budat_gjahr EXCEPTIONS input_false = 1 t009_notfound = 2 t009b_notfound = 3 OTHERS = 4 .
RFIDPT_AGGREG_KEY_MAP CALL FUNCTION 'RFIDPT_AGGREG_KEY_MAP' EXPORTING i_prpostag = l_prpostag i_aggkey = p_ep-grkey i_struct_name = 'ACCIT' IMPORTING e_struct = wa_accit.
RFIDPT_ACC_DOCUMENT_POST_ADJ CALL FUNCTION 'RFIDPT_ACC_DOCUMENT_POST_ADJ' EXPORTING * I_COMP = ' ' * I_COMP_CHECK = ' ' * I_FREE_TABLE = 'X' i_test = l_test IMPORTING e_bukrs = wa_doc-bukrs e_belnr = wa_doc-belnr e_gjahr = wa_doc-gjahr TABLES t_acchd = pt_acchd t_accit = pt_accit t_acccr = pt_acccr *** t_accda = pt_accda * T_ACCFI = t_acctx = lt_acctx * T_ACCTAX = * T_ACCIT_PA = * T_ACCCR_PA = * T_ACCWT = * T_ACCIT_EXT = * T_AUSZ2 = * T_AUSZ3 = * T_AUSZ4 = * T_ACCIT_SPL = * T_ACCCR_SPL = t_return = lt_return.
RFIDPT_AGGREG_KEY_GET CALL FUNCTION 'RFIDPT_AGGREG_KEY_GET' EXPORTING i_bkpf = p_bkpf i_bseg = p_bseg i_prpostag = l_prpostag IMPORTING e_aggkey = p_tab_ep-grkey e_pracorig = l_pracorig.
RFIDPT_AGGREG_FIELDS_MAP_VAT CALL FUNCTION 'RFIDPT_AGGREG_FIELDS_MAP_VAT' EXPORTING i_accit_cst = wa_accit_cst i_vatlnmeth = p_vatln i_prpostag = l_prpostag IMPORTING e_accit_vat = wa_accit_vat.
FAGL_GET_BKPF CALL FUNCTION 'FAGL_GET_BKPF' EXPORTING i_bukrs = wa_cad-bukrs i_belnr = wa_cad-belnr i_gjahr = wa_cad-gjahr IMPORTING e_bkpf = wa_bkpf EXCEPTIONS parameter_missing = 1 not_found = 2 OTHERS = 3.
FAGL_GET_BSEG CALL FUNCTION 'FAGL_GET_BSEG' EXPORTING i_bukrs = wa_cad-bukrs i_belnr = wa_cad-belnr i_gjahr = wa_cad-gjahr IMPORTING et_bseg = lt_bseg EXCEPTIONS not_found = 1 OTHERS = 2.
RFIDPT_CALC_ENTITY_GET CALL FUNCTION 'RFIDPT_CALC_ENTITY_GET' EXPORTING i_land1 = tab_001-land1 i_pryear = gd_gjahr i_prper = p_prper i_bkpf = wa_bkpf i_bseg = wa_bseg i_defcf = par_proz IMPORTING e_pr_ent_calc = l_prclc * E_PR_COEF = * E_SUBRC = .
CALL FUNCTION 'RFIDPT_AGGREG_KEY_GET' EXPORTING i_bkpf = wa_bkpf i_bseg = wa_bseg i_prpostag = l_prpostag IMPORTING e_aggkey = l_grkey e_pracorig = l_pracorig.
RFIDPT_SEL_RFIDPTPRPERTYP CALL FUNCTION 'RFIDPT_SEL_RFIDPTPRPERTYP' EXPORTING i_rfidptprpertyp = wa_rfidptprpertyp IMPORTING e_rfidptprpertyp = wa_rfidptprpertyp EXCEPTIONS rec_not_found = 1 OTHERS = 2.
RFIDPT_SEL_RFIDPTPRPER CALL FUNCTION 'RFIDPT_SEL_RFIDPTPRPER' EXPORTING i_rfidptprper = wa_rfidptprper IMPORTING e_rfidptprper = wa_rfidptprper EXCEPTIONS rec_not_found = 1 OTHERS = 2.
NUMBER_OF_DAYS_PER_MONTH_GET CALL FUNCTION 'NUMBER_OF_DAYS_PER_MONTH_GET' EXPORTING par_month = l_lm par_year = gd_gjahr IMPORTING par_days = l_ld.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' "#EC * EXPORTING dyname = p_cprog dynumb = l_dynnr TABLES dynpfields = lt_scr_fields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 double_conversion = 9 stepl_not_found = 10 OTHERS = 11.
RFIDPT_SEL_RFIDPTPRPERTYP CALL FUNCTION 'RFIDPT_SEL_RFIDPTPRPERTYP' EXPORTING i_rfidptprpertyp = wa_rfidptprpertyp IMPORTING e_rfidptprpertyp = wa_rfidptprpertyp EXCEPTIONS rec_not_found = 1 OTHERS = 2.
RFIDPT_DISTRIBUTE_TOT_AMOUNT CALL FUNCTION 'RFIDPT_DISTRIBUTE_TOT_AMOUNT' EXPORTING i_total = l_total TABLES t_item = lt_distr EXCEPTIONS arithmetic_error = 1 OTHERS = 2.
POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = l_titlebar * DIAGNOSE_OBJECT = ' ' text_question = 'Confirm Update Run?'(cur) text_button_1 = 'Yes'(p01) * ICON_BUTTON_1 = ' ' text_button_2 = 'No'(p02) * ICON_BUTTON_2 = ' ' default_button = '1' display_cancel_button = 'X' * USERDEFINED_F1_HELP = ' ' start_column = 25 start_row = 6 * POPUP_TYPE = * IV_QUICKINFO_BUTTON_1 = ' ' * IV_QUICKINFO_BUTTON_2 = ' ' IMPORTING answer = p_answer * TABLES * PARAMETER = EXCEPTIONS text_not_found = 1 OTHERS = 2.
VIEW_ENQUEUE CALL FUNCTION 'VIEW_ENQUEUE' EXPORTING action = p_queue enqueue_mode = p_mode view_name = p_table enqueue_range = ld_enqueue_range TABLES sellist = lt_vimsellist EXCEPTIONS client_reference = 1 foreign_lock = 2 invalid_action = 3 invalid_enqueue_mode = 4 system_failure = 5 table_not_found = 6 OTHERS = 7.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING * CLIENT = SY-MANDT date = p_budat foreign_amount = l_umbtr foreign_currency = p_waers local_currency = tab_001-waers * RATE = 0 * TYPE_OF_RATE = 'M' * READ_TCURR = 'X' IMPORTING * EXCHANGE_RATE = * FOREIGN_FACTOR = local_amount = l_umbtr * LOCAL_FACTOR = * EXCHANGE_RATEX = * FIXED_RATE = * DERIVED_RATE_TYPE = EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6 .
SXC_EXIT_CHECK_ACTIVE CALL FUNCTION 'SXC_EXIT_CHECK_ACTIVE' EXPORTING exit_name = p_badi_pr_name flt_val = tab_001-intca EXCEPTIONS not_active = 1 OTHERS = 2.
F4IF_GET_SHLP_DESCR CALL FUNCTION 'F4IF_GET_SHLP_DESCR' EXPORTING shlpname = ld_shlpname * SHLPTYPE = 'SH' IMPORTING shlp = wa_shlp_descr.
F4IF_START_VALUE_REQUEST CALL FUNCTION 'F4IF_START_VALUE_REQUEST' EXPORTING shlp = wa_shlp_descr disponly = ld_disponly * MAXRECORDS = 500 * MULTISEL = ' ' * CUCOL = SY-CUCOL * CUROW = SY-CUROW IMPORTING rc = ld_rc TABLES return_values = lt_return_values EXCEPTIONS error_message = 0 OTHERS = 0.
RFIDPT_AGGREG_KEY_MAP CALL FUNCTION 'RFIDPT_AGGREG_KEY_MAP' EXPORTING i_prpostag = p_prpostag i_aggkey = p_ep-grkey i_struct_name = 'RFIDPT_ITEM_LIST_S' IMPORTING e_struct = p_item.
RFIDPT_AGGREG_KEY_MAP CALL FUNCTION 'RFIDPT_AGGREG_KEY_MAP' EXPORTING i_prpostag = p_prpostag i_aggkey = p_ep-grkey i_struct_name = 'RFIDPT_ITEM_LIST_A' IMPORTING e_struct = p_item.
RFIDPT_CALCULATE_TAX_ITEM CALL FUNCTION 'RFIDPT_CALCULATE_TAX_ITEM' EXPORTING i_bukrs = p_a_accit-bukrs i_mwskz = wa_acctx-mwskz i_wrbtr = ld_wrbtr IMPORTING e_fwbas = ld_fwbas e_konts = ld_konts e_konth = ld_konth e_ktosl = wa_acctx-ktosl EXCEPTIONS tax_get_mwskz_existence = 1 calculate_tax_item = 2 zero_percent_tax = 3 tax_get_tax_accounts = 4 OTHERS = 5.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_a_accit-budat foreign_amount = ld_wrbtr foreign_currency = wa_acccr-waers local_currency = ld_t001-waers IMPORTING local_amount = wa_acctx-hwste EXCEPTIONS no_rate_found = 0 overflow = 0 no_factors_found = 0 no_spread_found = 0 derived_2_times = 0 OTHERS = 0.
CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_a_accit-budat foreign_amount = ld_fwbas foreign_currency = wa_acccr-waers local_currency = ld_t001-waers IMPORTING local_amount = wa_acctx-hwbas EXCEPTIONS no_rate_found = 0 overflow = 0 no_factors_found = 0 no_spread_found = 0 derived_2_times = 0 OTHERS = 0.
FI_F4_MWSKZ CALL FUNCTION 'FI_F4_MWSKZ' EXPORTING i_kalsm = l_tab_001-kalsm IMPORTING e_mwskz = l_mwskz.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' "#EC * EXPORTING dyname = p_cprog dynumb = p_dynnr TABLES dynpfields = lt_scr_fields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 double_conversion = 9 stepl_not_found = 10 OTHERS = 11.
RFIDPT_ASSET_AUC CALL FUNCTION 'RFIDPT_ASSET_AUC' EXPORTING i_anla = ld_anla i_afabe = gd_afaber i_gjahr = p_gjahr i_ktopl = tab_001-ktopl IMPORTING e_auc = ld_auc e_anlkl_auc = ld_anlkl_auc e_partial_transfer = ld_partial_transfer e_anla_key_ca = ld_anla_key_ca e_anlkl_ca = ld_anlkl_ca e_ktansw_ca = ld_ktansw_ca TABLES it_aclass_auc = s_acauc it_ttype_auc = s_bwauc et_anla_key_ca = lt_anla_key_ca EXCEPTIONS rec_not_found = 1 rec_not_found_ca = 2 no_valid_auc_parameters = 3 error_asset_docs = 4 error_asset_fi_acc = 5 OTHERS = 6.
RFIDPT_ASSET_RETIREMENT CALL FUNCTION 'RFIDPT_ASSET_RETIREMENT' EXPORTING i_bukrs = p_bukrs i_anln1 = p_anln1 i_anln2 = p_anln2 i_gjahr = p_year * I_AFABE = gd_afaber "'01' * I_DEAKT_FLAG = * I_DEAKT = IMPORTING e_asset_retired = ld_asset_retired * E_DEAKT = * E_ASSET_REVENUE = * E_ASSET_VAT = * E_GJAHR_DOC = * E_BELNR = * E_BUZEI = EXCEPTIONS rec_not_found = 0 OTHERS = 0.
RFIDPT_AGGREG_KEY_GET CALL FUNCTION 'RFIDPT_AGGREG_KEY_GET' EXPORTING i_bkpf = p_bkpf i_bseg = p_bseg i_prpostag = p_prpostag IMPORTING e_aggkey = p_grkey e_pracorig = ld_pracorig_dummy.
RFIDPT_ASSET_RETIREMENT CALL FUNCTION 'RFIDPT_ASSET_RETIREMENT' EXPORTING i_bukrs = bukrs i_anln1 = anln1 i_anln2 = anln2 i_gjahr = gjahr * I_AFABE = i_deakt_flag = ld_deakt_flag i_deakt = ld_deakt IMPORTING e_asset_retired = ld_asset_retired e_deakt = gd_asset_deakt * E_ASSET_REVENUE = * E_ASSET_VAT = * E_GJAHR_DOC = * E_BELNR = * E_BUZEI = EXCEPTIONS rec_not_found = 0 OTHERS = 0.
RFIDPT_REQ_FIELDS_SPLIT CALL FUNCTION 'RFIDPT_REQ_FIELDS_SPLIT' EXPORTING i_bukrs = tab_001-bukrs CHANGING e_glflex_active = gd_glflex_active e_split_active = gd_split_active et_fields = gt_split_fields[] EXCEPTIONS error_checking_glflex_active = 1 error_checking_split_active = 2 OTHERS = 3.
RFIDPT_REQ_FIELDS_SPLIT CALL FUNCTION 'RFIDPT_REQ_FIELDS_SPLIT' EXPORTING i_bukrs = tab_001-bukrs CHANGING e_glflex_active = gd_glflex_active e_split_active = gd_split_active et_fields = gt_split_fields[] EXCEPTIONS error_checking_glflex_active = 1 error_checking_split_active = 2 OTHERS = 3.
Contribute (Add Comments)
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.
This will then be available for everyone to easily find by simply searching on the report name RFID_PTVPRADPR_FORMS or its description.
RFID_PTVPRADPR_FORMS - Include RFID_PTVPRADPR_FORMS RFID_PTVPRADPR_DATA - Include RFID_PTVPRADPR_DATA RFID_PTVPRADPRV00_FORMS - Include RFID_PTVPRADPRV00_FORMS RFID_PTVPRADPRV00 - Pro-Rata adjustments due to PR variation RFID_PTVPRADPRV00 - Pro-Rata adjustments due to PR variation RFID_PTVPRADPRC00_FORMS - Include RFID_PTVPRADPRC00_FORMS