SAP Reports / Programs | Quality Management | Quality Inspection | Inspection Lot Completion(QM-IM-UD) SAP QM

MQEVAF34 SAP ABAP INCLUDE - documentation and ABAP source code







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

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:

POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING TEXTLINE1 = TEXT-002 "Möchten Sie die Tranakt. ...

QAST_STATUS_MAINTAIN CALL FUNCTION 'QAST_STATUS_MAINTAIN' EXPORTING I_DISPLAY_ONLY = L_DISPLAY_MODE I_OBJNR = QALS-OBJNR.

STATUS_OBJECT_READ CALL FUNCTION 'STATUS_OBJECT_READ' EXPORTING OBJNR = QALS-OBJNR IMPORTING E_JSTO = L_JSTO.

STATUS_GET_CHANGE_FLAG CALL FUNCTION 'STATUS_GET_CHANGE_FLAG' IMPORTING FLG_CHANGE = L_STATUS_CHANGE.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'Y' TEXTLINE1 = TEXT-004 TEXTLINE2 = TEXT-005 TITEL = TEXT-001 IMPORTING ANSWER = ANTWORT.

QSS_TEXT_TABLES_PROCESSING CALL FUNCTION 'QSS_TEXT_TABLES_PROCESSING' EXPORTING I_OBJECT = TEXTOBJECT I_SCHLUESSEL = LTEXTSCHLUESSEL I_SPRSL = QALS-SPRACHE I_TEXTID = TEXTID_BST TABLES T_LINES = G_TAB_PROTOCOL2 EXCEPTIONS NAMENEW = 01 NO_NAME = 02 NO_OBJECT = 03 NO_SPRACHE = 04 NO_TEXT = 05 NO_TEXTID = 06 UNKNOWN = 07.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = QALS-OBJNR I_STATUS = C_STATUS_FEHL EXCEPTIONS STATUS_NOT_ACTIV = 1 OTHERS = 2.

QSS_TEXT_TABLES_PROCESSING CALL FUNCTION 'QSS_TEXT_TABLES_PROCESSING' EXPORTING I_OBJECT = TEXTOBJECT I_SCHLUESSEL = LTEXTSCHLUESSEL I_SPRSL = QALS-SPRACHE I_TEXTID = TEXTID_VE TABLES T_LINES = G_TAB_STEMPEL EXCEPTIONS NAMENEW = 01 NO_NAME = 02 NO_OBJECT = 03 NO_SPRACHE = 04 NO_TEXT = 05 NO_TEXTID = 06 UNKNOWN = 07.

CM_FV_PROD_VERS_SINGLE_SHOW CALL FUNCTION 'CM_FV_PROD_VERS_SINGLE_SHOW' EXPORTING I_EXT_KEY = L_MKAL_KEY EXCEPTIONS NO_IMPORT = 1 NOT_FOUND = 2 NO_AUTH = 3 OTHERS = 4.

KK_F_PKOSA_DISPLAY CALL FUNCTION 'KK_F_PKOSA_DISPLAY' EXPORTING I_PKOSA = QALS-AUFNR I_MODE = SPACE EXCEPTIONS OTHERS = 1.

CO_EXT_ORDER_ENTRY CALL FUNCTION 'CO_EXT_ORDER_ENTRY' EXPORTING ORDPAR_IMP = L_ORDPAR EXCEPTIONS OTHERS = 0.

QPK1_UD_CODE_PICKUP_LEAN CALL FUNCTION 'QPK1_UD_CODE_PICKUP_LEAN' EXPORTING I_KATALOGART = '3' I_WERKS = RQEVA-VWERKS I_AUSWAHLMGE = RQEVA-VAUSWAHLMG I_CODEGRUPPE = RQEVA-VCODEGRP I_CODE = RQEVA-VCODE IMPORTING E_QPK1AC = QPK1AC EXCEPTIONS NO_MATCH_IN_RANGE = 1 NO_USER_SELECTION = 2 NO_AUTHORIZATION = 3 OBJECT_LOCKED = 4 LOCK_ERROR = 5 OBJECT_MISSING = 6 OTHERS = 7.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = QALS-OBJNR I_STATUS = C_STATUS_PAKO EXCEPTIONS STATUS_NOT_ACTIV = 1.

QSS7_GET_STEPS_BY_META_UD CALL FUNCTION 'QSS7_GET_STEPS_BY_META_UD' EXPORTING is_meta = ls_meta TABLES et_qss7_ts_sign_verify_step = ls_qss7_ts_sign_verify_step EXCEPTIONS failed = 1 OTHERS = 2.

SIGN_READ CALL FUNCTION 'SIGN_READ' EXPORTING object_imp = l_rc73-sign_obj key_lot_imp = l_rc73 EXCEPTIONS key_for_object_incomplete = 1 no_signatures_found = 2 OTHERS = 3.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING * DEFAULTOPTION = 'Y' "Vorschlag frei !?! TEXTLINE1 = TEXT-021 TEXTLINE2 = TEXT-022 TITEL = TEXT-023 START_COLUMN = 21 START_ROW = 5 IMPORTING ANSWER = L_ANTWORT.

VB_NEXT_BATCH_NUMBER CALL FUNCTION 'VB_NEXT_BATCH_NUMBER' EXPORTING MATNR = RQEVA-NEU_MAT WERKS = QALS-WERKVORG CHECK_BATCH = SPACE CHECK_MATERIAL = SPACE * MESSAGE_WHEN_AUTO = ' ' X_BNCOM = L_BNCOM IMPORTING NEW_CHARG = RQEVA-NEU_CHARGE EXCEPTIONS NO_MATERIAL = 1 NO_PLANT = 2 MATERIAL_NOT_FOUND = 3 PLANT_NOT_FOUND = 4 NO_BATCH_HANDLING = 5 BATCH_EXIST = 6 NO_NUMBER = 7 ILLEGAL_BATCH_NUMBER = 8 INTERVAL_NOT_FOUND = 9 OBJECT_NOT_FOUND = 10 INTERVAL_OVERFLOW = 11 ERROR_AUTOMATIC_BATCH_NUMBER = 12 CANCELLED = 13 AUTOMATIC_BATCH_NUM_NOT_ACTIVE = 14 OTHERS = 15.

QFFE_EXECUTE_FUNCTION CALL FUNCTION 'QFFE_EXECUTE_FUNCTION' EXPORTING I_FCODE = 'QMCL' I_ACTIVITY = 'V' I_RETURN_DARK = C_KREUZ IMPORTING E_FLG_DARK = G_DUNKEL-FLAG E_FLG_SAVE = L_QFFE_UPDATE TABLES IE_QFOB_TAB = G_QFOB_TAB IE_QFAA_TAB = G_QFAA_TAB.

STATUS_CHECK_OLD





CALL FUNCTION 'STATUS_CHECK_OLD' EXPORTING BYPASS_BUFFER = ' ' CLIENT = SY-MANDT OBJNR = QALS-OBJNR STATUS = C_STATUS_PAKO EXCEPTIONS OBJECT_NOT_FOUND = 01 STATUS_NOT_ACTIVE = 02.

STATUS_CHECK CALL FUNCTION 'STATUS_CHECK' EXPORTING BYPASS_BUFFER = ' ' CLIENT = SY-MANDT OBJNR = QALS-OBJNR STATUS = C_STATUS_PAKO EXCEPTIONS OBJECT_NOT_FOUND = 01 STATUS_NOT_ACTIVE = 02.

QFFE_EXECUTE_FUNCTION CALL FUNCTION 'QFFE_EXECUTE_FUNCTION' EXPORTING I_FCODE = 'QMCN' I_NO_DIALOG = C_KREUZ IMPORTING E_FLG_SAVE = L_QFFE_UPDATE TABLES IE_QFOB_TAB = G_QFOB_TAB IE_QFAA_TAB = G_QFAA_TAB.

QFRD_FILL_BASE_FROM_DIALOG CALL FUNCTION 'QFRD_FILL_BASE_FROM_DIALOG' TABLES QFOB_TAB = G_QFOB_TAB QFAA_TAB = G_QFAA_TAB.

QFRD_UPDATE_FAILURE_FROM_BASE CALL FUNCTION 'QFRD_UPDATE_FAILURE_FROM_BASE' EXPORTING I_NO_STATUS_UPDATE_LOT = C_KREUZ EXCEPTIONS NO_ENTRY_IN_BASETABLES = 01.

QMLA_NOTIFICATION_SELECTION CALL FUNCTION 'QMLA_NOTIFICATION_SELECTION' EXPORTING WINX1_07 = 25 WINX2_07 = 52 WINY1_07 = 10 WINY2_07 = 17 IMPORTING E_QMNUM = L_QMNUM TABLES I_QFAA_TAB = G_QFAA_TAB EXCEPTIONS NO_DATA_FOUND = 01 NO_DATA_SELECTED = 02 NO_MARK = 03.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = QALS-OBJNR I_STATUS = C_STATUS_VERU EXCEPTIONS STATUS_NOT_ACTIV = 1.

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING NAME = L_ICON * TEXT = ' ' INFO = L_QUICK ADD_STDINF = ' ' IMPORTING RESULT = S_LTICON-ICON EXCEPTIONS ICON_NOT_FOUND = 0 OUTPUTFIELD_TOO_SHORT = 0 OTHERS = 0.

OBJECT_NUMBER_READ_QP CALL FUNCTION 'OBJECT_NUMBER_READ_QP' EXPORTING PHYNR = QAPP-PHYNR IMPORTING OBJNR = L_OBJNR.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = L_OBJNR I_STATUS = 'I0076' "LÖVM EXCEPTIONS STATUS_NOT_ACTIV = 1 OTHERS = 2.

QELC_IP_OPEN_FOR_INSP_LOT CALL FUNCTION 'QELC_IP_OPEN_FOR_INSP_LOT' EXPORTING I_WINX1_03 = 01 I_WINX2_03 = 70 I_WINY1_03 = 03 I_WINY2_03 = 12 I_QALS = QALS I_NO_DISPLAY = ' ' EXCEPTIONS NO_DATA_FOUND = 1 NO_DATA_SELECTED = 2 OTHERS = 3.

QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING * I_CHECK_ONLY = ' ' I_DIALOG = C_KREUZ I_OBJNR = QALS-OBJNR I_VORGANG = C_VORG_LOSP_SETZEN EXCEPTIONS NOT_ALLOWED = 1 ACTIVITY_NOT_ALLOWED = 2 OTHERS = 3.

QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING * I_CHECK_ONLY = ' ' I_DIALOG = C_KREUZ I_OBJNR = QALS-OBJNR I_VORGANG = C_VORG_LOSP_ZURUECKNEHMEN EXCEPTIONS NOT_ALLOWED = 1 ACTIVITY_NOT_ALLOWED = 2 OTHERS = 3.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = QALS-OBJNR I_STATUS = C_STATUS_PAKO EXCEPTIONS STATUS_NOT_ACTIV = 1 OTHERS = 2.

QAUT_INSP_FIN CALL FUNCTION 'QAUT_INSP_FIN' EXPORTING I_QPRUEFART = QALS-ART I_WERKS = QALS-WERK EXCEPTIONS NO_AUTHORIZATION = 4.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'N' TEXTLINE1 = L_TEXT TEXTLINE2 = TEXT-007 TITEL = TEXT-001 IMPORTING ANSWER = ANTWORT.

VB_CP_SHOW_EBR CALL FUNCTION 'VB_CP_SHOW_EBR' EXPORTING I_MATNR = QALS-MATNR I_CHARG = QALS-CHARG I_WERKS = QALS-WERK EXCEPTIONS EBR_NOT_FOUND = 1 OTHERS = 2.

SIGN_SHOW * CALL FUNCTION 'SIGN_SHOW' * EXPORTING * OBJECT_IMP = L_RC73-SIGN_OBJ * KEY_LOT_IMP = L_RC73 ** TABLES ** SIGNS_SHEET_TAB = * EXCEPTIONS ** key_for_object_incomplete = 1 * NO_SIGNATURES_FOUND = 2.

STATUS_SET_USER_STATUS_DIALOG CALL FUNCTION 'STATUS_SET_USER_STATUS_DIALOG' EXPORTING OBJECT_NUMBER = QALS-OBJNR.



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