ARC02F01 SAP ABAP INCLUDE - Forms for RGJARC02 (JV_BILLING archiving)
ARC02F01 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 ARC02F01 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 ARC02F01. "Basic submit
SUBMIT ARC02F01 AND RETURN. "Return to original report after report execution complete
SUBMIT ARC02F01 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 RGJARC02 (JV_BILLING archiving)
INCLUDES used within this REPORT ARC02F01
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:
ARCHIVE_OPEN_FOR_WRITE CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE' EXPORTING CALL_DELETE_JOB_IN_TEST_MODE = L_DELETE_IN_TEST CREATE_ARCHIVE_FILE = L_CREATE_FILE OBJECT = L_ARCH_OBJ IMPORTING ARCHIVE_HANDLE = FL_HANDLE.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE OBJECT_ID = LV_CURRENT_OBJECT_ID.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE OBJECT_ID = LV_GENERIC_OBJECT_ID.
G_ADMI_AUTHORITY_CHECK CALL FUNCTION 'G_ADMI_AUTHORITY_CHECK' EXPORTING ACTIVITY = '03' EXCEPTIONS NOT_AUTHORIZED = 01.
ARCHIVE_PUT_TABLE CALL FUNCTION 'ARCHIVE_PUT_TABLE' EXPORTING ARCHIVE_HANDLE = FV_HANDLE RECORD_FLAGS = LV_RECORD_FLAG RECORD_STRUCTURE = FV_TABNAME TABLES TABLE = FT_TABLE_TO_PUT.
ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING ARCHIVE_HANDLE = FV_HANDLE IMPORTING ARCHIVE_CREATION_RELEASE = FW_STATISTIC-AR_CR_REL ARCHIVE_CREATION_SYSTEM = FW_STATISTIC-AR_SYS OBJECT = FW_STATISTIC-OBJECT ARCHIVE_DOCUMENT = LV_ARCHIVE_DOCUMENT EXCEPTIONS OTHERS = 3.
ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING ARCHIVE_HANDLE = FV_HANDLE EXCEPTIONS INTERNAL_ERROR = 1 OTHERS = 2.
ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING ARCHIVE_HANDLE = FV_HANDLE.
POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING LANGUAGE = SY-LANGU POPUP_TITLE = TEXT-P08 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.
DB_COMMIT CALL FUNCTION 'DB_COMMIT'.
ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE.
POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING LANGUAGE = SY-LANGU POPUP_TITLE = TEXT-P09 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-P10 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.
RS_REFRESH_FROM_SELECTOPTIONS CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS' EXPORTING CURR_REPORT = V_PROGNAME TABLES SELECTION_TABLE = LT_SEL_PARAMS.
RS_REPORTSELECTIONS_INFO CALL FUNCTION 'RS_REPORTSELECTIONS_INFO' EXPORTING REPORT = V_PROGNAME DEFAULT_VALUES = ' ' TABLES FIELD_INFO = LT_FIELD_INFO DEF_VALUES = LT_DEF_VALUES.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = LT_FIELDS_IN_QUESTION TABLE = FV_TABLE IMPORTING FIELD_ATTR = LW_DFIES EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
G_TABLE_OPEN_CURSOR CALL FUNCTION 'G_TABLE_OPEN_CURSOR' EXPORTING I_TABNAME = LV_TABLE_TO_ARCHIVE I_SELECTION = LT_SELECTIONS I_SORTLIST = LT_SORTLIST I_PERIOD_AGGREGATION = GUSL_C_PERAGGR_GROUP I_WITH_HOLD = GUSL_C_TRUE I_ZERO_RECORDS = GUSL_C_TRUE IMPORTING E_CURSOR = LV_CURSOR_C.
CALL FUNCTION 'G_TABLE_OPEN_CURSOR' EXPORTING I_TABNAME = LV_TABLE_TO_ARCHIVE I_SELECTION = LT_SELECTIONS I_SORTLIST = LT_SORTLIST I_PERIOD_AGGREGATION = GUSL_C_PERAGGR_GROUP I_WITH_HOLD = GUSL_C_TRUE I_ZERO_RECORDS = GUSL_C_TRUE IMPORTING E_CURSOR = LV_CURSOR_C.
G_TABLE_OPEN_CURSOR CALL FUNCTION 'G_TABLE_OPEN_CURSOR' EXPORTING I_TABNAME = LV_TABLE_TO_ARCHIVE I_SELECTION = LT_SELECTIONS I_SORTLIST = LT_SORTLIST I_PERIOD_AGGREGATION = GUSL_C_PERAGGR_GROUP I_WITH_HOLD = GUSL_C_TRUE I_ZERO_RECORDS = GUSL_C_TRUE IMPORTING E_CURSOR = LV_CURSOR_C.
G_TABLE_OPEN_CURSOR CALL FUNCTION 'G_TABLE_OPEN_CURSOR' EXPORTING I_TABNAME = LV_TABLE_TO_ARCHIVE I_SELECTION = LT_SELECTIONS I_WITH_HOLD = GUSL_C_TRUE IMPORTING E_CURSOR = LV_CURSOR_C.
POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING LANGUAGE = SY-LANGU POPUP_TITLE = TEXT-P07 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-P06 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.
G_TABLE_FETCH CALL FUNCTION 'G_TABLE_FETCH' EXPORTING I_CURSOR = FV_CURSOR_C I_PACKAGE_SIZE = P_ITSIZE CHANGING C_T_GLU1 = LT_DATA_GLU1 * C_T_DATA = LT_DATA "1506737 C_T_DATA =
"1506737 EXCEPTIONS NO_MORE_DATA = 1.
G_TABLE_FETCH CALL FUNCTION 'G_TABLE_FETCH' EXPORTING I_CURSOR = FV_CURSOR_C I_PACKAGE_SIZE = P_ITSIZE CHANGING C_T_DATA = LT_DATA EXCEPTIONS NO_MORE_DATA = 1.
POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING LANGUAGE = SY-LANGU POPUP_TITLE = TEXT-P11 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.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = 'RLDNR' TABLE = 'GLU1' TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = LW_DFIES.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = 'RRCTY' TABLE = 'GLU1' TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = LW_DFIES.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = 'RVERS' TABLE = 'GLU1' TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = LW_DFIES.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = 'BUKRS' TABLE = 'GLU1' TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = LW_DFIES.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = 'KOKRS' TABLE = 'GLU1' TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = LW_DFIES.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = 'RCOMP' TABLE = 'GLU1' TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = LW_DFIES.
G_MAX_PERIOD_AND_OFFSET_GET CALL FUNCTION 'G_MAX_PERIOD_AND_OFFSET_GET' EXPORTING PERIOD = FT_POPER1-PER TABLE = FT_DIMTAB-TAB NUMBER_OF_PERIODS = FT_DIMTAB-FLDGR IMPORTING RPMAX = LV_RPMAX_CARR EXCEPTIONS TABLE_NOT_FOUND = 01.
POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING LANGUAGE = SY-LANGU POPUP_TITLE = TEXT-P11 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.
G_FIELD_SET CALL FUNCTION 'G_FIELD_SET' EXPORTING TABLE = FV_TABLE_TO_ARCHIVE LANGU = SY-LANGU FTYPE = LV_FTYPE_A.
G_FIELD_SET CALL FUNCTION 'G_FIELD_SET' EXPORTING TABLE = FV_TABLE_TO_ARCHIVE LANGU = SY-LANGU FTYPE = LV_FTYPE_A NO_GLX_OBJ_PROCESSING = LV_SET.
G_FIELD_GET CALL FUNCTION 'G_FIELD_GET' IMPORTING FIELD_ATTR = LW_DFIES SUBRC = LV_SUBRC.
G_FIELD_GET CALL FUNCTION 'G_FIELD_GET' IMPORTING FIELD_ATTR = LW_DFIES SUBRC = LV_SUBRC.
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING FIELDNAME = LT_FIELDS_IN_QUESTION TABLE = FV_TABLE IMPORTING FIELD_ATTR = LW_DFIES EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
G_TABLE_FETCH CALL FUNCTION 'G_TABLE_FETCH' EXPORTING I_CURSOR = FV_CURSOR_C I_PACKAGE_SIZE = FP_ITSIZE CHANGING C_T_GLU1 = LT_DATA_GLU1 * C_T_DATA = LT_DATA "685157 C_T_data =
"685157 EXCEPTIONS NO_MORE_DATA = 1.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE. "685157
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE. "685157
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = FV_HANDLE. "685157
POPUP_DISPLAY_TEXT_WITH_PARAMS CALL FUNCTION 'POPUP_DISPLAY_TEXT_WITH_PARAMS' EXPORTING LANGUAGE = SY-LANGU POPUP_TITLE = TEXT-P06 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.
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 ARC02F01 or its description.