SAP Reports / Programs | Aerospace & Defence Industry Solution | Aerospace & Defence Industry Solution(IS-AD) SAP IS

ADPRIOTOOLF05 SAP ABAP INCLUDE - documentation and ABAP source code







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


INCLUDES used within this REPORT ADPRIOTOOLF05

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:

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'Y' textline1 = textline1 textline2 = textline2 titel = titel start_column = 25 start_row = 6 * CANCEL_DISPLAY = 'X' IMPORTING answer = answer.

ADRT10_GET_ROT_STOCK CALL FUNCTION 'ADRT10_GET_ROT_STOCK' EXPORTING iv_matnr = lv_comp iv_werks = t_caufvd-werks * IV_BERID = * IV_WHGBE = iv_lggrp = 'SV' iv_lgort = wa_lgort-lgort_res * IV_BWTAR = is_adpmprioprf = profile iv_pspel = t_caufvd-pspel * IV_SOBKZ = iv_kunum = t_caufvd-kunum iv_kdaufd = t_caufvd-kdauf_aufk iv_kdpos = t_caufvd-kdpos_aufk *================================================================ *note 651397 determine SOBKZ for correct calculation of stock: iv_aufnr = t_caufvd-aufnr IMPORTING es_mard_mpn = es_cwstock_mpn es_mard_fff = es_cwstock_fff es_mard_set = es_cwstock_set es_mchb_mpn = es_cwstock_mpn_ch es_mchb_fff = es_cwstock_fff_ch es_mchb_set = es_cwstock_set_ch TABLES t_fff = lt_fff t_set = lt_set EXCEPTIONS wrong_input = 1 ivgroup_not_found = 2 customizing_error = 3 material_not_found = 4 classification_not_found = 5 profile_not_found = 6 OTHERS = 7 .

ADRT10_GET_ROT_STOCK CALL FUNCTION 'ADRT10_GET_ROT_STOCK' EXPORTING iv_matnr = lv_comp iv_werks = t_caufvd-werks * IV_BERID = * IV_WHGBE = iv_lggrp = 'US' iv_lgort = wa_lgort-lgort_res * IV_BWTAR = is_adpmprioprf = profile iv_pspel = t_caufvd-pspel * IV_SOBKZ = iv_kunum = t_caufvd-kunum iv_kdaufd = t_caufvd-kdauf_aufk iv_kdpos = t_caufvd-kdpos_aufk *================================================================ *note 651397 determine SOBKZ for correct calculation of stock: iv_aufnr = t_caufvd-aufnr IMPORTING es_mard_mpn = es_rwstock_mpn es_mard_fff = es_rwstock_fff es_mard_set = es_rwstock_set es_mchb_mpn = es_rwstock_mpn_ch es_mchb_fff = es_rwstock_fff_ch es_mchb_set = es_rwstock_set_ch * TABLES * T_FFF = * T_SET = EXCEPTIONS wrong_input = 1 ivgroup_not_found = 2 customizing_error = 3 material_not_found = 4 classification_not_found = 5 profile_not_found = 6 OTHERS = 7 .

ADRT10_GET_RWSTOCK * CALL FUNCTION 'ADRT10_GET_RWSTOCK' * EXPORTING * iv_matnr = lv_comp * iv_werks = t_caufvd-werks * iv_lgort = wa_lgort-lgort_res * IMPORTING * es_rwstock_mat = es_rwstock_mpn * es_rwstock_fff = es_rwstock_fff ** ES_RWSTOCK_SET = * EXCEPTIONS * wrong_input = 1 * whgroup_not_found = 2 * NOT_RW_WHGROUP = 3 * OTHERS = 4.

MATERIAL_READ CALL FUNCTION 'MATERIAL_READ' EXPORTING schluessel = schluessel IMPORTING matdaten = matdaten return = return matper = matper * TABLES * SEQMAT01 = EXCEPTIONS account_not_found = 1 batch_not_found = 2 forecast_not_found = 3 lock_on_account = 4 lock_on_material = 5 lock_on_plant = 6 lock_on_sales = 7 lock_on_sloc = 8 lock_on_batch = 9 lock_system_error = 10 material_not_found = 11 plant_not_found = 12 sales_not_found = 13 sloc_not_found = 14 slocnumber_not_found = 15 sloctype_not_found = 16 text_not_found = 17 unit_not_found = 18 invalid_mch1_matnr = 19 invalid_mtcom = 20 sa_material = 21 wv_material = 22 waart_error = 23 OTHERS = 24 .

MC_DDIC_FIELDS_READ CALL FUNCTION 'MC_DDIC_FIELDS_READ' EXPORTING keyflag = ' ' tabname = 'ADPMMATR' TABLES katalogfelder = lt_katalog.

MC_DDIC_FIELDS_READ CALL FUNCTION 'MC_DDIC_FIELDS_READ' EXPORTING keyflag = 'X' tabname = 'ADPMMATR' TABLES katalogfelder = lt_katalog.

MC_DDIC_FIELDS_READ CALL FUNCTION 'MC_DDIC_FIELDS_READ' EXPORTING keyflag = 'X' tabname = 'MARA' TABLES katalogfelder = lt_katalog.

MC_DDIC_FIELDS_READ CALL FUNCTION 'MC_DDIC_FIELDS_READ' EXPORTING keyflag = 'X' tabname = 'MARC' TABLES katalogfelder = lt_katalog.

GET_SERNOS_OF_DOCUMENT CALL FUNCTION 'GET_SERNOS_OF_DOCUMENT' EXPORTING key_data = l_rserob TABLES sernos = lt_sernos * SERXX = EXCEPTIONS key_parameter_error = 1 no_supported_access = 2 no_data_found = 3 OTHERS = 4 .

EQUIPMENT_READ CALL FUNCTION 'EQUIPMENT_READ' EXPORTING * I_HANDLE = * CHECK_AUTH = ' ' equi_no = l_equnr * EQUZ_NO = '000' * READING_DATE = '99991231' * X_XAKTYP = ' ' IMPORTING equi = equi eqkt = eqkt equz = equz iloa = iloa * EQBS = * EFHM = EXCEPTIONS auth_no_begrp = 1 auth_no_iwerk = 2 auth_no_swerk = 3 eqkt_not_found = 4 equi_not_found = 5 equz_not_found = 6 iloa_not_found = 7 auth_no_ingrp = 8 auth_no_kostl = 9 err_handle = 10 OTHERS = 11 .

MC_DDIC_FIELDS_READ CALL FUNCTION 'MC_DDIC_FIELDS_READ' EXPORTING keyflag = 'X' tabname = 'ITOB' TABLES katalogfelder = lt_katalogfelder.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING * PERCENTAGE = 0 text = text-210.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING * PERCENTAGE = 0 text = text-211.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING * PERCENTAGE = 0 text = text-212.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = percentage text = text.

CONTROL_DISPATCH CALL FUNCTION 'CONTROL_DISPATCH' EXPORTING fcode = save_ok_code system = ' ' EXCEPTIONS cb_not_found = 1 OTHERS = 2.

CONTROL_CREATE CALL FUNCTION 'CONTROL_CREATE' EXPORTING clsid = 'SAP.RightMouseMenuControl.1'

TREEV_EXPAND_NODE





CALL FUNCTION 'TREEV_EXPAND_NODE' EXPORTING handle = tree node_key = node_key level_count = 0 expand_all_children = ' ' no_flush = 'X' EXCEPTIONS failed = 1 illegal_level_count = 2 cntl_system_error = 3 node_not_found = 4 cannot_expand_leaf = 5 OTHERS = 6.

TREEV_ITEM_SET_STYLE CALL FUNCTION 'TREEV_ITEM_SET_STYLE' EXPORTING handle = tree node_key = empha-node_key item_name = e_item_name style = treev_style_default * NO_FLUSH = EXCEPTIONS failed = 1 node_not_found = 2 item_not_found = 3 instance_not_found = 4 not_allowed_for_simple_tree = 5 cntl_system_error = 6 OTHERS = 7 .

TREEV_UPDATE_NODES_AND_ITEMS CALL FUNCTION 'TREEV_UPDATE_NODES_AND_ITEMS' EXPORTING handle = tree item_table_structure_name = 'TREE_SRV_SPEC2' * NO_FLUSH = TABLES node_table = unode_table item_table = uitem_table EXCEPTIONS failed = 1 missing_item_table_struct_name = 2 instance_not_found = 3 not_allowed_for_simple_tree = 4 cntl_system_error = 5 error_in_tables = 6 dp_error = 7 table_structure_name_not_found = 8 OTHERS = 9 .

TREEV_SELECT_ITEM CALL FUNCTION 'TREEV_SELECT_ITEM' EXPORTING handle = tree node_key = node_key item_name = item_name no_flush = no_flush EXCEPTIONS failed = 1 key_or_item_name_not_found = 2 instance_not_found = 3 not_allowed_for_simple_tree = 4 cntl_system_error = 5 no_item_selection = 6 OTHERS = 7.

TREEV_ENSURE_VISIBLE CALL FUNCTION 'TREEV_ENSURE_VISIBLE' EXPORTING handle = tree node_key = node_key * NO_FLUSH = EXCEPTIONS failed = 1 node_not_found = 2 cntl_system_error = 3 OTHERS = 4 .

TREEV_COLLAPSE_SUBTREE CALL FUNCTION 'TREEV_COLLAPSE_SUBTREE' EXPORTING handle = tree node_key = lv_node_key no_flush = 'X' EXCEPTIONS failed = 1 node_not_found = 2 cntl_system_error = 3 OTHERS = 4.

CONTROL_CALL_METHOD CALL FUNCTION 'CONTROL_CALL_METHOD' EXPORTING h_control = rm_cntl method = 'Display' "#EC NOTEXT p_count = 0 IMPORTING return = return EXCEPTIONS cntl_system_error = 1 cntl_error = 2 OTHERS = 3.

DP_CONTROL_ASSIGN_TABLE CALL FUNCTION 'DP_CONTROL_ASSIGN_TABLE' EXPORTING h_cntl = rm_cntl tabname = 'RSSCM' medium = 'object' propertyname = 'MenuItems' TABLES data = rm_list EXCEPTIONS dp_error_create = 1 dp_error_send_data = 2 dp_error_assign = 3 dp_error_invalid_param = 4 dp_error_tabname = 5 OTHERS = 6.

TREEV_GET_EXPANDED_NODES CALL FUNCTION 'TREEV_GET_EXPANDED_NODES' EXPORTING handle = tree TABLES node_key_table = node_key_table EXCEPTIONS failed = 1 instance_not_found = 2 cntl_system_error = 3 dp_error = 4 OTHERS = 5.

ADRT10_GET_RESB_QTY CALL FUNCTION 'ADRT10_GET_RESB_QTY' EXPORTING iv_matnr = lv_comp iv_werks = t_caufvd-werks * iv_lgort * IV_BERID iv_lggrp = 'SV' * IV_BWTAR is_adpmprioprf = profile iv_pspel = t_caufvd-pspel iv_kunum = t_caufvd-kunum iv_kdaufd = t_caufvd-kdauf_aufk iv_kdpos = t_caufvd-kdpos_aufk IMPORTING es_resbqty_mat = adpmmatr-mpn_rebst es_resbqty_fff = adpmmatr-fff_rebst es_resbqty_set = adpmmatr-set_rebst EXCEPTIONS wrong_input = 1 whgroup_not_found = 2 not_cw_whgroup = 3 OTHERS = 4.

ADRT10_GET_REPL_TIME CALL FUNCTION 'ADRT10_GET_REPL_TIME' EXPORTING * IV_MATNR = * IV_WERKS = iv_fabkl = l_fac_cal is_caufvd = l_caufvd * IS_WHGRPHD = is_prf = profile IMPORTING ev_repl_date = adpmwarn-repl_date ev_eindt = adpmwarn-eindt ev_aplfz = adpmwarn-aplfz ev_plifz = adpmwarn-plifz.

HELP_OBJECT_SHOW_FOR_FIELD CALL FUNCTION 'HELP_OBJECT_SHOW_FOR_FIELD' EXPORTING called_for_tab = i_fcat-ref_tabname called_for_field = i_fcat-ref_fieldname EXCEPTIONS object_not_found = 1 sapscript_error = 2 OTHERS = 3.

HELP_OBJECT_SHOW_FOR_FIELD CALL FUNCTION 'HELP_OBJECT_SHOW_FOR_FIELD' EXPORTING called_for_tab = i_fcat-ref_tabname called_for_field = i_fcat-ref_fieldname EXCEPTIONS object_not_found = 1 sapscript_error = 2 OTHERS = 3.

REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' EXPORTING i_title = text-125 i_selection = space i_zebra = 'X' * i_screen_start_column = 0 * i_screen_start_line = 0 * i_screen_end_column = 0 * i_screen_end_line = 0 * i_checkbox_fieldname = 'BOX' * I_LINEMARK_FIELDNAME = i_scroll_to_sel_line = ' ' i_tabname = 'I_POP_FIELDS' * I_STRUCTURE_NAME = it_fieldcat = pop_fieldcat[] it_excluding = t_excluding[] * I_CALLBACK_PROGRAM = * I_CALLBACK_USER_COMMAND = * IMPORTING * es_selfield = * e_exit = TABLES t_outtab = i_pop_fields EXCEPTIONS program_error = 1 OTHERS = 2.

SO_INBOX_ENTRIES_COUNT CALL FUNCTION 'SO_INBOX_ENTRIES_COUNT' EXPORTING sapname = sy-uname IMPORTING * COUNTER_EXPRESS = counter_read = adpmactn-entries * COUNTER_RESUB = EXCEPTIONS communication_failure = 1 system_failure = 2 x_error = 3 OTHERS = 4.

OBJECT_NUMBER_BUFFER_RESET CALL FUNCTION 'OBJECT_NUMBER_BUFFER_RESET'.

SHOW_CHANGE_DOC_NOTIFICATIONS CALL FUNCTION 'SHOW_CHANGE_DOC_NOTIFICATIONS' EXPORTING object_number = t_caufvd-objnr object_class = l_object_class * VIQMEL_WA = caufvd_wa = l_caufvd * EQUI_WA = * IFLO_WA = * FENUM = * MANUM = * URNUM = * AKNUM = * OBJECT_SEGMENT = * TABLES * WQMFE_TAB = * WQMMA_TAB = * WQMSM_TAB = * WQMUR_TAB = .

TREEV_ADD_NODES_AND_ITEMS CALL FUNCTION 'TREEV_ADD_NODES_AND_ITEMS' EXPORTING handle = tree item_table_structure_name = 'ADPMTREEITEM' no_flush = 'X' TABLES node_table = lt_add_nodes item_table = lt_add_items EXCEPTIONS failed = 1 missing_item_table_struct_name = 2 instance_not_found = 3 not_allowed_for_simple_tree = 4 cntl_system_error = 5 error_in_tables = 6 dp_error = 7 table_structure_name_not_found = 8 OTHERS = 9.

TREEV_DELETE_ITEMS CALL FUNCTION 'TREEV_DELETE_ITEMS' EXPORTING handle = tree no_flush = 'X' TABLES item_key_table = lt_treev_ikey EXCEPTIONS failed = 1 cntl_system_error = 2 error_in_item_key_table = 3 dp_error = 4 OTHERS = 5.

TREEV_DELETE_NODES CALL FUNCTION 'TREEV_DELETE_NODES' EXPORTING handle = tree no_flush = 'X' TABLES node_key_table = lt_treev_nkey EXCEPTIONS failed = 1 cntl_system_error = 2 error_in_node_key_table = 3 dp_error = 4 OTHERS = 5.




TREEV_GET_EXPANDED_NODES CALL FUNCTION 'TREEV_GET_EXPANDED_NODES' EXPORTING handle = tree TABLES node_key_table = lt_node_key_table EXCEPTIONS failed = 1 instance_not_found = 2 cntl_system_error = 3 dp_error = 4 OTHERS = 5.

CONTROL_FLUSH CALL FUNCTION 'CONTROL_FLUSH' EXCEPTIONS cntl_system_error = 1 cntl_error = 2 OTHERS = 3.

OBJECT_NUMBER_BUFFER_RESET CALL FUNCTION 'OBJECT_NUMBER_BUFFER_RESET'.

STATUS_SHOW_CHANGE_DOCUMENTS CALL FUNCTION 'STATUS_SHOW_CHANGE_DOCUMENTS' EXPORTING objnr = l_objnr * STATUS = ' ' show_all = 'X' EXCEPTIONS no_chg_doc_for_object = 1 OTHERS = 2 .

BAL_LOG_MSG_ADD CALL FUNCTION 'BAL_LOG_MSG_ADD' EXPORTING i_log_handle = g_log_handle i_s_msg = l_s_msg EXCEPTIONS OTHERS = 0.

BAL_LOG_CREATE CALL FUNCTION 'BAL_LOG_CREATE' EXPORTING i_s_log = ls_loghdr IMPORTING e_log_handle = g_log_handle EXCEPTIONS log_header_inconsistent = 1 OTHERS = 2.

QMEL_INST_AUTHORITY_CHECK CALL FUNCTION 'QMEL_INST_AUTHORITY_CHECK' EXPORTING akttyp = i_t365-aktyp qmart = i_t365-qmart tcode = i_t365-tcode.

QAUT_QMEL CALL FUNCTION 'QAUT_QMEL' EXPORTING * I_WERKS = I_VIQMEL-MAWERK i_qmart = i_t365-qmart i_tcode = i_t365-tcode.

REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' EXPORTING i_title = l_title i_selection = l_box_selection i_zebra = 'X' * i_screen_start_column = 0 * i_screen_start_line = 0 * i_screen_end_column = 0 * i_screen_end_line = 0 i_checkbox_fieldname = 'BOX' * I_LINEMARK_FIELDNAME = i_scroll_to_sel_line = ' ' i_tabname = 'I_POP_FIELDS' * I_STRUCTURE_NAME = it_fieldcat = pop_fieldcat[] it_excluding = t_excluding[] * I_CALLBACK_PROGRAM = * I_CALLBACK_USER_COMMAND = IMPORTING * es_selfield = e_exit = l_exit TABLES t_outtab = i_pop_fields EXCEPTIONS program_error = 1 OTHERS = 2.

CO_BO_UPDATE_OPR_OF_ORDER CALL FUNCTION 'CO_BO_UPDATE_OPR_OF_ORDER' TABLES afvgd_upd = lt_afvgd_get.

TREEV_ITEM_SET_STYLE CALL FUNCTION 'TREEV_ITEM_SET_STYLE' EXPORTING handle = tree node_key = node_key item_name = item_name style = treev_style_default no_flush = 'X' EXCEPTIONS failed = 1 node_not_found = 2 item_not_found = 3 instance_not_found = 4 not_allowed_for_simple_tree = 5 cntl_system_error = 6 OTHERS = 7.

ADRT10_CREATE_ALERT_STRING CALL FUNCTION 'ADRT10_CREATE_ALERT_STRING' EXPORTING is_caufvd = l_caufvd is_afvgd = l_afvgd TABLES t_cmctext = lt_cmctext.

REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' EXPORTING i_title = text-220 i_selection = space * i_zebra = 'X' * i_screen_start_column = 0 * i_screen_start_line = 0 * i_screen_end_column = 0 * i_screen_end_line = 0 * i_checkbox_fieldname = 'BOX' * I_LINEMARK_FIELDNAME = i_scroll_to_sel_line = ' ' i_tabname = 'I_POP_FIELDS' * I_STRUCTURE_NAME = it_fieldcat = pop_fieldcat[] it_excluding = t_excluding[] * I_CALLBACK_PROGRAM = * I_CALLBACK_USER_COMMAND = * IMPORTING * es_selfield = * e_exit = TABLES t_outtab = i_pop_fields EXCEPTIONS program_error = 1 OTHERS = 2.

ADRT10_CREATE_PRVAL_STRING CALL FUNCTION 'ADRT10_CREATE_PRVAL_STRING' EXPORTING is_caufvd = l_caufvd TABLES t_cmctext = lt_cmctext.

REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' EXPORTING i_title = text-220 i_selection = space * i_zebra = 'X' * i_screen_start_column = 0 * i_screen_start_line = 0 * i_screen_end_column = 0 * i_screen_end_line = 0 * i_checkbox_fieldname = 'BOX' * I_LINEMARK_FIELDNAME = i_scroll_to_sel_line = ' ' i_tabname = 'I_POP_FIELDS' * I_STRUCTURE_NAME = it_fieldcat = pop_fieldcat[] it_excluding = t_excluding[] * I_CALLBACK_PROGRAM = * I_CALLBACK_USER_COMMAND = * IMPORTING * es_selfield = * e_exit = TABLES t_outtab = i_pop_fields EXCEPTIONS program_error = 1 OTHERS = 2.

ADRT10_CREATE_ROC_STRING CALL FUNCTION 'ADRT10_CREATE_ROC_STRING' EXPORTING is_caufvd = l_caufvd TABLES t_roctext = lt_roctext.

REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' EXPORTING i_title = text-220 i_selection = space * i_zebra = 'X' * i_screen_start_column = 0 * i_screen_start_line = 0 * i_screen_end_column = 0 * i_screen_end_line = 0 * i_checkbox_fieldname = 'BOX' * I_LINEMARK_FIELDNAME = i_scroll_to_sel_line = ' ' i_tabname = 'I_POP_FIELDS' * I_STRUCTURE_NAME = it_fieldcat = pop_fieldcat[] it_excluding = t_excluding[] * I_CALLBACK_PROGRAM = * I_CALLBACK_USER_COMMAND = * IMPORTING * es_selfield = * e_exit = TABLES t_outtab = i_pop_fields EXCEPTIONS program_error = 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 ADPRIOTOOLF05 or its description.