SEUVTBSI is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report program converts data from forex hedges when you convert local currency to euro...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 SEUVTBSI into the relevant SAP transactions such as SE38 or SE80
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.
Selection Text: P_BUKRS = Company code (if TEST = yes)
Selection Text: P_CALL = TEST? (restricted selection)
Selection Text: P_LIST = Detail log?
Selection Text: P_PAKET = Package no. of the conversion
Selection Text: P_TEST = Update run; no change to DB
Selection Text: SO_RSICH = Hedge number (if TEST = yes)
Title: Euro: Conversion of Forex Hedges
Text Symbol: 900 = Error list
Text Symbol: 001 = Table name:
Text Symbol: 002 = Records read:
Text Symbol: 003 = Records changed:
Text Symbol: 004 = TEST run; no database changes executed
Text Symbol: 005 = Update run
Text Symbol: 010 = Document ref. 1
Text Symbol: 011 = Document ref. 2
INCLUDE EWUSTDDD.
INCLUDE EWUSTDPE.
No SAP DATABASE tables are accessed within this REPORT code!
EWU_PAKET_GET call function 'EWU_PAKET_GET' changing paket = g_paket exceptions others = 1.
DB_TABLE_SET_LOCK call function 'DB_TABLE_SET_LOCK' exporting dbsys = sy-dbsys tabname = 'VTBSI'.
FI_EWU_CONVERTED_COMPANYCODES * call function 'FI_EWU_CONVERTED_COMPANYCODES' * exporting * p_paket = p_paket * p_10 = xtrue ** p_10 = p_10 ** p_w2 = p_w2 ** p_w3 = p_w3 ** p_lw = p_lw ** p_11 = p_11 ** p_30 = p_30 * tables * g_tab_bukrs = T_bukrs * exceptions * others = 1.
DB_COMMIT call function 'DB_COMMIT'.
DB_TABLE_SET_LOCK call function 'DB_TABLE_SET_LOCK' exporting dbsys = sy-dbsys tabname = 'VTBSI'.
FOREX_RATES_AMOUNTS_DETERMINE call function 'FOREX_RATES_AMOUNTS_DETERMINE' exporting amwaers1 = g_tab_si-bztrans amwaers2 = g_tab_si-bzbasis * FWAERS = ' ' kkurs = g_tab_si-ksich * LWAERS = ' ' waers1 = g_tab_si-wtrans waers2 = g_tab_si-wbasis * ??? dsich /dblfz/sy-datum??? datum = g_tab_si-dblfz importing * EX_AM1WAERS = * EX_AM2WAERS = * EX_ERR_RATE_AMOUNT = ex_kurs = g_tab_si-ksich ex_lwaers = g_tab_si-wlwaers ex_fwaers = g_tab_si-wfwaers exceptions amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 others = 4.
CONVERT_TO_LOCAL_CURRENCY call function 'CONVERT_TO_LOCAL_CURRENCY' exporting date = sy-datum foreign_amount = vtbsizu-bzuot foreign_currency = vtbsizu-wtrans local_currency = waers-10 rate = loc_kursr * TYPE_OF_RATE = 'M' importing * exchange_rate = * foreign_factor = local_amount = vtbsizu-bzuob * local_factor = * exchange_ratex = exceptions no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 others = 5.
FOREX_RATES_AMOUNTS_DETERMINE call function 'FOREX_RATES_AMOUNTS_DETERMINE' exporting amwaers1 = vtbsizu-bzuot amwaers2 = vtbsizu-bzuob * FWAERS = ' ' kkurs = vtbsizu-kkurs * LWAERS = ' ' waers1 = vtbsizu-wtrans waers2 = vtbsizu-wbasis * ??? dsich /dblfz/sy-datum??? datum = g_tab_si-dblfz importing * EX_AM1WAERS = * EX_AM2WAERS = * EX_ERR_RATE_AMOUNT = ex_kurs = vtbsizu-kkurs * ex_lwaers = * ex_fwaers = exceptions amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 others = 4.
MESSAGES_INITIALIZE call function 'MESSAGES_INITIALIZE'.
EWU_STATUS_INITIALIZE call function 'EWU_STATUS_INITIALIZE' exporting programm = u_progname importing aufsetzarg = c_restart exceptions no_program_entry = 1 wrong_phase = 2 precessor_not_ok = 3 program_already_started = 4 program_already_finished = 5 no_paket_entry = 6 foreign_lock = 7 system_failure = 8 active_paket_not_found = 9 others = 10.
EWU_PAKET_GET * CALL FUNCTION 'EWU_PAKET_GET' * IMPORTING * PHASE = U_PHASE * CHANGING * PAKET = C_PAKET * EXCEPTIONS * ACTIVE_PAKET_NOT_FOUND = 1 * OTHERS = 2.
EWU_AUTHORITY_CHECK call function 'EWU_AUTHORITY_CHECK' exceptions no_permission = 1 others = 2.
MESSAGES_SHOW call function 'MESSAGES_SHOW' exporting batch_list_type = ' ' object = title exceptions * INCONSISTENT_RANGE = 01 no_messages = 02.
EWU_PROTOCOL_WRITE call function 'EWU_PROTOCOL_WRITE' exceptions error_in_function_call = 1 table_empty = 2 sql_error = 3 wrong_call = 4 others = 5.
MESSAGES_SHOW call function 'MESSAGES_SHOW' exporting batch_list_type = ' ' object = title exceptions * INCONSISTENT_RANGE = 01 no_messages = 02.
EWU_PROTOCOL_WRITE call function 'EWU_PROTOCOL_WRITE' exceptions error_in_function_call = 1 table_empty = 2 sql_error = 3 wrong_call = 4 others = 5.
MESSAGES_SHOW call function 'MESSAGES_SHOW' exporting batch_list_type = ' ' object = title exceptions * INCONSISTENT_RANGE = 01 no_messages = 02.
EWU_STATUS_UPDATE call function 'EWU_STATUS_UPDATE' exporting status = u_newstat aufsetzarg = u_restart exceptions no_paket_entry = 1 foreign_lock = 2 system_failure = 3 no_program_entry = 4 wrong_call = 5 active_paket_not_found = 6 update_denied = 7 others = 8.
call function 'EWU_PROTOCOL_APPEND' exporting level = u_level msgty = u_msgty langu = sy-langu msgid = u_msgid msgno = u_msgno newobj = u_newobj msgv1 = l_msgv1 msgv2 = l_msgv2 msgv3 = l_msgv3 msgv4 = l_msgv4 exceptions others = 1.
MESSAGE_STORE call function 'MESSAGE_STORE' exporting arbgb = u_msgid msgty = u_msgty msgv1 = l_msgv1 msgv2 = l_msgv2 msgv3 = l_msgv3 msgv4 = l_msgv4 txtnr = l_msgno exceptions message_type_not_valid = 1 not_active = 2 others = 3.
EWU_PROTOCOL_APPEND call function 'EWU_PROTOCOL_APPEND' exporting level = u_level msgty = u_msgty langu = sy-langu msgid = u_msgid msgno = u_msgno newobj = u_newobj msgv1 = l_msgv1 msgv2 = l_msgv2 msgv3 = l_msgv3 msgv4 = l_msgv4 exceptions others = 1.
MESSAGE_STORE call function 'MESSAGE_STORE' exporting arbgb = u_msgid msgty = u_msgty msgv1 = l_msgv1 msgv2 = l_msgv2 msgv3 = l_msgv3 msgv4 = l_msgv4 txtnr = l_msgno exceptions message_type_not_valid = 1 not_active = 2 others = 3.
EWU_PROTOCOL_APPEND call function 'EWU_PROTOCOL_APPEND' exporting level = l_level msgty = c_tab_msg-msgty langu = sy-langu msgid = c_tab_msg-msgid msgno = c_tab_msg-msgno newobj = u_newobj msgv1 = c_tab_msg-msgv1 msgv2 = c_tab_msg-msgv2 msgv3 = c_tab_msg-msgv3 msgv4 = c_tab_msg-msgv4 exceptions others = 1.
MESSAGE_STORE call function 'MESSAGE_STORE' exporting arbgb = c_tab_msg-msgid msgty = c_tab_msg-msgty msgv1 = c_tab_msg-msgv1 msgv2 = c_tab_msg-msgv2 msgv3 = c_tab_msg-msgv3 msgv4 = c_tab_msg-msgv4 txtnr = l_msgno exceptions message_type_not_valid = 1 not_active = 2 others = 3.
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 SEUVTBSI or its description.