SAP Reports / Programs | Patient Accounting | SAP Healthcare - Industry-Specific Components for Hospitals | Patient Accounting(IS-H-PA) SAP IS

RNPAYDISTF01 SAP ABAP INCLUDE - documentation and ABAP source code







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

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:

ENQUEUE_ENFAL call function 'ENQUEUE_ENFAL' exporting einri = g_einri falnr = g_falnr _scope = '3' exceptions foreign_lock = 4 system_failure = 12.

DEQUEUE_ENFAL call function 'DEQUEUE_ENFAL' exporting einri = g_einri falnr = g_falnr _scope = '3'.

CONVERT_DATE_TO_EXTERNAL call function 'CONVERT_DATE_TO_EXTERNAL' exporting date_internal = g_abdat importing date_external = l_datum exceptions date_internal_is_invalid = 1 others = 2.

LVC_FIELDCATALOG_MERGE call function 'LVC_FIELDCATALOG_MERGE' exporting i_structure_name = 'NLEI' i_bypassing_buffer = 'X' changing ct_fieldcat = gt_fieldcat[] exceptions inconsistent_interface = 1 program_error = 2 others = 3.

CONVERSION_EXIT_ALPHA_OUTPUT call function 'CONVERSION_EXIT_ALPHA_OUTPUT' exporting input = g_vtyp_hea_200-falnr importing output = l_falnr.

CONVERSION_EXIT_ALPHA_OUTPUT call function 'CONVERSION_EXIT_ALPHA_OUTPUT' exporting input = g_vtyp_hea_200-falnr importing output = l_falnr.

CONVERSION_EXIT_ALPHA_OUTPUT call function 'CONVERSION_EXIT_ALPHA_OUTPUT' exporting input = g_vtyp_hea_200-kostr importing output = l_kostr.

ISH_INSURANCE_CONTRACT_SCHEMES call function 'ISH_INSURANCE_CONTRACT_SCHEMES' exporting ss_einri = g_vtyp_hea_200-einri ss_falnr = g_vtyp_hea_200-falnr ss_lfdnr = g_vtyp_hea_200-lfdnr ss_vtrty = g_vtyp_hea_200-vtrty ss_vcode = l_vcode exceptions others = 1.

ISH_CONTRACT_SCHEMES_CHECK_CHG call function 'ISH_CONTRACT_SCHEMES_CHECK_CHG' exporting ss_einri = g_vtyp_hea_200-einri ss_falnr = g_vtyp_hea_200-falnr ss_vcode = l_vcode importing ss_all_saved = l_vtyp_saved exceptions others = 1.

ISH_CONTRACT_SCHEMES_CHECK call function 'ISH_CONTRACT_SCHEMES_CHECK' exporting ss_patnr = gs_npat-patnr ss_einri = g_vtyp_hea_200-einri ss_falnr = g_vtyp_hea_200-falnr ss_action = 'S' ss_calup = 'INSREL' importing ss_retmaxtype = l_retmaxtype tables ss_return = lt_return.

ISH_CONTRACT_SCHEMES_SAVE call function 'ISH_CONTRACT_SCHEMES_SAVE' exporting ss_patnr = gs_npat-patnr ss_einri = g_vtyp_hea_200-einri ss_falnr = g_vtyp_hea_200-falnr ss_calup = 'INSREL' importing ss_retmaxtype = l_retmaxtype ss_changed = l_upd_nvvv tables ss_return = lt_return.

HELP_OBJECT_SHOW call function 'HELP_OBJECT_SHOW' exporting dokclass = 'RE' dokname = 'RNPAYDIST' tables links = l_links exceptions others = 0.

POPUP_TO_CONFIRM_LOSS_OF_DATA call function 'POPUP_TO_CONFIRM_LOSS_OF_DATA' exporting textline1 = l_string1 titel = l_title importing answer = p_reply.

POPUP_TO_CONFIRM_LOSS_OF_DATA call function 'POPUP_TO_CONFIRM_LOSS_OF_DATA' exporting textline1 = l_string1 titel = l_title importing answer = l_reply.

ISH_NVVQ_POOL_GET call function 'ISH_NVVQ_POOL_GET' exporting ss_einri = g_einri ss_falnr = g_falnr * ss_read_db = tables ss_vnvvq_curr = lt_nvvq.

ISH_NVVQ_POOL_CHCKCHNG call function 'ISH_NVVQ_POOL_CHCKCHNG' exporting ss_einri = g_einri ss_falnr = g_falnr importing ss_changes = p_changed.

ISH_NVVQ_POOL_SAVE call function 'ISH_NVVQ_POOL_SAVE' exporting ss_einri = g_einri ss_falnr = g_falnr ss_refresh = on " refresh nvvq pool importing ss_retmaxtype = l_retmaxtype tables * ss_vnvvq_curr = * ss_nvvq_daba = ss_return = lt_return.

ISH_GET_QUANTITY_SERVICES call function 'ISH_GET_QUANTITY_SERVICES' exporting aufdt = p_stay-aufdt aufzt = p_stay-aufzt begdt = p_vnlei-ibgdt begzt = p_vnlei-ibzt einri = p_vnlei-einri enddt = l_enddt endzt = l_endzt etlart = p_stay-enart etldt = p_stay-entdt etlzt = p_stay-entzt falnr = p_vnlei-falnr nbgdt = p_vnlei-nbgdt nbgzt = p_vnlei-nbgzt s_param = p_vnlei-bform talst = p_vnlei-leist tarid = p_vnlei-haust importing quantity = p_meng exceptions aufdt_gt_begdt = 1 auf_gt_etl = 2 begdt_gt_enddt = 3 etldt_lt_enddt = 4 invalid_einri = 5 invalid_s_param = 6 others = 7.

SXC_EXIT_CHECK_ACTIVE





call function 'SXC_EXIT_CHECK_ACTIVE' exporting exit_name = g_exit_name exceptions not_active = 1 others = 2.

ISH_READ_TN16_TN16P call function 'ISH_READ_TN16_TN16P' exporting ss_einri = p_einri ss_vtrty = p_vtrty ss_falnr = p_falnr ss_lfdnr = p_lfdnr ss_with_individual = 'X' importing ss_tn16_e = l_tn16 ss_tn16u = l_tn16u tables ss_itn16p_e = lt_tn16p exceptions not_found = 1 others = 3.

POPUP_TO_CONFIRM_STEP call function 'POPUP_TO_CONFIRM_STEP' exporting defaultoption = 'Y' textline1 = p_pop-text1 textline2 = p_pop-text2 titel = p_pop-title importing answer = p_pop-answer.

TR_SYS_PARAMS call function 'TR_SYS_PARAMS' importing systemtype = l_stype.

CONVERSION_EXIT_ALPHA_OUTPUT call function 'CONVERSION_EXIT_ALPHA_OUTPUT' exporting input = g_vtyp_hea_200-falnr importing output = l_falnr.

CONVERSION_EXIT_ALPHA_OUTPUT call function 'CONVERSION_EXIT_ALPHA_OUTPUT' exporting input = g_vtyp_hea_200-kostr importing output = l_kostr.

ISH_NVVQ_POOL_GET call function 'ISH_NVVQ_POOL_GET' exporting ss_einri = p_einri ss_falnr = p_falnr * ss_read_db = tables ss_vnvvq_curr = gt_nvvq ss_nvvq_daba = gt_nvvq_db.

ISH_NVVQ_POOL_SET call function 'ISH_NVVQ_POOL_SET' exporting ss_einri = p_einri ss_falnr = p_falnr * ss_saved = tables ss_vnvvq_curr = gt_nvvq ss_nvvq_daba = gt_nvvq_db.

ISH_VERBUCHER_NVVQ call function 'ISH_VERBUCHER_NVVQ' exporting datum = sy-datum tcode = sy-tcode uname = sy-uname uzeit = sy-uzeit tables xnvvq = lt_vnvvq.

ISH_NVVQ_POOL_GET call function 'ISH_NVVQ_POOL_GET' exporting ss_einri = p_einri ss_falnr = p_falnr * ss_read_db = tables ss_vnvvq_curr = pt_vnvvq.

ISH_VERBUCHER_NVVV call function 'ISH_VERBUCHER_NVVV' exporting einri = p_einri patnr = p_patnr falnr = p_falnr tables xnvvv = pt_vnvvv xnvvw = pt_vnvvw.

ISH_HELP_REQUEST call function 'ISH_HELP_REQUEST' exporting ss_object = l_object ss_popup = on exceptions others = 1.

CONVERT_TO_FOREIGN_CURRENCY call function 'CONVERT_TO_FOREIGN_CURRENCY' exporting date = p_date foreign_currency = p_twaers local_amount = p_amount local_currency = p_fwaers * RATE = 0 * TYPE_OF_RATE = 'M' importing * EXCHANGE_RATE = foreign_amount = amount * FOREIGN_FACTOR = * LOCAL_FACTOR = * EXCHANGE_RATEX = * DERIVED_RATE_TYPE = * FIXED_RATE = exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 others = 6.

ISH_NVVQ_POOL_GET call function 'ISH_NVVQ_POOL_GET' exporting ss_einri = p_einri ss_falnr = p_falnr * ss_read_db = tables ss_vnvvq_curr = gt_nvvq.



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