SAP Reports / Programs | Plant Maintenance | Preventive Maintenance | Maintenance Task Lists(PM-PRM-TL) SAP PM

MWPSTLHMF02 SAP ABAP INCLUDE - Include MWPSTLHMF02







MWPSTLHMF02 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 MWPSTLHMF02 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 MWPSTLHMF02. "Basic submit
SUBMIT MWPSTLHMF02 AND RETURN. "Return to original report after report execution complete
SUBMIT MWPSTLHMF02 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 MWPSTLHMF02


INCLUDES used within this REPORT MWPSTLHMF02

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:

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' "N456845 EXPORTING "N456845 i_aennr = sav_aennr "N456845 i_sttag = sav_sttag "N456845 i_plnty = selected_plkod-plnty "N456845 i_plnnr = selected_plkod-plnnr "N456845 i_plnal = selected_plkod-plnal "N486381 EXCEPTIONS "N456845 keydate_not_valid = 1 "N456845 change_number_error = 2 "N456845 OTHERS = 3. "N456845

WPSTLH_CREATE_TASKLIST_DIALOG CALL FUNCTION 'WPSTLH_CREATE_TASKLIST_DIALOG' EXPORTING i_plkod_parent = plkod i_aennr = sav_aennr i_sttag = sav_sttag i_equnr = sav_equnr i_tplnr = sav_tplnr IMPORTING e_plkod = ld_new_plkod e_plpod = ld_wa_plpod1 e_equnr = sav_equnr e_tplnr = sav_tplnr EXCEPTIONS not_executed = 1 OTHERS = 2.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_plkod-plnty i_plnnr = selected_plkod-plnnr i_plnal = selected_plkod-plnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = ld_wa_plpod-subplnal plnnr = ld_wa_plpod-subplnnr plnty = ld_wa_plpod-subplnty IMPORTING plkod_exp = ld_wa_plkod1 EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_READ_MASTER_SEQUENCE CALL FUNCTION 'CP_BT_READ_MASTER_SEQUENCE' EXPORTING plkod_imp = selected_plkod IMPORTING plfld_exp = ld_wa_plfld.

WPSTLH_INSERT_SUPERIOR_OPR CALL FUNCTION 'WPSTLH_INSERT_SUPERIOR_OPR' EXPORTING plkod_parent = selected_plkod plfld_parent = ld_wa_plfld plkod_child = ld_wa_plkod i_sttag = sav_sttag i_aennr = sav_aennr IMPORTING new_plpod = ld_wa_plpod1.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = selected_xtlhier_key-subplnal plnnr = selected_xtlhier_key-subplnnr plnty = selected_xtlhier_key-subplnty IMPORTING vbkz_exp = ld_vbkz EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLPO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLPO_READ_WITH_KEY' EXPORTING plnkn = ld_wps_tlh_pos-supplnkn plnnr = ld_wps_tlh_pos-supplnnr plnty = ld_wps_tlh_pos-supplnty IMPORTING vbkz_exp = ld_vbkz.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = ld_wps_tlh-subplnal plnnr = ld_wps_tlh-subplnnr plnty = ld_wps_tlh-subplnty IMPORTING vbkz_exp = ld_vbkz EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLPO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLPO_READ_WITH_KEY' EXPORTING plnkn = ld_wps_tlh_pos-supplnkn plnnr = ld_wps_tlh_pos-supplnnr plnty = ld_wps_tlh_pos-supplnty IMPORTING vbkz_exp = ld_vbkz.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_xtlhier_key-supplnty i_plnnr = selected_xtlhier_key-supplnnr i_plnal = selected_xtlhier_key-supplnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' "N969311 EXPORTING PLNAL = plkod-plnal PLNNR = plkod-plnnr PLNTY = plkod-plnty IMPORTING index = selected_plkod_index plkod_exp = selected_plkod.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_plkod-plnty i_plnnr = selected_plkod-plnnr i_plnal = selected_plkod-plnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

CP_BT_PLKO_UPDATE CALL FUNCTION 'CP_BT_PLKO_UPDATE' EXPORTING aennr = sav_aennr plkod_new = selected_plkod sttag = sav_sttag tabix_old = selected_plkod_index.

CP_15_PLKZ_READ CALL FUNCTION 'CP_15_PLKZ_READ' EXPORTING plnty_imp = selected_plkod-plnty plnnr_imp = selected_plkod-plnnr plnal_imp = selected_plkod-plnal IMPORTING plkz_exp = ld_plkz.

CP_15_PLKZ_UPDATE CALL FUNCTION 'CP_15_PLKZ_UPDATE' EXPORTING wa_plankz = ld_plkz.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = plkod-plnal plnnr = plkod-plnnr plnty = plkod-plnty IMPORTING plkod_exp = plkod EXCEPTIONS not_found = 1 OTHERS = 2.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = plkod-plnty i_plnnr = plkod-plnnr i_plnal = plkod-plnal EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

CP_AU_CHANGE_RULE_CHK





CALL FUNCTION 'CP_AU_CHANGE_RULE_CHK' EXPORTING plkod_imp = plkod aennr_imp = sav_aennr sttag_imp = sav_sttag flg_message_imp = con_x EXCEPTIONS change_rule_1_not_fulfilled = 1 change_rule_2_not_fulfilled = 2 change_rule_3_not_fulfilled = 3 OTHERS = 4.

CP_TX_PROCESSING CALL FUNCTION 'CP_TX_PROCESSING' EXPORTING aktyp = lv_trtyp sttag = sav_sttag aennr = sav_aennr plnaw_imp = tca01-plnaw object = 'A' rc27i_old = rc27i_sav rc27i_new = rc27i_new IMPORTING action = action plkod_exp = ls_plkod.

CP_DI_ALT_UPDATE CALL FUNCTION 'CP_DI_ALT_UPDATE' EXPORTING aennr = sav_aennr datuv = sav_sttag plkod_new = ls_plkod rc27i_old = rc27i_sav IMPORTING index_plko_new = rc27i_new-index_plko.

CP_BT_PLKO_READ_WITH_INDEX CALL FUNCTION 'CP_BT_PLKO_READ_WITH_INDEX' EXPORTING index = rc27i_new-index_plko IMPORTING plkod_exp = plkod EXCEPTIONS not_found = 1 OTHERS = 2.

CP_TX_RENAME_TEXT CALL FUNCTION 'CP_TX_RENAME_TEXT' EXPORTING plnaw = tca01-plnaw object = 'A' index = rc27i_new-index_plko zaehl_old = lv_zaehl_old. "N1172124

WPSTLH_WHERE_USED CALL FUNCTION 'WPSTLH_WHERE_USED' EXPORTING i_plnty = selected_plkod-plnty i_plnnr = selected_plkod-plnnr i_plnal = selected_plkod-plnal i_datuv = sav_sttag "N1677337 i_showlist = con_x i_navigate = con_x EXCEPTIONS no_usage = 1 OTHERS = 2.

WPSTLH_PLAN_UPDATE_TO_DB CALL FUNCTION 'WPSTLH_PLAN_UPDATE_TO_DB' EXPORTING plnnr = sav_xtlhier_key-subplnnr plnty = sav_xtlhier_key-subplnty aennr = sav_aennr TABLES t_plkod = t_plkod.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_xtlhier_key-supplnty i_plnnr = selected_xtlhier_key-supplnnr i_plnal = selected_xtlhier_key-supplnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_xtlhier_key-supplnty i_plnnr = selected_xtlhier_key-supplnnr i_plnal = selected_xtlhier_key-supplnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = text-005 display_cancel_button = con_x IMPORTING answer = yes_no.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = text-005 display_cancel_button = con_x IMPORTING answer = yes_no.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = text-005 display_cancel_button = con_x IMPORTING answer = yes_no.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = text-005 display_cancel_button = con_x IMPORTING answer = yes_no.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = text-005 display_cancel_button = con_x IMPORTING answer = yes_no.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = text-005 display_cancel_button = con_x IMPORTING answer = yes_no.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_xtlhier_key-supplnty i_plnnr = selected_xtlhier_key-supplnnr i_plnal = selected_xtlhier_key-supplnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING * TITLEBAR = ' ' * DIAGNOSE_OBJECT = ' ' text_question = l_text text_button_1 = 'Ja'(001) * ICON_BUTTON_1 = ' ' text_button_2 = 'Nein'(002) * ICON_BUTTON_2 = ' ' default_button = '1' display_cancel_button = ' ' * USERDEFINED_F1_HELP = ' ' start_column = 25 start_row = 6 popup_type = 'ICON_MESSAGE_WARNING' IMPORTING answer = l_answer TABLES parameter = l_parameter EXCEPTIONS TEXT_NOT_FOUND = 1 OTHERS = 2.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = p_wa_plkod-plnal plnnr = p_wa_plkod-plnnr plnty = p_wa_plkod-plnty IMPORTING vbkz_exp = ld_vbkz EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLPO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLPO_READ_WITH_KEY' EXPORTING plnkn = ld_wps_tlh_pos-supplnkn plnnr = ld_wps_tlh_pos-supplnnr plnty = ld_wps_tlh_pos-supplnty IMPORTING vbkz_exp = ld_vbkz.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = ld_wps_tlh-subplnty i_plnnr = ld_wps_tlh-subplnnr i_plnal = ld_wps_tlh-subplnal EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.




CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = ld_wps_tlh-subplnal plnnr = ld_wps_tlh-subplnnr plnty = ld_wps_tlh-subplnty IMPORTING index = ld_plkod_index plkod_exp = ld_plkod.

CP_BT_PLKO_UPDATE CALL FUNCTION 'CP_BT_PLKO_UPDATE' EXPORTING aennr = sav_aennr plkod_new = ld_plkod sttag = sav_sttag tabix_old = ld_plkod_index.

CP_15_PLKZ_READ CALL FUNCTION 'CP_15_PLKZ_READ' EXPORTING plnty_imp = ld_plkod-plnty plnnr_imp = ld_plkod-plnnr plnal_imp = ld_plkod-plnal IMPORTING plkz_exp = ld_plkz.

CP_15_PLKZ_UPDATE CALL FUNCTION 'CP_15_PLKZ_UPDATE' EXPORTING wa_plankz = ld_plkz.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = ld_wa_wps_tlh-subplnal plnnr = ld_wa_wps_tlh-subplnnr plnty = ld_wa_wps_tlh-subplnty IMPORTING plkod_exp = exp_plkod EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLPO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLPO_READ_WITH_KEY' EXPORTING plnkn = ld_wps_tlh_curr-supplnkn plnnr = ld_wps_tlh_curr-supplnnr plnty = ld_wps_tlh_curr-supplnty sttag = sav_sttag IMPORTING index = ld_index_curr plpod_exp = ld_plpod_curr EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLPO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLPO_READ_WITH_KEY' EXPORTING plnkn = ld_wps_tlh_prev-supplnkn plnnr = ld_wps_tlh_prev-supplnnr plnty = ld_wps_tlh_prev-supplnty sttag = sav_sttag IMPORTING index = ld_index_prev plpod_exp = ld_plpod_prev EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLKO_READ_WITH_KEY CALL FUNCTION 'CP_BT_PLKO_READ_WITH_KEY' EXPORTING plnal = ld_wps_tlh_prev-subplnal plnnr = ld_wps_tlh_prev-subplnnr plnty = ld_wps_tlh_prev-subplnty IMPORTING plkod_exp = ld_plkod_prev EXCEPTIONS not_found = 1 OTHERS = 2.

CP_BT_PLPO_APPEND CALL FUNCTION 'CP_BT_PLPO_APPEND' EXPORTING aennr = sav_aennr plpod_app = hlp_plpod sttag = sav_sttag.

CP_BT_PLPO_UPDATE CALL FUNCTION 'CP_BT_PLPO_UPDATE' EXPORTING aennr = sav_aennr plpod_new = hlp_plpod sttag = sav_sttag tabix_old = ld_index_prev.

CP_BT_PLPO_APPEND CALL FUNCTION 'CP_BT_PLPO_APPEND' EXPORTING aennr = sav_aennr plpod_app = hlp_plpod sttag = sav_sttag.

CP_BT_PLPO_UPDATE CALL FUNCTION 'CP_BT_PLPO_UPDATE' EXPORTING aennr = sav_aennr plpod_new = hlp_plpod sttag = sav_sttag tabix_old = ld_index_curr.

WPSTLH_CHECK_AENNR CALL FUNCTION 'WPSTLH_CHECK_AENNR' EXPORTING i_aennr = sav_aennr i_sttag = sav_sttag i_plnty = selected_plkod-plnty i_plnnr = selected_plkod-plnnr i_plnal = selected_plkod-plnal "N486381 EXCEPTIONS keydate_not_valid = 1 change_number_error = 2 OTHERS = 3.

CTMS_OBJECT_AREA CALL FUNCTION 'CTMS_OBJECT_AREA' TABLES OBJECTS = l_objecttab EXCEPTIONS OTHERS = 1.

CLFM_OBJECT_CLASSIFICATION CALL FUNCTION 'CLFM_OBJECT_CLASSIFICATION' "551562 EXPORTING change_service_number = sav_aennr date_of_change = sav_sttag initflag = 'X' object = object objtxt = objtxt obj_has_change_service = 'X' status = status table = cl_tab_rout-head IMPORTING ok_code = ld_ok_code updateflag = ld_updateflag EXCEPTIONS classification_not_found = 1 class_not_found = 2 class_not_valid = 3 foreign_lock = 4 no_multi_classif = 5 system_failure = 6 only_with_change_number = 7 change_nr_not_compatible = 8 no_auth_klart = 9 change_nr_changed = 10 OTHERS = 11.

CLAP_DDB_INIT_CLASSIFICATION CALL FUNCTION 'CLAP_DDB_INIT_CLASSIFICATION'. "563540

CLFM_OBJECT_CLASSIFICATION CALL FUNCTION 'CLFM_OBJECT_CLASSIFICATION' "563540 EXPORTING change_service_number = sav_aennr date_of_change = sav_sttag initflag = 'X' object = object objtxt = objtxt obj_has_change_service = 'X' status = status table = cl_tab_rout-head IMPORTING "563540 ok_code = ld_ok_code updateflag = ld_updateflag EXCEPTIONS "563540 classification_not_found = 1 class_not_found = 2 class_not_valid = 3 foreign_lock = 4 no_multi_classif = 5 system_failure = 6 only_with_change_number = 7 change_nr_not_compatible = 8 no_auth_klart = 9 change_nr_changed = 10 OTHERS = 11. "563540

ROUT1_INST_AUTHORITY_CHECK CALL FUNCTION 'ROUT1_INST_AUTHORITY_CHECK' EXPORTING akttyp = i_aktyp tcode = i_tcode vagrp = i_vagrp statu = i_statu iwerk = i_werks EXCEPTIONS benutzerstamm_fehlerhaft = 1 keine_berechtigung = 2 keine_berechtigung_anz = 3 keine_berechtigung_hinz = 4 keine_berechtigung_ver = 5 kein_profil_im_bstamm = 6 objekt_nicht_in_bstamm = 7 OTHERS = 8.



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