WTPR_FORMS SAP ABAP INCLUDE - FORM routines for T&A process functions
WTPR_FORMS 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 WTPR_FORMS 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 WTPR_FORMS. "Basic submit
SUBMIT WTPR_FORMS AND RETURN. "Return to original report after report execution complete
SUBMIT WTPR_FORMS VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: FORM routines for T&A process functions
INCLUDES used within this REPORT WTPR_FORMS
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:
WTAD_COMPILE_EXTRA_TEXT call function 'WTAD_COMPILE_EXTRA_TEXT' exporting matnr = pit_wtaddi-matnr mtxid = pit_wtaddi-mtxid tables fit_mamt = pit_mamt changing addi_info_line = pxt_addi_info.
WTAD_CHECK_PLANT_IN_CLASS call function 'WTAD_CHECK_PLANT_IN_CLASS' exporting clint = pxt_addi_info-clint plant = pi_plant importing flag = flag exceptions wrong_call = 1 others = 2.
MAKT_SINGLE_READ call function 'MAKT_SINGLE_READ' exporting matnr = pi_addimat spras = pi_language importing wmakt = wmakt exceptions wrong_call = 1 not_found = 2 others = 3.
UNIT_OF_MEASURE_SAP_TO_ISO call function 'UNIT_OF_MEASURE_SAP_TO_ISO' exporting sap_code = pi_meins importing iso_code = pe_meins_iso exceptions not_found = 1 no_iso_code = 2 others = 3.
MARM_SINGLE_READ call function 'MARM_SINGLE_READ' exporting matnr = pi_matnr meinh = pi_addivkme importing wmarm = wmarm exceptions wrong_call = 1 not_found = 2 others = 3.
CLMA_CLASS_READ call function 'CLMA_CLASS_READ' exporting classnumber = pi_clint importing classname = pe_class classtype = pe_klart description = pe_class_txt exceptions class_not_found = 1 others = 2.
WTAD_TWTFMT_READ call function 'WTAD_TWTFMT_READ' exporting sy_langu = pi_language tables i_fb_twtfmt = itwtfmt exceptions not_found = 1 others = 2.
DOMAIN_VALUE_GET call function 'DOMAIN_VALUE_GET' exporting i_domname = 'ADDI_INVOC' i_domvalue = addiinvoc_tmp importing e_ddtext = dom_text exceptions not_exist = 1 others = 2.
WTAD_PROVIDE_ADDIBELNR call function 'WTAD_PROVIDE_ADDIBELNR' importing addibelnr = px_addibelnr exceptions number_generator_error = 1 others = 2.
WTAD_WTADAB_READ call function 'WTAD_WTADAB_READ' exporting addibelnr = pi_addibelnr tables iwtadab = pet_wtadab_old iwtadabt = pet_wtadabt_old exceptions db_error = 1 no_additionals_selected = 2 no_extra_text_selected = 3 others = 4.
WTAD_WTADAB_TO_ADDI_INFO call function 'WTAD_WTADAB_TO_ADDI_INFO' tables fit_wtadab = pet_wtadab_old fit_wtadabt = pet_wtadabt_old fxt_addi_info = pet_addi_info_old.
WTAD_ADDI_APPL_LOG_CHECK call function 'WTAD_ADDI_APPL_LOG_CHECK' exporting fi_appl_log_status = 'X' exceptions addi_appl_log_not_active = 1 others = 2.
WTAD_ADDI_APPL_LOG_CHECK call function 'WTAD_ADDI_APPL_LOG_CHECK' exporting fi_appl_log_status = ' ' exceptions addi_appl_log_not_active = 1 others = 2.
WTAD_ADDI_SUPPLIER_SEARCH call function 'WTAD_ADDI_SUPPLIER_SEARCH' exporting fi_additional = pi_addimat fi_werks = pi_plant tables fet_additional_sources = iaddi_suppliers exceptions additional_is_no_additional = 1 no_additional_supplier_found = 2 supplier_has_no_addi_partners = 3 addi_supplier_not_for_lifnr = 4 others = 5.
WTAD_TWTFMA_READ call function 'WTAD_TWTFMA_READ' tables i_fb_twtfma = itwtfma exceptions not_found = 1 others = 2.
MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting matnr = pi_addimatnr importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.
WTAD_PROVIDE_ADDIBELNR call function 'WTAD_PROVIDE_ADDIBELNR' importing addibelnr = px_addibelnr exceptions number_generator_error = 1 others = 2.
WTAD_NAST_MESSAGE_KEY_DERIVE call function 'WTAD_NAST_MESSAGE_KEY_DERIVE' exporting fi_addimatnr = pi_addimatnr importing fe_addikschl = pe_addikschl exceptions customizing_table_missing = 1 matnr_read_error = 2 others = 3.
call function 'LFA1_SINGLE_READ' exporting lfa1_lifnr = pet_addi_supps-lifnr importing wlfa1 = slfa1 exceptions not_found = 1 others = 2.
T024E_SINGLE_READ call function 'T024E_SINGLE_READ' exporting t024e_ekorg = pet_addi_supps-ekorg importing wt024e = s024e exceptions not_found = 1 others = 2.
T001W_SINGLE_READ call function 'T001W_SINGLE_READ' exporting t001w_werks = pet_addi_supps-werks importing wt001w = s001w exceptions not_found = 1 others = 2.
WTAD_TWTCTRL_READ call function 'WTAD_TWTCTRL_READ' exporting fi_provide_action_oper = ' ' fi_provide_ris_oper = 'X' tables i_fb_twtctrl = pet_twtctrl exceptions not_found = 1 others = 2.
WTAD_READ_ADDI_4_MATNR call function 'WTAD_READ_ADDI_4_MATNR' exporting matnr = matnr flag_addiprass_always = addiprass_always flag_addiprass_promo_only = addiprass_promo_only flag_addiprass_promo_never = addiprass_promo_never read_flag = read_flag read_mamt = ' ' read_variants = ' ' aktnr = aktnr fi_sm_transaction = bom_oper fi_plant = pi_plant fi_quantity = pi_quantity fi_unit_of_measure = pi_unit_of_measure fi_addi_application = pe_addiappl fi_sd_doc = vbeln fi_itm_number = posnr fi_sd_ref_copy = 'X' tables iwtaddi = iwtaddi iwtaddi_pr = iwtaddi_pr fet_matnrs_and_quant = pet_matqu exceptions wrong_call = 1 db_error = 2 others = 3.
WTAD_CHECK_PLANT_IN_CLASS call function 'WTAD_CHECK_PLANT_IN_CLASS' exporting clint = iwtaddi_pr-addiclint locnr = pi_customer plant = pi_plant importing flag = flag exceptions wrong_call = 1 others = 2.
WTAD_CHECK_PLANT_IN_CLASS call function 'WTAD_CHECK_PLANT_IN_CLASS' exporting clint = pxt_wtaddi_pr-addiclint plant = pi_plant importing flag = flag exceptions wrong_call = 1 others = 2.
WTAD_ADDI_ACTION_DERIVE call function 'WTAD_ADDI_ACTION_DERIVE' exporting fi_addifm = pi_addifm fi_addiappl = pi_addiappl * FI_ADDIEVENT = '1' fi_opertype = '2' fi_mcekko = pi_mcekko fi_mcekpo = pi_mcekpo fi_mcmseg = pi_mcmseg fi_mcvbak = pi_mcvbak fi_mcvbap = pi_mcvbap * IMPORTING * FE_ADDI_FOLLOW_UP_ACTION = * FE_TWTCTRL = exceptions addifm_irrelevant = 1 others = 2.
MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting matnr = pi_wtaddi_pr-matnr importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.
MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting matnr = pi_wtaddi_pr-addimat importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.
WTAD_ADDI_NUMBER_DERIVE call function 'WTAD_ADDI_NUMBER_DERIVE' exporting fi_matnr = pi_wtaddi_pr-matnr fi_addimatnr = pi_wtaddi_pr-addimat fi_plant = pi_plant fi_quantity = pi_quantity fi_meins = pi_quantity_unit fi_addivkme = pi_wtaddi_pr-addivkme importing fe_quantity = ris_menge exceptions material_unit_conversion_error = 1 addi_number_round_error = 2 others = 3.
T320_SINGLE_READ call function 'T320_SINGLE_READ' exporting t320_werks = pi_plant t320_lgort = pi_storage_location importing wt320 = st320 exceptions not_found = 1 others = 2.
MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting matnr = pi_addimat importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.
WTAD_TWTFMA_READ call function 'WTAD_TWTFMA_READ' tables i_fb_twtfma = itwtfma exceptions not_found = 1 others = 2.
SD_WHS_GET_POSITION_LOAD call function 'SD_WHS_GET_POSITION_LOAD' exporting lgnum = pi_storage_num lgtyp = pi_storage_type lprzs = addi_ris_process " fixed!! * METYP_IN = msehi = pi_addimeins * LOGGR_IN = matnr = pi_addimat werk1 = pi_plant meng1 = pi_quantity * SUPKZ = importing timec = pe_const_time timev = pe_var_time * METYP_OUT = * LOGGR_OUT = * STFLA = exceptions tl006_read_problem = 1 marc_read_problem = 2 cust_exit_problem = 3 parameter_incomplete = 4 others = 5.
WTAD_TWTFMA_READ call function 'WTAD_TWTFMA_READ' tables i_fb_twtfma = itwtfma exceptions not_found = 1 others = 2.
CONDITION_RECORD_READ call function 'CONDITION_RECORD_READ' exporting * PI_KVEWE = 'A' pi_kappl = application pi_kschl = condition * PI_KOTABNR = pi_i_komk = skomk pi_i_komp = skomp importing pe_i_vake = svakekond exceptions no_record_found = 1 others = 2.
CONVERT_TO_LOCAL_CURRENCY call function 'CONVERT_TO_LOCAL_CURRENCY' exporting date = pi_condition_date foreign_amount = pe_condition_value foreign_currency = svakekond-waers local_currency = pi_currency * TYPE_OF_RATE = 'M' importing local_amount = pe_condition_value exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6.
MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting matnr = pi_additional importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.
MATERIAL_UNIT_CONVERSION call function 'MATERIAL_UNIT_CONVERSION' exporting input = input_value kzmeinh = ' ' matnr = pi_additional meinh = pi_uom importing output = output_value 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.
MARA_SINGLE_READ call function 'MARA_SINGLE_READ' exporting matnr = pi_addimat importing wmara = smara exceptions lock_on_material = 1 lock_system_error = 2 wrong_call = 3 not_found = 4 others = 5.
WTAD_TWTFMA_READ call function 'WTAD_TWTFMA_READ' * EXPORTING * KZRFB = ' ' tables i_fb_twtfma = itwtfma exceptions not_found = 1 others = 2.
DDIF_FIELDINFO_GET call function 'DDIF_FIELDINFO_GET' exporting tabname = pi_structure tables dfies_tab = i_field_catalog exceptions not_found = 1 internal_error = 2 others = 3.
WTAD_WTADAB_READ call function 'WTAD_WTADAB_READ' exporting addihandle = likp-handle * ADDIBELNR = * ADDIPOSNR = * ADDISTUNR = * LFDNR = * MATNR = * ADDIMAT = * ADDIAPPL = * ADDIRDID = * READ_WTADABT = 'X' tables iwtadab = pet_wtadab iwtadabt = pet_wtadabt exceptions db_error = 1 no_additionals_selected = 2 no_extra_text_selected = 3 others = 4.
WTAD_TWT_ACTION_READ call function 'WTAD_TWT_ACTION_READ' tables fet_twt_action = itwt_action exceptions not_found = 1 others = 2.
WTAD_READ_ADDIS_4_MATNR_TABLE call function 'WTAD_READ_ADDIS_4_MATNR_TABLE' * EXPORTING * FI_REFRESH_BUFFER = '' * FI_MAX_WTADDI_ENTRIES = 10000 * FI_MAX_MISHITS_ENTRIES = 20000 tables fxt_matnr = pit_matnr.
MAMT_ARRAY_READ_MATNR_ALL call function 'MAMT_ARRAY_READ_MATNR_ALL' * EXPORTING * KZRFB = ' ' tables ipre03 = pit_matnr exceptions enqueue_mode_changed = 1 others = 2.
WTAD_TWTCTRL_READ call function 'WTAD_TWTCTRL_READ' * EXPORTING * KZRFB = ' ' * FI_PROVIDE_ACTION_OPER = 'X' * FI_PROVIDE_RIS_OPER = ' ' tables i_fb_twtctrl = itwtctrl exceptions not_found = 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 WTPR_FORMS or its description.