SAP Reports / Programs

R_TP_CVPROF_ASSIGN SAP ABAP Report - Currency and Valuation Profile: Check and Activate in Controlling Area







R_TP_CVPROF_ASSIGN is a standard Executable ABAP Report 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 R_TP_CVPROF_ASSIGN into the relevant SAP transactions such as SE38 or SE80


Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

8KEP - Activate Cur.+Val. Profile in COArea


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 R_TP_CVPROF_ASSIGN. "Basic submit
SUBMIT R_TP_CVPROF_ASSIGN AND RETURN. "Return to original report after report execution complete
SUBMIT R_TP_CVPROF_ASSIGN 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_TEST = Check activation
Selection Text: P_KOKRS = Controlling Area
Selection Text: P_ACTIV = Activate in controlling area
Title: Currency and Valuation Profile: Check and Activate in Controlling Area
Text Symbol: 600 = Text
Text Symbol: 601 = Financial Accounting, Asset Accounting
Text Symbol: 602 = Chart of dep.
Text Symbol: 603 = Valuation Area
Text Symbol: 701 = Product Cost Planning
Text Symbol: 702 = Csg type
Text Symbol: 703 = Cstg variant
Text Symbol: 704 = Ref. variant
Text Symbol: 705 = Cstg version
Text Symbol: 706 = TP variant
Text Symbol: 707 = Valuation
Text Symbol: 708 = 0 Legal
Text Symbol: 709 = 1 Group
Text Symbol: 710 = 2 PCA
Text Symbol: 801 = Profit. Analysis / Operating concern:
Text Symbol: 901 = Check possible activation:
Text Symbol: 902 = Carry out activation in the controlling area:
Text Symbol: 903 = Activation is possible
Text Symbol: 904 = Activation is not possible: see error messages
Text Symbol: 905 = Activation carried out
Text Symbol: 906 = Activation not carried out
Text Symbol: 907 = Activation possible with restrictions: see warnings
Text Symbol: 908 = The currency and valuation profile is already active in controlling area $$$$
Text Symbol: T01 = Activation
Text Symbol: 505 = CCode
Text Symbol: 001 = Activate currency and valuation profile
Text Symbol: 101 = Currency and valuation profile:
Text Symbol: 102 = Valuation
Text Symbol: 103 = Currency
Text Symbol: 104 = Status: Active
Text Symbol: 105 = Status: inactive
Text Symbol: 106 = Settings incomplete
Text Symbol: 120 = Currency Type
Text Symbol: 121 = Valuation Cat.





Text Symbol: 122 = Valuation Area
Text Symbol: 123 = Curr.
Text Symbol: 124 = Text
Text Symbol: 125 = Currency
Text Symbol: 126 = Version Text
Text Symbol: 127 = Valuation Text
Text Symbol: 201 = Controlling / controlling area:
Text Symbol: 202 = Version
Text Symbol: 301 = Material Ledger
Text Symbol: 302 = Valuation Area
Text Symbol: 303 = ML Type
Text Symbol: 307 = Currency types like in FI
Text Symbol: 308 = Currency types like in CO
Text Symbol: 401 = Profit Center Accounting / controlling area:
Text Symbol: 402 = Profit Center Accounting is inactive
Text Symbol: 501 = Financial Accounting
Text Symbol: 502 = Company Code
Text Symbol: 503 = Currency and Valuation Type
Text Symbol: 504 = Ledger


INCLUDES used within this REPORT R_TP_CVPROF_ASSIGN

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:

K_VERSN_ACTIVATE_VALUTYP_5 CALL FUNCTION 'K_VERSN_ACTIVATE_VALUTYP_5'.

PCA_LOG_WRITE_DB CALL FUNCTION 'PCA_LOG_WRITE_DB'. "WK 46a

RWIN_CHECK CALL FUNCTION 'RWIN_CHECK' EXPORTING gjahr = c_gjahr "not used process = c_process event = c_event_check TABLES tkomp = tkomp.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' * EXPORTING * COLLECT_AND_SEND = ' ' * RESET = gc_x * LINE_FROM = ' ' * LINE_TO = ' ' * I_IDENTIFICATION = * CHECK_ON_COMMIT = gc_x IMPORTING e_identification = g_identification EXCEPTIONS OTHERS = 0.

MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' * exporting * corrections_option = ' ' * corrections_func_text = ' ' * LINE_FROM = ' ' * LINE_TO = ' ' * OBJECT = ' ' * SEND_IF_ONE = ' ' * BATCH_LIST_TYPE = 'J' * SHOW_LINNO = gc_x * SHOW_LINNO_TEXT = ' ' * SHOW_LINNO_TEXT_LEN = '3' * IMPORTING * CORRECTIONS_WANTED = EXCEPTIONS inconsistent_range = 1 no_messages = 2 OTHERS = 3.

K_KOKRS_SET CALL FUNCTION 'K_KOKRS_SET' EXPORTING display = ' ' i_kokrs = ' ' popup = '1' IMPORTING e_kokrs = p_kokrs e_action = action EXCEPTIONS not_found = 1 OTHERS = 2.

RKE_POPUP_TEXT_DECIDE_VARTEXT CALL FUNCTION 'RKE_POPUP_TEXT_DECIDE_VARTEXT' EXPORTING options = 'AC' object_id = 'NA' object = 'KM446' na_shorttext = gc_x titel = text-001 IMPORTING answer = answer TABLES t_params = t_params EXCEPTIONS docu_not_found = 1 OTHERS = 2.

RWIN_CHECK CALL FUNCTION 'RWIN_CHECK' EXPORTING gjahr = c_gjahr "not used process = c_process event = c_event_activate TABLES tkomp = tkomp.

TP_CVPROF_GET





CALL FUNCTION 'TP_CVPROF_GET' EXPORTING i_kokrs = i_kokrs i_valuation_5 = 'X' IMPORTING e_tcvprof = tcvprof e_active = active EXCEPTIONS cvprof_not_found = 1 no_cvprof_for_kokrs = 2 kokrs_not_found = 3 OTHERS = 4.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'KM' msgty = 'E' msgv1 = i_kokrs txtnr = '443' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'KM' msgty = 'E' msgv1 = i_kokrs txtnr = '025' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

TP_CVPROF_GET CALL FUNCTION 'TP_CVPROF_GET' EXPORTING i_kokrs = i_kokrs i_valuation_5 = 'X' IMPORTING e_tcvprof = tcvprof e_active = active EXCEPTIONS cvprof_not_found = 1 no_cvprof_for_kokrs = 2 kokrs_not_found = 3 OTHERS = 4.

MESSAGE_STORE * CALL FUNCTION 'MESSAGE_STORE' * EXPORTING * ARBGB = 'KM' * MSGTY = 'E' * MSGV1 = I_KOKRS * MSGV2 = TCVPROF-CVPROF * TXTNR = '462' * EXCEPTIONS * MESSAGE_TYPE_NOT_VALID = 1 * NOT_ACTIVE = 2 * OTHERS = 3.

ENQUEUE_E_TABLE CALL FUNCTION 'ENQUEUE_E_TABLE' EXPORTING tabname = 'TKA01' varkey = lock_key EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = sy-msgid msgty = sy-msgty msgv1 = sy-msgv1 msgv2 = sy-msgv2 msgv3 = sy-msgv3 msgv4 = sy-msgv4 txtnr = sy-msgno EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

DEQUEUE_E_TABLE CALL FUNCTION 'DEQUEUE_E_TABLE' EXPORTING tabname = 'TKA01' varkey = lock_key EXCEPTIONS OTHERS = 1.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = sy-msgid msgty = sy-msgty msgv1 = sy-msgv1 msgv2 = sy-msgv2 msgv3 = sy-msgv3 msgv4 = sy-msgv4 txtnr = sy-msgno EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

TP_CVPROF_GET CALL FUNCTION 'TP_CVPROF_GET' EXPORTING i_kokrs = kokrs i_valuation_5 = 'X' * I_CVPROF = * I_LANGU = SY-LANGU IMPORTING * E_TCVPROF = * E_TCVPROFT = e_active = gv_active TABLES t_tcvprofd = lt_tcvprofd EXCEPTIONS cvprof_not_found = 1 no_cvprof_for_kokrs = 2 kokrs_not_found = 3 OTHERS = 4.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'VALUTYP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'CURTP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

K_VERSN_VALUATION CALL FUNCTION 'K_VERSN_VALUATION' EXPORTING i_kokrs = kokrs i_ignore_flg_active = gc_x IMPORTING e_basic_valuation = l_basic_valuation TABLES t_tka09_v = lt_tka09_v EXCEPTIONS no_basic_version = 1 wrong_customizing = 2 valuation_profile_not_active = 3 OTHERS = 4.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'VALUTYP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'CURTP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

RK_BUKRS_OF_KOKRS CALL FUNCTION 'RK_BUKRS_OF_KOKRS' EXPORTING kokrs = kokrs TABLES t_bukrs = lt_bukrs EXCEPTIONS no_bukrs_found = 01 not_found = 02.

CKML_BWKEY_FOR_BUKRS_GET CALL FUNCTION 'CKML_BWKEY_FOR_BUKRS_GET' EXPORTING * I_BUKRS = itr_bukrs = lt_bukrs IMPORTING etr_bwkey = lt_bwkey.

CKML_F_TCKMHD_IT_READ CALL FUNCTION 'CKML_F_TCKMHD_IT_READ' EXPORTING bwkey = wa_bwkey-bwkey IMPORTING f_tckmhd = f_tckmhd * TABLES * t_tckmit = EXCEPTIONS bwkey_not_found = 1 matled_not_found = 2 OTHERS = 3 .

GET_BWKEY_CURRENCY_INFO CALL FUNCTION 'GET_BWKEY_CURRENCY_INFO' EXPORTING bwkey = wa_bwkey-bwkey call_by_init_prog = gc_x i_customizing = gc_x TABLES t_curtp_for_va = t_curtp_ml EXCEPTIONS bwkey_not_found = 1 bwkey_not_active = 2 matled_not_found = 3 internal_error = 4 more_than_3_curtp = 5 OTHERS = 6.

K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING gjahr = sy-datum(4) kokrs = kokrs IMPORTING e_tka00 = ls_tka00 e_tka01 = ls_tka01 EXCEPTIONS not_found = 1 not_found_gjahr = 2 OTHERS = 3.




DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'VALUTYP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'CURTP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'VALUTYP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING domname = 'CURTP' value = l_domvalue langu = sy-langu * BYPASS_BUFFER = ' ' IMPORTING dd07v_wa = lwa_dd07v rc = return_code.

RK_BUKRS_OF_KOKRS CALL FUNCTION 'RK_BUKRS_OF_KOKRS' EXPORTING kokrs = kokrs TABLES t_bukrs = lt_bukrs EXCEPTIONS no_bukrs_found = 01 not_found = 02.

FI_CURRENCY_INFORMATION CALL FUNCTION 'FI_CURRENCY_INFORMATION' EXPORTING i_bukrs = lt_bukrs-bukrs * I_LAND1 = ' ' * I_RCOMP = ' ' IMPORTING e_x001 = f_x001 EXCEPTIONS * currency_2_not_defined = 1 * currency_3_not_defined = 2 OTHERS = 3.

CKML_F_CURRENCY_TYPES_GET CALL FUNCTION 'CKML_F_CURRENCY_TYPES_GET' EXPORTING bukrs = lt_bukrs-bukrs TABLES t_curtp = t_curtp_general EXCEPTIONS bukrs_not_found = 1 internal_error = 2 text_not_found = 0 OTHERS = 4.

G_GIVE_LEDGERS_FOR_VALUATION CALL FUNCTION 'G_GIVE_LEDGERS_FOR_VALUATION' "WK 46a EXPORTING bukrs = lt_bukrs-bukrs valuation = '0' only_free_ledgers = ' ' * WITH_DEPENDANT_LEDGERS = ' ' TABLES ledgers = ledgers_0 .

G_GIVE_LEDGERS_FOR_VALUATION CALL FUNCTION 'G_GIVE_LEDGERS_FOR_VALUATION' "WK 46a EXPORTING bukrs = lt_bukrs-bukrs valuation = '1' only_free_ledgers = ' ' * WITH_DEPENDANT_LEDGERS = ' ' TABLES ledgers = ledgers_1 .

G_GIVE_LEDGERS_FOR_VALUATION CALL FUNCTION 'G_GIVE_LEDGERS_FOR_VALUATION' "WK 46a EXPORTING bukrs = lt_bukrs-bukrs valuation = '2' only_free_ledgers = ' ' * WITH_DEPENDANT_LEDGERS = ' ' TABLES ledgers = ledgers_2 .

RK_BUKRS_OF_KOKRS CALL FUNCTION 'RK_BUKRS_OF_KOKRS' EXPORTING kokrs = kokrs TABLES t_bukrs = lt_bukrs EXCEPTIONS no_bukrs_found = 01 not_found = 02.

T093C_READ CALL FUNCTION 'T093C_READ' EXPORTING i_bukrs = lt_bukrs-bukrs * F_T093C = * I_PBO_CHECK = ' ' IMPORTING f_t093c = l_t093c EXCEPTIONS not_found = 1 OTHERS = 2.

T093A_READ_MULTIPLE CALL FUNCTION 'T093A_READ_MULTIPLE' EXPORTING i_afapl = l_t093c-afapl * I_REFRESH_BUFFER = ' ' TABLES t_t093a = lt_t093a EXCEPTIONS t093a_not_found = 1 OTHERS = 2.

CK_F_TCK03_STANDARD_READING CALL FUNCTION 'CK_F_TCK03_STANDARD_READING' EXPORTING valuation = l_valuation IMPORTING db_count = l_db_count TABLES t_tck03 = lt_tck03.

CK_F_TCK32_READ CALL FUNCTION 'CK_F_TCK32_READ' EXPORTING p_klvar = lt_tck03-klvar TABLES t_tck32 = lt_tck32 * T_TCK32T = .

CK_F_TCK03_STANDARD_READING CALL FUNCTION 'CK_F_TCK03_STANDARD_READING' EXPORTING valuation = l_valuation IMPORTING db_count = l_db_count TABLES t_tck03 = lt_tck03.

CK_F_TCK32_READ CALL FUNCTION 'CK_F_TCK32_READ' EXPORTING p_klvar = lt_tck03-klvar TABLES t_tck32 = lt_tck32 * T_TCK32T = .

CK_F_TCK03_STANDARD_READING CALL FUNCTION 'CK_F_TCK03_STANDARD_READING' EXPORTING valuation = l_valuation IMPORTING db_count = l_db_count TABLES t_tck03 = lt_tck03.

CK_F_TCK32_READ CALL FUNCTION 'CK_F_TCK32_READ' EXPORTING p_klvar = lt_tck03-klvar TABLES t_tck32 = lt_tck32 * T_TCK32T = .

K_KOKRS_READ CALL FUNCTION 'K_KOKRS_READ' EXPORTING gjahr = sy-datum(4) kokrs = kokrs IMPORTING e_tka00 = ls_tka00 e_tka01 = ls_tka01 EXCEPTIONS not_found = 1 not_found_gjahr = 2 OTHERS = 3.

RKE_READ_ERKRS_MESSAGE CALL FUNCTION 'RKE_READ_ERKRS_MESSAGE' EXPORTING i_erkrs = ls_tka01-erkrs i_langu = sy-langu IMPORTING * e_v_tkebb = * e_v_tkebc = * e_v_tkeb = et_v_tkebl = lt_v_tkebl et_v_tkelt = lt_v_tkelt EXCEPTIONS not_defined = 1 not_defined_in_client = 2 no_text = 3 OTHERS = 4.

PCA_LOG_INIT CALL FUNCTION 'PCA_LOG_INIT' EXPORTING object = 'COP1' subobject = 'TRANSFER' EXCEPTIONS object_not_found = 01.

PCA_LOG_INIT_HEADER CALL FUNCTION 'PCA_LOG_INIT_HEADER' EXPORTING extnumber = 'Aktivierung'(t01) repid = repid tcode = sy-tcode.

PCA_LOG_INIT_MESSAGES CALL FUNCTION 'PCA_LOG_INIT_MESSAGES' EXPORTING msgid = 'KM' m_detlevel = '2' m_probclass = '2'.

PCA_LOG_SET_MESSAGE CALL FUNCTION 'PCA_LOG_SET_MESSAGE' EXPORTING msgty = 'I' msgno = message v1 = v1.

PCA_LOG_APPEND_PARAMS CALL FUNCTION 'PCA_LOG_APPEND_PARAMS' EXPORTING para = 'TIME' value = value refresh = gc_x.

PCA_LOG_WRITE_MESSAGE CALL FUNCTION 'PCA_LOG_WRITE_MESSAGE' EXPORTING update_or_insert = 'I' EXCEPTIONS object_not_found = 01.

REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = xt_eventstab EXCEPTIONS list_type_wrong = 1 OTHERS = 2.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = gv_repid i_structure_name = gc_structure CHANGING ct_fieldcat = xt_fieldcatalog EXCEPTIONS inconsistent_interface = 1 program_error = 2 OTHERS = 3.

REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING i_callback_program = iv_repid is_layout = is_layout it_fieldcat = it_fieldcat i_save = ic_save is_variant = is_variant is_print = gs_print it_events = it_eventstab TABLES t_outtab = gt_output EXCEPTIONS program_error = 1 OTHERS = 2.

REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING i_callback_program = gv_repid is_layout = ls_layo it_fieldcat = lt_fcat i_save = gc_x is_print = gs_print it_events = lt_eventstab TABLES t_outtab = lt_table 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 R_TP_CVPROF_ASSIGN or its description.