SAP Reports / Programs | Controlling | Product Cost Controlling | Product Cost Planning(CO-PC-PCP) SAP CO
MK70DF60 SAP ABAP INCLUDE - Technical FORM routines
MK70DF60 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 MK70DF60 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 MK70DF60. "Basic submit
SUBMIT MK70DF60 AND RETURN. "Return to original report after report execution complete
SUBMIT MK70DF60 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Technical FORM routines
INCLUDES used within this REPORT MK70DF60
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:
KKEK_COSTING_REVALUATE_PARM CALL FUNCTION 'KKEK_COSTING_REVALUATE_PARM' EXPORTING KHS1_IMP = LT_KHS1 "KKOST KKEA1_IMP = SAV_KKEA1 PSDAT_IMP = LT_KHS1-PSDAT KRSDT_IMP = LT_KHS1-KRSDT RK70F_IMP = LT_RK70F_HEAD OBART_KOMPONENTE_IMP = RK70X-OBART_KOMPONENTE FLG_ABC_ACTIV_IMP = FLG_PTYP_X_ACTIV REVALUATE_ALL_BASE_CAT = CHAR_X REVALUATE_G_CAT = SPACE REVALUATE_X_CAT = SPACE REVALUATE_i_CAT = SPACE REVALUATION_MODE = '1' "Nur Kostenarten * ITERATION = ' ' * MESSAGE_ON_SCREEN = CNT_MOS_OFF IMPORTING KHS1_EXP = LT_KHS1 "KKOST * ERROR_EXP = RC = L_RC TABLES KIS1_IMP = L_SIMU_KIS1 "KKOST KIS1_EXP = L_SIMU_KIS1 "KKOST EXCEPTIONS FATAL_ERROR = 1 OTHERS = 2.
KKEK_IO_POPUP_COST_ELEM_GET CALL FUNCTION 'KKEK_IO_POPUP_COST_ELEM_GET' EXPORTING PSDAT_IMP = LT_KHS1-PSDAT KOKRS_IMP = LT_KHS1-KOKRS FLG_OVERHEAD_CAT_ALLOWED = L_FLG_OVERHEAD_CAT_ALLOWED IMPORTING RC_EXP = L_RC * RC_EXP 0: Selektion ok * 1: Popup abgebrochen TABLES T_KIS1_CHG = L_T_KIS1_POPUP.
KKEK_COST_ELEMENT_TO_COMPONENT * CALL FUNCTION 'KKEK_COST_ELEMENT_TO_COMPONENT' * EXPORTING * kkea1_imp = sav_kkea1 * kstar_imp = l_simu_kis1-kstar * hrkft_imp = l_simu_kis1-hrkft * schkz_imp = l_simu_kis1-schkz * schkzns_imp = l_simu_kis1-schkzns * message_on_screen = space * IMPORTING * elemt_exp = l_simu_kis1-elemt * elemtns_exp = l_simu_kis1-elemtns * flg_fix_allowed_exp = ld_flg_fix_allowed * rc = step_rc.
KKEK_COST_COMPONENT_ELEMENT CALL FUNCTION 'KKEK_COST_COMPONENT_ELEMENT' EXPORTING ELEHK_IMP = SAV_KKEA1-ELEHK KTOPL_IMP = SAV_KKEA1-KTOPL KSTAR_IMP = L_SIMU_KIS1-KSTAR HRKFT_IMP = L_SIMU_KIS1-HRKFT ELEHKNS_IMP = SAV_KKEA1-ELEHKNS SCHKZ_IMP = L_SIMU_KIS1-SCHKZ SCHKZNS_IMP = L_SIMU_KIS1-SCHKZNS MESSAGE_ON_SCREEN = CNT_MOS_OFF IMPORTING ELEMT_EXP = L_SIMU_KIS1-ELEMT ELEMTNS_EXP = L_SIMU_KIS1-ELEMTNS FLG_FIX_ALLOWED_EXP = LD_FLG_FIX_ALLOWED RC = LOC_RC EXCEPTIONS CALLING_ERROR = 1 OTHERS = 2.
KKEK_MESSAGE CALL FUNCTION 'KKEK_MESSAGE' EXPORTING ARBGB = SY-MSGID MSGNR = SY-MSGNO MSGTY = SY-MSGTY MSGV1 = SY-MSGV1 MSG_ON_SCREEN = CNT_MOS_OFF.
KKEK_ITEMS_CALCULATE CALL FUNCTION 'KKEK_ITEMS_CALCULATE' EXPORTING KHS1_IMP = LT_KHS1 KKEA1_IMP = SAV_KKEA1 FLG_PARALLEL_CURR_IMP = YES MESSAGE_ON_SCREEN = SPACE IMPORTING RC = STEP_RC TABLES KIS1_IMP = L_SIMU_KIS1 KIS1_EXP = L_SIMU_KIS1 EXCEPTIONS FATAL_ERROR = 1 OTHERS = 2.
KKEK_HEAD_CALCULATE CALL FUNCTION 'KKEK_HEAD_CALCULATE' EXPORTING KHS1_IMP = LT_KHS1 KKEA1_IMP = SAV_KKEA1 MESSAGE_ON_SCREEN = SPACE IMPORTING KHS1_EXP = LT_KHS1 * VALUE_FWGFX = * VALUE_TWGFX = * VALUE_WITHOUT_COSTELEMENT = RC = STEP_RC TABLES KIS1_IMP = L_SIMU_KIS1.
KKEK_ITEMS_QUANTITY_CHANGE CALL FUNCTION 'KKEK_ITEMS_QUANTITY_CHANGE' EXPORTING MEEHT_OLD_IMP = NB_KHS1_ALT-MEEHT MEEHT_NEW_IMP = NB_KHS1_NEU-MEEHT MENGE_OLD_IMP = NB_KHS1_ALT-MENGE MENGE_NEW_IMP = NB_KHS1_NEU-MENGE MESSAGE_ON_SCREEN = CNT_MOS_OFF IMPORTING RC_EXP = NB2_RC TABLES KIS1_IMP = NB_KIS1 KIS1_EXP = NB_KIS1 EXCEPTIONS OTHERS = 0.
KKEK_COSTING_REVALUATE_PARM CALL FUNCTION 'KKEK_COSTING_REVALUATE_PARM' EXPORTING KHS1_IMP = LT_KHS1 KKEA1_IMP = NB_KKEA1 PSDAT_IMP = LT_KHS1-PSDAT KRSDT_IMP = LT_KHS1-KRSDT RK70F_IMP = LT_RK70F_HEAD FLG_ABC_ACTIV_IMP = FLG_PTYP_X_ACTIV REVALUATE_ALL_BASE_CAT = CHAR_X REVALUATE_G_CAT = CHAR_X REVALUATE_X_CAT = CHAR_X REVALUATE_i_CAT = space "no raw calc REVALUATION_MODE = '2' * ITERATION = ' ' * MESSAGE_ON_SCREEN = CNT_MOS_OFF IMPORTING KHS1_EXP = LT_KHS1 * ERROR_EXP = RC = LD_RC TABLES KIS1_IMP = NB_KIS1 KIS1_EXP = NB_KIS1 EXCEPTIONS FATAL_ERROR = 1 OTHERS = 2.
K_LTXT_COPY CALL FUNCTION 'K_LTXT_COPY' EXPORTING NEW_NAME = L_NEW_NAME LTEXT_REF = L_LTEXT_REF * SAVEMODE_DIRECT = ' ' IMPORTING ENTRIES_COPIED = L_ENTRIES.
KKEK_ITEMS_CALCULATE CALL FUNCTION 'KKEK_ITEMS_CALCULATE' EXPORTING KHS1_IMP = SIMU_KHS1 KKEA1_IMP = AKPA_KKEA1 FLG_PARALLEL_CURR_IMP = NO "erst ab 3.0C/D
KKEK_HEAD_CALCULATE CALL FUNCTION 'KKEK_HEAD_CALCULATE' EXPORTING KHS1_IMP = SIMU_KHS1 KKEA1_IMP = AKPA_KKEA1 MESSAGE_ON_SCREEN = SPACE IMPORTING KHS1_EXP = SIMU_KHS1 RC = AKPA2_RC TABLES KIS1_IMP = SIMU_KIS1 EXCEPTIONS OTHERS = 1.
DELETE_TEXT CALL FUNCTION 'DELETE_TEXT' EXPORTING ID = DEL_ID LANGUAGE = DEL_SPRAS NAME = DEL_NAME OBJECT = DEL_OBJECT SAVEMODE_DIRECT = SPACE TEXTMEMORY_ONLY = CHAR_X EXCEPTIONS NOT_FOUND = 01.
K_ASSEMBLY_RESOLVE_COSTS CALL FUNCTION 'K_ASSEMBLY_RESOLVE_COSTS' EXPORTING COST_VARIANCE_MODE = 'I' EXTNR = T_BTA_KIS1-EXTNR KOKRS = SAV_KHS1-KOKRS MAX_RESOLVE_LEVEL = BTA_RESOLVE_LEVEL MEEHT_IMP = T_BTA_KIS1-MEEHT MENGE_IMP = T_BTA_KIS1-MENGE WERT_IMP = T_BTA_KIS1-WERTN IMPORTING MAX_LEVEL_RESOLVED = MAX_RESOLVE_LEVEL MESSAGES_IN_PROTOCOL = FLG_RESOLVE_MESSAGES TABLES RESULT_TABLE = T_RESOLVE_KIS1 EXCEPTIONS COST_VARIANCE_DETECTED = 01 CYCLICAL_REFERENCE_DETECTED = 02 ILLEGAL_PARAMETER_COMBINATION = 03 INTERNAL_ERROR = 04 OBJECT_NOT_FOUND = 05 UNIT_CONVERSION_FAILED = 06 FIELD_OVERFLOW_DETECTED = 07.
KKEK_UNIT_CONVERSION CALL FUNCTION 'KKEK_UNIT_CONVERSION' EXPORTING PMEHT_IMP = T_RESOLVE_KIS1-MEEHT MEEHT_IMP = T_RESOLVE_KIS1-PMEHT * MATNR_IMP = MESSAGE_ON_SCREEN = CNT_MOS_OFF IMPORTING * CONVERSION_FACTOR_EXP = RC = BTA2_RC CHANGING MENGE_ZU_RUNDEND_CHG = KONVERTIERTE_MENGE EXCEPTIONS OTHERS = 1.
KKEK_ITEMS_AFTER_COPY CALL FUNCTION 'KKEK_ITEMS_AFTER_COPY' EXPORTING KHS1_IMP = SAV_KHS1 KKEA1_IMP = SAV_KKEA1 WERKS_IMP = RK70X-WERKS GSBER_IMP = RK70X-GSBER PRCTR_IMP = RK70X-PRCTR KADAT_IMP = RK70X-KADAT UEBID_IMP = RK70X-UEBID PATNR_IMP = RK70X-PATNR KZBWS_IMP = RK70X-KZBWS MESSAGE_ON_SCREEN = SPACE IMPORTING RC_EXP = BTA2_RC TABLES KIS1_IMP = T_RESOLVE_KIS1 KIS1_EXP = T_RESOLVE_KIS1 EXCEPTIONS OTHERS = 0.
KKEK_ITEM_CALCULATE CALL FUNCTION 'KKEK_ITEM_CALCULATE' EXPORTING FLG_INPUT_CURR_IMP = CNT_HW FLG_PARALLEL_CURR_IMP = FLG_PARALLEL_CURR KHS1_IMP = SAV_KHS1 KIS1_IMP = T_RESOLVE_KIS1 MESSAGE_ON_SCREEN = SPACE IMPORTING KIS1_EXP = T_RESOLVE_KIS1 EXCEPTIONS ERROR = 1 OTHERS = 2.
KKEK_FORMULA_1_TO_POSNR_CREATE CALL FUNCTION 'KKEK_FORMULA_1_TO_POSNR_CREATE' EXPORTING POSNR_IMP = PT_KIS1-POSNR IMPORTING OPCOD_EXP = PT_KIS1-OPCOD 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 MK70DF60 or its description.