SAP Reports / Programs | Logistics - General | Logistics Basic Data | Customer Master(LO-MD-BP-CM) SAP LO

MF02DFK0 SAP ABAP INCLUDE - Customer Master: FORM Routines K*







MF02DFK0 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 MF02DFK0 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 MF02DFK0. "Basic submit
SUBMIT MF02DFK0 AND RETURN. "Return to original report after report execution complete
SUBMIT MF02DFK0 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Customer Master: FORM Routines K*


INCLUDES used within this REPORT MF02DFK0

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:

SD_KNA1_MAINTAIN_EXIT CALL FUNCTION 'SD_KNA1_MAINTAIN_EXIT' EXPORTING customer_kna1 = kna1 maintain_mode = t020-aktyp update_sign = debi-xchng IMPORTING changed_kna1 = kna1exit e_update_sign = char1 function_code = fcode TABLES tab055 = x055 "S11K147281/3.0

KNA1_SINGLE_READER CALL FUNCTION 'KNA1_SINGLE_READER' "mi/46a EXPORTING i_kunnr = kna1-kunnr i_bypassing_buffer = 'X' IMPORTING o_kna1 = kna1 EXCEPTIONS not_found = 1 parameter_error = 2 internal_error = 3 OTHERS = 4.

CMD_DEQUEUE_EXKNA1 CALL FUNCTION 'CMD_DEQUEUE_EXKNA1' EXPORTING kunnr = enq_key EXCEPTIONS system_failure = 1.

LOCATION_CHECK_CUSTOMER_VENDOR CALL FUNCTION 'LOCATION_CHECK_CUSTOMER_VENDOR' "BETRIEB EXPORTING "BETRIEB i_tcode = t020-tcode "BETRIEB i_kunnr = kna1-kunnr. "BETRIEB

POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING titel = text-p37 textline1 = text-p40 textline2 = text-p41 IMPORTING answer = antwort.

CMD_DEQUEUE_EXKNA1 CALL FUNCTION 'CMD_DEQUEUE_EXKNA1' EXPORTING kunnr = enq_key EXCEPTIONS system_failure = 1.

POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING titel = text-p37 textline1 = text-p40 textline2 = text-p41 IMPORTING answer = antwort.

FI_CM_GET_CONTROL_AREAS CALL FUNCTION 'FI_CM_GET_CONTROL_AREAS' EXPORTING i_bukrs = t001-bukrs TABLES t_kkbtab = kkbtab.

FI_READ_TAKOF CALL FUNCTION 'FI_READ_TAKOF' EXPORTING i_bukrs = t001-bukrs i_akont = knb1-akont IMPORTING e_akof = takof EXCEPTIONS invalid_call = 1 no_entry_in_takof = 2 OTHERS = 3.

CREDITCONTROL_INSERT_DEFAULT CALL FUNCTION 'CREDITCONTROL_INSERT_DEFAULT' IN UPDATE TASK EXPORTING kunnr = objectid(10) kkber = kkbtab-kkber knrze = knb1-knrze.

CREDITCONTROL_INSERT_DEFAULT CALL FUNCTION 'CREDITCONTROL_INSERT_DEFAULT' IN UPDATE TASK EXPORTING kunnr = objectid(10) kkber = ls_tvta-kkber.

ADDR_PERS_COMP_GET_ARRAY CALL FUNCTION 'ADDR_PERS_COMP_GET_ARRAY' EXPORTING PUT_INTO_MEMORY = 'X' TABLES ADDRESS_PERS_IN_COMP_SELECTION = lt_addr_numbers ERROR_TABLE = lt_error_table EXCEPTIONS PARAMETER_ERROR = 01 INTERNAL_ERROR = 02 OTHERS = 03.

SD_KNVV_MAINTAIN_EXIT CALL FUNCTION 'SD_KNVV_MAINTAIN_EXIT' EXPORTING customer_kna1 = kna1 customer_knvv = knvv maintain_mode = t020-aktyp update_sign = debi-xchng IMPORTING changed_knvv = knvvexit e_update_sign = char1 function_code = fcode TABLES tab055 = x055 "S11K147281/3.0

G_DISPLAY_SELECTION_DYNPRO CALL FUNCTION 'G_DISPLAY_SELECTION_DYNPRO' EXPORTING dynp_title = help_title sel_title1 = help_coltitle first_index = 1 key_columns = 3 number_of_rows = 8 show_also_1 = 'X' start_column = 20 start_row = 10 without_selection = 'X' width_of_titles = 'X' allow_sort = 'X' TABLES sel_table = dknvv.

OPEN_FI_PERFORM_00001360_E CALL FUNCTION 'OPEN_FI_PERFORM_00001360_E' EXPORTING i_aktyp = t020-aktyp i_funcl = t020-funcl i_kna1 = kna1 i_knb1 = knb1.

CONTACTPERSON_FIELD_STATUS CALL FUNCTION 'CONTACTPERSON_FIELD_STATUS' EXPORTING set_status = debi-fausa+39(1).

CMD_DEQUEUE_EXKNA1 CALL FUNCTION 'CMD_DEQUEUE_EXKNA1' EXPORTING kunnr = enq_key EXCEPTIONS system_failure = 1.

CMD_ENQUEUE_EXKNA1 CALL FUNCTION 'CMD_ENQUEUE_EXKNA1' EXPORTING KUNNR = KNA1-KUNNR EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2.

CREDITCONTROL_ENQUEUE





CALL FUNCTION 'CREDITCONTROL_ENQUEUE' EXPORTING kunnr = kna1-kunnr EXCEPTIONS foreign_lock = 1 system_failure = 2.

CMD_DEQUEUE_EXKNA1 CALL FUNCTION 'CMD_DEQUEUE_EXKNA1' EXPORTING kunnr = kna1-kunnr EXCEPTIONS system_failure = 1.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING object = nrobj nr_range_nr = t077d-numkr IMPORTING number = kna1-kunnr returncode = retcode EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02 object_not_found = 03.

SD_CCARD_COLLECT CALL FUNCTION 'SD_CCARD_COLLECT' EXPORTING iv_kunnr = kna1-kunnr EXCEPTIONS customer_number_empty = 1 others = 2.

CLFM_SET_OBJECT CALL FUNCTION 'CLFM_SET_OBJECT' EXPORTING object = class_object.

DRAD_CHANGE_BEFORE_COMMIT CALL FUNCTION 'DRAD_CHANGE_BEFORE_COMMIT' TABLES DRAD_FOR_CHANGE = xdrad[].

NUMBER_GET_INFO CALL FUNCTION 'NUMBER_GET_INFO' EXPORTING nr_range_nr = t077d-numkr object = nrobj IMPORTING interval = nriv EXCEPTIONS interval_not_found = 01 object_not_found = 02.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = 'VDH2N' EXCEPTIONS ok = 0 not_ok = 2 OTHERS = 3.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = 'VDH1N' EXCEPTIONS ok = 0 not_ok = 2 OTHERS = 3.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = 'VD53' EXCEPTIONS ok = 0 not_ok = 2 OTHERS = 3.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = 'VD52' EXCEPTIONS ok = 0 not_ok = 2 OTHERS = 3.

CUSTOMIZED_MESSAGE CALL FUNCTION 'CUSTOMIZED_MESSAGE' " \TP 638495 EXPORTING i_arbgb = 'F2' " \TP 638495 i_dtype = 'W' " \TP 638495 i_msgnr = '813'. " \TP 638495

KATAKANA CALL FUNCTION 'KATAKANA' EXPORTING i_text = knbk-koinh * I_TYPE = 'ZENGINKYO' IMPORTING e_text = " \1677039 EXCEPTIONS not_katakana = 1 no_valid_type = 2 all_space = 3 OTHERS = 4.

SJIS_DBC_TO_SBC CALL FUNCTION 'SJIS_DBC_TO_SBC' EXPORTING ALL = 'X' CHANGING TEXT = .

CUSTOMIZED_MESSAGE call function 'CUSTOMIZED_MESSAGE' exporting i_arbgb = 'F2' i_dtype = 'W' i_msgnr = '814' i_var01 = L_TEXT i_var02 = L_KOINH.

VENDOR_MAINTAIN_VB_EX_DEBITOR CALL FUNCTION 'VENDOR_MAINTAIN_VB_EX_DEBITOR' EXPORTING i_lfa1 = retkre i_retkre_type = s_retkre_type i_kna1_adrnr = kna1-adrnr i_kred_ex_debi = kred_ex_debi i_addr_chg = addr_chg.

VENDOR_MAINTAIN_VB_EX_DEBITOR CALL FUNCTION 'VENDOR_MAINTAIN_VB_EX_DEBITOR' EXPORTING i_lfa1 = retkre i_retkre_type = 'L' i_kna1_adrnr = kna1-adrnr i_kred_ex_debi = kred_ex_debi i_addr_chg = addr_chg.

CUSTOMER_MAINTAIN_VB_EX_VENDOR CALL FUNCTION 'CUSTOMER_MAINTAIN_VB_EX_VENDOR' EXPORTING I_KNA1 = RETDEB I_RETDEB_TYPE = 'L' * I_LFA1_ADRNR = RETDEB-ADRNR I_DEBI_EX_KRED = KRED_EX_DEBI I_KNA1_OLD = 'X' I_ADDR_CHG = ADDR_CHG.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = konsument_tcode EXCEPTIONS ok = 0 not_ok = 2 OTHERS = 3.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = 'VC/2' EXCEPTIONS ok = 0 not_ok = 2 OTHERS = 3.




REF_CUSTOMER_COMPANY_CODE_FIND CALL FUNCTION 'REF_CUSTOMER_COMPANY_CODE_FIND' * EXPORTING * BUKRS = * IMPORTING * REF_KUNNR = EXCEPTIONS no_ref_customer = 1 OTHERS = 2 .

DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = 'SAPMF02D' dynumb = dynnr determine_loop_index = 'X' TABLES dynpfields = dynpfields EXCEPTIONS OTHERS = 11.

CONVERSION_EXIT_PARVW_INPUT CALL FUNCTION 'CONVERSION_EXIT_PARVW_INPUT' " begin Insertion EXPORTING input = dynpfields-fieldvalue IMPORTING output = rolle. " end insertion,

F4IF_FIELD_VALUE_REQUEST CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST' EXPORTING tabname = tabname fieldname = fieldname searchhelp = suchhilfe TABLES return_tab = partner_table EXCEPTIONS OTHERS = 5.



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 MF02DFK0 or its description.