SAP Reports / Programs
RNARCF0W SAP ABAP Report - IS-H: Archiving - Write Program for Case
RNARCF0W is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Important: You cannot reload archived data...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 RNARCF0W 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 RNARCF0W. "Basic submit
SUBMIT RNARCF0W AND RETURN. "Return to original report after report execution complete
SUBMIT RNARCF0W VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: P_WRITST = D .
Selection Text: P_WRIPRD = D .
Selection Text: P_PROT = D .
Selection Text: P_DELTST = D .
Selection Text: P_COMENT = D .
Selection Text: SE_TPLSD = Template for Variant
Selection Text: SE_TPLCV = Template for Variant
Selection Text: SE_TPLCO = Template for Variant
Selection Text: SE_PRESD = Prefix for Variant Name
Selection Text: SE_PRECV = Prefix for Variant Name
Selection Text: SE_PRECO = Prefix for Variant Name
Selection Text: SE_EINRI = Institution
Selection Text: SE_CRECV = Preprocessing Program CO_ORDER
Selection Text: SE_CRECO = Create Variant for CO_ORDER
Selection Text: P_SDVBRK = Create Variant for SD_VBRK
Selection Text: P_RDAYS = Final Billed Within (Days)
Selection Text: P_PROT_O = D .
Selection Text: P_FALNR = Case
Selection Text: P_FALAE = Case Type
Selection Text: P_EDATE = Discharge Date
Title: IS-H: Archiving - Write Program for Case
Text Symbol: T04 = Restrictions
Text Symbol: T03 = Cases
Text Symbol: T02 = Variants for Dependent Archiving Objects from SD and CO
Text Symbol: S01 = Institution
Text Symbol: PI1 = &1% (&2 of &3) of the cases archived
Text Symbol: 006 = Generated From ISH_FALL
Text Symbol: 005 = are not supported
Text Symbol: 004 = Alphanumeric document numbers
Text Symbol: 001 = Archiving of Cases
INCLUDES used within this REPORT RNARCF0W
INCLUDE RNSSTABL.
INCLUDE SBAL_CONSTANTS.
INCLUDE RNSSEINR.
INCLUDE ARCH_WRITE_PRG_STANDARD2.
INCLUDE RNSSIEIN.
INCLUDE RNSSSEIN.
INCLUDE RNSSSPBO.
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:
ISH_CASE_VALUE_REQUEST CALL FUNCTION 'ISH_CASE_VALUE_REQUEST' EXPORTING ss_einri = se_einri ss_vcode = 'UPD' IMPORTING ss_falnr = p_falnr-low.
ISH_CASE_VALUE_REQUEST CALL FUNCTION 'ISH_CASE_VALUE_REQUEST' EXPORTING ss_einri = se_einri ss_vcode = 'UPD' IMPORTING ss_falnr = p_falnr-high.
ISH_HELP_REQUEST CALL FUNCTION 'ISH_HELP_REQUEST' EXPORTING ss_object = 'ISH_RNARCF0W_RDAYS' ss_popup = on EXCEPTIONS OTHERS = 0.
ARCHIVE_PROTOCOL_LINE_DETAIL CALL FUNCTION 'ARCHIVE_PROTOCOL_LINE_DETAIL'.
ARCHIVE_PROTOCOL_INIT CALL FUNCTION 'ARCHIVE_PROTOCOL_INIT' EXPORTING i_detailprotocol = p_prot.
ARCHIVE_PROTOCOL_WRITE CALL FUNCTION 'ARCHIVE_PROTOCOL_WRITE'.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = test IMPORTING output = test EXCEPTIONS OTHERS = 0.
ISH_ARCHIVE_CASE_DB_READ CALL FUNCTION 'ISH_ARCHIVE_CASE_DB_READ' EXPORTING i_einri = nfal-einri i_falnr = nfal-falnr i_nfal = nfal i_read_nfal = off i_apxnr = l_apxnr IMPORTING e_case = case EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_N1_ARCHIVE_CASE_READ CALL FUNCTION 'ISH_N1_ARCHIVE_CASE_READ' EXPORTING i_nfal = nfal IMPORTING e_case_med = case_med EXCEPTIONS * not_found = 1 OTHERS = 0.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING archive_handle = handle object_id = aobjid.
ISH_ARCHIVE_CASE_WRITE CALL FUNCTION 'ISH_ARCHIVE_CASE_WRITE' EXPORTING i_handle = handle i_case = case.
ISH_N2_ARCHIVE_CASE_WRITE CALL FUNCTION 'ISH_N2_ARCHIVE_CASE_WRITE' EXPORTING i_handle = handle i_case_med = case_med.
ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING archive_handle = handle EXCEPTIONS termination_requested = 1 OTHERS = 0.
PROGRESS_INDICATOR CALL FUNCTION 'PROGRESS_INDICATOR' EXPORTING i_text = '&1% (&2 von &3) der Fälle archiviert'(pi1) i_processed = p_arc_counter i_total = cases_sum.
PROGRESS_INDICATOR CALL FUNCTION 'PROGRESS_INDICATOR' EXPORTING i_text = '&1% (&2 von &3) der Fälle archiviert'(pi1) i_processed = p_arc_counter i_total = cases_sum i_output_immediately = 'X'.
ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING archive_handle = handle.
ARCHIVE_GET_ARCHIVE_FILES CALL FUNCTION 'ARCHIVE_GET_ARCHIVE_FILES' EXPORTING archive_handle = handle TABLES archive_files = p_archive_files.
ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = handle.
CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE' EXPORTING call_delete_job_in_test_mode = p_deltst "HW1483140 25.06.2010
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING ausbegdt = rnstat-ausbegdt ausenddt = rnstat-ausenddt einri = se_einri line_size = rnstat-line_size title_lin1 = 'Archivierung von Fällen'(001) uline = off EXCEPTIONS OTHERS = 0.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_object = falnr * I_TEXT = i_msgtype = msg_status i_msgid = msgid i_msgno = msgno i_msgv1 = msgv1 i_msgv2 = msgv2 i_msgv3 = msgv3 i_msgv4 = msgv4.
RS_CREATE_VARIANT CALL FUNCTION 'RS_CREATE_VARIANT' EXPORTING curr_report = repname curr_variant = varname vari_desc = ivarid TABLES vari_contents = irsparams vari_text = ivarit EXCEPTIONS illegal_report_or_variant = 1 illegal_variantname = 2 not_authorized = 3 not_executed = 4 report_not_existent = 5 report_not_supplied = 6 variant_exists = 7 variant_locked = 8 OTHERS = 9.
ISH_DISTRIBUTE_YEAR_DETERMINE CALL FUNCTION 'ISH_DISTRIBUTE_YEAR_DETERMINE' EXPORTING i_budat = p_date i_einri = se_einri IMPORTING e_gjahr = p_gjahr.
ISH_DISTRIBUTE_PERIOD_CHECK * CALL FUNCTION 'ISH_DISTRIBUTE_PERIOD_CHECK' * EXPORTING * budat = p_date * einrichtung = se_einri * event = 'FI0001' * IMPORTING * e_gjahr = p_gjahr.
ISH_ARCHIVE_CASE_SELECT CALL FUNCTION 'ISH_ARCHIVE_CASE_SELECT' EXPORTING i_einri = se_einri i_rfalnr = p_falnr[] i_rfalar = falai i_enddt = p_edate[] i_days_billed = days_billed IMPORTING e_cases = cases.
ISH_ARCHIVE_CASE_CHECK CALL FUNCTION 'ISH_ARCHIVE_CASE_CHECK' EXPORTING i_case = wa_case i_lastdate = eabrdt_high TABLES e_return = errors EXCEPTIONS cant_archive = 1 no_authority = 2 not_billed = 3 open_item = 4 billed_bus_year = 5 edi_msgs_not_archivable = 6 OTHERS = 7.
ISH_N2_ARCHIVE_CASE_DOC_IMAGE CALL FUNCTION 'ISH_N2_ARCHIVE_CASE_DOC_IMAGE' EXPORTING i_falnr = wa_cases-falnr i_einri = wa_cases-einri i_patnr = wa_cases-patnr i_testrun = p_writst EXCEPTIONS err_cust = 1 not_archive = 2 OTHERS = 3.
BAL_DSP_PROFILE_NO_TREE_GET CALL FUNCTION 'BAL_DSP_PROFILE_NO_TREE_GET' IMPORTING e_s_display_profile = l_s_display_profile EXCEPTIONS OTHERS = 1.
BAL_DSP_LOG_DISPLAY CALL FUNCTION 'BAL_DSP_LOG_DISPLAY' EXPORTING i_s_display_profile = l_s_display_profile EXCEPTIONS OTHERS = 1.
BAL_LOG_CREATE CALL FUNCTION 'BAL_LOG_CREATE' EXPORTING i_s_log = l_s_log IMPORTING e_log_handle = gl_log_handle EXCEPTIONS log_header_inconsistent = 1 OTHERS = 2.
DEQUEUE_ENPAT CALL FUNCTION 'DEQUEUE_ENPAT' EXPORTING mode_npat = 'E' mandt = sy-mandt patnr = p_patnr.
ENQUEUE_ENPAT CALL FUNCTION 'ENQUEUE_ENPAT' EXPORTING mode_npat = 'E' mandt = sy-mandt patnr = p_patnr _scope = '2' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
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 RNARCF0W or its description.
RNARCF0W - IS-H: Archiving - Write Program for Case RNARCF0W - IS-H: Archiving - Write Program for Case RNARCF0D - IS-H: Archiving: Delete Program for Case RNARCF0D - IS-H: Archiving: Delete Program for Case RNAPRV04 - IS-H: Cost Reimbursement - Direct Patient Billing RNAPRV04 - IS-H: Cost Reimbursement - Direct Patient Billing