MF01AINT SAP ABAP INCLUDE - Customer Master Record Changes
MF01AINT 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 MF01AINT 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 MF01AINT. "Basic submit
SUBMIT MF01AINT AND RETURN. "Return to original report after report execution complete
SUBMIT MF01AINT VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: BUKRS = Company codes
Selection Text: DATUM = From change date
Selection Text: USNAM = Changed by
Selection Text: VONKONTO = Account number
Title: Customer Master Record Changes
INCLUDES used within this REPORT MF01AINT
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:
PLANNED_CHANGES_READ_HEADERS CALL FUNCTION 'PLANNED_CHANGES_READ_HEADERS' EXPORTING objectclass = objekt objectid = keylow username = usnam time_of_change = zeit date_of_change = datum planned_change_number_from = aennr_low planned_change_number_to = aennr_high TABLES i_cdhdr = icdhdr EXCEPTIONS no_position_found = 1 OTHERS = 2.
CHANGEDOCUMENT_READ_HEADERS CALL FUNCTION 'CHANGEDOCUMENT_READ_HEADERS' EXPORTING objectclass = objekt objectid = keylow username = usnam time_of_change = zeit date_of_change = datum read_changedocu = gv_read_changedocu "\MN 1874328 TABLES i_cdhdr = icdhdr EXCEPTIONS no_position_found = 1 OTHERS = 2.
FI_DOCUMENT_READ_SINGLE * CALL FUNCTION 'FI_DOCUMENT_READ_SINGLE' * EXPORTING * I_BUKRS = BKPF-BUKRS * I_BELNR = BKPF-BELNR * I_GJAHR = BKPF-GJAHR * I_GROUP_XREAD = L_GROUP_XREADALL * I_XUSE_DATABASE = SPACE * I_XSUPPRESSDIALOG = 'X' * TABLES * C_ABKPF = L_ARCHBKPF * C_CDHDR = ICDHDR * C_CDPOS = L_CDPOS * EXCEPTIONS * OTHERS = 99.
FAGL_GET_ARCH_FI_DOCUMENT CALL FUNCTION 'FAGL_GET_ARCH_FI_DOCUMENT' EXPORTING i_bukrs = bkpf-bukrs i_belnr = bkpf-belnr i_gjahr = bkpf-gjahr TABLES t_cdhdr = icdhdr t_cdpos = l_cdpos EXCEPTIONS document_not_found = 1 internal_error = 2 OTHERS = 3.
CHANGEDOCUMENT_PREPARE_POS CALL FUNCTION 'CHANGEDOCUMENT_PREPARE_POS' EXPORTING "986338 it_cdhdr = icdhdr[] "986338 TABLES editpos = ausg * i_cdpos = l_cdpos ">>Delete - Note 330875 i_cdpos = l_cdpos_one_header "<
FAGL_GET_ARCH_FI_DOCUMENT CALL FUNCTION 'FAGL_GET_ARCH_FI_DOCUMENT' EXPORTING i_bukrs = bkpf-bukrs i_belnr = bkpf-belnr i_gjahr = bkpf-gjahr TABLES t_cdhdr = icdhdr t_cdpos = l_cdpos EXCEPTIONS document_not_found = 1 internal_error = 2 OTHERS = 3.
CHANGEDOCUMENT_PREPARE_POS CALL FUNCTION 'CHANGEDOCUMENT_PREPARE_POS' TABLES editpos = ausg i_cdpos = l_cdpos_one_header EXCEPTIONS OTHERS = 99.
FAGL_GET_ARCH_FI_DOCUMENT CALL FUNCTION 'FAGL_GET_ARCH_FI_DOCUMENT' EXPORTING i_bukrs = bkpf-bukrs i_belnr = bkpf-belnr i_gjahr = bkpf-gjahr TABLES t_cdhdr = icdhdr t_cdpos = l_cdpos EXCEPTIONS document_not_found = 1 internal_error = 2 OTHERS = 3.
CHANGEDOCUMENT_PREPARE_POS CALL FUNCTION 'CHANGEDOCUMENT_PREPARE_POS' TABLES editpos = ausg i_cdpos = l_cdpos_one_header EXCEPTIONS OTHERS = 99.
FAGL_GET_ARCH_FI_DOCUMENT CALL FUNCTION 'FAGL_GET_ARCH_FI_DOCUMENT' EXPORTING i_bukrs = bkpf-bukrs i_belnr = bkpf-belnr i_gjahr = bkpf-gjahr TABLES t_cdhdr = icdhdr t_cdpos = l_cdpos EXCEPTIONS document_not_found = 1 internal_error = 2 OTHERS = 3.
CHANGEDOCUMENT_PREPARE_POS CALL FUNCTION 'CHANGEDOCUMENT_PREPARE_POS' TABLES editpos = ausg i_cdpos = l_cdpos_one_header EXCEPTIONS OTHERS = 99.
ADDR_GET_COMPLETE CALL FUNCTION 'ADDR_GET_COMPLETE' EXPORTING ADDRNUMBER = ADRNR IMPORTING ADDR1_COMPLETE = G_ADDR1_COMPLETE EXCEPTIONS PARAMETER_ERROR = 1 ADDRESS_NOT_EXIST = 2 INTERNAL_ERROR = 3 OTHERS = 4.
AVIS_CONVERT_AD_HASH CALL FUNCTION 'AVIS_CONVERT_AD_HASH' EXPORTING I_SMTP_ADDR = L_ADSMTP_LINE-ADSMTP-SMTP_ADDR IMPORTING E_HASH = L_EMAIL_LINE-SMTP_ADDR_hash.
OPEN_FI_PERFORM_00001810_E CALL FUNCTION 'OPEN_FI_PERFORM_00001810_E' IMPORTING e_abez = ofiwa-xtext TABLES t_ftexts = ftextstab EXCEPTIONS OTHERS = 0.
OPEN_FI_PERFORM_00001820_E CALL FUNCTION 'OPEN_FI_PERFORM_00001820_E' EXPORTING i_objcl = objekt i_datum = datum i_usnam = usnam i_bukrs = bukrs-low i_kunnr = vkont i_lifnr = vkont i_belnr = belnr i_gjahr = gjahr IMPORTING e_xdispl = xflag EXCEPTIONS OTHERS = 0.
FI_ADD_AUTHORITY_CHECK CALL FUNCTION 'FI_ADD_AUTHORITY_CHECK' "<<<< au40 IMPORTING "<<<< au40 e_xblar = auth_bla "<<<< au40 e_xgsbe = auth_gsb "<<<< au40 EXCEPTIONS "<<<< au40 OTHERS = 1. "<<<< au40
READ_DOCUMENT_HEADER CALL FUNCTION 'READ_DOCUMENT_HEADER' "ALRK241034 EXPORTING "ALRK241034 belnr = belnr "ALRK241034 bukrs = bukrs-low "ALRK241034 gjahr = gjahr "ALRK241034 xbstv = 'X' "ALRK241034 xbstd = 'X' "ALRK241034 xbstm = 'X' "ALRK241034 i_xsuppressdialog = 'X' "ALRK241034 IMPORTING "ALRK241034 e_bkpf = bkpf "ALRK241034 e_archived = document_archived "ALRK241034 EXCEPTIONS "ALRK241034 exit = 4 "ALRK241034 not_found = 8 "ALRK241034 archive_cancel = 12 "ALRK241034 OTHERS = 16. "ALRK241034
OPEN_FI_PERFORM_00001820_E CALL FUNCTION 'OPEN_FI_PERFORM_00001820_E' EXPORTING i_objcl = objekt i_datum = datum i_usnam = usnam i_bukrs = bukrs-low i_kunnr = vkont i_lifnr = vkont i_belnr = belnr i_gjahr = gjahr EXCEPTIONS OTHERS = 0.
call function 'RS_CUA_STATUS_CHECK' EXPORTING objectname = 'WINE' program = sy-cprog EXCEPTIONS object_not_found = 1 others = 2.
PLANNED_CHANGES_READ_POSITIONS CALL FUNCTION 'PLANNED_CHANGES_READ_POSITIONS' EXPORTING changenumber = icdhdr-changenr IMPORTING header = pcdhdr " no further used TABLES editpos = ausg EXCEPTIONS no_position_found = 1.
CHANGEDOCUMENT_READ_POSITIONS CALL FUNCTION 'CHANGEDOCUMENT_READ_POSITIONS' EXPORTING changenumber = icdhdr-changenr IMPORTING header = cdhdr TABLES editpos = ausg EXCEPTIONS no_position_found = 1 OTHERS = 2.
GET_FIELDTAB CALL FUNCTION 'GET_FIELDTAB' "DD03P-ERROR EXPORTING tabname = t01_tbnam withtext = 'X' TABLES fieldtab = dfies_tab.
CONVERSION_EXIT_PARVW_INPUT CALL FUNCTION 'CONVERSION_EXIT_PARVW_INPUT' EXPORTING input = kwa-parvw IMPORTING output = lv_parvw.
FI_GSBER_AUTH_CHECK CALL FUNCTION 'FI_GSBER_AUTH_CHECK' EXPORTING i_bukrs = bseg-bukrs i_gsber = bseg-gsber i_aktvt = '08' IMPORTING e_rtcode = zrtc1 EXCEPTIONS OTHERS = 0.
WY_LFA1_SINGLE_READ CALL FUNCTION 'WY_LFA1_SINGLE_READ' EXPORTING pi_lifnr = vkont * PI_BYPASSING_BUFFER = * PI_REFRESH_BUFFER = IMPORTING po_lfa1 = lok_lfa1 EXCEPTIONS no_records_found = 1 OTHERS = 2.
V_KNA1_SINGLE_READ CALL FUNCTION 'V_KNA1_SINGLE_READ' EXPORTING pi_kunnr = vkont * PI_BYPASSING_BUFFER = * PI_REFRESH_BUFFER = IMPORTING pe_kna1 = lok_kna1 EXCEPTIONS no_records_found = 1 OTHERS = 2.
WY_KNVK_FOR_VENDOR_CUSTOMER CALL FUNCTION 'WY_KNVK_FOR_VENDOR_CUSTOMER' EXPORTING pi_lifnr = vkont TABLES pt_knvk = lok_t_knvk EXCEPTIONS no_input = 1 too_many_parameters = 2 no_records_found = 3 OTHERS = 4.
WY_KNVK_FOR_VENDOR_CUSTOMER CALL FUNCTION 'WY_KNVK_FOR_VENDOR_CUSTOMER' EXPORTING pi_kunnr = vkont TABLES pt_knvk = lok_t_knvk EXCEPTIONS no_input = 1 too_many_parameters = 2 no_records_found = 3 OTHERS = 4.
OPEN_FI_PERFORM_00001850_E CALL FUNCTION 'OPEN_FI_PERFORM_00001850_E' EXPORTING i_object_type = p_object_type i_bukrs = bukrs-low i_belnr = belnr i_gjahr = gjahr TABLES cdobjectid = cdobjectid cditemtext = cditemtext.
FI_TECH_ACCNO_CHECK_TRY CALL FUNCTION 'FI_TECH_ACCNO_CHECK_TRY' EXPORTING i_bankn = i_bankn IMPORTING e_xtech = l_xtech.
READ_IBAN CALL FUNCTION 'READ_IBAN' EXPORTING i_banks = i_banks i_bankl = i_bankl i_bankn = i_bankn i_bkont = i_bkont "\MN 1296877 i_bkref = l_bkref "\MN 1296877 IMPORTING e_iban = st_iban_wo_accno-iban EXCEPTIONS iban_not_found = 1 OTHERS = 2.
CHANGEDOCUMENT_READ_POSITIONS CALL FUNCTION 'CHANGEDOCUMENT_READ_POSITIONS' EXPORTING changenumber = lt_cdhdr-changenr IMPORTING header = l_cdhdr TABLES editpos = lt_cdshw EXCEPTIONS no_position_found = 1 OTHERS = 2.
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 MF01AINT or its description.