SAP Reports / Programs | Invoicing | SAP Utilities | Invoicing(IS-U-IN) SAP IS

MEAPRIN0 SAP ABAP INCLUDE - Forms for printing of print document







MEAPRIN0 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 MEAPRIN0 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 MEAPRIN0. "Basic submit
SUBMIT MEAPRIN0 AND RETURN. "Return to original report after report execution complete
SUBMIT MEAPRIN0 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Forms for printing of print document


INCLUDES used within this REPORT MEAPRIN0

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:

ISU_DB_EITERDK_UPDATE call function 'ISU_DB_EITERDK_UPDATE' exporting x_eiterdk = p_eiterdk x_upd_mode = co_upd_delete exceptions others = 1.

ISU_DB_BUF_ERDK_UPDATE CALL FUNCTION 'ISU_DB_BUF_ERDK_UPDATE' EXPORTING x_erdk = wa_print_doc-erdk x_upd_mode = co_upd_update exceptions others = 1.

FKK_SET_DUNNING_PRINT_DATA call function 'FKK_SET_DUNNING_PRINT_DATA' exporting x_applk = co_applk_isu x_laufd = wa_print_doc-erdk-budat x_mdrkd = sy-datum x_gpart = wa_print_doc-erdk-partner x_vkont = wa_print_doc-erdk-vkont x_mazae = wa_print_doc-erdk-mazae exceptions not_found = 1 others = 2.

FKK_SET_DUNNING_PRINT_DATA call function 'FKK_SET_DUNNING_PRINT_DATA' exporting x_applk = co_applk_isu x_laufd = wa_print_doc-erdk-budat x_mdrkd = sy-datum x_gpart = wa_print_doc-erdk-partner x_vkont = wa_print_doc-erdk-vkont x_mazae = wa_print_doc-erdk-mazae_abs exceptions not_found = 1 others = 2.

ISU_DB_SET_PRINTED_TO_COLLBILL call function 'ISU_DB_SET_PRINTED_TO_COLLBILL' exporting x_opbel = p_eiterdk-opbel exceptions not_found = 1 others = 2.

ISU_DB_BUF_PRINT_DOC_SINGLE CALL FUNCTION 'ISU_DB_BUF_PRINT_DOC_SINGLE' EXPORTING x_opbel = p_opbel IMPORTING y_print_doc = wa_print_doc y_buf_complete = l_buf_complete EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 OTHERS = 4.

ISU_DB_PRINT_DOC_SINGLE call function 'ISU_DB_PRINT_DOC_SINGLE' exporting x_opbel = p_opbel * X_ACTUAL = importing y_print_doc = wa_print_doc exceptions not_found = 1 not_qualified = 2 system_error = 3 others = 4.

ISU_EXPORT_PRINTDOC_TO_MEM call function 'ISU_EXPORT_PRINTDOC_TO_MEM' exporting x_print_doc = wa_print_doc.

EFG_DB_EFRM_SELECT call function 'EFG_DB_EFRM_SELECT' exporting * X_CLIENT = SY-MANDT x_formkey = p_eiterdk-formkey * X_ACTUAL = ' ' * X_LANGU = SY-LANGU importing y_efrm = h_efrm * TABLES * YT_EFRMSTR = * YT_EFRMTE = * YT_EFRMSTRTE = exceptions not_found = 1 not_qualified = 4 others = 5.

GET_JOB_RUNTIME_INFO call function 'GET_JOB_RUNTIME_INFO' importing * EVENTID = * EVENTPARM = * EXTERNAL_PROGRAM_ACTIVE = jobcount = l_jobcount jobname = l_jobname * STEPCOUNT = exceptions no_runtime_info = 1 others = 2.

EFG_GET_ARCHIVE_PARAMS call function 'EFG_GET_ARCHIVE_PARAMS' exporting x_sap_object = co_objtype_printdoc x_ar_object = co_bill_doc_typ * X_OBJECT_ID = importing y_archive_params = p_print_obj-archive_params y_archive_index = p_print_obj-archive_index exceptions others = 1.

ISU_S_ERDK_SELECT_ALL call function 'ISU_S_ERDK_SELECT_ALL' exporting * X_ABDATE = * X_MAXCOUNT = 0 * X_SORT = * X_ACTUAL = x_simulated = l_simulated x_invoiced = l_invoiced x_tobreleasd = l_tobreleased * IMPORTING * Y_COUNT = * Y_OVERFLOW = * Y_ERDK = TABLES * xt_opbel = * XT_PARTNER = * XT_VKONT = * XT_PORTION = * XT_FIKEY = * XT_ABRVORG = * xt_ergrd = * XT_DRUCKDAT = * XT_ABWVK = xt_abwbl = lt_abwbl yt_erdk = lt_erdk exceptions not_found = 1 not_qualified = 2 system_error = 3 others = 4.

ISU_DB_PRINT_DOC_SINGLE call function 'ISU_DB_PRINT_DOC_SINGLE' exporting x_opbel = wa_erdk-opbel * X_ACTUAL = importing y_print_doc = wa_print_doc exceptions not_found = 1 not_qualified = 2 system_error = 3 others = 4.

BCONTACT_CREATE_FROM_FORM call function 'BCONTACT_CREATE_FROM_FORM' exporting x_formkey = p_print_obj-printpar-formkey x_formclass = p_print_obj-printpar-formclass x_partner = p_eiterdk-partner * X_ALTPARTNER = * X_CTDATE = * X_CTTIME = * IMPORTING * Y_NEW_BCONT = TABLES xt_objects = lt_objects * YT_NEW_BCONTO = exceptions general_fault = 1 not_authorized = 2 others = 3.

ISU_CLEAR_PRINTDOC_MEM call function 'ISU_CLEAR_PRINTDOC_MEM' .

ISU_DB_TE564_SINGLE call function 'ISU_DB_TE564_SINGLE' importing y_te564 = p_te564 exceptions not_found = 1 system_error = 2 others = 3.

EFG_DB_EFRM_SELECT call function 'EFG_DB_EFRM_SELECT' exporting * X_CLIENT = SY-MANDT x_formkey = wa_print_doc-erdk-formkey * X_ACTUAL = ' ' * X_LANGU = SY-LANGU importing y_efrm = h_efrm * TABLES * YT_EFRMSTR = * YT_EFRMTE = * YT_EFRMSTRTE = exceptions not_found = 1 not_qualified = 4 others = 5.

ISU_PRINT_EXPANDED call function 'ISU_PRINT_EXPANDED' exporting x_printparams = p_print_obj-printpar x_archive_params = p_print_obj-archive_params x_archive_index = p_print_obj-archive_index x_recipient = p_print_obj-recipient tables xt_ranges = h_sel * XT_RANGES1 = * XT_RANGES2 = * XT_RANGES3 = * XT_RANGES4 = * XT_RANGES5 = * XT_RANGES6 = * XT_RANGES7 = * XT_RANGES8 = * XT_RANGES9 = xt_addressdata = p_print_obj-t_addressdata exceptions failed = 1 others = 2.

ISU_DB_PRINT_DOC_SINGLE





call function 'ISU_DB_PRINT_DOC_SINGLE' exporting x_opbel = p_opbel * X_ACTUAL = * X_ARCHIVE_ACCESS = importing y_print_doc = l_c_print_doc exceptions not_found = 1 not_qualified = 2 system_error = 3 others = 4.

ISU_EXPORT_PRINTDOC_TO_MEM call function 'ISU_EXPORT_PRINTDOC_TO_MEM' exporting x_print_doc = l_c_print_doc.

ISU_DB_PRINT_DOC_ABWBL * call function 'ISU_DB_PRINT_DOC_ABWBL' * exporting ** X_MAXCOUNT = 0 ** X_SORT = ** X_ACTUAL = ** X_ARCHIVE_ACCESS = * x_abwbl = wa_erdb-invopbel * tables * yt_print_doc = lt_print_doc * exceptions * not_found = 1 * not_qualified = 2 * system_error = 3 * others = 4.

ISU_DB_ERDK_SELECT call function 'ISU_DB_ERDK_SELECT' tables xt_abwbl = tab_abwbl yt_erdk = lt_erdk exceptions not_found = 1 system_error = 2 not_qualified = 3 others = 4.

ISU_EXPORT_PRINTDOC_TO_MEM call function 'ISU_EXPORT_PRINTDOC_TO_MEM' exporting x_print_doc = l_print_doc.

ISU_CLEAR_PRINTDOC_MEM call function 'ISU_CLEAR_PRINTDOC_MEM' .

EFG_DB_EFRM_SELECT call function 'EFG_DB_EFRM_SELECT' exporting * X_CLIENT = SY-MANDT x_formkey = wa_print_doc-erdk-formkey * X_ACTUAL = ' ' * X_LANGU = SY-LANGU importing y_efrm = h_efrm * TABLES * YT_EFRMSTR = * YT_EFRMTE = * YT_EFRMSTRTE = exceptions not_found = 1 not_qualified = 4 others = 5.

ISU_GET_ACC_ADRESS_DATA call function 'ISU_GET_ACC_ADRESS_DATA' exporting x_doc_type = '3' x_vkont = wa_print_doc-erdk-vkont tables yt_addressdata = lt_addressdata exceptions not_found = 1 others = 4.

ISU_DB_PRINT_DOC_SINGLE call function 'ISU_DB_PRINT_DOC_SINGLE' exporting x_opbel = wa_print_doc-erdk-opbel importing y_print_doc = wa_print_doc exceptions not_found = 1 not_qualified = 2 system_error = 3 others = 4.

ISU_EXPORT_PRINTDOC_TO_MEM call function 'ISU_EXPORT_PRINTDOC_TO_MEM' exporting x_print_doc = wa_print_doc.

ISU_PRINT_EXPANDED call function 'ISU_PRINT_EXPANDED' exporting x_printparams = p_print_obj-printpar x_archive_params = p_print_obj-archive_params x_archive_index = p_print_obj-archive_index x_recipient = p_print_obj-recipient tables xt_ranges = h_sel * XT_RANGES1 = * XT_RANGES2 = * XT_RANGES3 = * XT_RANGES4 = * XT_RANGES5 = * XT_RANGES6 = * XT_RANGES7 = * XT_RANGES8 = * XT_RANGES9 = xt_addressdata = lt_addressdata exceptions failed = 1 others = 2.

ISU_DB_EITERDK_UPDATE call function 'ISU_DB_EITERDK_UPDATE' exporting x_eiterdk = p_eiterdk x_upd_mode = co_upd_delete exceptions others = 1.

ISU_DB_PRINT_DOC_UPDATE * call function 'ISU_DB_PRINT_DOC_UPDATE' * exporting * x_print_doc = wa_print_doc * x_upd_mode = co_upd_update * exceptions * others = 1.

ISU_DB_ERDK_UPDATE call function 'ISU_DB_ERDK_UPDATE' "n957403 exporting x_erdk = wa_print_doc-erdk x_upd_mode = co_upd_update.

FKK_SET_DUNNING_PRINT_DATA call function 'FKK_SET_DUNNING_PRINT_DATA' exporting x_applk = co_applk_isu x_laufd = wa_print_doc-erdk-budat x_mdrkd = sy-datum x_gpart = wa_print_doc-erdk-partner x_vkont = wa_print_doc-erdk-vkont x_mazae = wa_print_doc-erdk-mazae exceptions not_found = 1 others = 2.

FKK_SET_DUNNING_PRINT_DATA call function 'FKK_SET_DUNNING_PRINT_DATA' exporting x_applk = co_applk_isu x_laufd = wa_print_doc-erdk-budat x_mdrkd = sy-datum x_gpart = wa_print_doc-erdk-partner x_vkont = wa_print_doc-erdk-vkont x_mazae = wa_print_doc-erdk-mazae_abs exceptions not_found = 1 others = 2.

FKK_FUNC_MODULE_DETERMINE call function 'FKK_FUNC_MODULE_DETERMINE' exporting i_fbeve = 'R439' i_applk = co_applk_isu tables t_fbstab = t_fbstab exceptions error_message = 1.

ISU_SAMPLE_R439 if 1 = 2. call function 'ISU_SAMPLE_R439'. endif.

ISU_MASTER_DATA_ENQUEUE call function 'ISU_MASTER_DATA_ENQUEUE' exporting x_objtype = 'EKUN' tables xt_keys = p_xt_ekun exceptions foreign_lock = 1 system_failure = 2 others = 3.

FKK_FUNC_MODULE_DETERMINE call function 'FKK_FUNC_MODULE_DETERMINE' exporting i_fbeve = 'R390' i_applk = co_applk_isu tables t_fbstab = t_fbstab exceptions error_message = 1.




ISU_SAMPLE_R390 if 1 = 2. call function 'ISU_SAMPLE_R390'. endif.

FKK_FUNC_MODULE_DETERMINE call function 'FKK_FUNC_MODULE_DETERMINE' exporting i_fbeve = 'R395' i_applk = co_applk_isu tables t_fbstab = t_fbstab exceptions error_message = 1.

ISU_SAMPLE_R395 if 1 = 2. call function 'ISU_SAMPLE_R395'. endif.

FKK_FUNC_MODULE_DETERMINE call function 'FKK_FUNC_MODULE_DETERMINE' exporting i_fbeve = 'R394' i_applk = co_applk_isu tables t_fbstab = t_fbstab exceptions error_message = 1.

ISU_DB_BUF_ERDK_UPDATE call function 'ISU_DB_BUF_ERDK_UPDATE' "TB exporting x_erdk = wa_print_doc-erdk x_upd_mode = co_upd_update exceptions others = 1.

ISU_SAMPLE_R394 if 1 = 2. call function 'ISU_SAMPLE_R394'. endif.

ISU_DB_ERDB_SELECT_DOC_KK call function 'ISU_DB_ERDB_SELECT_DOC_KK' exporting x_invopbel = wa_erdb-invopbel tables yt_erdb = lt_erdb exceptions not_found = 1 system_error = 2 others = 3.

ISU_DB_ERDK_SINGLE call function 'ISU_DB_ERDK_SINGLE' exporting x_opbel = lt_erdb-opbel importing y_erdk = l_erdk exceptions not_found = 1 not_qualified = 2 system_error = 3 others = 4.

FKK_FUNC_MODULE_DETERMINE call function 'FKK_FUNC_MODULE_DETERMINE' exporting i_fbeve = 'R438' i_applk = co_applk_isu tables t_fbstab = t_fbstab exceptions error_message = 1.

ISU_SAMPLE_R438 if 1 = 2. call function 'ISU_SAMPLE_R438'. endif.

FREE_SELECTIONS_WHERE_2_EX call function 'FREE_SELECTIONS_WHERE_2_EX' exporting where_clauses = lt_where importing expressions = lt_expr exceptions incorrect_expression = 1 others = 2.

EFG_PP_CONVERT_FROM_XML call function 'EFG_PP_CONVERT_FROM_XML' exporting x_xstring = p_xstr_params importing y_printparams = p_printparams exceptions not_qualified = 1 failed = 2 others = 3.

EFG_PP_CONVERT_TO_XML call function 'EFG_PP_CONVERT_TO_XML' exporting x_printparams = p_printparams importing y_xstring = p_xstr_params.

EMMA_LOG_PROCESS_END call function 'EMMA_LOG_PROCESS_END' exporting iv_bparea = gc_bpa_in iv_bpcode = gc_bpc_in_print iv_tcode = x_tcode iv_main_bus_objtype = x_objtype iv_main_bus_objkey = x_objkey iv_massprocess = co_true iv_db_update = l_no_massact "n916718 iv_runmode = l_run_mode exceptions bparea_not_found = 1 bparea_meas_inactive = 2 bpcode_not_found = 3 system_error = 4 others = 5.

FKK_FUNC_MODULE_DETERMINE call function 'FKK_FUNC_MODULE_DETERMINE' exporting i_fbeve = 'R392' i_applk = co_applk_isu tables t_fbstab = t_fbstab exceptions error_message = 1.

ISU_SAMPLE_R392 if 1 = 2. call function 'ISU_SAMPLE_R392'. endif.

ISU_MASTER_DATA_ENQUEUE call function 'ISU_MASTER_DATA_ENQUEUE' exporting x_objtype = 'FKKVKP' x_shared = shared tables xt_keys = t_keys exceptions foreign_lock = 1 system_failure = 2 others = 3.

ISU_SUPPRESS_EMMA_SUCCESS call function 'ISU_SUPPRESS_EMMA_SUCCESS' exporting x_bpcode = gc_bpc_in_print x_tcode = x_tcode x_mass_proc = co_true * X_LOG_INFO = exceptions general_fault = 1 others = 2.

ISU_GET_EMMA_SUPPRESS call function 'ISU_GET_EMMA_SUPPRESS' exporting x_bpcode = gc_bpc_in_print x_tcode = x_tcode x_mass_proc = co_true importing y_suppress = l_suppress exceptions general_fault = 1 others = 2.

ISU_INV_ACCOUNT_BUFFER_INIT CALL FUNCTION 'ISU_INV_ACCOUNT_BUFFER_INIT' TABLES xt_eiterdk = xt_eiterdk.

ISU_INV_BUPA_BUFFER_INIT CALL FUNCTION 'ISU_INV_BUPA_BUFFER_INIT' TABLES xt_eiterdk = xt_eiterdk.

ISU_INV_FKKLOCK_RANGE_VAL_SET CALL FUNCTION 'ISU_INV_FKKLOCK_RANGE_VAL_SET' TABLES xt_eiterdk = xt_eiterdk.

ISU_INV_PRINT_DOC_BUFFER_INIT CALL FUNCTION 'ISU_INV_PRINT_DOC_BUFFER_INIT' TABLES xt_eiterdk = xt_eiterdk EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 error_message = 4 OTHERS = 5.

ISU_S_EITERDK_SELECT_ALL CALL FUNCTION 'ISU_S_EITERDK_SELECT_ALL' EXPORTING x_simulated = x_simu x_invoiced = x_invoiced x_tobreleasd = x_tobrelsd x_coll_bill = x_coll_bill x_where = x_where TABLES xt_vkont = rt_vkont xt_portion = rt_portion xt_abrvorg = rt_abrvorg xt_ergrd = rt_ergrd xt_abwvk = rt_abwvk yt_eiterdk = lt_eiterdk EXCEPTIONS not_found = 1 system_error = 2 not_qualified = 3 OTHERS = 4.

ISU_DB_ERDK_SINGLE CALL FUNCTION 'ISU_DB_ERDK_SINGLE' EXPORTING x_opbel = x_eiterdk-opbel IMPORTING y_erdk = l_erdk EXCEPTIONS not_found = 1 not_qualified = 2 system_error = 3 OTHERS = 4.



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