RNCDRGU0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for SG: Create Message Order for Aggregate Message Type This program lets you trigger an event that is used for preparing and sending an aggregate message for the Casemix communication procedure...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 RNCDRGU0 into the relevant SAP transactions such as SE38 or SE80
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.
Selection Text: P_EINRI = Institution
Selection Text: P_EPROC = EDI Procedure
Title: IS-H DRG Create Message Order for Aggregate Message Type
Text Symbol: U05 = To
Text Symbol: U06 = Order
Text Symbol: U04 = Evaluation Period
Text Symbol: T20 = Create EDI Order
Text Symbol: U00 = EDI Procedure
Text Symbol: U01 = Institution
Text Symbol: U02 = Year
Text Symbol: U03 = Month
INCLUDE MNCDATA0.
INCLUDE RNSSSPBO.
INCLUDE RNCIEDIU.
No SAP DATABASE tables are accessed within this REPORT code!
ISH_F4_HELP_MSGTYPE * call function 'ISH_F4_HELP_MSGTYPE' * exporting ** ediproc = p_eproc * get_dynp_ediproc = on * dyname = rnstat-repid * dynumb = sy-dynnr * fieldname = 'P_EPROC' * importing * ntkrz = p_ntyp * exceptions * missing_parameters = 1 * nothing_found = 2 * others = 3.
ISH_AUTH_CHECK_REPORT_EINRI CALL FUNCTION 'ISH_AUTH_CHECK_REPORT_EINRI' EXPORTING repid = rnstat-repid einri = p_einri * NO_MESSAGE = ' ' IMPORTING rc = auth_rc EXCEPTIONS OTHERS = 1.
ISH_EDI_READ_TNC301GI CALL FUNCTION 'ISH_EDI_READ_TNC301GI' EXPORTING institution = p_einri ediproc = p_eproc IMPORTING active = active_flag EXCEPTIONS OTHERS = 1.
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING * ausbegdt = rnstat-ausbegdt * ausenddt = rnstat-ausenddt einri = rnstat-einri line_size = rnstat-line_size repid = rnstat-repid title_lin1 = text-t20 title_lin2 = ' ' uline = on * verbegdt = init_date * verenddt = init_date EXCEPTIONS invalid_einri = 01.
ISH_SGDRG_EVENTS_PROCESSING * CALL FUNCTION 'ISH_SGDRG_EVENTS_PROCESSING' * EXPORTING * EDIPROC = P_EPROC * INSTITUTION = P_EINRI ** PATNUMBER = ' ' * CASENUMBER = ' ' ** MOVENUMBER = '00000' ** IMPORTING ** E_QUANTITY = * TABLES * EVENTS = EVENTS ** EXCEPTIONS ** MISSING_PARAMETERS = 1 ** OTHERS = 2 * .
ISH_EDI_CM_EVENTS CALL FUNCTION 'ISH_EDI_CM_EVENTS' EXPORTING institution = p_einri * PATNUMBER = ' ' casenumber = ' ' * MOVENUMBER = '00000' * DESTKOSTR = ' ' * KOSTR_PASSED = ' ' * INSURANCESEQNO = '000' * INVOICENUMBER = ' ' * REVERSEDNUMBER = ' ' * EXTPATID = ' ' * DO_ACTIVATION_INDEPENDENT = ' ' * COLLECT_AND_WAIT = ' ' TABLES events = events * EXCEPTIONS * MISSING_PARAMETERS = 1 * OTHERS = 2 .
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
RNCDRGU0 - IS-H DRG Create Message Order for Aggregate Message Type RNCDRGU0 - IS-H DRG Create Message Order for Aggregate Message Type RNCDALEF03 - documentation and ABAP source code RNCDALEF02 - documentation and ABAP source code RNCDALEF01 - documentation and ABAP source code RNCDALE01 - DALE-UV Message Transfer with D2D