SAP Reports / Programs

RK2CWDEA SAP ABAP INCLUDE - documentation and ABAP source code







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


INCLUDES used within this REPORT RK2CWDEA

INCLUDE MKES1TP2.
INCLUDE RKEPL001.


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:

RKE_DERIVATE_CRITERIA call function 'RKE_DERIVATE_CRITERIA' exporting rke_einzelposten = ce4 stichtag = stichtag tabname = dbtabname importing anreicherungs_ep = ce4 tables dbtab = dbtab exceptions error_message = 4.

RKE_DERIVATE_CRITERIA call function 'RKE_DERIVATE_CRITERIA' exporting rke_einzelposten = ce4 stichtag = date tabname = dbtabname importing anreicherungs_ep = ce4 tables dbtab = dbtab exceptions error_message = 4.

MESSAGE_STORE call function 'MESSAGE_STORE' exporting arbgb = 'KE' msgty = 'W' txtnr = txtnr msgv1 = eigtab-fieldname msgv2 = eigtab-old_field msgv3 = eigtab-field msgv4 = ' ' exceptions not_active = 1.

MESSAGE_STORE call function 'MESSAGE_STORE' exporting arbgb = 'KI' msgty = 'E' txtnr = txtnr msgv1 = paobjnr msgv2 = eigtab-fieldname msgv3 = eigtab-field msgv4 = exceptions not_active = 1.

MESSAGE_STORE call function 'MESSAGE_STORE' exporting arbgb = 'KE' msgty = 'E' txtnr = txtnr msgv1 = paobjnr msgv2 = eigtab-fieldname msgv3 = eigtab-field msgv4 = exceptions not_active = 1.

RKE_GET_ACCTNR call function 'RKE_GET_ACCTNR' exporting i_erkrs = 'WDEA' * I_PA_TYPE = '1' i_vorgang = 'DIRK' tables object_table = ce4.

RKE_GET_OBJECT_NUMBER * CALL FUNCTION 'RKE_GET_OBJECT_NUMBER' * EXPORTING * erkrs = 'WDEA' * TABLES * object_table = ce4.

COPA_SEND_ERGEBNISOBJECT *del CALL FUNCTION 'COPA_SEND_ERGEBNISOBJECT' "4.0a

COPA_PROFITABILITY_SEGMENT call function 'COPA_PROFITABILITY_SEGMENT' "4.0a

COPA_SDTRACE_LOG_GET_ITEMS call function 'COPA_SDTRACE_LOG_GET_ITEMS' exporting i_tabname = 'CE0WDEA' importing et_item = lt_wa.

COPA_DOCUMENT_LOG call function 'COPA_DOCUMENT_LOG' exporting i_action = 'Y' i_tabname = 'CE0WDEA' importing et_item = lt_wa.

RKE_TD_LOG_GET CALL FUNCTION 'RKE_TD_LOG_GET' EXPORTING I_ERKRS = 'WDEA' I_RUNID = l_runid I_PERIO = l_perio CHANGING XPT_CE0 = p_ce0 EXCEPTIONS OTHERS = 1.

RKE_FILL_FIELD_TABLE CALL FUNCTION 'RKE_FILL_FIELD_TABLE' EXPORTING ERKRS = 'WDEA' * NEU_KZ = ' ' * PROTOKOLL_KZ = ' ' * TABNAME = PA_TYPE = rkb1x-pa_type * I_SORTED = RKEA1_OFF * IMPORTING * SUBRC = TABLES FIELDTAB = fieldtab * ET_DEPENDENCIES = * EXCEPTIONS * LEDGER_NOT_DEF = 1 * LEDGER_NOT_FOUND = 2 * TABLE_NOT_FOUND = 3 * OTHERS = 4 .

RKE_DATA_READ_CALLBACK CALL FUNCTION 'RKE_DATA_READ_CALLBACK' EXPORTING i_erkrs = 'WDEA' i_pa_type = rkb1x-pa_type I_READ_MODE = new_read_mode i_t_sel = sel_tab[] i_t_sf = fieldlist I_DB_AGGREGATION = ' ' "do not aggregate * I_SUMM_LEVEL_LOCK = 'X' i_program_name = h_program_name i_form_name = h_form_name.

RKE_SPLIT_SELECT CALL FUNCTION 'RKE_SPLIT_SELECT' EXPORTING ERKRS = 'WDEA' PA_TYPE = rkb1x-pa_type TABLES SELECTION_TABLE = sel_tab SELECTION_CE4 = lt_seltab_ce4 .

RKE_EP_SELECT_FROM_ARCHIVE CALL FUNCTION 'RKE_EP_SELECT_FROM_ARCHIVE' EXPORTING I_ERKRS = 'WDEA' I_SELECTIONS = lt_archsel I_SELECTIONS_CE4 = lt_archsel_ce4 I_CALLBACK_PROGRAM = h_program_name I_CALLBACK_ROUTINE = h_form_name I_REPORT = 'KE24' I_OBJECT = p_object I_INFOSYS = p_useas I_ARCHIVEKEY = p_archivekey I_OFFSET = p_offset TABLES T_FILES = pt_files .

RKE_COEP_SELECT_FROM_ARCHIVE CALL FUNCTION 'RKE_COEP_SELECT_FROM_ARCHIVE' EXPORTING I_ERKRS = 'WDEA' I_SELECTIONS = lt_archsel I_SELECTIONS_CE4 = lt_archsel_ce4 I_CALLBACK_PROGRAM = h_program_name I_CALLBACK_ROUTINE = h_form_name I_OBJECT = p_object I_INFOSYS = p_useas TABLES T_FILES = pt_files .

RKE_READ_OBJECTS * call function 'RKE_READ_OBJECTS' * exporting * erkrs = 'WDEA' * pa_type = rkb1x-pa_type * read_source = '1' * s_form_name = h_form_name * s_program_name = h_program_name * method = read_mode * tables * selection_table = sel_tab * exceptions * no_record_found = 01.

RKE_CURRENCIES_GET





call function 'RKE_CURRENCIES_GET' exporting i_erkrs = rkb1x-erkrs i_paledger = ep_tab0-paledger i_bukrs = ep_tab0-bukrs importing et_v_curr = l_t_v_curr exceptions erkrs_not_defined = 1 paledger_not_defined = 2 bukrs_not_defined = 3 others = 4.

RKE_CURRENCIES_GET call function 'RKE_CURRENCIES_GET' exporting i_erkrs = rkb1x-erkrs i_paledger = ep_tab0-paledger i_bukrs = ep_tab0-bukrs importing et_v_curr = l_t_v_curr exceptions erkrs_not_defined = 1 paledger_not_defined = 2 bukrs_not_defined = 3 others = 4.

RSTI_APPL_STACK_POP call function 'RSTI_APPL_STACK_POP' importing i_rec = coh_rec exceptions appl_stack_not_initialized = 01.

RSTI_APPL_STACK_INITIALIZE call function 'RSTI_APPL_STACK_INITIALIZE' exporting e_appl = 'KE ' e_subc = space e_onam = coh_sonam e_tool = 'TR'.

RSTI_SELECTION_EXPORT call function 'RSTI_SELECTION_EXPORT' tables it_sel = it_sel it_fields = it_fieldr.

RSTI_COMMUNICATION_HANDLER call function 'RSTI_COMMUNICATION_HANDLER' exporting * e_sonam = coh_sonam TTK, 23.4.98

RKE_PLAN_LONG_TEXT call function 'RKE_PLAN_LONG_TEXT' exporting i_erkrs = rkb1x-erkrs i_pa_type = rkb1x-pa_type i_ce0 = ep_tab0 * I_DISPLAY = 'X' * I_MODE = '1' importing e_subrc = h_subrc "wkb H40782 * E_COMMIT = exceptions others = 0.

RKE_CURRENCIES_GET call function 'RKE_CURRENCIES_GET' exporting i_erkrs = rkb1x-erkrs i_paledger = ep_tab0-paledger i_bukrs = ep_tab0-bukrs importing et_v_curr = l_t_v_curr exceptions erkrs_not_defined = 1 paledger_not_defined = 2 bukrs_not_defined = 3 others = 4.

REUSE_ALV_LIST_DISPLAY * CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' "statt LIST wkb25.2.1999 4.6

REUSE_ALV_GRID_DISPLAY call function 'REUSE_ALV_GRID_DISPLAY' "statt LIST wkb25.2.1999 4.6

COPA_SEND_ERGEBNISOBJECT *DEL CALL FUNCTION 'COPA_SEND_ERGEBNISOBJECT' "4.0a

COPA_PROFITABILITY_SEGMENT call function 'COPA_PROFITABILITY_SEGMENT' "4.0a

RKE_INTEGRATION_SHOW call function 'RKE_INTEGRATION_SHOW' exporting line_item = cest1.

CONVERSION_FACTOR_GET call function 'CONVERSION_FACTOR_GET' exporting * NO_TYPE_CHECK = ' ' unit_in = p_unit * UNIT_OUT = ' ' importing * ADD_CONST = decimals = p_quandec * DENOMINATOR = * DIMENSION = * NUMERATOR = exceptions conversion_not_found = 1 overflow = 2 type_invalid = 3 units_missing = 4 unit_in_not_found = 5 unit_out_not_found = 6 others = 7.

RKE_GET_CRITERIA_FOR_ACCTNR call function 'RKE_GET_CRITERIA_FOR_ACCTNR' exporting i_erkrs = 'WDEA' * I_PA_TYPE = '1' tables object_table = i_ce4.

RKE_GET_CRITERIA_FOR_PAOBJNR * CALL FUNCTION 'RKE_GET_CRITERIA_FOR_PAOBJNR' * EXPORTING * erkrs = 'WDEA' * USE_TKEOE = ' ' * PA_TYPE = '1' * TABLES * object_table = i_ce4 * EXCEPTIONS * paobjnr_not_found = 1 * OTHERS = 2.

OWN_LOGICAL_SYSTEM_GET * CALL FUNCTION 'OWN_LOGICAL_SYSTEM_GET' * IMPORTING * own_logical_system = h_sys * EXCEPTIONS * own_logical_system_not_defined = 01.

RKE_LOGICAL_SYSTEM_GET call function 'RKE_LOGICAL_SYSTEM_GET' exporting copa_awsys = ep_tab0-copa_awsys "n1149294 ceale01_awsys = wa_ceale01-logsystem importing logical_system = h_sys.

AC_DOCUMENT_RECORD call function 'AC_DOCUMENT_RECORD' exporting i_awtyp = ep_tab0-copa_awtyp i_awref = ep_tab0-rbeln i_aworg = ep_tab0-copa_aworg i_awsys = h_sys * I_AWTYP_INCL = ' ' * I_AWTYP_EXCL = ' ' i_bukrs = ep_tab0-bukrs * X_DIALOG = 'X' * TABLES * T_DOCUMENTS = exceptions no_reference = 1 no_document = 2 others = 3.

RKE_CURRENCIES_GET call function 'RKE_CURRENCIES_GET' exporting i_erkrs = rkb1x-erkrs i_paledger = ep_tab0-paledger i_bukrs = ep_tab0-bukrs importing et_v_curr = l_t_v_curr exceptions erkrs_not_defined = 1 paledger_not_defined = 2 bukrs_not_defined = 3 others = 4.




K_KKB_LIST_DISPLAY * CALL FUNCTION 'K_KKB_LIST_DISPLAY' * EXPORTING * i_callback_program = 'RK2CWDEA' * i_callback_top_of_page = 'TOP_OF_PAGE' * i_callback_user_command = 'USER_COMMAND' * i_callback_pf_status_set = 'SET_PF_STATUS_LIST' * i_tabname = 'EP_TABX' * it_fieldcat = fcat_tab * is_layout = is_layout * TABLES * t_outtab = ep_tabx * EXCEPTIONS * OTHERS = 1.

REUSE_ALV_GRID_DISPLAY

REUSE_ALV_LIST_DISPLAY call function 'REUSE_ALV_GRID_DISPLAY' "statt LIST * CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' "statt LIST
exporting i_callback_program = 'RK2CWDEA' i_callback_pf_status_set = 'SET_PF_STATUS_LIST' i_callback_user_command = 'USER_COMMAND' is_layout = ls_layout2 it_fieldcat = lt_fcat it_sort = g_t_sort it_filter = g_t_filter i_save = 'A' " Anzeigevarianten is_variant = g_s_variant it_events = lt_events tables t_outtab = ep_tabx exceptions program_error = 1 others = 2.

REUSE_ALV_GRID_LAYOUT_INFO_GET call function 'REUSE_ALV_GRID_LAYOUT_INFO_GET' importing * ES_LAYOUT = * ET_FIELDCAT = * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = es_variant = ls_variant exceptions no_infos = 1 program_error = 2 others = 3.

REUSE_ALV_COMMENTARY_WRITE call function 'REUSE_ALV_COMMENTARY_WRITE' exporting it_list_commentary = lt_header.

REUSE_ALV_GRID_LAYOUT_INFO_GET call function 'REUSE_ALV_GRID_LAYOUT_INFO_GET' importing es_layout = g_s_layout et_fieldcat = g_t_fieldcat et_sort = g_t_sort et_filter = g_t_filter * ES_LIST_SCROLL = es_variant = g_s_variant exceptions no_infos = 1 program_error = 2 others = 3.

COPA_CURRENCY_CONVERSION call function 'COPA_CURRENCY_CONVERSION' exporting i_erkrs = rkb1x-erkrs i_date = epwa_hw-budat * I_FOREIGN_AMOUNT = i_foreign_currency = epwa_hw-frwae "Eingabewähr i_local_amount = "in Ergebnisbwähr.

CONVERT_TO_FOREIGN_CURRENCY * CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY' * EXPORTING * DATE = EPWA_HW-BUDAT * LOCAL_AMOUNT = * FOREIGN_CURRENCY = EPWA_HW-FRWAE * LOCAL_CURRENCY = HAUS_WAERS * RATE = EPWA_HW-KURSF * IMPORTING * FOREIGN_AMOUNT = * EXCEPTIONS * WHEN * OTHERS = 1.

RKE_TIMESTAMP_CONVERT_OUTPUT call function 'RKE_TIMESTAMP_CONVERT_OUTPUT' exporting i_dayst = sy-dayst i_timestmp = i_tzone = sy-tzone importing * e_date = help_dat e_time = l_time.

REUSE_ALV_GRID_DISPLAY call function 'REUSE_ALV_GRID_DISPLAY' exporting is_layout = ls_layout it_fieldcat = lt_fieldcat it_excluding = lt_excluding tables t_outtab = lt_output exceptions program_error = 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 RK2CWDEA or its description.