MWAKAF19 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 MWAKAF19 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.
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' EXPORTING collect_and_send = space reset = x.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'WU' * EXCEPTION_IF_NOT_ACTIVE = 'X' msgty = 'I' msgv1 = p_anz_bzqfi_blank msgv2 = 'blank'(033) * MSGV3 = ' ' * MSGV4 = ' ' txtnr = '751' * ZEILE = ' ' * IMPORTING * ACT_SEVERITY = * MAX_SEVERITY = EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'WU' * EXCEPTION_IF_NOT_ACTIVE = 'X' msgty = 'I' msgv1 = l_s_wakp-artnr msgv2 = l_s_wakp-mebme * MSGV3 = ' ' * MSGV4 = ' ' txtnr = '14' * ZEILE = ' ' * IMPORTING * ACT_SEVERITY = * MAX_SEVERITY = EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'WU' * EXCEPTION_IF_NOT_ACTIVE = 'X' msgty = 'I' msgv1 = p_anz_bzqfi_a msgv2 = 'A' * MSGV3 = ' ' * MSGV4 = ' ' txtnr = '751' * ZEILE = ' ' * IMPORTING * ACT_SEVERITY = * MAX_SEVERITY = EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'WU' * EXCEPTION_IF_NOT_ACTIVE = 'X' msgty = 'I' msgv1 = l_s_wale-kunnr msgv2 = l_s_wale-artnr msgv3 = l_s_wale-mebme * MSGV4 = ' ' txtnr = '272' * ZEILE = ' ' * IMPORTING * ACT_SEVERITY = * MAX_SEVERITY = EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'WU' * EXCEPTION_IF_NOT_ACTIVE = 'X' msgty = 'I' msgv1 = p_anz_bzqfi_b msgv2 = 'B' * MSGV3 = ' ' * MSGV4 = ' ' txtnr = '751' * ZEILE = ' ' * IMPORTING * ACT_SEVERITY = * MAX_SEVERITY = EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.
MESSAGES_STOP CALL FUNCTION 'MESSAGES_STOP' EXCEPTIONS a_message = 01 e_message = 02 i_message = 03 w_message = 04.
MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING line_from = ' ' line_to = ' ' *<<<<<<<<<<<<<<<< begin of insertion note 757255 >>>>>>>>>>>>>>>>>>> batch_list_type = 'B' object = g_i_xwakhd-aktnr *<<<<<<<<<<<<<<<< end of insertion note 757255 >>>>>>>>>>>>>>>>>>>>> EXCEPTIONS inconsistent_range = 01 no_messages = 02.
SPBT_GET_CURR_RESOURCE_INFO CALL FUNCTION 'SPBT_GET_CURR_RESOURCE_INFO' IMPORTING max_pbt_wps = l_max_tasks free_pbt_wps = l_free_tasks * EXCEPTIONS * INTERNAL_ERROR = 1 * PBT_ENV_NOT_INITIALIZED_YET = 2 * OTHERS = 3 .
PROMOTION_LISTING_RFC CALL FUNCTION 'PROMOTION_LISTING_RFC' STARTING NEW TASK l_taskname DESTINATION IN GROUP r_group PERFORMING come_back_listing ON END OF TASK EXPORTING pi_i_wakhd = g_i_xwakhd "#EC ENHOK pi_i_test = r_test pi_paral = r_paral "<<<<< note 793117 pi_i_wazb_zupos = l_wazb_zupos pi_wakh_db = g_i_db_wakh TABLES pi_t_xwagud = g_t_xwagud "#EC ENHOK pi_t_xwakpd = l_t_wakpd_task "#EC ENHOK pi_t_xwazbd = l_t_wazbd_task pi_t_xwsohd = g_t_xwsohd "#EC ENHOK pi_t_xwsopd = g_t_ywsopd "#EC ENHOK pi_t_xwsotd = g_t_xwsotd pi_t_xwaled = l_t_waled "#EC ENHOK pi_t_xwaztd = g_t_xwaztd "#EC ENHOK pi_t_bstartnr = g_t_xwabstartnr pi_t_xwagu_db = g_t_db_wagu pi_t_wakp_db = g_t_db_wakp pi_t_xwazb_db = g_t_db_wazb EXCEPTIONS resource_failure = 1 system_failure = 2 MESSAGE l_msg_txt communication_failure = 3 MESSAGE l_msg_txt OTHERS = 4.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = l_verarbeitet text = l_progress_text.
PROMOTION_READ CALL FUNCTION 'PROMOTION_READ' EXPORTING faktnr = g_i_xwakhd-aktnr * FAKTYP = A * FLANGU = * F_NO_AUTHCHECK = * F_NO_WALEREAD = 'X' IMPORTING fwakhd = g_i_xwakhd * FTWPA = TABLES fxwagud = g_t_xwagud fxwakpd = g_t_xwakpd fxwaktd = g_t_xwaktd fxwazbd = g_t_xwazbd fxwaztd = g_t_xwaztd fxwazwd = g_t_xwazwd fxwaled = g_t_xwaled fxwwmitd = g_t_xwwmitd * FXWAKCD = * FXWAKRD = * FXWAKRWD = EXCEPTIONS authority_check_error = 1 no_authority = 2 promotion_not_found = 3 no_promotion_supplied = 4 OTHERS = 5.
PROMOTION_STATUS_LISTING_UPD CALL FUNCTION 'PROMOTION_STATUS_LISTING_UPD' TABLES pi_t_xwazbd = g_t_xwazbd pi_t_xwakpd = g_t_xwakpd pi_t_xwagud = g_t_xwagud pi_t_xwaled = g_t_xwaled pi_t_xwaztd = g_t_xwaztd CHANGING pc_i_wakhd = g_i_xwakhd.
PROMOTION_UPDATE CALL FUNCTION 'PROMOTION_UPDATE' EXPORTING fxwakhd = g_i_xwakhd fxwaflgbearb = waflgbearb TABLES fxwagud = g_t_xwagud * FXWAKPD = g_t_xwakpd fxwaktd = g_t_xwaktd fxwazbd = g_t_twazbd fxwaztd = g_t_xwaztd *<<<<<<<<<<<<<<< begin of insertion note 563858 >>>>>>>>>>>>>>>>>>>>>> f_db_wagu = g_t_db_wagu f_db_wakt = g_t_db_wakt f_db_wazb = g_t_db_wazb f_db_wazt = g_t_db_wazt *<<<<<<<<<<<<<<< end of insertion note 563858 >>>>>>>>>>>>>>>>>>>>>>>> EXCEPTIONS promotion_not_found = 1 assortment_head_already_exists = 2 assortment_head_not_found = 3 new_time_range_too_long = 4 new_time_range_too_small = 5 wrong_function = 6 rangemodule_number_conflict = 7 assortment_pos_already_exists = 8 assortment_pos_not_found = 9 new_time_range_pos_too_long = 10 new_time_range_pos_too_small = 11 wale_insert_error = 12 wale_update_error = 13 allocation_table_error = 14 OTHERS = 15 .
PROMOTION_SOURCE_OF_SUPPLY_RFC CALL FUNCTION 'PROMOTION_SOURCE_OF_SUPPLY_RFC' STARTING NEW TASK l_taskname DESTINATION IN GROUP r_group PERFORMING come_back_source_of_supply ON END OF TASK EXPORTING pi_wakhd = g_i_xwakhd "#EC ENHOK pi_testrun = r_test pi_wakh_db = g_i_db_wakh TABLES pi_t_wakpd = l_t_xwakpd "#EC ENHOK * pi_t_wagud = g_t_xwagud "#EC ENHOK pi_t_waled = l_t_xwaled "#EC ENHOK pi_t_filiale = g_t_filiale pi_t_wakp_db = g_t_db_wakp * PE_T_XERRO = EXCEPTIONS resource_failure = 1 system_failure = 2 MESSAGE l_msg_txt communication_failure = 3 MESSAGE l_msg_txt OTHERS = 4.
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' EXPORTING collect_and_send = space reset = x.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.