SAP Reports / Programs | Project System | Revenues and Earnings | Transfer Prices and Decentralized Responsibility(PS-REV-TRF) SAP PS
MKFPRF01 SAP ABAP INCLUDE - documentation and ABAP source code
MKFPRF01 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 MKFPRF01 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 MKFPRF01. "Basic submit
SUBMIT MKFPRF01 AND RETURN. "Return to original report after report execution complete
SUBMIT MKFPRF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT MKFPRF01
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:
KFPSS_D220_TEST_UPDATE CALL FUNCTION 'KFPSS_D220_TEST_UPDATE' IMPORTING ed_update_flag = para-changed.
POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING textline1 = text-011 textline2 = text-012 titel = text-010 IMPORTING answer = answer.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'Y' textline1 = text-015 textline2 = text-016 titel = titel IMPORTING answer = answer.
KFPSS_D220_OKCODE CALL FUNCTION 'KFPSS_D220_OKCODE' EXPORTING id_okcode = save_okcode.
KFPRR_READ_KFPK CALL FUNCTION 'KFPRR_READ_KFPK' EXPORTING i_kokrs = l_kokrs i_belnr = l_belnr IMPORTING e_kfpk = kfpk EXCEPTIONS not_found = 01.
KFPRR_READ_KFPK CALL FUNCTION 'KFPRR_READ_KFPK' EXPORTING i_kokrs = l_kokrs i_belnr = l_belnr IMPORTING e_kfpk = l_kfpk EXCEPTIONS not_found = 01.
K_VERSN_VALUATION CALL FUNCTION 'K_VERSN_VALUATION' EXPORTING i_kokrs = v_kokrs TABLES t_tka09_v = lt_tka09_v.
K_KOKRS_SET CALL FUNCTION 'K_KOKRS_SET' EXPORTING display = ' ' i_kokrs = p_kokrs popup = p_popup IMPORTING e_kokrs = ld_kokrs e_action = ld_action EXCEPTIONS not_found = 1 OTHERS = 2.
NUMBER_GET_INFO CALL FUNCTION 'NUMBER_GET_INFO' EXPORTING nr_range_nr = p_nrrangenr object = nk_obj subobject = p_kokrs IMPORTING interval = l_nriv EXCEPTIONS interval_not_found = 01 object_not_found = 02.
NUMBER_CHECK CALL FUNCTION 'NUMBER_CHECK' EXPORTING nr_range_nr = p_nrrangenr number = p_belnr object = nk_obj subobject = p_kokrs IMPORTING returncode = rc.
KFPRR_READ_DATA CALL FUNCTION 'KFPRR_READ_DATA' EXPORTING i_kokrs = g_kfpk-kokrs i_belnr = g_kfpk-belnr IMPORTING e_kfpk = ls_kfpk TABLES t_kfpp = lt_kfpp t_kfppw = t_kfppw t_kfpe = lt_kfpe t_kfpew = t_kfpew.
KFPRR_READ_DATA CALL FUNCTION 'KFPRR_READ_DATA' EXPORTING i_kokrs = g_kfpk-kokrs i_belnr = g_kfpk-stobnr IMPORTING e_kfpk = ls_kfpk TABLES t_kfpp = lt_kfpp t_kfppw = t_kfppw t_kfpe = lt_kfpe t_kfpew = t_kfpew.
ENQUEUE_EKFPK CALL FUNCTION 'ENQUEUE_EKFPK' EXPORTING kokrs = p_kokrs belnr = p_belnr mandt = sy-mandt x_belnr = ' ' _scope = '2' _wait = ' ' EXCEPTIONS foreign_lock = 01 system_failure = 02.
KFPRR_READ_DATA CALL FUNCTION 'KFPRR_READ_DATA' EXPORTING i_kokrs = g_kfpk-kokrs i_belnr = g_kfpk-refbnr IMPORTING e_kfpk = ls_kfpk TABLES t_kfpp = t_ref_kfpp t_kfppw = t_ref_kfppw t_kfpe = t_ref_kfpe t_kfpew = t_ref_kfpew EXCEPTIONS not_found = 1.
RK_KSTAR_CHECK CALL FUNCTION 'RK_KSTAR_CHECK' EXPORTING datum = budat kokrs = kokrs kstar = kstar IMPORTING v_cskb = l_cskbv EXCEPTIONS kstar_not_allowed = 01 kstar_not_found = 02 kstar_not_primary = 03.
RK_KSTAR_READ CALL FUNCTION 'RK_KSTAR_READ' EXPORTING datum = budat kokrs = kokrs kstar = kstar IMPORTING v_cskb = l_cskbv.
READ_CUSTOMIZED_MESSAGE CALL FUNCTION 'READ_CUSTOMIZED_MESSAGE' "note 497823 EXPORTING i_arbgb = con_arbgb i_dtype = con_e_msgty i_msgnr = '103' IMPORTING e_msgty = l_msgty.
READ_CUSTOMIZED_MESSAGE CALL FUNCTION 'READ_CUSTOMIZED_MESSAGE' "588221 EXPORTING "588221 i_arbgb = con_arbgb "588221 i_dtype = con_w_msgty "588221 i_msgnr = '090' "588221 IMPORTING "588221 e_msgty = l_msgty. "588221
CALL FUNCTION 'K_DATE_TO_PERIOD_CONVERT' EXPORTING i_date = cobl-budat i_kokrs = cobl-kokrs IMPORTING e_gjahr = cobl-gjahr e_perio = l_perio. "545974
CJPN_GET_WBS_ELEMENT CALL FUNCTION 'CJPN_GET_WBS_ELEMENT' EXPORTING i_pspnr = l_cobl-ps_psp_pnr IMPORTING e_prps = l_prps EXCEPTIONS not_found = 1.
K_ORDER_READ CALL FUNCTION 'K_ORDER_READ' EXPORTING aufnr = l_cobl-aufnr IMPORTING bukrs = l_cobl-bukrs gsber = l_cobl-gsber prctr = l_cobl-prctr.
CO_SF_AFVG_OBJECT_GET CALL FUNCTION 'CO_SF_AFVG_OBJECT_GET' EXPORTING aplzl = l_cobl-aplzl aufpl = l_cobl-aufpl IMPORTING aufkv_exp = l_aufkv.
K_DATE_TO_PERIOD_CONVERT CALL FUNCTION 'K_DATE_TO_PERIOD_CONVERT' EXPORTING i_date = sy-datlo i_kokrs = g_kfpk-kokrs IMPORTING e_gjahr = rwin_gjahr.
RWIN_CHECK CALL FUNCTION 'RWIN_CHECK' EXPORTING event = rwin_event gjahr = rwin_gjahr process = rwin_process TABLES tkomp = tkomp.
K_LOGSYSTEM_CHECK CALL FUNCTION 'K_LOGSYSTEM_CHECK' EXPORTING i_kokrs = g_kfpk-kokrs.
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = para-nkint object = nk_obj subobject = g_kfpk-kokrs IMPORTING number = g_kfpk-belnr returncode = rc EXCEPTIONS quantity_is_0 = 01 OTHERS = 02.
RENAME_TEXT CALL FUNCTION 'RENAME_TEXT' EXPORTING language = '*' object = ltext_object id = ltext_id name = ltext_name newname = para-tdname.
KFPRS_OPEN_ITEM_WRITE CALL FUNCTION 'KFPRS_OPEN_ITEM_WRITE' EXPORTING i_process = para-proc_oi i_event = event_oinumber i_kfpk = ls_kfpk i_vrgng = para-vrgng TABLES it_kfpp = t_kfpp it_kfpe = t_kfpe.
KFPRS_DOCUMENT_HISTORY_WRITE CALL FUNCTION 'KFPRS_DOCUMENT_HISTORY_WRITE' EXPORTING i_process = para-proc_oi i_event = event_oinumber i_kfpk = ls_kfpk i_vrgng = para-vrgng * REF_KFPK = TABLES it_kfpp = t_kfpp it_kfppw = t_kfppw.
KFPRS_ACTUAL_WRITE CALL FUNCTION 'KFPRS_ACTUAL_WRITE' EXPORTING i_process = para-proc_upd i_event = event_fertig i_kfpk = ls_kfpk i_vrgng = para-vrgng TABLES it_kfpp = t_kfpp it_kfppw = t_kfppw.
KFPSS_SET_GD_TPA CALL FUNCTION 'KFPSS_SET_GD_TPA' EXPORTING id_belnr = g_kfpk-belnr.
KFPSS_D220_OKCODE CALL FUNCTION 'KFPSS_D220_OKCODE' EXPORTING id_okcode = save_okcode.
KFPSV_SM_DELETE CALL FUNCTION 'KFPSV_SM_DELETE' EXPORTING id_kokrs = g_kfpk-kokrs id_belnr = g_kfpk-belnr.
COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' EXPORTING object = ltext_object name = para-tdname id = ltext_id language = '*'.
KFPSS_D220_OKCODE CALL FUNCTION 'KFPSS_D220_OKCODE' EXPORTING id_okcode = save_okcode.
KFPRS_OPEN_ITEM_WRITE CALL FUNCTION 'KFPRS_OPEN_ITEM_WRITE' EXPORTING i_process = para-proc_oi i_event = event_openitem i_kfpk = ls_kfpk i_vrgng = para-vrgng TABLES it_kfpp = lt_kfpp it_kfpe = lt_kfpe.
KFPRS_PLAN_WRITE CALL FUNCTION 'KFPRS_PLAN_WRITE' EXPORTING i_process = para-proc_upd i_event = event_pruefen i_kfpk = ls_kfpk i_vrgng = para-vrgng i_testmode = v_testmode TABLES it_kfpp = lt_kfpp it_orig_kfpp = t_orig_kfpp et_kfppw = t_kfppw EXCEPTIONS messages_occured = 0.
KFPRS_ACTUAL_WRITE CALL FUNCTION 'KFPRS_ACTUAL_WRITE' EXPORTING i_process = para-proc_upd i_event = event_pruefen i_kfpk = ls_kfpk i_vrgng = para-vrgng TABLES it_kfpp = lt_kfpp it_kfppw = t_kfppw.
KFPRV_POST_DATA CALL FUNCTION 'KFPRV_POST_DATA' IN UPDATE TASK EXPORTING i_kfpk = kfpk i_objnr = g_kfpk-sobjnr i_stokz = g_rev_kfpk-stokz "note 503856 TABLES t_kfpp = h_kfpp t_kfppw = h_kfppw t_kfpe = h_kfpe t_kfpew = h_kfpew.
CJPN_GET_UPPER_FOR_WBS_ELEMENT CALL FUNCTION 'CJPN_GET_UPPER_FOR_WBS_ELEMENT' EXPORTING objnr_imp = ld_objnr IMPORTING prps_exp = ls_prps.
K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING kokrs = v_kokrs IMPORTING e_tka01 = p_tka01.
K_ORDER_READ CALL FUNCTION 'K_ORDER_READ' EXPORTING aufnr = p_aufnr IMPORTING kokrs = l_kokrs objnr = l_objnr i_aufkv = l_aufkv erloese = l_revenues ktext = l_ktext stakz = l_stakz prctr = l_prctr.
CJPN_GET_WBS_ELEMENT CALL FUNCTION 'CJPN_GET_WBS_ELEMENT' EXPORTING i_pspnr = p_pspnr IMPORTING e_prps = l_prps.
CO_SF_NETWORKACTIVITY_CHECK CALL FUNCTION 'CO_SF_NETWORKACTIVITY_CHECK' EXPORTING aufnr_imp = p_nplnr vornr_imp = p_vornr IMPORTING aplzl_exp = l_aplzl aufpl_exp = l_aufpl act_acc_exp = l_act_acc.
CO_SF_AFVG_OBJECT_GET CALL FUNCTION 'CO_SF_AFVG_OBJECT_GET' EXPORTING aplzl = l_aplzl aufpl = l_aufpl IMPORTING aufkv_exp = l_aufkv.
KFPRC_KFPPI_CHECK CALL FUNCTION 'KFPRC_KFPPI_CHECK' EXPORTING i_kokrs = g_kfpk-kokrs i_objnr = l_objnr IMPORTING e_sender = ld_sender e_sub_sender = ld_sub_sender e_belnr = ld_belnr.
READ_CUSTOMIZED_MESSAGE CALL FUNCTION 'READ_CUSTOMIZED_MESSAGE' EXPORTING i_arbgb = con_arbgb "Arbeitsgebiet=KFPR i_dtype = con_e_msgty i_msgnr = '214' IMPORTING e_msgty = l_msgty.
K_SRULE_RECEIVERS_GET CALL FUNCTION 'K_SRULE_RECEIVERS_GET' EXPORTING i_objnr = l_objnr TABLES et_receivers = st_receivers EXCEPTIONS wrong_input = 1 error_occurred = 2.
CJPN_GET_WBS_ELEMENT CALL FUNCTION 'CJPN_GET_WBS_ELEMENT' EXPORTING i_pspnr = s_upper_wbs_element IMPORTING e_prps = l_prps.
OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING objnr = st_receivers-objnr IMPORTING e_identification = ld_receiver_settle.
OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING objnr = l_objnr IMPORTING e_identification = ld_receiver_tp.
K_ORDER_READ CALL FUNCTION 'K_ORDER_READ' EXPORTING aufnr = p_aufnr IMPORTING objnr = c_objnr ktext = c_ktext prctr = c_prctr EXCEPTIONS not_found = 1.
CJPN_GET_WBS_ELEMENT CALL FUNCTION 'CJPN_GET_WBS_ELEMENT' EXPORTING i_pspnr = p_pspnr IMPORTING e_prps = l_prps EXCEPTIONS not_found = 1.
K_ORDER_READ CALL FUNCTION 'K_ORDER_READ' EXPORTING aufnr = p_nplnr IMPORTING objnr = c_objnr ktext = c_ktext prctr = c_prctr EXCEPTIONS not_found = 1.
CO_SF_AFVG_OBJECT_GET CALL FUNCTION 'CO_SF_AFVG_OBJECT_GET' EXPORTING aplzl = p_aplzl aufpl = p_aufpl IMPORTING aufkv_exp = l_aufkv EXCEPTIONS not_exist = 1.
KFPRS_DOC_TYPE_AUTHORITY_CHECK CALL FUNCTION 'KFPRS_DOC_TYPE_AUTHORITY_CHECK' EXPORTING i_actvt = l_actvt i_kokrs = g_kfpk-kokrs i_blart = g_kfpk-blart i_bltyp = g_kfpk-bltyp.
K_VRGNG_AUTHORITY_CHECK CALL FUNCTION 'K_VRGNG_AUTHORITY_CHECK' EXPORTING actvt = l_actvt kokrs = g_kfpk-kokrs vrgng = g_kfpk-vrgng.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'N' textline1 = text-023 textline2 = text-024 titel = text-025 IMPORTING answer = answer.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = ltext_id language = sy-langu object = ltext_object name = para-tdname IMPORTING header = l_thead TABLES lines = lt_tline EXCEPTIONS not_found = 1.
INIT_TEXT CALL FUNCTION 'INIT_TEXT' EXPORTING language = sy-langu object = ltext_object id = ltext_id name = para-tdname IMPORTING header = l_thead TABLES lines = lt_tline.
EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING display = l_display header = l_thead IMPORTING newheader = l_thead function = l_txfunction TABLES lines = lt_tline EXCEPTIONS OTHERS = 1.
SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING object = ltext_object id = ltext_id name = para-tdname language = '*' IMPORTING entries = l_entries.
KFPRR_READ_KFPK CALL FUNCTION 'KFPRR_READ_KFPK' EXPORTING i_kokrs = g_kfpk-kokrs i_belnr = kfpr-rkfpbnr IMPORTING e_kfpk = l_kfpk EXCEPTIONS not_found = 01.
READ_CUSTOMIZED_MESSAGE CALL FUNCTION 'READ_CUSTOMIZED_MESSAGE' EXPORTING i_arbgb = con_arbgb "Arbeitsgebiet=KFPR i_dtype = con_e_msgty i_msgnr = '213' IMPORTING e_msgty = l_msgty.
READ_CUSTOMIZED_MESSAGE CALL FUNCTION 'READ_CUSTOMIZED_MESSAGE' EXPORTING i_arbgb = con_arbgb i_dtype = con_msgty_no i_msgnr = '211' IMPORTING e_msgty = l_msgty.
KFPRC_PERIOD_LOCK_CHECK CALL FUNCTION 'KFPRC_PERIOD_LOCK_CHECK' EXPORTING id_date = kfpr-budat id_kokrs = kfpr-kokrs id_vrgng = para-vrgng.
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' i_callback_program = ld_repid i_callback_pf_status_set = 'ALV_SET_STATUS' i_callback_user_command = 'ALV_USER_COMMAND' i_callback_html_top_of_page = 'ALV_HTML_TOP_OF_PAGE' * I_STRUCTURE_NAME = is_layout = ls_layout it_fieldcat = lt_fieldcat it_excluding = lt_excluding * IT_SPECIAL_GROUPS = it_sort = lt_sort * IT_FILTER = * IS_SEL_HIDE = * I_DEFAULT = 'X' i_save = 'A' is_variant = ls_variant it_events = lt_event * IT_EVENT_EXIT = IS_PRINT = ls_print * IS_REPREP_ID = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES t_outtab = gt_alv_kfpe * EXCEPTIONS * PROGRAM_ERROR = 1 * OTHERS = 2 .
OBJECT_IDENTIFICATION_GET * CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' * EXPORTING * OBJNR = G_KFPK-ROBJNR * IMPORTING * IDENT_OBJID = LD_OBJID * IDENT_TXT15 = LD_OBART_TEXT.
K_COKA_READ CALL FUNCTION 'K_COKA_READ' EXPORTING coka_read = ls_coka kokrs = v_kokrs test_read = on IMPORTING meinh = c_meinh found = c_coka_found EXCEPTIONS not_found = 1.
RK_KSTAR_READ CALL FUNCTION 'RK_KSTAR_READ' EXPORTING datum = sy-datlo kokrs = v_kokrs kstar = v_kstar IMPORTING v_cskb = ls_cskbv EXCEPTIONS kstar_not_found = 1 OTHERS = 3.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING input = 1 unit_in = vs_kfpr-meinh unit_out = ld_meinh IMPORTING output = ld_output EXCEPTIONS conversion_not_found = 1.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING input = 1 unit_in = vs_kfpr-meinh unit_out = ld_meinh IMPORTING output = ld_output EXCEPTIONS conversion_not_found = 1.
KFPSS_SET_GB_NO_OPEN_POS CALL FUNCTION 'KFPSS_SET_GB_NO_OPEN_POS' EXPORTING ib_no_open_pos = ' '.
KFPSS_SET_GB_NO_OPEN_POS CALL FUNCTION 'KFPSS_SET_GB_NO_OPEN_POS' EXPORTING ib_no_open_pos = 'X'.
CNIS_GET_VALUES CALL FUNCTION 'CNIS_GET_VALUES' EXPORTING i_titlebar = text-102 i_flg_tcndb = 'X' CHANGING c_tcnt_prof_db = ld_profd EXCEPTIONS cancel = 1.
KFPSS_D220_OKCODE CALL FUNCTION 'KFPSS_D220_OKCODE' EXPORTING id_okcode = 'TEXTAUS'.
KFPSS_D220_OKCODE CALL FUNCTION 'KFPSS_D220_OKCODE' EXPORTING id_okcode = 'TEXTEIN'.
KFPSS_D220_DISPATCH CALL FUNCTION 'KFPSS_D220_DISPATCH' EXPORTING ld_ucomm = sy-ucomm.
KFPSS_SET_GD_TPA CALL FUNCTION 'KFPSS_SET_GD_TPA' EXPORTING id_belnr = ld_belnr.
KFPSS_FILL_GLOBALS CALL FUNCTION 'KFPSS_FILL_GLOBALS' EXPORTING id_kokrs = ld_kokrs id_prctr = ld_prctr id_counter = ld_counter id_modus = ld_modus TABLES it_tpa = lt_tpa it_sm = lt_sm.
KFPSS_INIT_SUB_EINZ CALL FUNCTION 'KFPSS_INIT_SUB_EINZ' STARTING NEW TASK ld_task_id PERFORMING d220_init_finished ON END OF TASK EXPORTING id_kokrs = ld_kokrs is_tpa = ls_tpa id_modus = ld_modus id_profid = ld_profd.
CURRENCY_EXPIRATION_CHECK CALL FUNCTION 'CURRENCY_EXPIRATION_CHECK' EXPORTING currency = v_waers date = v_date object = ld_object.
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 MKFPRF01 or its description.