ML01AF0L SAP ABAP INCLUDE - documentation and ABAP source code

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

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

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:

MATERIAL_READ
  CALL FUNCTION 'MATERIAL_READ'
       EXPORTING
            schluessel         = mtcom
       IMPORTING
*auft*2: geändert von mt06e zu mt06a
            matdaten           = mt06a
            return             = mtcor
       TABLES
            seqmat01           = tdummy
       EXCEPTIONS
            material_not_found = 04
            text_not_found     = 08.

MAW1_SINGLE_READ CALL FUNCTION 'MAW1_SINGLE_READ' EXPORTING matnr = up_mtcom-matnr EXCEPTIONS wrong_call = 1 not_found = 2 OTHERS = 3.

VENDOR_MASTER_DATA_SELECT_00 CALL FUNCTION 'VENDOR_MASTER_DATA_SELECT_00' EXPORTING i_lfa1_lifnr = up_lifnr * I_LFM1_EKORG = ' ' * I_LFM2_LTSNR = ' ' * I_LFM2_WERKS = ' ' * I_LFB1_BUKRS = ' ' * I_DATA = 'X' * I_PARTNER = ' ' IMPORTING a_lfa1 = lfa1 * A_LFB1 = * A_LFM1 = * A_LFM2 = * A_EKORZ = * TABLES * T_WYT3 = EXCEPTIONS vendor_not_found = 1 OTHERS = 2.

VENDOR_MASTER_DATA_SELECT_12 CALL FUNCTION 'VENDOR_MASTER_DATA_SELECT_12' EXPORTING pi_lifnr = up_lifnr pi_ekorg = up_ekorg IMPORTING pe_lfm1 = lfm1 * PE_EKORZ = EXCEPTIONS no_entry_found = 1 OTHERS = 2.

DEQUEUE_EVVBLKE CALL FUNCTION 'DEQUEUE_EVVBLKE' EXPORTING mandt = sy-mandt vbeln = lieferavis_nr_tab-vbeln x_vbeln = space * auft*1: * Lieferavis wird mit SCOPE = 3 gesperrt, das UPDATE wird per * Verbuchungsbaustein gemacht * --> das Entsperren muß mit SCOPE = 1 gemacht werden, damit * die Sperre an den Verbucher übergeht * _scope = '2' _scope = '1' _synchron = ' '.

WAUF_SHIPPING_NOTIFICAT_UPDATE CALL FUNCTION 'WAUF_SHIPPING_NOTIFICAT_UPDATE' IN UPDATE TASK TABLES fbt_lips = lieferavis_pos_tab.

WLK1_CHECK CALL FUNCTION 'WLK1_CHECK' EXPORTING date = ut_aulw-wedat item = up_aupo-matnr * shop_locnr = up_aufi-filnr "note 599839 shop_werks = up_aufi-fiwrk all_wlk1_info = kreuz buffers_read = kreuz component_check = kreuz "note 314508 IMPORTING no_unit_but_item_listing = listg-nur_artikel_gelistet wrf1_kzlik_not_in_use = listg-kondition_nicht_notwendig TABLES o_wlk1 = o_wlk1 all_wlk1 = wlk1 EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 wrong_parameters = 04 no_open_time_shop_in_time = 05 no_listing_for_promotion = 06 wrong_location = 07 no_complete_listing_in_time = 08 wrong_rackjobber = 09 listing_only_as_component = 10 error_message = 98 OTHERS = 99.

WLK1_CHECK CALL FUNCTION 'WLK1_CHECK' EXPORTING date = ut_aulw-wedat item = up_aupo-matnr * shop_locnr = up_aufi-filnr"note 599839 shop_werks = up_aufi-fiwrk all_wlk1_info = kreuz buffers_read = kreuz component_check = kreuz "note 314508 IMPORTING no_unit_but_item_listing = listg-nur_artikel_gelistet wrf1_kzlik_not_in_use = listg-kondition_nicht_notwendig TABLES o_wlk1 = o_wlk1 all_wlk1 = wlk1 EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 wrong_parameters = 04 no_open_time_shop_in_time = 05 no_listing_for_promotion = 06 wrong_location = 07 no_complete_listing_in_time = 08 wrong_rackjobber = 09 listing_only_as_component = 10 error_message = 98 OTHERS = 99.

WLK1_CHECK CALL FUNCTION 'WLK1_CHECK' EXPORTING * date = sy-aulw-wedat item = up_aupo-matnr * shop_locnr = up_aufi-filnr "note 599839 shop_werks = up_aufi-fiwrk date_begin = sy-datum date_end = '99991231' all_wlk1_info = kreuz buffers_read = kreuz component_check = kreuz "note 314508 IMPORTING no_unit_but_item_listing = listg-nur_artikel_gelistet wrf1_kzlik_not_in_use = listg-kondition_nicht_notwendig TABLES o_wlk1 = o_wlk1 all_wlk1 = wlk1 EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 wrong_parameters = 04 no_open_time_shop_in_time = 05 no_listing_for_promotion = 06 wrong_location = 07 no_complete_listing_in_time = 08 wrong_rackjobber = 09 listing_only_as_component = 10 error_message = 98 OTHERS = 99.

PRODUCT_LIST_EXCLUSION_RETAIL CALL FUNCTION 'PRODUCT_LIST_EXCLUSION_RETAIL' EXPORTING date = ut_aulw-wedat header_communication = h_list_header item_communication = h_list_item * US_ERROR = 'E' * PROMOTION = * PROMOTION_THEME = * DETAILS = ' ' check_during_batch = 'X' * IMPORTING * ASORT_FOR_CUSTOMER = * TABLES * DETAILS_TABLE = EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 no_complete_listing_in_time = 08 no_listing_conditons_check = 20 error_message = 98 OTHERS = 99.

PRODUCT_LIST_EXCLUSION_RETAIL CALL FUNCTION 'PRODUCT_LIST_EXCLUSION_RETAIL' EXPORTING date = sy-datum "dummy ! header_communication = h_list_header item_communication = h_list_item * US_ERROR = 'E' * PROMOTION = * PROMOTION_THEME = * DETAILS = ' ' check_during_batch = 'X' datab = sy-datum datbi = '99991231' * IMPORTING * ASORT_FOR_CUSTOMER = * TABLES * DETAILS_TABLE = EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 no_complete_listing_in_time = 08 no_listing_conditons_check = 20 error_message = 98 OTHERS = 99.

WLK1_CHECK CALL FUNCTION 'WLK1_CHECK' EXPORTING date = ut_auvw-wevdt item = up_aupo-matnr * shop_locnr = up_auvz-vzent "note 599839 shop_werks = up_auvz-vzwrk all_wlk1_info = kreuz buffers_read = kreuz component_check = kreuz "note 314508 IMPORTING no_unit_but_item_listing = listg-nur_artikel_gelistet wrf1_kzlik_not_in_use = listg-kondition_nicht_notwendig TABLES o_wlk1 = o_wlk1 all_wlk1 = wlk1 EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 wrong_parameters = 04 no_open_time_shop_in_time = 05 no_listing_for_promotion = 06 wrong_location = 07 no_complete_listing_in_time = 08 wrong_rackjobber = 09 listing_only_as_component = 10 error_message = 98 OTHERS = 99.

WLK1_CHECK CALL FUNCTION 'WLK1_CHECK' EXPORTING * date = ut_auvw-wevdt item = up_aupo-matnr * shop_locnr = up_auvz-vzent "note 599839 shop_werks = up_auvz-vzwrk date_begin = sy-datum date_end = '99991231' all_wlk1_info = kreuz buffers_read = kreuz component_check = kreuz "note 314508 IMPORTING no_unit_but_item_listing = listg-nur_artikel_gelistet wrf1_kzlik_not_in_use = listg-kondition_nicht_notwendig TABLES o_wlk1 = o_wlk1 all_wlk1 = wlk1 EXCEPTIONS no_listing = 01 no_listing_in_time = 02 existing_exclusion_listing = 03 wrong_parameters = 04 no_open_time_shop_in_time = 05 no_listing_for_promotion = 06 wrong_location = 07 no_complete_listing_in_time = 08 wrong_rackjobber = 09 listing_only_as_component = 10 error_message = 98 OTHERS = 99.

POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING * DEFAULTOPTION = 'Y' diagnosetext1 = atxt-diagnose1 diagnosetext2 = atxt-diagnose2 diagnosetext3 = atxt-diagnose3 textline1 = atxt-textline1 * TEXTLINE2 = ' ' titel = atxt-titel * START_COLUMN = 25 * START_ROW = 6 * auft*1/Rel = *
cancel_display = space IMPORTING answer = answer.

POPUP_TO_CONFIRM_WITH_MESSAGE

CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING diagnosetext1 = atxt-diagnose1 diagnosetext2 = atxt-diagnose2 textline1 = atxt-textline1 titel = atxt-titel cancel_display = space IMPORTING answer = answer.

MATERIAL_READ_CLASSIFIC_RT CALL FUNCTION 'MATERIAL_READ_CLASSIFIC_RT' EXPORTING p_matnr = lips-matnr * kz_mara_read = 'X' * P_MARA = * kz_makt_read = 'X' * KZRFB = ' ' * MAXTZ = 0 * SPERRMODUS = ' ' IMPORTING p_class = h_p_class p_mara = h_p_mara p_makt = h_p_makt TABLES exp_var_tab = ht_var_tab * EXP_CHAR = * EXP_VALU = exp_char_vari = ht_char_vari exp_valu_vari = ht_valu_vari * EXP_VALU_ASSIGNED = EXCEPTIONS wrong_call = 1 mara_not_exist = 2 no_class = 3 no_char = 4 no_valu_vari = 5 OTHERS = 6.

MERCHANDISE_GROUP_SELECT
*     call function 'MERCHANDISE_GROUP_SELECT'
*         exporting
*            matkl       = h_matkl
*            spras       = sy-langu
*            wg_bez      = space
*         tables
*            O_WWG01     =
*            X_WERT      =
*         exceptions
*            no_basis_mg = 1
*            others      = 2.

CTMS_STRUCTURE_CLASSES
*       call function 'CTMS_STRUCTURE_CLASSES'
*            exporting
*                 art               = artikelklassenart
*                 batch_function    = 'X'
*                 bottom_up         = ' '
*                 class             = h_class_ex
*                 ENQUEUE           = ' '
*                 GRAPHIC           = ' '
*                 HEREDITABLE       = ' '
*                 INCLUDING_TEXT    = 'X'
*                 language          = sy-langu
*                 no_classification = 'X'
*                 OBJECT            = ' '
*                 OBJECT_ID         = ' '
*                 top_down          = 'X'
*                 VIEW              = 'K'
*                 INCLUDING_CLASS   = 'X'
*                 LIST_PROCESSING   = ' '
*                 KEY_DATE          = SY-DATUM
*                 HIERARCHY_ALLOWED = 'X'
*                 MULTIPLE_ALLOWED  = 'X'
*                 NO_OBJECTS        =
*                 SORT_BY_CLASS     = 'X'
*            tables
*                 daten             = ht_ghcl
*                 index             = ht_index
*            exceptions
*                 others            = 1.

WALL_MERCHANDISE_CAT_FROM_MCHL CALL FUNCTION 'WALL_MERCHANDISE_CAT_FROM_MCHL' EXPORTING fbi_class_no = klah-class TABLES fbt_merch_cat = it_matkl.

MATERIAL_READ
      CALL FUNCTION 'MATERIAL_READ'
        EXPORTING
          schluessel         = mtcom
        IMPORTING
          matdaten           = mt06a
          return             = mtcor
        TABLES
          seqmat01           = tdummy
        EXCEPTIONS
          material_not_found = 04
          text_not_found     = 08.

WALL_TC_RESET CALL FUNCTION 'WALL_TC_RESET' EXPORTING fbi_tc_lines = tc_0201_anz_lines_reflips CHANGING fbc_tc_lines = tc_0201-lines fbc_tc_top_line = tc_0201-top_line.

ME_PURCHASE_DOCUMENT_DATA_SAVE CALL FUNCTION 'ME_PURCHASE_DOCUMENT_DATA_SAVE' EXPORTING * I_NO_DOCUMENT_CHECK = ' ' * I_COMMIT_WAIT = ' ' i_no_commit = kreuz EXCEPTIONS invalid_call_of_fb = 1 OTHERS = 2.

ME_PURCHASE_DOCU_DATA_REFRESH CALL FUNCTION 'ME_PURCHASE_DOCU_DATA_REFRESH'.

ME_PURCHASE_DOCUMENT_DATA_READ CALL FUNCTION 'ME_PURCHASE_DOCUMENT_DATA_READ' EXPORTING i_ebeln = ut_aupo_del_upd_ekpo_line-ebeln i_tcode = h_tcode * I_NO_COMMIT = ' ' i_trtyp = h_trtyp i_no_messaging = kreuz i_no_message_req = kreuz i_no_authority_check = kreuz * I_VORGA = EXCEPTIONS no_eblnr = 1 eblnr_not_found = 2 no_tcode = 3 tcode_not_allowed = 4 no_trtyp = 5 invalid_call_of_fb = 6 OTHERS = 7.

ME_PUR_DOCU_POSITION_CHANGE CALL FUNCTION 'ME_PUR_DOCU_POSITION_CHANGE' EXPORTING i_field_name = 'AUFTEILER' i_field_value = h_ekpo_aufteiler IMPORTING e_ekbel = h_ekbel TABLES ebelp_ran = ht_ebelp_ran EXCEPTIONS invalid_call_of_fb = 1 OTHERS = 2.

WAUF_SHIPPING_NOTIFICAT_UPDATE CALL FUNCTION 'WAUF_SHIPPING_NOTIFICAT_UPDATE' IN UPDATE TASK TABLES fbt_lips = ut_postab_lips_upd.

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

ML01AF0L - documentation and ABAP source code
ML01AF0K - Reorganization of materials
ML01AF0I - documentation and ABAP source code
ML01AF0H - CHARGEN_MSPR_LESEN
ML01AF0G - documentation and ABAP source code
ML01AF0F - documentation and ABAP source code