GRFN_POLICY_ADMIN_TOOL_I01 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 GRFN_POLICY_ADMIN_TOOL_I01 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: Include GRFN_POLICY_ADMIN_TOOL_I01
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'POLICYGRP_ID' dynpprog = sy-repid dynpnr = sy-dynnr dynprofield = 'GS_POLICY_CRT-NAME' value_org = 'S' TABLES value_tab = values_tab_grp return_tab = lt_return_tab.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING dyname = sy-repid dynumb = sy-dynnr TABLES dynpfields = lt_dynpfields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 undefind_error = 7.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'TYPE' "dynpprog = sy-repid "dynpnr = sy-dynnr "dynprofield = 'GS_POLICY_CRT-TEXT' value_org = 'S' TABLES value_tab = values_tab_typet.
DYNP_VALUES_UPDATE " CALL FUNCTION 'DYNP_VALUES_UPDATE' " EXPORTING " dyname = sy-repid " dynumb = sy-dynnr " TABLES " dynpfields = lt_dynpfields1 " EXCEPTIONS " invalid_abapworkarea = 1 " invalid_dynprofield = 2 " invalid_dynproname = 3 " invalid_dynpronummer = 4 " invalid_request = 5 " no_fielddescription = 6 " undefind_error = 7.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'POLICYGRP_ID' dynpprog = sy-repid dynpnr = sy-dynnr dynprofield = 'GS_POLICYGRP_DEL-NAME' value_org = 'S' TABLES value_tab = values_tab_parent_grp return_tab = lt_return_tab2.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING dyname = sy-repid dynumb = sy-dynnr TABLES dynpfields = lt_dynpfields2 EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 undefind_error = 7.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'TEXT' dynpprog = g_repid dynpnr = '6310' dynprofield = 'TV_TF_TIMEFRAME' value_org = 'S' TABLES value_tab = lt_timeframe EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'KEY' dynpprog = g_repid dynpnr = '6310' dynprofield = 'TV_TF_YEAR' value_org = 'S' TABLES value_tab = lt_tf_year EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'VALUE' dynprofield = 'GS_ROLESEL-ROLE' value_org = 'S' TABLES value_tab = lt_value_set_ply_role return_tab = lt_return_tab EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'VALUE' dynprofield = 'GS_ROLESEL-USER' value_org = 'S' TABLES value_tab = lt_value_set_ply_user return_tab = lt_return_tab EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'VALUE' dynprofield = 'GS_SOURCE_CATEG_SEL' value_org = 'S' TABLES value_tab = lt_value_set_ply_source return_tab = lt_return_tab EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
GUID_CREATE CALL FUNCTION 'GUID_CREATE' ##fm_olded IMPORTING ev_guid_32 = lv_guid.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'VALUE' dynpprog = sy-repid dynpnr = sy-dynnr dynprofield = 'GV_SCOPE_ENTITY' value_org = 'S' TABLES value_tab = gt_vs_entity return_tab = gt_ret 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.
GRFN_POLICY_ADMIN_TOOL_I01 - Include GRFN_POLICY_ADMIN_TOOL_I01 GRFN_POLICY_ADMIN_TOOL_F03 - Include GRFN_POLICY_ADMIN_TOOL_F03 GRFN_POLICY_ADMIN_TOOL_F02 - Include GRFN_POLICY_ADMIN_TOOL_F02 GRFN_POLICY_ADMIN_TOOL_F01 - Include GRFN_POLICY_ADMIN_TOOL_F01 GRFN_POLICY_ADMIN_TOOL_C01 - Include GRFN_POLICY_ADMIN_TOOL_C01 GRFN_POLICY_ADMIN_TOOL - Program GRFN_POLICY_ADMIN_TOOL