SAP Reports / Programs | Cross-Application Components | Joint Venture und Production Sharing Accounting(CA-JVA) SAP CA

REL04F01 SAP ABAP INCLUDE - Forms for RGJARC01 (JV_OBJECT archiving)







REL04F01 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 REL04F01 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 REL04F01. "Basic submit
SUBMIT REL04F01 AND RETURN. "Return to original report after report execution complete
SUBMIT REL04F01 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 RGJARC01 (JV_OBJECT archiving)


INCLUDES used within this REPORT REL04F01

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:

G_ADMI_AUTHORITY_CHECK CALL FUNCTION 'G_ADMI_AUTHORITY_CHECK' EXPORTING activity = '03' EXCEPTIONS not_authorized = 01.

RS_REFRESH_FROM_SELECTOPTIONS CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS' EXPORTING curr_report = c_progname TABLES selection_table = lt_sel_params.

RS_REPORTSELECTIONS_INFO CALL FUNCTION 'RS_REPORTSELECTIONS_INFO' EXPORTING report = c_progname default_values = ' ' TABLES field_info = lt_field_info def_values = lt_def_values.

FI_PERIOD_DETERMINE CALL FUNCTION 'FI_PERIOD_DETERMINE'"zum übergebenen Buchungskreis EXPORTING "das heute (weil sy-datum i_budat = sy-datum "angegegeben wird) aktuelle i_bukrs = lt_t001-bukrs "Geschäftsjahr holen IMPORTING e_gjahr = lv_valid_gjahr EXCEPTIONS OTHERS = 1.

ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING archive_handle = fv_read_handle EXCEPTIONS end_of_file = 1.

ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING archive_handle = fv_read_handle IMPORTING archive_creation_release = fw_rl_statistic-ar_cr_rel archive_creation_system = fw_rl_statistic-ar_sys archive_document = fw_rl_statistic-document object = fw_rl_statistic-object EXCEPTIONS OTHERS = 3.

ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = fv_read_handle.

POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING language = sy-langu popup_title = text-pr1 start_column = 10 start_row = 3 text_object = lv_text_object IMPORTING cancelled = lv_answer TABLES parameters = lt_text_params EXCEPTIONS error_in_text = 1 text_not_found = 2 OTHERS = 3.

POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING language = sy-langu popup_title = text-pr2 start_column = 10 start_row = 3 text_object = lv_text_object IMPORTING cancelled = lv_answer TABLES parameters = lt_text_params EXCEPTIONS error_in_text = 1 text_not_found = 2 OTHERS = 3.

ARCHIVE_OPEN_FOR_MOVE CALL FUNCTION 'ARCHIVE_OPEN_FOR_MOVE' EXPORTING object = c_arch_object test_mode = p_test IMPORTING archive_read_handle = fv_read_handle archive_write_handle = fv_write_handle EXCEPTIONS no_files_available = 4.

ARCHIVE_GET_NEXT_RECORD CALL FUNCTION 'ARCHIVE_GET_NEXT_RECORD' EXPORTING archive_handle = fv_read_handle IMPORTING record = lw_t8jev record_structure = lv_structure EXCEPTIONS end_of_object = 1.

ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING archive_handle = fv_write_handle.

ARCHIVE_GET_TABLE CALL FUNCTION 'ARCHIVE_GET_TABLE' EXPORTING archive_handle = fv_read_handle record_structure = lv_t8jevp_struct all_records_of_object = ' ' TABLES table = lt_t8jevp_car EXCEPTIONS end_of_object = 1.

ARCHIVE_GET_TABLE CALL FUNCTION 'ARCHIVE_GET_TABLE' EXPORTING archive_handle = fv_read_handle record_structure = lv_t8jevs_struct all_records_of_object = ' ' TABLES table = lt_t8jevs_car EXCEPTIONS end_of_object = 1.

JV_DATA_CHECK_TS CALL FUNCTION 'JV_DATA_CHECK_TS' EXPORTING i_selections = fv_archive_selections TABLES t_data = ft_data * t_data_omitted = lt_data_omitted_select t_data_omitted = lt_t8jev_omitted_select EXCEPTIONS ex_no_match_for_table = 1 ex_no_match_for_structure = 2.

JV_INSERT CALL FUNCTION 'JV_INSERT' EXPORTING i_structure_name = fv_structure i_line_insert = lv_yes TABLES t_data = ft_data * t_data_omitted = lt_data_omitted_insert t_data_omitted = lt_t8jev_omitted_insert CHANGING e_statistic = lw_statistic EXCEPTIONS OTHERS = 1.

JV_DATA_CHECK_TS CALL FUNCTION 'JV_DATA_CHECK_TS' EXPORTING i_selections = fv_archive_selections TABLES t_data = ft_data * t_data_omitted = lt_data_omitted_select t_data_omitted = lt_t8jevp_omitted_select EXCEPTIONS ex_no_match_for_table = 1 ex_no_match_for_structure = 2.

JV_INSERT CALL FUNCTION 'JV_INSERT' EXPORTING i_structure_name = fv_structure i_line_insert = lv_yes TABLES t_data = ft_data * t_data_omitted = lt_data_omitted_insert t_data_omitted = lt_t8jevp_omitted_insert CHANGING e_statistic = lw_statistic EXCEPTIONS OTHERS = 1.

JV_DATA_CHECK_TS





CALL FUNCTION 'JV_DATA_CHECK_TS' EXPORTING i_selections = fv_archive_selections TABLES t_data = ft_data * t_data_omitted = lt_data_omitted_select t_data_omitted = lt_t8jevs_omitted_select EXCEPTIONS ex_no_match_for_table = 1 ex_no_match_for_structure = 2.

JV_INSERT CALL FUNCTION 'JV_INSERT' EXPORTING i_structure_name = fv_structure i_line_insert = lv_yes TABLES t_data = ft_data * t_data_omitted = lt_data_omitted_insert t_data_omitted = lt_t8jevs_omitted_insert CHANGING e_statistic = lw_statistic EXCEPTIONS OTHERS = 1.

ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING archive_handle = fv_write_handle.



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