SAP Reports / Programs | Trader's and Scheduler's Workbench | Industry Solution Oil | Trader's and Scheduler's Workbench(IS-OIL-DS-TSW) SAP IS

MOIFAFPF SAP ABAP INCLUDE - INCLUDE MRN partner role FORM routines







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


Text pool values


Title: INCLUDE MRN partner role FORM routines


INCLUDES used within this REPORT MOIFAFPF

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:

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = entry_to = sy-tfill last_page_full = ' ' loops = ok_code = fcode overlapping = 'X' IMPORTING entry_new = .

ENQUEUE_E_OIFBBP1 * call function 'ENQUEUE_E_OIFBBP1' * exporting * pblnr = pi_pblnr * parfn = pi_parfn.

DEQUEUE_E_OIFBBP1 * call function 'DEQUEUE_E_OIFBBP1' * exporting * pblnr = pi_pblnr * parfn = pi_parfn.

QC04_DOMAIN_TEXT_GET CALL FUNCTION 'QC04_DOMAIN_TEXT_GET' EXPORTING i_domain_name = 'OIF_BPLMOD' i_language = sy-langu i_domvalue_l = g_bplmod IMPORTING e_ddtext = g_bplmtx EXCEPTIONS no_data_found = 01.

OIF_SD_DOCUMENT_USAGE_CHECK CALL FUNCTION 'OIF_SD_DOCUMENT_USAGE_CHECK' EXPORTING i_pblnr = oifspbl-pblnr i_kunnr = kna1-kunnr IMPORTING e_object_not_in_use = g_object_not_in_sddoc_use E_SALESDOCUMENT_OPEN = l_salesdocument_open E_SALESDOCUMENT = l_salesdocument EXCEPTIONS missing_location_id = 1 missing_object_id = 2 OTHERS = 3.

OIF_LIS_USAGE_CHECK CALL FUNCTION 'OIF_LIS_USAGE_CHECK' EXPORTING i_pblnr = oifspbl-pblnr i_kunnr = kna1-kunnr i_ttmdat = roifbbp1-ttmstm IMPORTING e_object_not_in_use = g_object_not_in_lis_use EXCEPTIONS missing_location_id = 1 missing_object_id = 2 OTHERS = 3.

OIF_UPDATE_KNA1 CALL FUNCTION 'OIF_UPDATE_KNA1' IN UPDATE TASK EXPORTING i_kna1 = kna1 EXCEPTIONS OTHERS = 1.

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING * DEFAULTOPTION = 'Y' diagnosetext1 = 'This will generate a location entry'(480) diagnosetext2 = 'in the business partner record'(481) * DIAGNOSETEXT3 = ' ' textline1 = 'Do you wish to proceed?'(100) * TEXTLINE2 = ' ' titel = 'Location entry generation'(482) * start_column = 25 * start_row = 6 IMPORTING answer = l_answer EXCEPTIONS OTHERS = 1.

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING * DEFAULTOPTION = 'Y' diagnosetext1 = 'This will delete the location entry'(483) diagnosetext2 = 'in the business partner record'(481) * DIAGNOSETEXT3 = ' ' textline1 = 'Do you wish to proceed?'(100) * TEXTLINE2 = ' ' titel = 'Location entry deletion'(484) * start_column = 25 * start_row = 6 IMPORTING answer = l_answer EXCEPTIONS OTHERS = 1.

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING * DEFAULTOPTION = 'Y' diagnosetext1 = 'This will delete the partner role'(470) * diagnosetext2 = ' ' * DIAGNOSETEXT3 = ' ' textline1 = 'Do you wish to proceed?'(100) * TEXTLINE2 = ' ' titel = 'Partner role deletion'(471) * start_column = 25 * start_row = 6 IMPORTING answer = l_answer EXCEPTIONS OTHERS = 1.

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING * DEFAULTOPTION = 'Y' diagnosetext1 = 'Role start date is in the past.'(476)

V_KNA1_SINGLE_READ CALL FUNCTION 'V_KNA1_SINGLE_READ' EXPORTING PI_KUNNR = pi_kunnr IMPORTING PE_KNA1 = KNA1 EXCEPTIONS NO_RECORDS_FOUND = 1 OTHERS = 2.

LFA1_SINGLE_READ CALL FUNCTION 'LFA1_SINGLE_READ' EXPORTING lfa1_lifnr = pi_lifnr IMPORTING WLFA1 = lfa1 EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.

SUSR_USER_ADDRESS_GET CALL FUNCTION 'SUSR_USER_ADDRESS_GET' EXPORTING user_name = pi_bname IMPORTING user_address = l_address EXCEPTIONS user_name_not_exist = 1 OTHERS = 2.

ADDR_PERS_COMP_GET CALL FUNCTION 'ADDR_PERS_COMP_GET' EXPORTING address_pers_in_comp_selection = l_address_sel * READ_TEXTS = ' ' IMPORTING address_pers_in_comp_value = g_usr_addr_val * ADDRESS_PERS_IN_COMP_INFO = * RETURNCODE = * ADDRESS_PERS_IN_COMP_TEXT = * TABLES * PERSON_GROUPS = * ERROR_TABLE = * VERSIONS = EXCEPTIONS * PARAMETER_ERROR = 1 * PERSON_NOT_EXIST = 2 * VERSION_NOT_EXIST = 3 * ADDRESS_NOT_EXIST = 4 * INTERNAL_ERROR = 5 OTHERS = 6.

OIF_POPUP_WITH_VALID_PERIODS CALL FUNCTION 'OIF_POPUP_WITH_VALID_PERIODS' EXPORTING i_endpos_col = lc_endpos_col i_endpos_row = lc_endpos_row i_startpos_col = lc_startpos_col i_startpos_row = lc_startpos_row IMPORTING e_tabix = l_tabix TABLES period_sets_tab = l_oifbbp1_period_check_tab EXCEPTIONS break_off = 01.

OIF_POPUP_WITH_OTHER_LOCATIONS CALL FUNCTION 'OIF_POPUP_WITH_OTHER_LOCATIONS' EXPORTING i_endpos_col = lc_endpos_col i_endpos_row = lc_endpos_row i_startpos_col = lc_startpos_col i_startpos_row = lc_startpos_row i_partnr = l_partnr IMPORTING e_tabix = l_tabix TABLES other_locs_tab = g_other_loc_check_tab EXCEPTIONS break_off = 01.

ENQUEUE_E_OIFKNA1 CALL FUNCTION 'ENQUEUE_E_OIFKNA1' EXPORTING kunnr = kna1-kunnr.

DEQUEUE_E_OIFKNA1





CALL FUNCTION 'DEQUEUE_E_OIFKNA1' EXPORTING kunnr = kna1-kunnr.

OIF_POPUP_WITH_CLOSED_ROLES CALL FUNCTION 'OIF_POPUP_WITH_CLOSED_ROLES' EXPORTING i_endpos_col = lc_endpos_col i_endpos_row = lc_endpos_row i_startpos_col = lc_startpos_col i_startpos_row = lc_startpos_row i_end_date = roifbbp1-ftmdat i_end_time = roifbbp1-ftmtim IMPORTING e_tabix = l_tabix TABLES period_sets_tab = l_oifbbp1_period_check_tab EXCEPTIONS break_off = 01.

OIRA_SALES_AREA_SELECT CALL FUNCTION 'OIRA_SALES_AREA_SELECT' EXPORTING * I_ENDPOS_COL = 40 * I_ENDPOS_ROW = 12 * I_STARTPOS_COL = 6 * I_STARTPOS_ROW = 3 i_kunnr = roifbbp1-kunnr * I_SUPPRESS_PICK = ' ' i_suppress_dlg_if_unique = 'X' IMPORTING e_vkorg = l_vkorg e_vtweg = l_vtweg e_spart = l_spart EXCEPTIONS break_off = 1 no_sales_areas_found = 2 no_input = 3 OTHERS = 4.

OIRA_SD_PARTNERS_SELECT CALL FUNCTION 'OIRA_SD_PARTNERS_SELECT' EXPORTING i_kunnr = roifbbp1-kunnr i_vkorg = roifbbp1-vkorg i_vtweg = roifbbp1-vtweg i_spart = roifbbp1-spart TABLES * ti_parvw = te_knvp = l_knvp_tab.

V_KNA1_SINGLE_READ CALL FUNCTION 'V_KNA1_SINGLE_READ' EXPORTING pi_kunnr = pi_oirbbp1pf_tab-kunn2 PI_READ_CAM = c_flag_on IMPORTING PE_ADDRESS_VALUE = l_addr1_val EXCEPTIONS NO_RECORDS_FOUND = 1 INTERNAL_ERROR = 2 OTHERS = 3.

WY_LFA1_SINGLE_READ CALL FUNCTION 'WY_LFA1_SINGLE_READ' EXPORTING pi_lifnr = pi_oirbbp1pf_tab-lifnr PI_READ_CAM = c_flag_on IMPORTING PO_ADDRESS_VALUE = l_addr1_val EXCEPTIONS NO_RECORDS_FOUND = 1 INTERNAL_ERROR = 2 OTHERS = 3.

HR_REPRESENTANT_GET_DATA CALL FUNCTION 'HR_REPRESENTANT_GET_DATA' EXPORTING p_pernr = pi_oirbbp1pf_tab-pernr p_date_from = sy-datum IMPORTING p_hrmr_rep = l_hrmr_rep EXCEPTIONS pernr_not_found = 1 no_authorization = 2 parea_not_found = 3 address_not_found = 4 OTHERS = 5.

KNVK_SINGLE_READ CALL FUNCTION 'KNVK_SINGLE_READ' EXPORTING i_parnr = pi_oirbbp1pf_tab-parnr IMPORTING O_KNVK = l_knvk EXCEPTIONS NOT_FOUND = 1 PARAMETER_ERROR = 2 OTHERS = 3.

SD_PARTNER_GET_SOURCE_PARTNER CALL FUNCTION 'SD_PARTNER_GET_SOURCE_PARTNER' EXPORTING i_kunnr = roifbbp1-kunnr " WE i_parvw = 'WE' i_parvw_source = 'AG' i_vkorg = roifbbp1-vkorg i_vtweg = roifbbp1-vtweg i_spart = roifbbp1-spart IMPORTING e_kunnr = l_ag " AG EXCEPTIONS no_partner_found = 1 no_partner_selected = 2 OTHERS = 3.

SD_KNVP_READ CALL FUNCTION 'SD_KNVP_READ' EXPORTING FIF_VKORG = roifbbp1-vkorg FIF_VTWEG = roifbbp1-vtweg FIF_SPART = roifbbp1-spart FIF_KUNNR = l_ag TABLES FET_KNVP = l_knvp_tab EXCEPTIONS PARAMETER_INCOMPLETE = 1 NO_RECORD_FOUND = 2 OTHERS = 3.

OIRA_SD_PARTNERS_SELECT CALL FUNCTION 'OIRA_SD_PARTNERS_SELECT' EXPORTING i_kunnr = l_ag i_vkorg = roifbbp1-vkorg i_vtweg = roifbbp1-vtweg i_spart = roifbbp1-spart TABLES ti_parvw = l_parvw_tab te_knvp = pe_knvp_tab.

SD_KNVP_READ CALL FUNCTION 'SD_KNVP_READ' EXPORTING FIF_VKORG = roifbbp1-vkorg FIF_VTWEG = roifbbp1-vtweg FIF_SPART = roifbbp1-spart FIF_KUNNR = roifbbp1-kunnr TABLES FET_KNVP = l_knvp_tab EXCEPTIONS PARAMETER_INCOMPLETE = 0 NO_RECORD_FOUND = 0 OTHERS = 0.

SD_KNVP_READ CALL FUNCTION 'SD_KNVP_READ' EXPORTING FIF_VKORG = roifbbp1-vkorg FIF_VTWEG = roifbbp1-vtweg FIF_SPART = roifbbp1-spart FIF_KUNNR = g_oirbbp1pf_temp-kunn2 TABLES FET_KNVP = l_knvp_tab EXCEPTIONS PARAMETER_INCOMPLETE = 0 NO_RECORD_FOUND = 0 OTHERS = 0.

KNVV_SINGLE_READ CALL FUNCTION 'KNVV_SINGLE_READ' EXPORTING i_kunnr = roifbbp1-kunnr i_vkorg = roifbbp1-vkorg i_vtweg = roifbbp1-vtweg i_spart = roifbbp1-spart EXCEPTIONS NOT_FOUND = 1 PARAMETER_ERROR = 2 OTHERS = 3.

POPUP_TO_DECIDE_LIST CALL FUNCTION 'POPUP_TO_DECIDE_LIST' EXPORTING cursorline = l_cursorline start_col = c_oln_lnk_dialog_screen_x1 start_row = c_oln_lnk_dialog_screen_y1 textline1 = l_titel titel = 'Link dialog selection'(220) IMPORTING answer = pe_answer TABLES t_spopli = l_spopli_tab EXCEPTIONS not_enough_answers = 1 too_much_answers = 2 too_much_marks = 3 OTHERS = 4.



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