SAP Reports / Programs | Quality Management | Quality Certificates | Basic Data for Certificates(QM-CA-MD) SAP QM
MQCPAF02 SAP ABAP INCLUDE - Certificate profile subroutines
MQCPAF02 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 MQCPAF02 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 MQCPAF02. "Basic submit
SUBMIT MQCPAF02 AND RETURN. "Return to original report after report execution complete
SUBMIT MQCPAF02 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Certificate profile subroutines
INCLUDES used within this REPORT MQCPAF02
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:
QELB_QCVK_SELECT CALL FUNCTION 'QELB_QCVK_SELECT' EXPORTING i_ctyp = pi_ctyp i_modus = pi_modus i_vorlnr = pi_vorlnr IMPORTING e_qcvk = pe_qcvk EXCEPTIONS no_ctyp = 03 no_data_found = 01 no_data_selected = 02 cancelled = 04 no_vorlnr = 03 internal_error = 05.
QC00_QCVK_COND_READ CALL FUNCTION 'QC00_QCVK_COND_READ' EXPORTING i_qcvk_ctyp = pi_ctyp i_qcvk_vorlnr = pi_vorlnr i_qcvk_version = pi_version i_date = pi_datum i_all_future = pi_all_future TABLES t_komi_tab = g_komi_tab EXCEPTIONS no_entry_found = 01.
QC02_STATICS_INITIALIZE CALL FUNCTION 'QC02_STATICS_INITIALIZE' EXCEPTIONS OTHERS = 0.
SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = c_charact-top_line entry_to = g_tabix_qcvmend last_page_full = ' ' loops = g_loopc * loops = sy-loopc overlapping = c_kreuz ok_code = ok-code IMPORTING entry_new = c_charact-top_line EXCEPTIONS no_entry_to = 01.
SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = shtexts-top_line entry_to = g_tabix_end last_page_full = ' ' loops = 4 overlapping = c_kreuz ok_code = ok-code IMPORTING entry_new = shtexts-top_line EXCEPTIONS no_entry_to = 01.
QELB_FORM_ELEMENTS_SELECT CALL FUNCTION 'QELB_FORM_ELEMENTS_SELECT' EXPORTING i_formular_15 = qcvkea-tdform i_language_15 = l_language EXCEPTIONS no_form = 00 " obligatory field no_data_found = 01 form_not_found = 02.
QELB_FORM_SYMBOLS_SHOW CALL FUNCTION 'QELB_FORM_SYMBOLS_SHOW' EXPORTING i_formular_symb = qcvkea-tdform i_language_symb = l_language EXCEPTIONS no_data_found = 01 form_not_found = 02.
QELB_FORM_SELECT CALL FUNCTION 'QELB_FORM_SELECT' EXPORTING i_formular = pi_tdform i_sprache = pi_tdspras i_modus = pi_modus IMPORTING e_formular = l_thead EXCEPTIONS no_data_found = 01 no_data_selected = 02.
QC00_FORM_SELECT CALL FUNCTION 'QC00_FORM_SELECT' EXPORTING i_formular = pi_tdform i_sprache = '*' EXCEPTIONS no_data_found = 01.
QC06_QCVMT_MEM_GET_ONE_CHARACT CALL FUNCTION 'QC06_QCVMT_MEM_GET_ONE_CHARACT' EXPORTING i_ctyp = qcvmea-ctyp i_vorlnr = qcvmea-vorlnr i_version = qcvmea-version i_blocknr = qcvmea-blocknr i_merkmalnr = qcvmea-merkmalnr TABLES t_qcvmtvb = g_qcvmtea EXCEPTIONS x_no_data_found = 01.
DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = c_ci_qcvm EXCEPTIONS not_found = 1 internal_error = 2 OTHERS = 3.
QC00_QCVK_GET_TEXT_KEY CALL FUNCTION 'QC00_QCVK_GET_TEXT_KEY' EXPORTING i_qcvk = l_qcvk IMPORTING e_qcvk_textkey = l_qcvk_text_key.
QSS_TEXT_PROCESSING CALL FUNCTION 'QSS_TEXT_PROCESSING' EXPORTING object = lc_textobject_qcvk schluessel = l_qcvk_text_key * sprsl = sy-langu sprsl = qcvkea-not_exist_spras textid = lc_textid_ltxt vkz = l_vkz IMPORTING action = l_action.
QC00_QCVK_GET_TEXT_KEY CALL FUNCTION 'QC00_QCVK_GET_TEXT_KEY' EXPORTING i_qcvk = l_qcvk IMPORTING e_qcvk_textkey = l_qcvk_text_key.
QSS_TEXT_PROCESSING CALL FUNCTION 'QSS_TEXT_PROCESSING' EXPORTING object = lc_textobject_qcvk schluessel = l_qcvk_text_key sprsl = p_language textid = lc_textid_ltxt vkz = l_vkz IMPORTING action = l_action.
SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING object = lc_textobject_qcvk name = l_qcvk_text_key id = lc_textid_ltxt language = '*' IMPORTING entries = l_number_of_texts EXCEPTIONS OTHERS = 0.
QC00_QCVK_GET_TEXT_KEY CALL FUNCTION 'QC00_QCVK_GET_TEXT_KEY' EXPORTING i_qcvk = l_qcvk IMPORTING e_qcvk_textkey = l_qcvk_text_key.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = lc_textid_ltxt language = qcvkea-exist_spras name = l_qcvk_text_key object = lc_textobject_qcvk IMPORTING header = l_copy_model_thead TABLES lines = l_copy_model_lines_tab EXCEPTIONS OTHERS = 1.
CALL FUNCTION 'READ_TEXT' EXPORTING id = lc_textid_ltxt language = qcvkea-not_exist_spras name = l_qcvk_text_key object = lc_textobject_qcvk IMPORTING header = l_thead TABLES lines = l_lines_tab EXCEPTIONS OTHERS = 1.
SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' EXPORTING header = l_thead insert = l_insert IMPORTING function = l_function TABLES lines = l_copy_model_lines_tab EXCEPTIONS OTHERS = 1.
QSS_TEXT_PROCESSING CALL FUNCTION 'QSS_TEXT_PROCESSING' EXPORTING object = lc_textobject_qcvk schluessel = l_qcvk_text_key sprsl = l_tdspras textid = lc_textid_ltxt vkz = l_vkz IMPORTING action = l_action.
SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING object = lc_textobject_qcvk name = l_qcvk_text_key id = lc_textid_ltxt language = '*' IMPORTING entries = l_number_of_texts EXCEPTIONS OTHERS = 0.
FUNCTION_EXECUTE CALL FUNCTION 'FUNCTION_EXECUTE' EXPORTING funktion = ok-code funktionstyp = c_185f_sofort kopfgruppe = l_kopgr positionsgruppe = g_dynpro programm = g_repid IMPORTING folgefunktion = ok-code leave_screen = g_leave_screen.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_prog dynumb = l_dnum translate_to_upper = c_kreuz TABLES dynpfields = l_dynpfield_tab 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 = l_prog dynumb = l_dnum TABLES dynpfields = l_dynpfield_tab EXCEPTIONS invalid_abapworkarea = 00 invalid_dynprofield = 00 invalid_dynproname = 00 invalid_dynpronummer = 00 invalid_request = 00 no_fielddescription = 00 undefind_error = 00.
QC00_QCVK_GET_TEXT_KEY CALL FUNCTION 'QC00_QCVK_GET_TEXT_KEY' EXPORTING i_qcvk = *qcvk IMPORTING e_qcvk_textkey = l_qcvk_text_key.
SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING id = lc_textid_ltxt language = c_stern name = l_qcvk_text_key object = lc_textobject_qcvk TABLES selections = l_thead_tab EXCEPTIONS wrong_access_to_archive = 01.
QC00_QCVK_GET_TEXT_KEY CALL FUNCTION 'QC00_QCVK_GET_TEXT_KEY' EXPORTING i_qcvk = l_qcvk_new IMPORTING e_qcvk_textkey = l_qcvk_text_key_new.
QSS_TEXT_PROCESSING CALL FUNCTION 'QSS_TEXT_PROCESSING' EXPORTING object = lc_textobject_qcvk object_neu = lc_textobject_qcvk schluessel = l_qcvk_text_key schluessel_neu = l_qcvk_text_key_new sprsl = l_thead_tab-tdspras textid = lc_textid_ltxt textid_neu = lc_textid_ltxt vkz = lc_vkz_kp.
STATUS_OBJECT_CREATE CALL FUNCTION 'STATUS_OBJECT_CREATE' EXPORTING chgkz = c_kreuz obtyp = qcvkea-obtyp stsma = qcvkea-stsma IMPORTING objnr = qcvkea-objnr.
QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING i_objnr = qcvkea-objnr i_vorgang = c_vorg_anlegen EXCEPTIONS not_allowed = 01.
QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING i_objnr = qcvkea-objnr i_vorgang = c_vorg_freigeben EXCEPTIONS not_allowed = 01.
QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING i_check_only = c_kreuz i_objnr = qcvkea-objnr i_vorgang = c_vorg_sperren EXCEPTIONS not_allowed = 01.
QAST_PROCESS_ACTIVITY CALL FUNCTION 'QAST_PROCESS_ACTIVITY' EXPORTING i_objnr = qcvkea-objnr i_vorgang = c_vorg_sperren EXCEPTIONS not_allowed = 01.
QAUT_CHECK_TCODE CALL FUNCTION 'QAUT_CHECK_TCODE' EXPORTING i_tcode = c_tcode_zuordnungen EXCEPTIONS OTHERS = 1.
QAST_STATUS_MAINTAIN CALL FUNCTION 'QAST_STATUS_MAINTAIN' EXPORTING i_display_only = l_display_only i_objnr = qcvkea-objnr.
STATUS_READ CALL FUNCTION 'STATUS_READ' EXPORTING objnr = qcvkea-objnr IMPORTING stsma = qcvkea-stsma EXCEPTIONS object_not_found = 0 OTHERS = 0.
OBJECT_KEY_PUT_QCVK CALL FUNCTION 'OBJECT_KEY_PUT_QCVK' EXPORTING i_qcvk = l_qcvk.
QSS1_FEAT_SHOW CALL FUNCTION 'QSS1_FEAT_SHOW' EXPORTING i_merkmal = qcvmea-mkmnr i_version = l_versionmk i_werk = qcvmea-zaehler EXCEPTIONS no_feature = 01.
UNIT_CONVERSION_SIMPLE CALL FUNCTION 'UNIT_CONVERSION_SIMPLE' EXPORTING input = lcf_eins unit_in = l_unit_old unit_out = l_unit_new IMPORTING output = lf_dummy EXCEPTIONS conversion_not_found = 01 overflow = 02.
UNIT_OF_MEASUREMENT_HELP CALL FUNCTION 'UNIT_OF_MEASUREMENT_HELP' EXPORTING business_uom = ' ' cucol = 0 curow = 0 dimid = ' ' display = l_indicator_show language = sy-langu select_unit_extern = ' ' select_unit_long = c_kreuz IMPORTING select_unit = qcvmea-unit6.
UNIT_OF_MEASUREMENT_HELP CALL FUNCTION 'UNIT_OF_MEASUREMENT_HELP' EXPORTING business_uom = ' ' cucol = 0 curow = 0 dimid = ' ' display = l_indicator_show language = sy-langu select_unit_extern = ' ' select_unit_long = c_kreuz IMPORTING select_unit = qcvmea-unit6.
CTUT_FEATURE_DATA CALL FUNCTION 'CTUT_FEATURE_DATA' EXPORTING feature_neutral_name = qcvmea-atnam key_date = sy-datum IMPORTING ecabn = cabn EXCEPTIONS OTHERS = 01.
CTRE_READ_TCMS CALL FUNCTION 'CTRE_READ_TCMS' EXPORTING language = sy-langu status = cabn-atmst IMPORTING tcms_exp = tcms EXCEPTIONS OTHERS = 01.
CTMS_GET_CHARACTERISTICS CALL FUNCTION 'CTMS_GET_CHARACTERISTICS' EXPORTING language = sy-langu mode = ' ' TABLES characteristics = g_atinn_tab imp_cabn = g_cabn_tab imp_cabnt = g_cabnt_tab imp_cawn = g_cawn_tab imp_cawnt = g_cawnt_tab.
QELB_FORM_CHAR_ELEMENTS_SELECT CALL FUNCTION 'QELB_FORM_CHAR_ELEMENTS_SELECT' EXPORTING i_formular_16 = qcvkea-tdform i_modus = l_modus IMPORTING e_char_element = qcvmea-text_elem EXCEPTIONS no_data_selected = 01 no_data_found = 02 form_not_found = 03.
QPSD_FEATURE_LIST CALL FUNCTION 'QPSD_FEATURE_LIST' EXPORTING i_werks = p_zaehler_qcvm i_mkmnr = p_mkmnr_qcvm i_qmastmod = c_auth_displ_char IMPORTING e_subrc = l_subrc e_merkmal = l_merkmal e_version = l_version.
SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = batchmat-top_line entry_to = g_tabix_end_batchmat last_page_full = ' ' loops = 5 overlapping = c_kreuz ok_code = ok-code IMPORTING entry_new = batchmat-top_line EXCEPTIONS no_entry_to = 01.
SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = lotmat-top_line entry_to = g_tabix_end_lotmat last_page_full = ' ' loops = 5 overlapping = c_kreuz ok_code = ok-code IMPORTING entry_new = lotmat-top_line EXCEPTIONS no_entry_to = 01.
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 MQCPAF02 or its description.