SAP Reports / Programs | Plant Maintenance | Maintenance Processing | Maintenance Notifications(PM-WOC-MN) SAP PM
MIWO0F70 SAP ABAP INCLUDE - QM Notification
MIWO0F70 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 MIWO0F70 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 MIWO0F70. "Basic submit
SUBMIT MIWO0F70 AND RETURN. "Return to original report after report execution complete
SUBMIT MIWO0F70 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: QM Notification
INCLUDES used within this REPORT MIWO0F70
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:
INX_MARK_OFF_BY_INDEX CALL FUNCTION 'INX_MARK_OFF_BY_INDEX' EXPORTING * INXPT = INXSM-TABPT INXPT = L_TABIX TABLES INX = INXSM.
INX_GET_MARK_NEXT CALL FUNCTION 'INX_GET_MARK_NEXT' IMPORTING INXPT = LINE TABPT = TABPT TABLES INX = INXSM EXCEPTIONS NO_RECORD_FOUND = 4.
INX_MARK_OFF_BY_INDEX CALL FUNCTION 'INX_MARK_OFF_BY_INDEX' EXPORTING INXPT = INXSM-TABPT TABLES INX = INXSM.
INX_MARK_OFF_BY_INDEX CALL FUNCTION 'INX_MARK_OFF_BY_INDEX' EXPORTING INXPT = INXSM-TABPT TABLES INX = INXSM.
INX_MARK_OFF_BY_INDEX CALL FUNCTION 'INX_MARK_OFF_BY_INDEX' EXPORTING INXPT = ITEMP-INXPT TABLES INX = INXSM.
INX_MARK_OFF_BY_INDEX CALL FUNCTION 'INX_MARK_OFF_BY_INDEX' EXPORTING INXPT = INXSM-TABPT TABLES INX = INXSM.
TQ8CO_READ CALL FUNCTION 'TQ8CO_READ' EXPORTING I_QMART = VIQMEL-QMART I_WERKS = VIQMEL-MAWERK IMPORTING E_TQ8CO = TQ8CO EXCEPTIONS NO_ENTRY = 01.
KK_F_PKOSA_GENERATE CALL FUNCTION 'KK_F_PKOSA_GENERATE' EXPORTING PKOSA_IMP = PKOSA RUECK_RELE = SPACE EXCEPTIONS OTHERS = 1.
KK_F_PKOSA_INSERT CALL FUNCTION 'KK_F_PKOSA_INSERT' EXPORTING COMMIT_IMP = SPACE QMKONT_IMP = QMKONT IMPORTING PKOSANR_EXP = VIQMEL-COAUFNR.
POPUP_TO_DECIDE CALL FUNCTION 'POPUP_TO_DECIDE' EXPORTING DEFAULTOPTION = '1' TEXTLINE1 = 'Es ist ein Fehler bei der Erzeugung'(P0A) TEXTLINE2 = 'eines Auftrages aufgetreten.'(P0B)
QAST_POPUP_STATUS_ANALYZE CALL FUNCTION 'QAST_POPUP_STATUS_ANALYZE' EXPORTING I_OBJEKTNR = VIQMEL-OBJNR I_VORGANG = TC33-VRGNG.
PM_PARTNER_DATA_IMPORT CALL FUNCTION 'PM_PARTNER_DATA_IMPORT' EXPORTING PARVW_INT = TQ80-PARVW_INT PARVW_LIEF = TQ80-PARVW_LIEF PARVW_KUND = TQ80-PARVW_KUND PARVW_AP = TQ80-PARVW_AP PARVW_VERA = TQ80-PARVW_VERA PARVW_AUTO = TQ80-PARVW_AUTO AUFNR = VIQMEL-AUFNR EQUNR = VIQMEL-EQUNR PARGR = TQ80-PARGR SPART = VIQMEL-SPART TPLNR = VIQMEL-TPLNR VKORG = VIQMEL-VKORG VTWEG = VIQMEL-VTWEG OBJNR = VIQMEL-OBJNR OBTYP = TQ8T-QMELT SADR_WA = SADR SADR_FLAG = INDADR AKTYP = T365-AKTYP.
ILOA_BACK_TO_ACTIVE * call function 'ILOA_BACK_TO_ACTIVE' * exporting * i_riwo1 = riwo1 * importing * e_riwo1 = riwo1.
STATUS_CHANGE_INTERN CALL FUNCTION 'STATUS_CHANGE_INTERN' EXPORTING OBJNR = P_OBJNR TABLES STATUS = P_STATTAB EXCEPTIONS OBJECT_NOT_FOUND = 01 STATUS_INCONSISTENT = 02 STATUS_NOT_ALLOWED = 03.
READ_TEXT_INLINE CALL FUNCTION 'READ_TEXT_INLINE' EXPORTING ID = YTDID INLINE_COUNT = 8 LANGUAGE = LLANGU NAME = LNAME OBJECT = YQMEL IMPORTING HEADER = HEADLTX TABLES INLINES = INLINETAB LINES = LTXTTAB EXCEPTIONS ID = 1 LANGUAGE = 2 NAME = 3 NOT_FOUND = 4 OBJECT = 5 REFERENCE_CHECK = 6.
LANGTEXT_ONLY CALL FUNCTION 'LANGTEXT_ONLY' EXPORTING OBJECT = YQMEL OBJECT_NR = H_OBJNR SPRAS = LLANGU TXTID = YTDID X_XAKTYP = T365-AKTYP COUNT_INLINE = 9 SAVE_MODE = YX TEXT_PROPERTY = TQ80-QMLTXT02 IMPORTING IND_INV = LINV INV_EXIST = LEXIST TABLES T_INLINES = INLINETAB.
FLTP_CHAR_CONVERSION CALL FUNCTION 'FLTP_CHAR_CONVERSION' EXPORTING DECIM = P_DECIM * EXPON = E02 INPUT = P_FLTP * IVALU = E04 * MASKN = E05 IMPORTING FLSTR = P_CHAR.
INX_MARK_OFF_BY_INDEX CALL FUNCTION 'INX_MARK_OFF_BY_INDEX' EXPORTING INXPT = FINX_CUR TABLES INX = INXFE.
CALL FUNCTION 'INX_MARK_BY_INDEX' EXPORTING INXPT = FINX_CUR TABLES INX = INXFE.
TQ8CO_READ CALL FUNCTION 'TQ8CO_READ' EXPORTING I_QMART = VIQMEL-QMART I_WERKS = VIQMEL-MAWERK IMPORTING E_TQ8CO = TQ8CO EXCEPTIONS NO_ENTRY = 01.
CO_RM_COMPANYCODE_FIND CALL FUNCTION 'CO_RM_COMPANYCODE_FIND' EXPORTING WERKS = P_WERK IMPORTING COMPCODE = L_BUKRS.
CHANGE_ILOA CALL FUNCTION 'CHANGE_ILOA' EXPORTING I_ILOA = ILOA I_NROBJ = RIWO1-NROBJ.
PM_PARTNER_READ CALL FUNCTION 'PM_PARTNER_READ' EXPORTING PARVW = P_PARVW PARNR = P_PARNR IMPORTING DIADRP_WA = DIADRP DIADRC_WA = DIADRC DIADR_WA = DIADR PARNR_EXP = P_PARNR EXCEPTIONS NO_VALID_PARNR = 01.
PM_PARTNER_READ CALL FUNCTION 'PM_PARTNER_READ' EXPORTING PARVW = VIQMSM-PARVW PARNR = VIQMSM-PARNR IMPORTING E_NRART = G_NRART EXCEPTIONS NO_VALID_PARNR = 01.
HELP_VALUES_GET_WITH_MACO CALL FUNCTION 'HELP_VALUES_GET_WITH_MACO' EXPORTING CUCOL = SY-CUCOL CUROW = SY-CUROW MC_ID = H_SELSTR-MC_ID MC_OBJECT = H_MATCHCODE_OBJECT SELSTR = H_SELSTR IMPORTING SELECTVALUE = P_PARNR EXCEPTIONS NO_SELECTION = 01 NO_VALUES = 02 NO_VALUES_SELECTED = 03.
SEARCH_OM_PARTNER CALL FUNCTION 'SEARCH_OM_PARTNER' EXPORTING ACT_NRART = TPAR-NRART ACTIVE_PLVAR = ' ' SEARCH_STRING = P_NAME_LIST IMPORTING SEL_PARNR = P_PARNR EXCEPTIONS NOT_SELECTED = 01.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING INPUT = P_PARNR IMPORTING OUTPUT = P_PARNR.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING DYNAME = H_DYNAME DYNUMB = H_DYNUMB TABLES DYNPFIELDS = H_DYNPFIELDS EXCEPTIONS INVALID_ABAPWORKAREA = 01 INVALID_DYNPROFIELD = 02 INVALID_DYNPRONAME = 03 INVALID_DYNPRONUMMER = 04 INVALID_REQUEST = 05 NO_FIELDDESCRIPTION = 06 UNDEFIND_ERROR = 07.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING DYNAME = H_DYNAME DYNUMB = H_DYNUMB TABLES DYNPFIELDS = H_DYNPFIELDS.
HELP_VALUES_GET_WITH_MACO CALL FUNCTION 'HELP_VALUES_GET_WITH_MACO' EXPORTING CUCOL = SY-CUCOL CUROW = SY-CUROW MC_ID = ' ' MC_OBJECT = H_MATCHCODE_OBJECT SELSTR = P_PARNR IMPORTING SELECTVALUE = H_PARNR EXCEPTIONS NO_SELECTION = 01 NO_VALUES = 02 NO_VALUES_SELECTED = 03.
HELP_VALUES_GET_WITH_TABLE CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE' EXPORTING FIELDNAME = 'PARNR' TABNAME = 'VIQMSM' IMPORTING SELECT_VALUE = H_OBJID TABLES FIELDS = ITAB_FELDNAMEN VALUETAB = ITAB_WERTE.
SEARCH_OM_PARTNER CALL FUNCTION 'SEARCH_OM_PARTNER' EXPORTING ACT_NRART = H_NRART ACTIVE_PLVAR = ' ' SEARCH_STRING = P_PARNR RESTRICTION_OTYPE = H_OTYPE RESTRICTION_OBJID = H_OBJID IMPORTING SEL_PARNR = H_PARNR EXCEPTIONS NOT_SELECTED = 01.
CONVERSION_EXIT_PARVW_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_PARVW_OUTPUT' EXPORTING INPUT = P_PARVW IMPORTING OUTPUT = P_PARVW.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING DYNAME = H_DYNAME DYNUMB = H_DYNUMB TABLES DYNPFIELDS = H_DYNPFIELDS.
QLCO_CO_OBJECT_DISPLAY CALL FUNCTION 'QLCO_CO_OBJECT_DISPLAY' EXPORTING I_AUFNR_CO = P_AUFNR.
QSS1_INSPECT_FEAT_RESULTS_SHOW CALL FUNCTION 'QSS1_INSPECT_FEAT_RESULTS_SHOW' EXPORTING I_MERKNR_BIS = VIQMFE-MERKNR I_MERKNR_VON = VIQMFE-MERKNR I_MODUS = '1 ' I_PRUEFLOS = VIQMEL-PRUEFLOS * i_rueckmelnr = 00000000 I_SINGLE_CHARACTERISTIC_READ = YX I_VORNR = RQM00-VORNR I_MODE_LESEN = SPACE.
COPY_ILOA CALL FUNCTION 'COPY_ILOA' EXPORTING I_RIWO1 = RIWO1 IMPORTING E_RIWO1 = RIWO1.
PM_PARTNER_DATA_IMPORT CALL FUNCTION 'PM_PARTNER_DATA_IMPORT' EXPORTING PARVW_INT = TQ80-PARVW_INT PARVW_LIEF = TQ80-PARVW_LIEF PARVW_KUND = TQ80-PARVW_KUND PARVW_AP = TQ80-PARVW_AP PARVW_VERA = TQ80-PARVW_VERA PARVW_AUTO = TQ80-PARVW_AUTO AUFNR = VIQMEL-AUFNR EQUNR = VIQMEL-EQUNR PARGR = TQ80-PARGR SPART = VIQMEL-SPART TPLNR = VIQMEL-TPLNR VKORG = VIQMEL-VKORG VTWEG = VIQMEL-VTWEG OBJNR = VIQMEL-OBJNR OBTYP = TQ8T-QMELT SADR_WA = SADR SADR_FLAG = INDADR AKTYP = T365-AKTYP.
PM_PARTNER_DATA_IMPORT CALL FUNCTION 'PM_PARTNER_DATA_IMPORT' EXPORTING PARVW_INT = TQ80-PARVW_INT PARVW_LIEF = TQ80-PARVW_LIEF PARVW_KUND = TQ80-PARVW_KUND PARVW_AP = TQ80-PARVW_AP PARVW_VERA = TQ80-PARVW_VERA PARVW_AUTO = TQ80-PARVW_AUTO AUFNR = VIQMEL-AUFNR EQUNR = VIQMEL-EQUNR PARGR = TQ80-PARGR SPART = VIQMEL-SPART TPLNR = VIQMEL-TPLNR VKORG = VIQMEL-VKORG VTWEG = VIQMEL-VTWEG OBJNR = VIQMEL-OBJNR OBTYP = TQ8T-QMELT SADR_WA = SADR SADR_FLAG = INDADR AKTYP = T365-AKTYP.
ILOA_BACK_TO_ACTIVE CALL FUNCTION 'ILOA_BACK_TO_ACTIVE' EXPORTING I_RIWO1 = RIWO1 IMPORTING E_RIWO1 = RIWO1.
QFDL_READ_INSPECTION_POINT_LOT CALL FUNCTION 'QFDL_READ_INSPECTION_POINT_LOT' EXPORTING I_PRUEFLOS = VIQMEL-PRUEFLOS I_PNLKN = VIQMEL-PNLKN I_PROBENR = VIQMFE-PROBENR IMPORTING E_PRFPKT = QFAAI_PRF-PRUEFPKT EXCEPTIONS INDEPENDENT_MULTIPLE_SAMPLE = 1.
QM08_NUMBERS_OF_NOTIFICATIONS CALL FUNCTION 'QM08_NUMBERS_OF_NOTIFICATIONS' EXPORTING I_KEYFIGURE_STRUCTURE = QNQMI00 EXCEPTIONS INCOMPLETE_INFORMATIONS = 1 OTHERS = 2.
QM08_NUMBERS_OF_NOTIFICATIONS CALL FUNCTION 'QM08_NUMBERS_OF_NOTIFICATIONS' EXPORTING I_KEYFIGURE_STRUCTURE = QNQMI00 EXCEPTIONS INCOMPLETE_INFORMATIONS = 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 MIWO0F70 or its description.