MP531020 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 MP531020 into the relevant SAP transactions such as SE38 or SE80
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.
Title: PD Infotype 5310 Special Module PAI/PBO
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
NF_GM_GET_SELECTION_DATES CALL FUNCTION 'NF_GM_GET_SELECTION_DATES' IMPORTING selectiondate = sy-datum fuzzybegda = l_begda fuzzyendda = l_endda.
RH_STRUC_GET CALL FUNCTION 'RH_STRUC_GET' EXPORTING act_otype = p5310-otype act_objid = p5310-objid act_wegid = 'PC_M32UP' * ACT_INT_FLAG = act_plvar = p5310-plvar act_begda = l_begda act_endda = l_endda * ACT_TDEPTH = 0 act_tflag = 'X' * ACT_VFLAG = 'X' * AUTHORITY_CHECK = 'X' * TEXT_BUFFER_FILL = * BUFFER_MODE = * IMPORTING * ACT_PLVAR = TABLES * RESULT_TAB = result_objec = lt_object * RESULT_STRUC = EXCEPTIONS no_plvar_found = 1 no_entry_found = 2 OTHERS = 3 .
VRM_SET_VALUES CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = fieldname values = lt_vrm_values.
NF_GM_GET_SELECTION_DATES CALL FUNCTION 'NF_GM_GET_SELECTION_DATES' IMPORTING fuzzybegda = lv_begda fuzzyendda = lv_endda.
RH_READ_INFTY CALL FUNCTION 'RH_READ_INFTY' EXPORTING authority = 'DISP' with_stru_auth = 'X' plvar = p5310-plvar otype = p_type objid = p_objid infty = '1000' istat = p5310-istat extend = 'X' * SUBTY = ' ' begda = lv_begda endda = lv_endda * CONDITION = '00000' * INFTB = '1' * SORT = 'X' * VIA_T777D = ' ' TABLES innnn = lt_innnn * OBJECTS = EXCEPTIONS all_infty_with_subty = 1 nothing_found = 2 no_objects = 3 wrong_condition = 4 wrong_parameters = 5 OTHERS = 6 .
RH_READ_INFTY CALL FUNCTION 'RH_READ_INFTY' EXPORTING authority = 'DISP' with_stru_auth = 'X' plvar = p5310-plvar otype = p_type objid = p_objid infty = '5305' istat = p5310-istat extend = 'X' * SUBTY = ' ' * BEGDA = '19000101' * ENDDA = '99991231' * CONDITION = '00000' * INFTB = '1' * SORT = 'X' * VIA_T777D = ' ' TABLES innnn = lt_innnn * OBJECTS = EXCEPTIONS all_infty_with_subty = 1 nothing_found = 2 no_objects = 3 wrong_condition = 4 wrong_parameters = 5 OTHERS = 6 .
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_pgm_name dynumb = l_dynnr * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' * PERFORM_INPUT_CONVERSION = ' ' * DETERMINE_LOOP_INDEX = ' ' TABLES dynpfields = lt_dynpfields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 double_conversion = 9 stepl_not_found = 10 OTHERS = 11 .
NF_GM_GET_SELECTION_DATES CALL FUNCTION 'NF_GM_GET_SELECTION_DATES' IMPORTING selectiondate = sy-datum fuzzybegda = l_begda fuzzyendda = l_endda.
RH_STRUC_GET CALL FUNCTION 'RH_STRUC_GET' EXPORTING act_otype = 'PM' act_objid = l_objective_id act_wegid = 'PC_M32UP' * ACT_INT_FLAG = act_plvar = p5310-plvar act_begda = l_begda act_endda = l_endda * ACT_TDEPTH = 0 act_tflag = 'X' * ACT_VFLAG = 'X' * AUTHORITY_CHECK = 'X' * TEXT_BUFFER_FILL = * BUFFER_MODE = * IMPORTING * ACT_PLVAR = TABLES * RESULT_TAB = result_objec = lt_object * RESULT_STRUC = EXCEPTIONS no_plvar_found = 1 no_entry_found = 2 OTHERS = 3 .
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = 'OBJID' * PVALKEY = ' ' dynpprog = l_pgm_name dynpnr = l_dynnr dynprofield = 'P5310-RISK_ID' * STEPL = 0 * WINDOW_TITLE = * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = lt_f4_risk * FIELD_TAB = * RETURN_TAB = * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3 .
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_pgm_name dynumb = l_dynnr * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' * PERFORM_INPUT_CONVERSION = ' ' * DETERMINE_LOOP_INDEX = ' ' TABLES dynpfields = lt_dynpfields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 double_conversion = 9 stepl_not_found = 10 OTHERS = 11 .
NF_GM_GET_SELECTION_DATES CALL FUNCTION 'NF_GM_GET_SELECTION_DATES' IMPORTING selectiondate = sy-datum fuzzybegda = l_begda fuzzyendda = l_endda.
RH_STRUC_GET CALL FUNCTION 'RH_STRUC_GET' EXPORTING act_otype = 'PL' act_objid = l_process_id act_wegid = 'PC_MPMR' * ACT_INT_FLAG = act_plvar = p5310-plvar act_begda = l_begda act_endda = l_endda * ACT_TDEPTH = 0 act_tflag = 'X' * ACT_VFLAG = 'X' * AUTHORITY_CHECK = 'X' * TEXT_BUFFER_FILL = * BUFFER_MODE = * IMPORTING * ACT_PLVAR = TABLES * RESULT_TAB = result_objec = lt_object * RESULT_STRUC = EXCEPTIONS no_plvar_found = 1 no_entry_found = 2 OTHERS = 3 .
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = 'OBJID' * PVALKEY = ' ' dynpprog = l_pgm_name dynpnr = l_dynnr dynprofield = 'P5310-OBJECTIVE_ID' * STEPL = 0 * WINDOW_TITLE = * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = lt_f4_risk * FIELD_TAB = * RETURN_TAB = * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3 .
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_pgm_name dynumb = l_dynnr * TRANSLATE_TO_UPPER = ' ' * REQUEST = ' ' * PERFORM_CONVERSION_EXITS = ' ' * PERFORM_INPUT_CONVERSION = ' ' * DETERMINE_LOOP_INDEX = ' ' TABLES dynpfields = lt_dynpfields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 double_conversion = 9 stepl_not_found = 10 OTHERS = 11 .
RH_READ_INFTY CALL FUNCTION 'RH_READ_INFTY' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * PLVAR = * OTYPE = * OBJID = infty = '5305' * ISTAT = ' ' * EXTEND = 'X' * SUBTY = ' ' * BEGDA = '19000101' * ENDDA = '99991231' * CONDITION = '00000' * INFTB = '1' * SORT = 'X' * VIA_T777D = ' ' TABLES innnn = lt_p5305 OBJECTS = lt_objects EXCEPTIONS all_infty_with_subty = 1 nothing_found = 2 no_objects = 3 wrong_condition = 4 wrong_parameters = 5 OTHERS = 6 .
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = 'VALUE' * PVALKEY = ' ' dynpprog = l_pgm_name dynpnr = l_dynnr dynprofield = 'P5310-CNTR_TYPE' * STEPL = 0 * WINDOW_TITLE = * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = lt_f4_cntr_type * FIELD_TAB = * RETURN_TAB = * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3 .
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.