SAP Reports / Programs | Production Planning and Control | Production Planning for Process Industries | Process Data Documentation(PP-PI-PDO) SAP PP

PPPICPPRL SAP ABAP Report - Batch Record: Inspection Report







PPPICPPRL is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for The program RQGAAM31 reads inspection lot information from the logic PGQ database and generates a printout of the inspection results for the lots...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter PPPICPPRL 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 PPPICPPRL. "Basic submit
SUBMIT PPPICPPRL AND RETURN. "Return to original report after report execution complete
SUBMIT PPPICPPRL VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Selection Text: WERK = Plant
Selection Text: VORGANG = Operation
Selection Text: TEILLOS = Partial lot
Selection Text: P_VETEXT = Long texts for UD
Selection Text: P_TLTEXT = Long texts for lots/part. lots
Selection Text: P_STICHP = Samples
Selection Text: P_PLVIEW = Part. lot view for prod. lots
Selection Text: P_KLASSE = Empty classes
Selection Text: P_FETEXT = Defects
Selection Text: P_EINKLA = Single values/classed values
Selection Text: P_CHTEXT = Inspection descriptions
Selection Text: P_CHLTXT = Long texts for insp. charac.
Selection Text: MATERIAL = Material
Selection Text: HERKUNFT = Origin
Selection Text: ENDTERMI = End date
Selection Text: CHARGE = Batch
Selection Text: ART = Inspection type
Title: Batch Record: Inspection Report
Text Symbol: F01 = User variant
Text Symbol: 013 = Print parameters
Text Symbol: 012 = Check using material specification
Text Symbol: 011 = Confirmation Prompt
Text Symbol: 010 = Limit your selection further?
Text Symbol: 009 = You have not entered an inspection lot.
Text Symbol: 008 = Errors found
Text Symbol: 007 = No defects found
Text Symbol: 006 = Extras
Text Symbol: 005 = Texts
Text Symbol: 004 = No plan assigned!
Text Symbol: 003 = Select inspection lots II
Text Symbol: 002 = Usage decision made
Text Symbol: 001 = No usage decision made


INCLUDES used within this REPORT PPPICPPRL

INCLUDE LQPL1TS0.


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:

RS_SET_SELSCREEN_STATUS CALL FUNCTION 'RS_SET_SELSCREEN_STATUS' EXPORTING P_STATUS = SY-PFKEY TABLES P_EXCLUDE = G_EXCL_FC_TAB.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = C_Y TEXTLINE1 = TEXT-009 TEXTLINE2 = TEXT-010 TITEL = TEXT-011 IMPORTING ANSWER = G_ANSWER.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = QALS-OBJNR I_STATUS = C_STATUS_STIP EXCEPTIONS STATUS_NOT_ACTIV = 01.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING i_objnr = qals-objnr i_status = c_status_lsto EXCEPTIONS status_not_activ = 01.

VB_CP_DATA_LOT_EXPORT CALL FUNCTION 'VB_CP_DATA_LOT_EXPORT' TABLES export_tab = itab.

QAST_STATUS_CHECK CALL FUNCTION 'QAST_STATUS_CHECK' EXPORTING I_OBJNR = QALS-OBJNR I_STATUS = C_STATUS_VE EXCEPTIONS STATUS_NOT_ACTIV = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-HERKUNFT EXCEPTIONS NOT_FOUND = 01.

TQ30_READ CALL FUNCTION 'TQ30_READ' EXPORTING I_ART = QALS-ART I_SPRACHE = SY-LANGU IMPORTING E_TQ30T = TQ30T EXCEPTIONS NO_ENTRY = 01.

CO_RM_COMPANYCODE_FIND CALL FUNCTION 'CO_RM_COMPANYCODE_FIND' EXPORTING WERKS = QALS-WERK IMPORTING COMPCODE = T001G-BUKRS EXCEPTIONS NO_ENTRY = 1 OTHERS = 2.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-VBEWERTUNG EXCEPTIONS NOT_FOUND = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QAVE-VKATART I_CODEGRUPPE = QAVE-VCODEGRP I_CODE = QAVE-VCODE I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

QAST_STATUS_CHECK * CALL FUNCTION 'QAST_STATUS_CHECK' * EXPORTING * I_OBJNR = QALT-OBJNR * I_STATUS = C_STATUS_VE * EXCEPTIONS * STATUS_NOT_ACTIV = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-VBEWERTUNG EXCEPTIONS NOT_FOUND = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QAVT-VKATART I_CODEGRUPPE = QAVT-VCODEGRP I_CODE = QAVT-VCODE I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-MBEWERTG EXCEPTIONS NOT_FOUND = 01.

QSS0_QMKST_RQMST CALL FUNCTION 'QSS0_QMKST_RQMST' EXPORTING QMKST_IMP = QMKST IMPORTING RQMST_EXP = RQMST.

TQSS1_READ CALL FUNCTION 'TQSS1_READ' EXPORTING I_WERKS = QALS-WERK IMPORTING E_TQSS1 = TQSS1 EXCEPTIONS NO_ENTRY = 01.

QAFD_TQ79_READ CALL FUNCTION 'QAFD_TQ79_READ' EXPORTING I_SLWBEZ = L_SLWBEZ IMPORTING E_TQ79 = TQ79 EXCEPTIONS NOT_FOUND = 01.

QAFD_TQ79T_READ





CALL FUNCTION 'QAFD_TQ79T_READ' EXPORTING I_SLWBEZ = L_SLWBEZ I_SPRACHE = SY-LANGU IMPORTING E_TQ79T = TQ79T EXCEPTIONS NOT_FOUND = 01.

QAPP_IP_SELECT_KEY_LONG_FIELD CALL FUNCTION 'QAPP_IP_SELECT_KEY_LONG_FIELD' EXPORTING I_QAPP = QAPP "mit dem Inhalt von QALTPP I_SLWBEZ = QALS-SLWBEZ IMPORTING E_PRUEFPKT = QAPPW-PRUEFPKT.

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 = X_QAPPUSRTAB.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-VBEWERTUNG EXCEPTIONS NOT_FOUND = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QALTPP-VKATART I_CODEGRUPPE = QALTPP-VCODEGRP I_CODE = QALTPP-VCODE I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-MBEWERTG EXCEPTIONS NOT_FOUND = 01.

QSS0_QMKST_RQMST CALL FUNCTION 'QSS0_QMKST_RQMST' EXPORTING QMKST_IMP = QMKST IMPORTING RQMST_EXP = RQMST.

TQSS1_READ CALL FUNCTION 'TQSS1_READ' EXPORTING I_WERKS = QALS-WERK IMPORTING E_TQSS1 = TQSS1 EXCEPTIONS NO_ENTRY = 01.

QAFD_TQ79_READ CALL FUNCTION 'QAFD_TQ79_READ' EXPORTING I_SLWBEZ = L_SLWBEZ IMPORTING E_TQ79 = TQ79 EXCEPTIONS NOT_FOUND = 01.

QAFD_TQ79T_READ CALL FUNCTION 'QAFD_TQ79T_READ' EXPORTING I_SLWBEZ = L_SLWBEZ I_SPRACHE = SY-LANGU IMPORTING E_TQ79T = TQ79T EXCEPTIONS NOT_FOUND = 01.

QAPP_IP_SELECT_KEY_LONG_FIELD CALL FUNCTION 'QAPP_IP_SELECT_KEY_LONG_FIELD' EXPORTING I_QAPP = QAPP I_SLWBEZ = QALS-SLWBEZ IMPORTING E_PRUEFPKT = QAPPW-PRUEFPKT.

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 = X_QAPPUSRTAB.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-VBEWERTUNG EXCEPTIONS NOT_FOUND = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QAPP-VKATART I_CODEGRUPPE = QAPP-VCODEGRP I_CODE = QAPP-VCODE I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-MBEWERTG EXCEPTIONS NOT_FOUND = 01.

QSS0_QMKST_RQMST CALL FUNCTION 'QSS0_QMKST_RQMST' EXPORTING QMKST_IMP = QMKST IMPORTING RQMST_EXP = RQMST.

QEEA_STATUS_TEXT_READING CALL FUNCTION 'QEEA_STATUS_TEXT_READING' EXPORTING I_SPRACHE = SY-LANGU I_STATUS = L_SPEC_SATZSTATUS IMPORTING E_KURZTEXT = QGRES-STATUSV EXCEPTIONS NO_ENTRY_FOUND = 01.

QEEA_STATUS_TEXT_READING CALL FUNCTION 'QEEA_STATUS_TEXT_READING' EXPORTING I_SPRACHE = SY-LANGU I_STATUS = L_RESU_SATZSTATUS IMPORTING E_KURZTEXT = QGRES-STATUSR EXCEPTIONS NO_ENTRY_FOUND = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-ATTRIBUT EXCEPTIONS NOT_FOUND = 01.

TQ11_READ CALL FUNCTION 'TQ11_READ' EXPORTING PRFQL_IMP = PI_PRUEFQUALI IMPORTING TQ11T_EXP = PE_TQ11T TQ11_EXP = PE_TQ11 EXCEPTIONS NO_ENTRY = 1 OTHERS = 2.




TQ17A_READ CALL FUNCTION 'TQ17A_READ' EXPORTING MERKKLASSE_IMP = PI_MERKGEW IMPORTING TQ17A_EXP = PE_TQ17A TQ17U_EXP = PE_TQ17U EXCEPTIONS NO_ENTRY = 1 OTHERS = 2.

TQ17_READ CALL FUNCTION 'TQ17_READ' EXPORTING FEHLKLASSE_IMP = PI_FEHLKLAS IMPORTING TQ17_EXP = PE_TQ17 TQ17T_EXP = PE_TQ17T EXCEPTIONS NO_ENTRY = 1 OTHERS = 2.

TQSS1_READ CALL FUNCTION 'TQSS1_READ' EXPORTING I_WERKS = QALS-WERK IMPORTING E_TQSS1 = TQSS1 EXCEPTIONS NO_ENTRY = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = L_RESULTTAB-KATALGART1 I_CODEGRUPPE = L_RESULTTAB-GRUPPE1 I_CODE = L_RESULTTAB-CODE1 I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODE1 EXCEPTIONS NO_MATCH_IN_RANGE = 01.

FLTP_CHAR_CONVERSION CALL FUNCTION 'FLTP_CHAR_CONVERSION' EXPORTING DECIM = L_CONVERT_DIGITS EXPON = 0 INPUT = L_CONVERT_NUMBER IVALU = L_CONVERT_NOT_INITIAL IMPORTING FLSTR = L_CONVERT_CHARACTER.

CONTROL_FORM * call function 'CONTROL_FORM' * exporting * command = l_command.

CONTROL_FORM * call function 'CONTROL_FORM' * exporting * command = l_command.

CONTROL_FORM * call function 'CONTROL_FORM' * exporting * command = l_command.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QMFEL-FEKAT I_CODEGRUPPE = QMFEL-FEGRP I_CODE = QMFEL-FECOD I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QMFEL-FEKAT I_CODEGRUPPE = QMFEL-FEGRP I_CODE = QMFEL-FECOD I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QMFEL-FEKAT I_CODEGRUPPE = QMFEL-FEGRP I_CODE = QMFEL-FECOD I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODEVE EXCEPTIONS NO_MATCH_IN_RANGE = 01.

QSS0_QMKST_RQMST CALL FUNCTION 'QSS0_QMKST_RQMST' EXPORTING QMKST_IMP = QMKST IMPORTING RQMST_EXP = RQMST.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-MBEWERTG EXCEPTIONS NOT_FOUND = 01.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-MBEWERTG EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QASE-KATALGART1 I_CODEGRUPPE = QASE-GRUPPE1 I_CODE = QASE-CODE1 I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODE1 EXCEPTIONS NO_MATCH_IN_RANGE = 1 OTHERS = 2.

GET_TEXT_DOMVALUE CALL FUNCTION 'GET_TEXT_DOMVALUE' EXPORTING DOMNAME = G_DOMNAME DOMVALUE = G_DOMVALUE LANGU = SY-LANGU IMPORTING TXT = QGRES-MBEWERTG EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QAKL-KATALOG I_CODEGRUPPE = QAKL-GRUPPE I_CODE = QAKL-CODE I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODE1 EXCEPTIONS NO_MATCH_IN_RANGE = 1 OTHERS = 2.

TQSS1_READ CALL FUNCTION 'TQSS1_READ' EXPORTING I_WERKS = QALS-WERK IMPORTING E_TQSS1 = TQSS1 EXCEPTIONS NO_ENTRY = 01.

QPK1_CODE_TEXT CALL FUNCTION 'QPK1_CODE_TEXT' EXPORTING I_KATALOGART = QASR-KATALGART1 I_CODEGRUPPE = QASR-GRUPPE1 I_CODE = QASR-CODE1 I_SPRACHE = SY-LANGU IMPORTING E_TEXT = QGRES-CODE1 EXCEPTIONS NO_MATCH_IN_RANGE = 01.

QPSD_FEATURE_VERSION_READ CALL FUNCTION 'QPSD_FEATURE_VERSION_READ' EXPORTING KZ_NICHTFREI = C_CROSS MERKMAL = P_VERWMERKM VERSION = P_MKVERSION WERK = P_QPMK_WERKS I_NO_CATALOGS = C_CROSS IMPORTING QPMT_EXP = P_QPMT EXCEPTIONS NO_FEATURE = 1 NO_FREE_VERSION = 2 NO_VERSION = 3 NO_AUTHORIZATION = 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 PPPICPPRL or its description.