SAP Reports / Programs | Logistics - General | Merchandise Distribution | Allocation(LO-MDS-AL) SAP LO
ML01AF2B SAP ABAP INCLUDE - documentation and ABAP source code
ML01AF2B 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 ML01AF2B 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 ML01AF2B. "Basic submit
SUBMIT ML01AF2B AND RETURN. "Return to original report after report execution complete
SUBMIT ML01AF2B 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 ML01AF2B
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:
WAUF_T621_LESEN CALL FUNCTION 'WAUF_T621_LESEN' EXPORTING im_apstp = up_aupo-apstp IMPORTING ex_t621 = t621.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING input = up_aufi-pmngu kzmeinh = kreuz matnr = up_aupo-matnr meinh = up_aupo-aufme meins = up_aupo-meins IMPORTING output = bqpim-nemng EXCEPTIONS conversion_not_found = 1 input_invalid = 2 material_not_found = 3 meinh_not_found = 4 meins_missing = 5 no_meinh = 6 output_invalid = 7 overflow = 8 OTHERS = 9.
VALUE_ARTICLE_FIND_NEW CALL FUNCTION 'VALUE_ARTICLE_FIND_NEW' EXPORTING I_MATNR = up_aupo-matnr I_WERKS = up_aufi-fiwrk IMPORTING E_WAART = l_waart.
MARC_SINGLE_READ * CALL FUNCTION 'MARC_SINGLE_READ' * EXPORTING * MATNR = up_aupo-matnr * WERKS = up_aufi-fiwrk * IMPORTING * WMARC = lmarc.
MARC_SINGLE_READ CALL FUNCTION 'MARC_SINGLE_READ' EXPORTING MATNR = up_aupo-matnr WERKS = up_aufi-fiwrk IMPORTING WMARC = lmarc EXCEPTIONS lock_on_marc = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 OTHERS = 5.
MARC_SINGLE_READ CALL FUNCTION 'MARC_SINGLE_READ' EXPORTING matnr = up_aupo-matnr werks = lmarc-werks IMPORTING wmarc = lmarc EXCEPTIONS lock_on_marc = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 OTHERS = 5.
ME_SEARCH_SOURCE_OF_SUPPLY CALL FUNCTION 'ME_SEARCH_SOURCE_OF_SUPPLY' EXPORTING comim = bqpim IMPORTING comex = bqpex.
WAUF_T621_LESEN CALL FUNCTION 'WAUF_T621_LESEN' EXPORTING im_apstp = up_aupo-apstp IMPORTING ex_t621 = t621 EXCEPTIONS no_record_found = 1.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING input = up_aufi-pmngu kzmeinh = kreuz matnr = up_aupo-matnr meinh = up_aupo-aufme meins = up_aupo-meins IMPORTING output = bqpim-nemng EXCEPTIONS conversion_not_found = 1 input_invalid = 2 material_not_found = 3 meinh_not_found = 4 meins_missing = 5 no_meinh = 6 output_invalid = 7 overflow = 8 OTHERS = 9.
ME_SEARCH_SOURCE_OF_SUPPLY CALL FUNCTION 'ME_SEARCH_SOURCE_OF_SUPPLY' EXPORTING comim = bqpim i_no_material_read = kreuz IMPORTING comex = bqpex.
WAUF_T001W_LESEN CALL FUNCTION 'WAUF_T001W_LESEN' EXPORTING im_werks = bqpex-bewrk IMPORTING ex_t001w = t001w EXCEPTIONS no_valid_input = 1 no_record_found = 2.
WALL_DETERMINE_DC_FOR_CUSTOMER CALL FUNCTION 'WALL_DETERMINE_DC_FOR_CUSTOMER' EXPORTING fbi_auko = up_auko fbi_aupo = up_aupo fbi_aufi = up_aufi fbi_t621 = up_t621 fbi_wauf_no_kna1_read = kreuz IMPORTING fbe_vzent = up_vzent fbe_vzwrk = up_vzwrk fbe_vzlfr = up_vzlfr TABLES fbt_aulw = ut_aulw.
WAUF_T621_LESEN CALL FUNCTION 'WAUF_T621_LESEN' EXPORTING im_apstp = up_aupo-apstp IMPORTING ex_t621 = t621 EXCEPTIONS no_record_found = 1.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING input = up_auvz-pmngv kzmeinh = kreuz matnr = up_aupo-matnr meinh = up_aupo-aufme meins = up_aupo-meins IMPORTING output = bqpim-nemng EXCEPTIONS conversion_not_found = 1 input_invalid = 2 material_not_found = 3 meinh_not_found = 4 meins_missing = 5 no_meinh = 6 output_invalid = 7 overflow = 8 OTHERS = 9.
VALUE_ARTICLE_FIND_NEW CALL FUNCTION 'VALUE_ARTICLE_FIND_NEW' EXPORTING I_MATNR = up_aupo-matnr I_WERKS = up_auvz-vzwrk IMPORTING E_WAART = l_waart.
MARC_SINGLE_READ * CALL FUNCTION 'MARC_SINGLE_READ' * EXPORTING * MATNR = up_aupo-matnr * WERKS = up_auvz-vzwrk * IMPORTING * WMARC = lmarc.
MARC_SINGLE_READ CALL FUNCTION 'MARC_SINGLE_READ' EXPORTING MATNR = up_aupo-matnr WERKS = up_auvz-vzwrk IMPORTING WMARC = lmarc EXCEPTIONS lock_on_marc = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 OTHERS = 5.
MARC_SINGLE_READ CALL FUNCTION 'MARC_SINGLE_READ' EXPORTING matnr = up_aupo-matnr werks = lmarc-werks IMPORTING wmarc = lmarc EXCEPTIONS lock_on_marc = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 OTHERS = 5.
CALL FUNCTION 'ME_SEARCH_SOURCE_OF_SUPPLY' EXPORTING comim = bqpim IMPORTING comex = bqpex.
WAUF_T001W_LESEN * call function 'WAUF_T001W_LESEN' * exporting * im_werks = bqpex-bewrk * importing * ex_t001w = t001w * exceptions * no_valid_input = 1 * no_record_found = 2.
WAUF_T621_LESEN * CALL FUNCTION 'WAUF_T621_LESEN' * EXPORTING * IM_APSTP = UP_AUPO-APSTP * IMPORTING * EX_T621 = T621 * EXCEPTIONS * NO_RECORD_FOUND = 1.
MATERIAL_UNIT_CONVERSION * CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' * EXPORTING * INPUT = UP_AUPO-PMNGE * KZMEINH = KREUZ * MATNR = UP_AUPO-MATNR * MEINH = UP_AUPO-AUFME * MEINS = UP_AUPO-MEINS * IMPORTING * OUTPUT = BQPIM-NEMNG * EXCEPTIONS * CONVERSION_NOT_FOUND = 1 * INPUT_INVALID = 2 * MATERIAL_NOT_FOUND = 3 * MEINH_NOT_FOUND = 4 * MEINS_MISSING = 5 * NO_MEINH = 6 * OUTPUT_INVALID = 7 * OVERFLOW = 8 * OTHERS = 9.
ME_SEARCH_SOURCE_OF_SUPPLY * CALL FUNCTION 'ME_SEARCH_SOURCE_OF_SUPPLY' * EXPORTING * COMIM = BQPIM * IMPORTING * COMEX = BQPEX.
WAUF_T621_LESEN CALL FUNCTION 'WAUF_T621_LESEN' EXPORTING im_apstp = up_aupo-apstp IMPORTING ex_t621 = t621 EXCEPTIONS no_record_found = 1.
MATERIAL_READ CALL FUNCTION 'MATERIAL_READ' EXPORTING schluessel = mtcom IMPORTING matdaten = mt06e return = mtcor * 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.
MATERIAL_UNIT_CONVERSION CALL FUNCTION 'MATERIAL_UNIT_CONVERSION' EXPORTING input = up_aufi-pmngu kzmeinh = kreuz matnr = up_aupo-matnr meinh = up_aupo-aufme meins = up_aupo-meins IMPORTING output = bqpim-nemng EXCEPTIONS conversion_not_found = 1 input_invalid = 2 material_not_found = 3 meinh_not_found = 4 meins_missing = 5 no_meinh = 6 output_invalid = 7 overflow = 8 OTHERS = 9.
ME_SEARCH_SOURCE_OF_SUPPLY CALL FUNCTION 'ME_SEARCH_SOURCE_OF_SUPPLY' EXPORTING comim = bqpim IMPORTING comex = bqpex.
WAUF_T001W_LESEN CALL FUNCTION 'WAUF_T001W_LESEN' EXPORTING im_werks = bqpex-bewrk IMPORTING ex_t001w = t001w EXCEPTIONS no_valid_input = 1 no_record_found = 2.
MARA_SINGLE_READ CALL FUNCTION 'MARA_SINGLE_READ' EXPORTING * KZRFB = ' ' * MAXTZ = 0 matnr = up_matnr * SPERRMODUS = ' ' * STD_SPERRMODUS = ' ' * OUTPUT_NO_MESSAGE = IMPORTING wmara = h_mara EXCEPTIONS lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 OTHERS = 5.
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 ML01AF2B or its description.