SAP Reports / Programs | Controlling | Overhead Cost Controlling | Cost Center Accounting(CO-OM-CCA) SAP CO
MKPT4F01 SAP ABAP INCLUDE - documentation and ABAP source code
MKPT4F01 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 MKPT4F01 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 MKPT4F01. "Basic submit
SUBMIT MKPT4F01 AND RETURN. "Return to original report after report execution complete
SUBMIT MKPT4F01 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 MKPT4F01
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:
K_OBJECT_SELECTION_ECODE CALL FUNCTION 'K_OBJECT_SELECTION_ECODE' EXPORTING ecode = ld_ucomm EXCEPTIONS not_found = 1.
K_KOKRS_SET CALL FUNCTION 'K_KOKRS_SET' IMPORTING e_kokrs = cd_kokrs.
K_OBJECT_SELECTION_SCREEN_SET CALL FUNCTION 'K_OBJECT_SELECTION_SCREEN_SET' EXPORTING selart = cs_control-selart oneobject = g_single allobjects = true IMPORTING repid_sub = cs_control-repid_sub1 dynnr_sub = cs_control-dynnr_sub1.
K_KSTAR_SELECTION_FCODE CALL FUNCTION 'K_KSTAR_SELECTION_FCODE' EXPORTING fcode = ld_okcode EXCEPTIONS OTHERS = 1.
K_OBJECT_SELECTION_FCODE CALL FUNCTION 'K_OBJECT_SELECTION_FCODE' EXPORTING fcode = ld_ucomm EXCEPTIONS not_found = 1.
K_KOKRS_SET CALL FUNCTION 'K_KOKRS_SET' EXPORTING popup = '1' IMPORTING e_kokrs = cd_kokrs.
HELP_OBJECT_SHOW_FOR_FIELD CALL FUNCTION 'HELP_OBJECT_SHOW_FOR_FIELD' EXPORTING doklangu = sy-langu called_by_program = id_program called_by_dynp = id_dynpro called_for_tab = id_tabname called_for_field = id_fieldname.
K_OBJECT_SELECTION_FCODE CALL FUNCTION 'K_OBJECT_SELECTION_FCODE' EXPORTING fcode = ld_ucomm EXCEPTIONS not_found = 1.
K_USER_VALUES_SAVE * CALL FUNCTION 'K_USER_VALUES_SAVE' * TABLES * kuvs_addit_param = lt_usr05.
G_FIELD_SET CALL FUNCTION 'G_FIELD_SET' EXPORTING table = lc_tabname ftype = 'A' text_flag = 'X' EXCEPTIONS not_found = 4.
G_FIELD_GET CALL FUNCTION 'G_FIELD_GET' IMPORTING field_attr = dfies subrc = ld_subrc.
K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING kokrs = cs_info-kokrs IMPORTING e_tka01 = ls_tka01.
K_LOGSYSTEM_CHECK CALL FUNCTION 'K_LOGSYSTEM_CHECK' EXPORTING i_kokrs = cs_info-kokrs.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = id_name * text = ' ' * INFO = ' ' add_stdinf = ' ' IMPORTING RESULT = cd_result EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3.
F4IF_FIELD_VALUE_REQUEST CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST' EXPORTING tabname = 'CCSS' fieldname = 'VERSN' searchhelp = 'CO_VERSN_GJAHR' shlpparam = 'VERSN' value = ld_versn_value callback_program = 'SAPMKPT4' callback_form = ld_callback TABLES return_tab = lt_return_tab EXCEPTIONS field_not_found = 1 no_help_for_field = 2 inconsistent_help = 3 no_values_found = 4 OTHERS = 5.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING dyname = sy-cprog dynumb = sy-dynnr TABLES dynpfields = lt_dynpfields.
K_VERSN_READ CALL FUNCTION 'K_VERSN_READ' EXPORTING i_gjahr = id_gjahr i_kokrs = id_kokrs i_versn = id_versn bypassing_buffer = true i_actvt = id_actvt IMPORTING e_tka09 = cs_tka09 e_tka07 = cs_tka07 EXCEPTIONS no_authority = 1 OTHERS = 2.
K_PERIODS_GET_FOR_KOKRS CALL FUNCTION 'K_PERIODS_GET_FOR_KOKRS' EXPORTING gjahr = id_sgjahr kokrs = id_kokrs IMPORTING anzbp = cd_anzbp.
CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET' EXPORTING period = ld_period variant = id_lmona year = id_gjahr IMPORTING from_date = ld_datab to_date = ld_datbi last_normal_period = ld_last_normal_period EXCEPTIONS OTHERS = 4.
K_CSSL_KL_FOR_KS CALL FUNCTION 'K_CSSL_KL_FOR_KS' EXPORTING kokrs = id_kokrs gjahr = id_gjahr TABLES it_objnr = ct_objnr EXCEPTIONS no_record_found = 1 OTHERS = 2.
POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING defaultoption = 'Y' diagnosetext1 = text-025 textline1 = text-026 titel = text-027 IMPORTING answer = ld_answer.
K_OBJECT_SELECTION_CRIT_GET CALL FUNCTION 'K_OBJECT_SELECTION_CRIT_GET'.
K_OBJECT_SELECTION_CRIT_GET CALL FUNCTION 'K_OBJECT_SELECTION_CRIT_GET' IMPORTING variant = ld_variant TABLES it_seltab = lt_selpa_crit.
GET_PRINT_PARAMETERS CALL FUNCTION 'GET_PRINT_PARAMETERS' EXPORTING no_dialog = true mode = 'CURRENT' immediately = false line_count = 65 line_size = 80 list_text = ld_prtxt new_list_id = true report = gs_constants-main_program IMPORTING out_parameters = ls_priparamx valid = ld_prvalid.
K_BATCH_REQUEST CALL FUNCTION 'K_BATCH_REQUEST' EXPORTING par_dialg = true par_nsm37 = false par_print = is_rkpt3_dynp-flg_proto par_pripa = ls_priparamx par_rname = id_batchrep par_pname = lc_dummyrep par_sdmsg = true TABLES tab_selpa = lt_selpa.
K_OBJECT_SELECTION_CRIT_FILL CALL FUNCTION 'K_OBJECT_SELECTION_CRIT_FILL' EXPORTING selart = id_selart oneobject = g_single variant = id_variant TABLES it_cosel2 = it_selpa.
K_OBJECT_SELECTION_RUN CALL FUNCTION 'K_OBJECT_SELECTION_RUN' EXPORTING i_kokrs = id_kokrs i_date_from = id_datab i_date_to = id_datbi i_vrgng = id_kass_vrgng TABLES it_objnr = ct_tobjnr.
K_PLAN_TO_PLAN_COPY CALL FUNCTION 'K_PLAN_TO_PLAN_COPY' EXPORTING id_kokrs = id_kokrs is_sinfo = is_sinfo is_tinfo = is_tinfo is_ctrl = is_ctrl is_settings = is_settings id_bltxt = id_bltxt id_interval = gs_control-interval IMPORTING es_result = cs_result TABLES ct_pkstar = lt_pkstar it_fund = lt_fund it_bud_per = lt_bud_per it_farea = lt_farea it_grant = lt_grant ct_objnr = it_tobjnr ct_sobjnr = it_sobjnr ct_vrgng = it_vrgng et_mesg = lt_mesg2 et_list = lt_list2 ct_callback = it_callback.
K_PLAN_TO_PLAN_COPY CALL FUNCTION 'K_PLAN_TO_PLAN_COPY' EXPORTING id_kokrs = id_kokrs is_sinfo = is_sinfo is_tinfo = is_tinfo is_ctrl = is_ctrl is_settings = is_settings id_bltxt = id_bltxt id_interval = gs_control-interval IMPORTING es_result = cs_result TABLES ct_pkstar = lt_pkstar it_fund = lt_fund it_bud_per = lt_bud_per it_farea = lt_farea it_grant = lt_grant ct_objnr = it_tobjnr ct_sobjnr = it_sobjnr ct_vrgng = it_vrgng et_mesg = lt_mesg2 ct_callback = it_callback.
K_ACTS_TO_PLAN_COPY CALL FUNCTION 'K_ACTS_TO_PLAN_COPY' EXPORTING id_kokrs = id_kokrs is_sinfo = is_sinfo is_tinfo = is_tinfo is_ctrl = is_ctrl is_vrgng_grp = is_vrgng_grp is_settings = is_settings id_bltxt = id_bltxt IMPORTING es_result = cs_result TABLES ct_pkstar = lt_pkstar it_fund = lt_fund it_bud_per = lt_bud_per it_farea = lt_farea it_grant = lt_grant ct_objnr = it_tobjnr et_mesg = lt_mesg2 et_list = lt_list2 ct_callback = it_callback.
K_ACTS_TO_PLAN_COPY CALL FUNCTION 'K_ACTS_TO_PLAN_COPY' EXPORTING id_kokrs = id_kokrs is_sinfo = is_sinfo is_tinfo = is_tinfo is_ctrl = is_ctrl is_vrgng_grp = is_vrgng_grp is_settings = is_settings id_bltxt = id_bltxt IMPORTING es_result = cs_result TABLES ct_pkstar = lt_pkstar it_fund = lt_fund it_bud_per = lt_bud_per it_farea = lt_farea it_grant = lt_grant ct_objnr = it_tobjnr et_mesg = lt_mesg2 ct_callback = it_callback.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = 0 text = text-023.
REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' IMPORTING et_events = ct_events[].
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'RKPT3_LIST' CHANGING ct_fieldcat = ct_fieldcat[].
REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING i_save = 'A' CHANGING cs_variant = ld_variant EXCEPTIONS OTHERS = 0.
REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING i_callback_program = gs_constants-main_program i_callback_pf_status_set = ld_status it_excluding = lt_excluding[] i_callback_user_command = ld_ucomm is_layout = ls_layout it_fieldcat = it_fieldcat[] i_save = 'A' "stand.+user var.
MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING show_linno = space object = ld_object EXCEPTIONS no_messages = 1.
POPUP_TO_INFORM CALL FUNCTION 'POPUP_TO_INFORM' EXPORTING titel = ld_title txt1 = text-034 txt2 = gs_list_result-no_copied txt3 = text-035 txt4 = gs_list_result-no_fails.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING textline1 = space textline2 = text-036 titel = space IMPORTING answer = ld_answer.
K_OBJECT_SELECTION_CRIT_WRITE CALL FUNCTION 'K_OBJECT_SELECTION_CRIT_WRITE' EXPORTING offset1 = '32'.
K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING kokrs = id_kokrs IMPORTING e_tka01 = ls_tka01.
K_VERSN_READ CALL FUNCTION 'K_VERSN_READ' EXPORTING i_kokrs = id_kokrs i_versn = id_versn bypassing_buffer = true IMPORTING e_tkt09 = tkt09 EXCEPTIONS not_found = 04.
OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING objnr = id_objnr no_kokrs = true IMPORTING ident_obart = cd_obart ident_objid = ld_objid.
POPUP_DISPLAY_TEXT CALL FUNCTION 'POPUP_DISPLAY_TEXT' EXPORTING popup_title = id_popup_title start_row = 2 text_object = id_text_object EXCEPTIONS text_not_found = 1 OTHERS = 2.
MODX_FUNCTION_ACTIVE_CHECK CALL FUNCTION 'MODX_FUNCTION_ACTIVE_CHECK' EXPORTING cprogname = gs_constants-main_program funcnumber = id_exit_mode IMPORTING active = ld_active EXCEPTIONS not_found = 1.
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' * EXPORTING * DEFAULTOPTION = 'N' * DIAGNOSETEXT1 = TEXT-001 * TEXTLINE1 = TEXT-002 * TITEL = TEXT-003 * IMPORTING * ANSWER = LD_ANSWER.
RH_FORM_EXIST CALL FUNCTION 'RH_FORM_EXIST' EXPORTING bufferflag = 'X' name = is_subroutine repid = gs_constants-main_program EXCEPTIONS form_not_found = 1 report_not_found = 2 OTHERS = 3.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = sy-cprog dynumb = sy-dynnr * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' TABLES dynpfields = ld_dynpfields.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = ld_dynpfields-fieldvalue IMPORTING output = rkpt3_dynp-sversn.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = sy-cprog dynumb = sy-dynnr * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' TABLES dynpfields = ld_dynpfields.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = ld_dynpfields-fieldvalue IMPORTING output = rkpt3_dynp-tversn.
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' EXPORTING i_identification = id_msgid.
MESSAGE_SET_DEFAULTLINE CALL FUNCTION 'MESSAGE_SET_DEFAULTLINE' EXPORTING arbgb = lt_mesg-arbgb msgty = lt_mesg-msgty msgv1 = lt_mesg-msgv1 msgv2 = lt_mesg-msgv2 msgv3 = lt_mesg-msgv3 msgv4 = lt_mesg-msgv4 txtnr = lt_mesg-txtnr zeile = lt_mesg-zeile.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = lt_mesg-arbgb msgty = lt_mesg-msgty msgv1 = lt_mesg-msgv1 msgv2 = lt_mesg-msgv2 msgv3 = lt_mesg-msgv3 msgv4 = lt_mesg-msgv4 txtnr = lt_mesg-txtnr zeile = lt_mesg-zeile.
MESSAGES_COUNT CALL FUNCTION 'MESSAGES_COUNT' EXPORTING severity_from = '12' IMPORTING count = es_result-co_errct max_severity = es_result-max_severity.
ENQUEUE_E_TABLES CALL FUNCTION 'ENQUEUE_E_TABLES' EXPORTING tabname = 'TKA07' varkey = ed_varkey _scope = '3' EXCEPTIONS foreign_lock = 04.
DEQUEUE_E_TABLES CALL FUNCTION 'DEQUEUE_E_TABLES' EXPORTING tabname = 'TKA07' varkey = id_varkey.
K_OBJNR_GET_FROM_RKU0X CALL FUNCTION 'K_OBJNR_GET_FROM_RKU0X' EXPORTING id_kokrs = id_kokrs is_rku01ja = ct_rku01ja IMPORTING es_rku01ja_objnr = ls_objnr.
OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING objnr = ls_objnr-objnr no_kokrs = 'X' IMPORTING ident_txt20 = ld_objtxt ident_objid = ld_object.
K_OBJNR_GET_FROM_RKU0X CALL FUNCTION 'K_OBJNR_GET_FROM_RKU0X' EXPORTING id_kokrs = id_kokrs is_rku02ja = ct_rku02ja IMPORTING es_rku02ja_objnr = ls_objnr.
OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING objnr = ls_objnr-objnr no_kokrs = 'X' IMPORTING ident_txt20 = ld_objtxt ident_objid = ld_object.
DDIF_NAMETAB_GET CALL FUNCTION 'DDIF_NAMETAB_GET' EXPORTING tabname = 'RKPT3_DYNP' TABLES x031l_tab = lt_fields.
K_KSTAR_SELECTION_INIT CALL FUNCTION 'K_KSTAR_SELECTION_INIT' EXPORTING oneobject = false group = true allobjects = true noobject = false variant = true IMPORTING repid_sub = gs_control-repid_prim dynnr_sub = gs_control-dynnr_prim.
K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING kokrs = id_coarea IMPORTING e_tka01 = ls_tka01.
G_POSTING_DATE_OF_PERIOD_GET CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET' EXPORTING period = ls_min-perab variant = ls_tka01-lmona year = ls_min-gjahr IMPORTING from_date = ld_dat_from.
G_POSTING_DATE_OF_PERIOD_GET CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET' EXPORTING period = ls_max-perbi variant = ls_tka01-lmona year = ls_max-gjahr IMPORTING to_date = ld_dat_to.
K_KSTAR_SELECTION_RUN CALL FUNCTION 'K_KSTAR_SELECTION_RUN' EXPORTING i_kokrs = id_coarea i_date_from = ld_dat_from i_date_to = ld_dat_to TABLES it_result = lt_cskb_ex.
DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = id_table lfieldname = id_field IMPORTING dfies_wa = ls_dfies EXCEPTIONS OTHERS = 1.
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 MKPT4F01 or its description.