SAP Reports / Programs | Quality Management | Quality Inspection | Inspection Lot Completion(QM-IM-UD) SAP QM
MQEVAF40 SAP ABAP INCLUDE - documentation and ABAP source code
MQEVAF40 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 MQEVAF40 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 MQEVAF40. "Basic submit
SUBMIT MQEVAF40 AND RETURN. "Return to original report after report execution complete
SUBMIT MQEVAF40 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 MQEVAF40
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:
QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING i_objnr = qals-objnr i_status = c_status_fehl EXCEPTIONS status_not_activ = 01.
QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING i_objnr = qals-objnr i_status = c_status_stip EXCEPTIONS status_not_activ = 01.
QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING i_dialog = c_kreuz i_objnr = qals-objnr i_vorgang = l_einstiegscheck EXCEPTIONS not_allowed = 01.
QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING i_dialog = ' ' i_objnr = qals-objnr i_vorgang = l_einstiegscheck EXCEPTIONS not_allowed = 01.
QSS1_INSP_COMMENTS_PREFETCH CALL FUNCTION 'QSS1_INSP_COMMENTS_PREFETCH' EXPORTING i_prueflos = qals-prueflos i_sprache = qals-sprache TABLES t_qamkr_tab = g_mktb EXCEPTIONS inconsistent_parameters = 0 internal_error = 0 OTHERS = 0.
SERNR_SNAPSHOT_KEEP CALL FUNCTION 'SERNR_SNAPSHOT_KEEP' EXPORTING memory_id = 'SAPMQEVA_SERIAL'.
MB_SIMULATE_SERIALNUMBER CALL FUNCTION 'MB_SIMULATE_SERIALNUMBER' EXPORTING imseg = l_zimseg imkpf = p_imkpf itcode = mqeva_tcode IMPORTING eshkzg = l_eshkzg ebstup = l_bstup ebstch = l_bstch evrgng = l_mm_vorgang esnbwg = l_snbwg e_emkpf = l_sim_emkpf e_emseg = l_sim_emseg.
SERNR_SNAPSHOT_RELOAD CALL FUNCTION 'SERNR_SNAPSHOT_RELOAD' EXPORTING memory_id = 'SAPMQEVA_SERIAL' * WITH_FREE_MEMORY = 'X' * FREE_ONLY = ' ' EXCEPTIONS no_reload_source = 1 invalid_import_parameter = 2 OTHERS = 3.
SERIALPROFILE_CHECK CALL FUNCTION 'SERIALPROFILE_CHECK' EXPORTING operation = 'SNCL'.
SERIAL_PROFILE_READ CALL FUNCTION 'SERIAL_PROFILE_READ' EXPORTING profile_r = qals-sernp operation_r = 'MMSL' snbwg_r = l_snbwg * PFLEGE = 'X' IMPORTING * T_377P = t_377 = l_t377 EXCEPTIONS no_t377p_entry = 1 no_t377_entry = 2 OTHERS = 3.
SERIALPROFILE_CHECK CALL FUNCTION 'SERIALPROFILE_CHECK' EXPORTING material = l_zimseg-matnr ematn = qals-ematnr operation = 'QMCM' prueflos = qals-prueflos j_vorgang = l_mm_vorgang profile = qals-sernp quantity = l_xanzsn mblnr = '$' mjahr = l_mjahr zeile = l_zeile_temp blart = l_blart bwart = l_zimseg-bwart shkzg = l_eshkzg m_werk = l_zimseg-werks m_lager = l_zimseg-lgort m_charge = l_zimseg-charg l_charge = l_zimseg-charg "1131392 cuobj = qals-cuobj r_material = l_zimseg-ummat snbwg = l_snbwg bstch = l_bstch bstup = l_bstup budat = p_imkpf-budat IMPORTING anzsn = l_xanzsn_2 "Anz. kopierter Serialnr.
SERIALPROFILE_CHECK CALL FUNCTION 'SERIALPROFILE_CHECK' EXPORTING activity = c_akt_kopieren "nur kopieren ! material = l_zimseg-matnr ematn = qals-ematnr r_material = l_zimseg-ummat "Umlagerung operation = 'MMSL' j_vorgang = l_mm_vorgang profile = qals-sernp quantity = l_xanzsn mblnr = '$' mjahr = l_mjahr zeile = l_zeile_temp blart = l_blart bwart = l_zimseg-bwart shkzg = l_eshkzg lieferant = qals-lifnr m_werk = l_zimseg-werks m_lager = l_zimseg-lgort m_charge = l_zimseg-charg l_charge = l_zimseg-charg "1131392 cuobj = qals-cuobj "????? snbwg = l_snbwg bstch = l_bstch bstup = l_bstup budat = p_imkpf-budat IMPORTING exit_flag = l_exit_flag "Abbrechen ! status_not_allowed = l_fehler.
QAFD_QAPP_READ_FOR_ONE_LOT CALL FUNCTION 'QAFD_QAPP_READ_FOR_ONE_LOT' EXPORTING i_prueflos = p_qals-prueflos TABLES t_ppdb_tab = l_qapp_tab EXCEPTIONS x_no_data = 1 OTHERS = 2.
QTLS_PARTIAL_LOT_READ_ALL CALL FUNCTION 'QTLS_PARTIAL_LOT_READ_ALL' EXPORTING i_prueflos = p_qals-prueflos i_mandant = sy-mandt TABLES e_qalt = g_tltb EXCEPTIONS x_no_data = 1 x_lot_is_initial = 2 OTHERS = 3.
OBJECT_NUMBER_READ_QP CALL FUNCTION 'OBJECT_NUMBER_READ_QP' EXPORTING phynr = p_qapp-phynr IMPORTING objnr = l_objnr.
STATUS_CHECK CALL FUNCTION 'STATUS_CHECK' EXPORTING objnr = l_objnr status = 'I0076' "LÖVM EXCEPTIONS object_not_found = 1 "Keine Info vorhanden status_not_active = 1.
QAPP_IP_USER_FIELDS_FOR_LIST CALL FUNCTION 'QAPP_IP_USER_FIELDS_FOR_LIST' EXPORTING i_tq79 = tq79 i_tq79t = tq79t TABLES t_user_tab = l_qappusr_tab.
TQSS1_READ CALL FUNCTION 'TQSS1_READ' EXPORTING i_werks = qals-werk IMPORTING e_tqss1 = l_tqss1 EXCEPTIONS no_entry = 01.
CALL FUNCTION 'QAFD_TQ79_READ' EXPORTING i_slwbez = l_slwbez IMPORTING e_tq79 = tq79 EXCEPTIONS not_found = 1.
QAFD_TQ79T_READ CALL FUNCTION 'QAFD_TQ79T_READ' EXPORTING i_slwbez = l_slwbez i_sprache = sy-langu IMPORTING e_tq79t = tq79t EXCEPTIONS not_found = 1.
QAPP_IP_USER_FIELDS_FOR_LIST CALL FUNCTION 'QAPP_IP_USER_FIELDS_FOR_LIST' EXPORTING i_tq79 = tq79 i_tq79t = tq79t TABLES t_user_tab = l_qappusr_tab.
QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING i_katalogart = p_qapp-vkatart i_codegruppe = p_qapp-vcodegrp i_code = p_qapp-vcode */ I_SPRACHE = SY-LANGU IMPORTING e_text = p_codetext */ E_GROUPTEXT = EXCEPTIONS no_match_in_range = 1 OTHERS = 2.
QPAP_GET_QAPO_KEY_DATA CALL FUNCTION 'QPAP_GET_QAPO_KEY_DATA' EXPORTING i_prueflos = qals-prueflos i_vorglfnr = g_ppwa-vorglfnr IMPORTING e_plnfl = l_plnfl EXCEPTIONS OTHERS = 1.
AUTH_CHECK_TCODE CALL FUNCTION 'AUTH_CHECK_TCODE' EXPORTING tcode = ee_pp_fert_anzeigen EXCEPTIONS parameter_error = 1 transaction_not_found = 2 transaction_locked = 3 transaction_is_menu = 4 menu_via_parameter_transaction = 5 not_authorized = 6 OTHERS = 7.
AUTH_CHECK_TCODE CALL FUNCTION 'AUTH_CHECK_TCODE' EXPORTING tcode = ee_pp_equi_anzeigen EXCEPTIONS parameter_error = 1 transaction_not_found = 2 transaction_locked = 3 transaction_is_menu = 4 menu_via_parameter_transaction = 5 not_authorized = 6 OTHERS = 7.
AUTH_CHECK_TCODE CALL FUNCTION 'AUTH_CHECK_TCODE' EXPORTING tcode = ee_pp_tepl_anzeigen EXCEPTIONS parameter_error = 1 transaction_not_found = 2 transaction_locked = 3 transaction_is_menu = 4 menu_via_parameter_transaction = 5 not_authorized = 6 OTHERS = 7.
AUTH_CHECK_TCODE CALL FUNCTION 'AUTH_CHECK_TCODE' EXPORTING tcode = ee_pp_phpr_anzeigen EXCEPTIONS parameter_error = 1 transaction_not_found = 2 transaction_locked = 3 transaction_is_menu = 4 menu_via_parameter_transaction = 5 not_authorized = 6 OTHERS = 7.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = l_det_ikone_pp text = ' ' info = l_det_info_text_pp */ ADD_STDINF = ' ' IMPORTING result = s_pp_icon-icon EXCEPTIONS icon_not_found = 00 outputfield_too_short = 00.
QAPD_IP_DETAIL_CHANGE CALL FUNCTION 'QAPD_IP_DETAIL_CHANGE' EXPORTING i_qapp = l_qapp i_aktivitaet = 'A'.
QTLS_PARTIAL_LOT_SHOW CALL FUNCTION 'QTLS_PARTIAL_LOT_SHOW' EXPORTING i_starting_at_x = 5 i_starting_at_y = 5 i_qals = qals */ I_QALT_UD = i_qalt = l_qalt */ I_QAVT = i_display_only = c_kreuz.
QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING i_objnr = qals-objnr i_status = c_status_rma EXCEPTIONS status_not_activ = 1 OTHERS = 2.
SD_REPAIR_ORDER_CONFIRMATION CALL FUNCTION 'SD_REPAIR_ORDER_CONFIRMATION' EXPORTING i_save = c_kreuz i_inspection_lot = c_kreuz i_read = c_kreuz i_order = qals-kdauf i_item = qals-kdpos TABLES i_repakom = l_repakom_tab EXCEPTIONS incorrect_call = 1 error_message = 2 no_proposal = 3 OTHERS = 2.
POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING defaultoption = 'N' "Transaktion abbrechen diagnosetext1 = text-051 diagnosetext2 = l_auftrag diagnosetext3 = text-053 textline1 = text-054 textline2 = text-055 titel = text-056 cancel_display = space IMPORTING answer = l_antwort.
SD_REPAIR_ORDER_CONFIRMATION CALL FUNCTION 'SD_REPAIR_ORDER_CONFIRMATION' EXPORTING i_save = c_kreuz i_read = c_kreuz i_order = qals-kdauf i_item = qals-kdpos i_i_lot_status_only = c_kreuz EXCEPTIONS incorrect_call = 1 error_message = 2 OTHERS = 2.
POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING defaultoption = 'N' "Transaktion abbrechen diagnosetext1 = text-051 diagnosetext2 = l_auftrag diagnosetext3 = text-053 textline1 = text-054 textline2 = text-055 titel = text-056 cancel_display = space IMPORTING answer = l_antwort.
QRMA_SALES_ORDER_UPDATE_SN CALL FUNCTION 'QRMA_SALES_ORDER_UPDATE_SN' IN BACKGROUND TASK AS SEPARATE UNIT EXPORTING i_prueflos = qals-prueflos.
QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING i_objnr = qals-objnr i_status = c_status_rma EXCEPTIONS status_not_activ = 1 OTHERS = 2.
VB_CHANGE_BATCH CALL FUNCTION 'VB_CHANGE_BATCH' EXPORTING ymcha = l_mcha "nur Schlüssel yupdmcha = l_updmcha kzcla = l_kzcla xkcfc = space"UserExit f. Klassif.
QLCO_CONFIRMATION_PER_LOT_DISP CALL FUNCTION 'QLCO_CONFIRMATION_PER_LOT_DISP' EXPORTING i_prueflos = qals-prueflos.
QSS1_Q_LEVEL_SHOW CALL FUNCTION 'QSS1_Q_LEVEL_SHOW' EXPORTING i_kunnr = l_kunnr i_lifnr = l_lifnr i_hersteller = l_hersteller i_matnr = l_matnr i_pruefart = l_art i_plnal = qals-plnal */ I_PLNFL = ' ' */ I_PLNKN = '00000000' i_plnnr = qals-plnnr i_plnty = qals-plnty i_werks = qals-werk.
QAMB_REFRESH_DATA CALL FUNCTION 'QAMB_REFRESH_DATA'.
QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING i_objnr = qals-objnr i_status = c_status_ve EXCEPTIONS status_not_activ = 01.
POPUP_TO_DECIDE_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_DECIDE_WITH_MESSAGE' EXPORTING defaultoption = '1' diagnosetext1 = text-i13 diagnosetext2 = text-i14 diagnosetext3 = l_mchar_qndat textline1 = text-i08 textline2 = text-i09 text_option1 = l_option1 text_option2 = text-i11 titel = text-i12 start_column = 15 IMPORTING answer = l_antwort.
POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING defaultoption = '1' textline1 = text-i07 textline2 = text-i08 textline3 = text-i09 text_option1 = l_option1 text_option2 = text-i11 titel = text-i12 start_column = 15 IMPORTING answer = l_antwort.
CLOB_GET_CLASSTYPE_FOR_BATCH CALL FUNCTION 'CLOB_GET_CLASSTYPE_FOR_BATCH' EXPORTING table = c_table_mcha ptable = l_ptable IMPORTING classtype = l_classtype EXCEPTIONS classtype_not_found = 1 classtype_not_active = 2 OTHERS = 3.
CLFC_BATCH_ALLOCATION_TO_CLASS CALL FUNCTION 'CLFC_BATCH_ALLOCATION_TO_CLASS' EXPORTING material = p_matnr plant = p_werk classtype = l_classtype */ IMPORTING */ CLASSTYPE = */ CLASS = EXCEPTIONS no_class_found = 1 no_classtype_found = 2 OTHERS = 3.
QSS1_QCPR_SHOW CALL FUNCTION 'QSS1_QCPR_SHOW' EXPORTING i_mblnr = qals-mblnr i_zeile = qals-zeile i_mjahr = qals-mjahr EXCEPTIONS no_qcpr = 1 OTHERS = 2.
CV141_LINK_EXIST CALL FUNCTION 'CV141_LINK_EXIST' EXPORTING ps_drad_objky = l_objkey ps_drad_dokob = 'MARA' EXCEPTIONS no_link = 1 link_exist = 2 OTHERS = 3.
CV141_SHOW_LINK_DOCUMENT CALL FUNCTION 'CV141_SHOW_LINK_DOCUMENT' EXPORTING ps_drad_objky = l_objkey ps_drad_dokob = 'MARA'.
QSS1_SAMPLE_DRAWING_PROC_SHOW CALL FUNCTION 'QSS1_SAMPLE_DRAWING_PROC_SHOW' EXPORTING i_prziehverf = qals-prbnaverf i_version = qals-prbnavv EXCEPTIONS OTHERS = 1.
QSS1_DYNAMIC_RULE_SHOW CALL FUNCTION 'QSS1_DYNAMIC_RULE_SHOW' EXPORTING i_dynregel = qals-dynregel EXCEPTIONS no_dynrule = 1 OTHERS = 2.
CV141_LINK_EXIST * CALL FUNCTION 'CV141_LINK_EXIST' * EXPORTING * ps_drad_objky = lv_objkey * ps_drad_dokob = 'QALS' * EXCEPTIONS * no_link = 1 * link_exist = 2 * OTHERS = 3.
CV141_SHOW_LINK_DOCUMENT CALL FUNCTION 'CV141_SHOW_LINK_DOCUMENT' EXPORTING ps_drad_objky = lv_objkey ps_drad_dokob = 'QALS'.
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 MQEVAF40 or its description.