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

RNALLF01 SAP ABAP INCLUDE - IS-H: Include for FORM Routines Charge Proposal (Report RNALL001)







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


Text pool values


Title: IS-H: Include for FORM Routines Charge Proposal (Report RNALL001)


INCLUDES used within this REPORT RNALLF01

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:

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.

ISH_SHOW_FP_SE_NICP CALL FUNCTION 'ISH_SHOW_FP_SE_NICP' EXPORTING einri = einri infal = infal messages_collect = 'X' messages_show = ' ' stichtag = sy-datum * IMPORTING * ERRORS = * WARNINGS = TABLES efpse = fal_efpse inlei = fal_nlei india = fal_ndia irnicp = fal_nicp ivnbew = fal_nbew EXCEPTIONS error = 01.

ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_einri = einri ss_patnr = ftab-patnr ss_read_db = 'X' IMPORTING ss_npat = npat EXCEPTIONS OTHERS = 04.

ISH_NPAT_CONCATENATE CALL FUNCTION 'ISH_NPAT_CONCATENATE' "4.01

ISH_READ_NTPT CALL FUNCTION 'ISH_READ_NTPT' EXPORTING einri = einri * SPRAS = SY-LANGU talst = inicp-icpml tarif = inicp-icpmk IMPORTING e_ntpt = intpt EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_READ_NTPK_NTPT_NEW * CALL FUNCTION 'ISH_READ_NTPK_NTPT_NEW' * EXPORTING * BEGDT = SY-DATUM * EINRI = EINRI * ENDDT = SY-DATUM * SPRAS = SY-LANGU * TALST = $NLOP-ICPML * TARIF = $NLOP-ICPMK * IMPORTING * E_NTPK = INTPK * E_NTPT = INTPT * EXCEPTIONS * MISSING_DATA = 01 * NO_NTPK_NTPT_FOUND = 02.

ISH_READ_NTPT CALL FUNCTION 'ISH_READ_NTPT' EXPORTING einri = einri * SPRAS = SY-LANGU talst = efpse-leist tarif = efpse-tarif IMPORTING e_ntpt = intpt EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_READ_NTPK_NTPT_NEW CALL FUNCTION 'ISH_READ_NTPK_NTPT_NEW' EXPORTING begdt = hi_date "19.12.97

ISH_READ_NTPKD CALL FUNCTION 'ISH_READ_NTPKD' EXPORTING begdt = sy-datum "!!?? einri = einri enddt = sy-datum "!!?? enzky = intpk-enzky talst = efpse-leist tarif = efpse-tarif IMPORTING * E_NTPKD = gvd = i_gvd * GVDI = * NVD = * NVDI = EXCEPTIONS missing_data = 01 no_ntpkd_found = 02 OTHERS = 99.

MESSAGES_GIVE CALL FUNCTION 'MESSAGES_GIVE' TABLES t_mesg = msg_tab.

ISH_READ_NDIA * CALL FUNCTION 'ISH_READ_NDIA' * EXPORTING * AFDIA = ' ' * BHDIA = ' ' * EINRI = EINRI * ENDIA = ' ' * EWDIA = ' ' * FALNR = FTAB-FALNR * FHDIA = ' ' * KHDIA = ' ' * LFDNR = SPACE * OPDIA = ' ' * SPERR = ' ' * STORN = ' ' * DATA_FROM_MEMORY = 'X' * IMPORTING * RC = $RC * TABLES * SS_NDIA = $RNDIA.

ISH_SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'ISH_SAPGUI_PROGRESS_INDICATOR' EXPORTING * PERCENTAGE = 0 text = '&% verarbeitet' total = i share = sy-tabix step = 10 EXCEPTIONS OTHERS = 1.

ENQUEUE_ENFAL CALL FUNCTION 'ENQUEUE_ENFAL' EXPORTING einri = einri falnr = falnr _scope = 3 _wait = on EXCEPTIONS foreign_lock = 4 system_failure = 12.

DEQUEUE_ENFAL CALL FUNCTION 'DEQUEUE_ENFAL' EXPORTING einri = einri falnr = falnr.

ISH_PROCEDURE_READ_SIMPLE CALL FUNCTION 'ISH_PROCEDURE_READ_SIMPLE' EXPORTING ss_einri = p_einri ss_falnr = p_falnr * SS_DB_READ = ' ' * SS_ONLY_MAINCODE = ' ' ss_only_official = on TABLES * E_NICP = e_nlicz = inlicz e_ndicz = indicz EXCEPTIONS OTHERS = 1.

ISH_EDI_CM_EVENTS CALL FUNCTION 'ISH_EDI_CM_EVENTS' EXPORTING institution = p_einri * PATNUMBER = ' ' casenumber = p_falnr * MOVENUMBER = '00000' * DESTKOSTR = ' ' * KOSTR_PASSED = ' ' * INSURANCESEQNO = '000' * INVOICENUMBER = ' ' * REVERSEDNUMBER = ' ' * EXTPATID = ' ' * DO_ACTIVATION_INDEPENDENT = ' ' * COLLECT_AND_WAIT = ' ' TABLES events = event_tab EXCEPTIONS missing_parameters = 1 OTHERS = 2.

ISH_READ_NTPK CALL FUNCTION 'ISH_READ_NTPK' EXPORTING einri = efpse-einri talst = efpse-leist tarif = efpse-tarif IMPORTING e_ntpk = i_ntpk EXCEPTIONS not_found = 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 RNALLF01 or its description.