SAP Reports / Programs | Cross-Application Components | European Monetary Union: Euro | Local Currency Changeover(CA-EUR-CNV) SAP CA

RFTBEURF01 SAP ABAP INCLUDE - Include RFTBEURF01 - Form Routines







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


Text pool values


Title: Include RFTBEURF01 - Form Routines


INCLUDES used within this REPORT RFTBEURF01

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:

ENQUEUE_E_VTBFHA CALL FUNCTION 'ENQUEUE_E_VTBFHA' EXPORTING bukrs = p_t_fha_bukrs * MANDT = SY-MANDT rfha = p_t_fha_rfha * X_BUKRS = ' ' * X_RFHA = ' ' * _SCOPE = '2' * _WAIT = ' ' EXCEPTIONS foreign_lock = 01 system_failure = 02.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_t_fha_bukrs msgv2 = p_t_fha_rfha msgv3 = uname txtnr = '121' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_t_fha_rfha txtnr = '122' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' txtnr = '123' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

DEQUEUE_E_VTBFHA CALL FUNCTION 'DEQUEUE_E_VTBFHA' EXPORTING bukrs = p_enq_bukrs * MANDT = SY-MANDT rfha = p_enq_rfha.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = numkr object = i_object subobject = i_subobject IMPORTING number = p_i_fha_rfha returncode = rcode EXCEPTIONS interval_not_found = 01 number_range_not_intern = 02.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = numkr txtnr = '301' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = numkr txtnr = '303' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

OBJECT_NUMBER_GET_T4 CALL FUNCTION 'OBJECT_NUMBER_GET_T4' EXPORTING bukrs = p_i_fha-bukrs rfha = p_i_fha-rfha IMPORTING objnr = p_i_fha_objnr EXCEPTIONS OTHERS = 1.

OBJECT_NUMBER_GET_T5 CALL FUNCTION 'OBJECT_NUMBER_GET_T5' EXPORTING bukrs = p_i_fha-bukrs rfha = p_i_fha-rfha IMPORTING objnr = p_i_fha_objnr EXCEPTIONS OTHERS = 1.

OBJECT_NUMBER_GET_T6 CALL FUNCTION 'OBJECT_NUMBER_GET_T6' EXPORTING bukrs = p_i_fha-bukrs rfha = p_i_fha-rfha IMPORTING objnr = p_i_fha_objnr EXCEPTIONS OTHERS = 1.

NUMBER_GET_INFO CALL FUNCTION 'NUMBER_GET_INFO' EXPORTING nr_range_nr = i_numkr object = i_object subobject = i_subobject IMPORTING interval = p_nr_interval EXCEPTIONS interval_not_found = 01.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_numkr txtnr = '301' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_numkr txtnr = '302' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' txtnr = '305' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

NUMBER_CHECK CALL FUNCTION 'NUMBER_CHECK' EXPORTING nr_range_nr = i_numkr number = p_rfha object = i_object subobject = i_subobject IMPORTING returncode = rcode EXCEPTIONS interval_not_found = 01 number_range_not_extern = 02.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_numkr txtnr = '301' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_numkr txtnr = '302' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE





CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = p_rfha msgv2 = p_nr_interval-fromnumber msgv3 = p_nr_interval-tonumber txtnr = '304' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = t_fha-bukrs pi_rfha = t_fha-rfha IMPORTING pe_bearerid = l_bearerid EXCEPTIONS build_failed = 1 OTHERS = 2.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = p_i_fha-bukrs pi_rfha = p_i_fha-rfha IMPORTING pe_bearerid = l_bearerid EXCEPTIONS build_failed = 1 OTHERS = 2.

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = p_i_fhazu-sfgzustt i_vtbfha = p_i_fha TABLES tab_new = n_fhapo_fd tab_old = a_fhapo_fd.

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = l_fhazu-sfgzustt i_vtbfha = p_i_fha TABLES tab_new = n_fhapo_fd tab_old = a_fhapo_fd.

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = l_fhazu-sfgzustt i_vtbfha = p_i_fha TABLES tab_new = n_fhapo_fd tab_old = a_fhapo_fd.

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = l_fhazu-sfgzustt i_vtbfha = p_i_fha TABLES tab_new = n_fhapo_fd tab_old = a_fhapo_fd.

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = l_fhazu-sfgzustt i_vtbfha = p_i_fha TABLES tab_new = n_fhapo_fd tab_old = a_fhapo_fd.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIOF' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIOFZU' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFHA' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFHAZU' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFHAPO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFINKO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIAFINKO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBZV' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBKORES' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

OBJECT_NUMBER_INSERT_T4 CALL FUNCTION 'OBJECT_NUMBER_INSERT_T4' IN UPDATE TASK TABLES onr_ins = i_onr EXCEPTIONS OTHERS = 1.

OBJECT_NUMBER_INSERT_T5 CALL FUNCTION 'OBJECT_NUMBER_INSERT_T5' IN UPDATE TASK TABLES onr_ins = i_onr EXCEPTIONS OTHERS = 1.

OBJECT_NUMBER_INSERT_T6 CALL FUNCTION 'OBJECT_NUMBER_INSERT_T6' IN UPDATE TASK TABLES onr_ins = i_onr EXCEPTIONS OTHERS = 1.




MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHA' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAZU' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAPO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBPFHAPO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAPO_UNFIXED' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'TRIAT' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFINKO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBAFINKO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

TB_RATES_UPDATE CALL FUNCTION 'TB_RATES_UPDATE' TABLES a_rate = old_rate " ist initial.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBTEKAL' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_RELAT' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_POSOBJ' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_POS' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_LIMIT' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

FTR_IRADJ_TRIA_BEARERID_BUILD CALL FUNCTION 'FTR_IRADJ_TRIA_BEARERID_BUILD' EXPORTING pi_bukrs = t_fha-bukrs pi_rfha = t_fha-rfha IMPORTING pe_bearerid = l_bearerid EXCEPTIONS build_failed = 1 OTHERS = 2.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_fhapo-bzbetr foreign_currency = p_fhapo-wzbetr local_currency = p_euro IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_fhapo-bnwhr foreign_currency = p_fhapo-wzbetr local_currency = p_euro IMPORTING local_amount = h_loc_nominal EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_fhapo-bprice foreign_currency = p_fhapo-wprice local_currency = p_euro IMPORTING local_amount = h_loc_price EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_fhapo-bbasis foreign_currency = p_fhapo-wbasis local_currency = p_euro IMPORTING local_amount = h_loc_basis EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING date = p_stich foreign_amount = p_fhapo-bzbetr foreign_currency = p_fhapo-wzbetr local_amount = p_fhapo-bhwbetr local_currency = l_local_curr IMPORTING exchange_rate = p_fhapo-khwkurs EXCEPTIONS no_rate_computable = 1 no_rate_found = 2 rate_too_big = 3 no_factors_found = 4 no_spread_found = 5 derived_2_times = 6 OTHERS = 7.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_eu_finko-bkond foreign_currency = p_eu_finko-swhrkond local_currency = p_euro IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_eu_finko-bbasis foreign_currency = p_eu_finko-swhrkond local_currency = p_euro IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_eu_iof-ostrike foreign_currency = l_iof_waers local_currency = p_eu_iof-ofwaers IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_eu_ifinko-bkond foreign_currency = p_eu_ifinko-swhrkond local_currency = p_euro IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_eu_ifhapo-bzbetr foreign_currency = p_eu_ifhapo-wzbetr local_currency = p_euro IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

TB_PAYMENT_DATA_FROM_SI_FILL CALL FUNCTION 'TB_PAYMENT_DATA_FROM_SI_FILL' EXPORTING companycode = p_eu_fha-bukrs counterparty = p_eu_fha-kontrh currency = p_eu_fhapo-wzbetr dealnumber = p_eu_fha-rfha dealtype = p_eu_fha-sfhaart producttype = p_eu_fha-sgsart sign = p_eu_fhapo-ssign TABLES payment_data = h_zv EXCEPTIONS not_found = 1 OTHERS = 2.

TB_POSITION_PAYMENT_DATA_FILL CALL FUNCTION 'TB_POSITION_PAYMENT_DATA_FILL' EXPORTING counterparty = p_eu_fha-kontrh fill_when_released = p_autobuchen TABLES payment_data = h_zv positions = h_bewegungen EXCEPTIONS OTHERS = 1.

TB_REF_REFERENCE_CREATE CALL FUNCTION 'TB_REF_REFERENCE_CREATE' EXPORTING imp_reftyp = p_euroklammer imp_refh = i_refh TABLES t_refon = i_refon EXCEPTIONS reftyp_unknown = 1 too_few_objects = 2 internal_error = 3 OTHERS = 4.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHA' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAZU' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAPO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAPO' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBPFHAPO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFHAPO_UNFIXED' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'TRIAT' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBFINKO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBAFINKO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_RELAT' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_POSOBJ' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_POS' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_LIMIT' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_POSOBJ' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTB_ASGN_POS' txtnr = '256' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBZV' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE * CALL FUNCTION 'MESSAGE_STORE' * EXPORTING * ARBGB = 'T0' * MSGTY = 'E' * MSGV1 = 'VTBKORES' * TXTNR = '257' * EXCEPTIONS * MESSAGE_TYPE_NOT_VALID = 1 * NOT_ACTIVE = 2 * OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIOF' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE * CALL FUNCTION 'MESSAGE_STORE' * EXPORTING * ARBGB = 'T0' * MSGTY = 'E' * MSGV1 = 'VTIOFZU' * TXTNR = '257' * EXCEPTIONS * MESSAGE_TYPE_NOT_VALID = 1 * NOT_ACTIVE = 2 * OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFHA' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFHAZU' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFHAPO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIFINKO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTIAFINKO' txtnr = '257' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = 'VTBZV' txtnr = '258' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_betr1 amwaers2 = hlp_betr2 fwaers = p_euro kkurs = '' lwaers = p_euro waers1 = p_euro waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_fhazu-kkurs EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

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.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = p_i_fhapo-bzbetr amwaers2 = '' fwaers = p_i_fhazu-wfwaers kkurs = p_i_fhazu-kkassa lwaers = p_i_fhazu-wlwaers waers1 = p_i_fhapo-wzbetr waers2 = hlp_waers datum = p_i_fhazu-dvtrab read_tcurr = ' ' IMPORTING ex_am2waers = hlp_kassabetr 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 = p_stich foreign_amount = hlp_kassabetr foreign_currency = hlp_waers local_currency = p_euro IMPORTING local_amount = hlp_eur_betr EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_betr1 amwaers2 = hlp_eur_betr fwaers = p_euro kkurs = '' lwaers = p_euro waers1 = p_euro waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_fhazu-kkassa EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_eur_betr amwaers2 = p_eu_fhapo-bzbetr fwaers = p_eu_fhazu-wfwaers kkurs = '' lwaers = p_eu_fhazu-wlwaers waers1 = p_euro waers2 = p_eu_fhapo-wzbetr datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_fhazu-kkurs EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = p_i_fhapo-bzbetr amwaers2 = '' fwaers = p_i_fhazu-wfwaers kkurs = p_i_fhazu-kkassa lwaers = p_i_fhazu-wlwaers waers1 = p_i_fhapo-wzbetr waers2 = hlp_waers datum = p_i_fhazu-dvtrab read_tcurr = ' ' IMPORTING ex_am2waers = hlp_kassabetr 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 = p_stich foreign_amount = hlp_kassabetr foreign_currency = hlp_waers local_currency = p_euro IMPORTING local_amount = hlp_eur_betr EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_betr1 amwaers2 = hlp_eur_betr fwaers = p_eu_fhazu-wfwaers kkurs = '' lwaers = p_eu_fhazu-wlwaers waers1 = hlp_waers waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_fhazu-kkassa EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_kassabetr amwaers2 = hlp_eur_betr fwaers = p_eu_fhazu-wfwaers kkurs = ' ' lwaers = p_eu_fhazu-wlwaers waers1 = hlp_waers waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_fhazu-kkassa 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 = p_stich foreign_amount = p_eu_fhapo-bzbetr foreign_currency = p_eu_fhapo-wzbetr local_currency = p_hauswaehrung IMPORTING exchange_rate = h_hwkurs local_amount = h_hwbetr EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

FTR_CORR_PROCESS_CHECK CALL FUNCTION 'FTR_CORR_PROCESS_CHECK' EXPORTING i_bukrs = p_eu_fha-bukrs i_rfha = p_eu_fha-rfha i_rfhazu = p_eu_fhazu-rfhazu i_rofhazu = p_eu_fhazu-rofhazu i_sfgzustt = p_eu_fhazu-sfgzustt i_sfunktl = p_eu_fhazu-sfunktl i_sfunktv = p_eu_fhazu-sfunktl EXCEPTIONS invalid = 1 OTHERS = 2.

FTR_CORR_DETERMINE CALL FUNCTION 'FTR_CORR_DETERMINE' EXPORTING i_bukrs = p_eu_fhazu-bukrs i_rfha = p_eu_fhazu-rfha i_sgsart = p_eu_fha-sgsart i_sfhaart = p_eu_fha-sfhaart i_kontrh = p_eu_fha-kontrh i_rfhazu = p_eu_fhazu-rfhazu i_rofhazu = p_eu_fhazu-rofhazu i_sfgzustt = p_eu_fhazu-sfgzustt i_sfunktl = '0003' i_sfunktv = p_eu_fhazu-sfunktv no_popups = 'X' IMPORTING e_tbco_state_con = hlp_confirm e_tbco_state_recon = hlp_reconfirm EXCEPTIONS invalid = 1 OTHERS = 2.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_betr1 amwaers2 = hlp_betr2 fwaers = p_euro kkurs = '' lwaers = p_euro waers1 = p_euro waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_ifhazu-kkurs EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

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.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = p_i_ifhapo-bzbetr amwaers2 = '' fwaers = p_i_ifhazu-wfwaers kkurs = p_i_ifhazu-kkassa lwaers = p_i_ifhazu-wlwaers waers1 = p_i_ifhapo-wzbetr waers2 = hlp_waers datum = p_i_ifhazu-dvtrab read_tcurr = ' ' IMPORTING ex_am2waers = hlp_kassabetr 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 = p_stich foreign_amount = hlp_kassabetr foreign_currency = hlp_waers local_currency = p_euro IMPORTING local_amount = hlp_eur_betr EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_betr1 amwaers2 = hlp_eur_betr fwaers = p_euro kkurs = '' lwaers = p_euro waers1 = p_euro waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_ifhazu-kkassa EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_eur_betr amwaers2 = p_eu_ifhapo-bzbetr fwaers = p_eu_ifhazu-wfwaers kkurs = '' lwaers = p_eu_ifhazu-wlwaers waers1 = p_euro waers2 = p_eu_ifhapo-wzbetr datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_ifhazu-kkurs EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = p_i_ifhapo-bzbetr amwaers2 = '' fwaers = p_i_ifhazu-wfwaers kkurs = p_i_ifhazu-kkassa lwaers = p_i_ifhazu-wlwaers waers1 = p_i_ifhapo-wzbetr waers2 = hlp_waers datum = p_i_ifhazu-dvtrab read_tcurr = ' ' IMPORTING ex_am2waers = hlp_kassabetr 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 = p_stich foreign_amount = hlp_kassabetr foreign_currency = hlp_waers local_currency = p_euro IMPORTING local_amount = hlp_eur_betr EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_betr1 amwaers2 = hlp_eur_betr fwaers = p_eu_ifhazu-wfwaers kkurs = '' lwaers = p_eu_ifhazu-wlwaers waers1 = hlp_waers waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_ifhazu-kkassa EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = hlp_kassabetr amwaers2 = hlp_eur_betr fwaers = p_eu_ifhazu-wfwaers kkurs = ' ' lwaers = p_eu_ifhazu-wlwaers waers1 = hlp_waers waers2 = p_euro datum = p_stich read_tcurr = ' ' IMPORTING ex_kurs = p_eu_ifhazu-kkassa 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 = p_stich foreign_amount = h_amount1 foreign_currency = h_waers local_currency = p_euro IMPORTING local_amount = h_amount3 " Eurobetrag EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = h_amount1 amwaers2 = space fwaers = p_eu_iof-wfwaers kkurs = p_eu_iof-kwkurb1 lwaers = p_eu_iof-wlwaers waers1 = h_waers waers2 = h_waers2 read_tcurr = ' ' IMPORTING ex_am2waers = h_amount2 EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = h_amount2 amwaers2 = h_amount3 fwaers = t_tcurl-fwaers kkurs = space lwaers = t_tcurl-lwaers waers1 = h_waers2 waers2 = p_euro read_tcurr = ' ' IMPORTING ex_kurs = h_kurs EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = h_amount1 amwaers2 = space fwaers = p_eu_iof-wfwaers kkurs = p_eu_iof-kwkurb2 lwaers = p_eu_iof-wlwaers waers1 = h_waers waers2 = h_waers2 read_tcurr = ' ' IMPORTING ex_am2waers = h_amount2 EXCEPTIONS amounts_to_strange = 1 leading_currency_not_found = 2 to_less_data = 3 OTHERS = 4.

FOREX_RATES_AMOUNTS_DETERMINE CALL FUNCTION 'FOREX_RATES_AMOUNTS_DETERMINE' EXPORTING amwaers1 = h_amount2 amwaers2 = h_amount3 fwaers = t_tcurl-fwaers kkurs = space lwaers = t_tcurl-lwaers waers1 = h_waers2 waers2 = p_euro read_tcurr = ' ' IMPORTING ex_kurs = h_kurs 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 = p_stich foreign_amount = p_eu_fhapo-bzbetr foreign_currency = p_eu_fhapo-wzbetr local_currency = hauswaehrung IMPORTING local_amount = h_umb_bewegung-bhwbetr EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_p_stich foreign_amount = buchwert_fw foreign_currency = fremdwaehrung local_currency = hauswaehrung IMPORTING local_amount = buchwert_hw_fix EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

UNDERLYING_CASH_FORECAST_UP CALL FUNCTION 'UNDERLYING_CASH_FORECAST_UP' EXPORTING bukrs = p_bukrs kontrh = p_kontrh ssign = '-' rfha_opt = p_rfha_opt im_fund = p_fund im_grant_nbr = p_grant_nbr TABLES aopfu_fha = t_ifha aopfu_fhapo = p_i_ifhapo aopfu_fhazu = p_i_ifhazu nopfu_fha = nopfu_fha nopfu_fhapo = nopfu_fhapo nopfu_fhazu = nopfu_fhazu.

UNDERLYING_CASH_FORECAST_UP CALL FUNCTION 'UNDERLYING_CASH_FORECAST_UP' EXPORTING bukrs = p_bukrs kontrh = p_kontrh ssign = '-' rfha_opt = p_rfha_opt im_fund = p_fund im_grant_nbr = p_grant_nbr TABLES aopfu_fha = nopfu_fha aopfu_fhapo = nopfu_fhapo aopfu_fhazu = nopfu_fhazu nopfu_fha = t_ifha nopfu_fhapo = p_i_ifhapo nopfu_fhazu = p_i_ifhazu.

TB_CHANGEDOCUMENT_CREATE CALL FUNCTION 'TB_CHANGEDOCUMENT_CREATE' EXPORTING bukrs = eu_fha-bukrs rfha = eu_fha-rfha n_fha = eu_fha o_fha = old_fha n_fhazu = eu_fhazu o_fhazu = old_fhazu n_ul_of = eu_iof o_ul_of = old_iof TABLES n_fhapo = eu_fhapo o_fhapo = old_fhapo n_finko = eu_finko o_finko = old_finko * n_kores = eu_kores * o_kores = old_kores n_zv = eu_zv o_zv = old_zv n_afinko = eu_afinko o_afinko = old_afinko n_ul_ofzu = n_iofzu o_ul_ofzu = o_iofzu n_ul_fha = n_ifha o_ul_fha = o_ifha n_ul_fhazu = eu_ifhazu o_ul_fhazu = old_ifhazu n_ul_fhapo = eu_ifhapo o_ul_fhapo = old_ifhapo n_ul_afinko = eu_iafinko o_ul_afinko = old_iafinko n_ul_finko = eu_ifinko o_ul_finko = old_ifinko.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_pfhapo-bzbetr foreign_currency = p_pfhapo-wzbetr local_currency = p_euro IMPORTING local_amount = h_loc_amount fixed_rate = fixrate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_pfhapo-bnwhr foreign_currency = p_pfhapo-wzbetr local_currency = p_euro IMPORTING local_amount = h_loc_nominal EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_pfhapo-bprice foreign_currency = p_pfhapo-wprice local_currency = p_euro IMPORTING local_amount = h_loc_price EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = p_pfhapo-bbasis foreign_currency = p_pfhapo-wbasis local_currency = p_euro IMPORTING local_amount = h_loc_basis EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CALCULATE_EXCHANGE_RATE CALL FUNCTION 'CALCULATE_EXCHANGE_RATE' EXPORTING date = p_stich foreign_amount = p_pfhapo-bzbetr foreign_currency = p_pfhapo-wzbetr local_amount = p_pfhapo-bhwbetr local_currency = l_local_curr IMPORTING exchange_rate = p_pfhapo-khwkurs EXCEPTIONS no_rate_computable = 1 no_rate_found = 2 rate_too_big = 3 no_factors_found = 4 no_spread_found = 5 derived_2_times = 6 OTHERS = 7.

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.

TB_EVALUATION_FOREX_DISTR_FLOW CALL FUNCTION 'TB_EVALUATION_FOREX_DISTR_FLOW' EXPORTING keydate = p_p_stich TABLES existing_flows = bew_bewegungen main_flows = h_bewegung accr_flows = best_abgr_bewegungen valuation_flows = bb_bewegung EXCEPTIONS OTHERS = 1.

TB_EVALUATION_FOREX_SPLIT_FWD CALL FUNCTION 'TB_EVALUATION_FOREX_SPLIT_FWD' EXPORTING lead_curr = p_eu_fhazu-wlwaers foll_curr = p_eu_fhazu-wfwaers loc_curr = p_sav_hauswaehrung fwdrate = p_eu_fhazu-kkurs spotrate = p_eu_fhazu-kkassa deal = p_eu_fha realization = ' ' IMPORTING swap_flow = swap_bewegung swap_betr = swap_fw_betr TABLES main_flows = h_bewegung EXCEPTIONS OTHERS = 1.

TB_EVALUATION_RATE_FIND CALL FUNCTION 'TB_EVALUATION_RATE_FIND' EXPORTING bewertungsbereich = '01' buchungskreis = p_eu_fha-bukrs faelligkeit = h_bewegung-dzterm fremdwaehrung = h_bewegung-wzbetr fremdwaehrungsbetrag = h_bewegung-bzbetr geschaeft = ' ' geschaeftsart = p_eu_fha-sfhaart hauswaehrung = p_sav_hauswaehrung produktart = p_eu_fha-sgsart stichtag = p_p_stich vorzeichen_waehrungsbetrag = h_bewegung-ssign *{ INSERT KFMK016013 1 kurstyp = 'M' *} INSERT IMPORTING hauswaehrungskurs = save_bewkurs hauswaehrungsbetrag = h_bewegung-bhwbetr.

TB_EVALUATION_FOREX_WRITE_BACK CALL FUNCTION 'TB_EVALUATION_FOREX_WRITE_BACK' EXPORTING i_vtbfha = p_eu_fha i_waers = bb_bewegung-wzbetr i_dzterm = p_p_stich i_loc_curr = p_sav_hauswaehrung TABLES t_valuation_flows = bb_bewegung t_valuation_write_back = wb_bewegung.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = pc_eu_asgn_pos-chg_amount foreign_currency = pc_eu_asgn_pos-chg_currency local_currency = euro IMPORTING local_amount = h_loc_amount EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = pc_eu_asgn_pos-pos_amount foreign_currency = pc_eu_asgn_pos-chg_currency local_currency = euro IMPORTING local_amount = h_loc_amount exchange_ratex = h_loc_exchangerate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = pc_eu_asgn_limit-limit_chg_amount foreign_currency = pc_eu_asgn_limit-limit_currency local_currency = euro IMPORTING local_amount = h_loc_amount EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = p_stich foreign_amount = pc_eu_asgn_limit-limit_pos_amount foreign_currency = pc_eu_asgn_limit-limit_currency local_currency = euro IMPORTING local_amount = h_loc_amount exchange_ratex = h_loc_exchangerate EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

TB_REF_OBJECT_CHECK CALL FUNCTION 'TB_REF_OBJECT_CHECK' EXPORTING imp_reftyp = 'EUR' imp_objnr = l_ftr_fha-objnr imp_dzterm = '00000000' * TABLES * t_refh = l_refh * t_refon = l_refon EXCEPTIONS reftyp_unknown = 1 no_reference_found = 2 ref_type_not_found = 3 internal_error = 4 OTHERS = 5.

MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb = 'T0' msgty = 'E' msgv1 = t_fha-bukrs msgv2 = t_fha-rfha txtnr = '889' EXCEPTIONS message_type_not_valid = 1 not_active = 2 OTHERS = 3.

TPM_TRG_GET_PROD_CAT_RANGES CALL FUNCTION 'TPM_TRG_GET_PROD_CAT_RANGES' IMPORTING ex_rng_prod_cat_otc = l_range_otc.

TB_REF_OBJECT_CHECK CALL FUNCTION 'TB_REF_OBJECT_CHECK' EXPORTING imp_reftyp = euroklammer imp_objnr = -objnr imp_dzterm = u_key_date EXCEPTIONS reftyp_unknown = 1 no_reference_found = 2 ref_type_not_found = 3 internal_error = 4 OTHERS = 5.

THMHR_READ_HR_GIVEN_DATE_RFHA CALL FUNCTION 'THMHR_READ_HR_GIVEN_DATE_RFHA' EXPORTING i_rfha = -rfha i_bukrs = -bukrs im_exclude_rollover_after = u_key_date IMPORTING hr_tab = l_hr_tab EXCEPTIONS bukrs_missing = 1 rfha_missing = 2 OTHERS = 3.

ISB_EURO_MM_DE_FX_LOAD CALL FUNCTION 'ISB_EURO_MM_DE_FX_LOAD' TABLES i_alt_vtbfha_tab = t_fha.

FVKM0_GENERATE_FLOW_NEW * call function 'FVKM0_GENERATE_FLOW_NEW' * -> IF im_head-herk = '05'.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.

TB_EVALUATION_CURRENCYPOSITION CALL FUNCTION 'TB_EVALUATION_CURRENCYPOSITION' EXPORTING deal = eu_fha stichtag = p_stich kurstyp = 'M' IMPORTING bestand_fw = umb_bewegung-bzbetr fremdwaehrung = umb_bewegung-wzbetr stichtagswert_hw = umb_bewegung-bhwbetr TABLES bestehende_bewegungen = eu_fhapo erzeugte_bewegungen = h_gv_bewegung EXCEPTIONS error_deal = 1 more_than_one_deal = 2 wrong_key_date = 3 more_than_one_currency = 4 no_flowtype = 5 error_fas = 6.

TM_AMOUNTS_DETERMINE CALL FUNCTION 'TM_AMOUNTS_DETERMINE' EXPORTING cut_off_date = p_stich IMPORTING amounts = w_akku TABLES transactions = eu_fhapo.

FVVM_ACCOUNTREF_SEARCH * CALL FUNCTION 'FVVM_ACCOUNTREF_SEARCH' * EXPORTING * BUKRS = EU_FHA-BUKRS * RANTYP = EU_FHA-RANTYP * SANLF = EU_FHA-SANLF * STRUKTUR_1 = EU_FHA * STRUKT_NAME_1 = 'VTBFHA' * IMPORTING * RREFKONT = L_SAV_REFKONT * EXCEPTIONS * KONTREF_NICHT_GEF = 1 * STAMMDATEN_NICHT_AUSREICHEND = 2 * STRUKTUR_NICHT_GEF = 3 * OTHERS = 4.

CCHK_ADDON_COMPONENT_INSTALLED * CALL FUNCTION 'CCHK_ADDON_COMPONENT_INSTALLED' * EXPORTING * COMPONENT = 'BANKING' * EXCEPTIONS * COMPONENT_NOT_INSTALLED = 1 * COMPONENT_INVALID = 2 * OTHERS = 3.

ISB_EURO_MM_DE_FX_CONVERT CALL FUNCTION 'ISB_EURO_MM_DE_FX_CONVERT' EXPORTING i_alt_vtbfha = t_fha i_stichtag = p_stich i_neu_waehrung = euro * I_KZ_RUECK = ' ' EXCEPTIONS error_found = 1 OTHERS = 2.

FTR_CORR_EXECUTE_RUN CALL FUNCTION 'FTR_CORR_EXECUTE_RUN' EXPORTING i_bukrs = eu_fha-bukrs i_rfha = eu_fha-rfha i_rfhazu = eu_fha-rfhazunr.

CCHK_ADDON_COMPONENT_INSTALLED * CALL FUNCTION 'CCHK_ADDON_COMPONENT_INSTALLED' * EXPORTING * COMPONENT = 'BANKING' * EXCEPTIONS * COMPONENT_NOT_INSTALLED = 1 * COMPONENT_INVALID = 2 * OTHERS = 3.

ISB_EURO_MM_DE_FX_SAVE CALL FUNCTION 'ISB_EURO_MM_DE_FX_SAVE'.

TPM_CONV_POS_CURR CALL FUNCTION 'TPM_CONV_POS_CURR' EXPORTING * IM_SECURITY_ID = im_company_code = eu_fha-bukrs * IM_LOANS_CONTRACT = im_deal_number = eu_fha-rfha im_former_currency = u_old_curr im_future_currency = u_new_curr im_rate_type = 'M' im_date = p_stich im_corp_act_number = l_corp_action_number * IM_SIMULATION = im_commit_outside = tpmco_xtrue EXCEPTIONS input_error = 1 incorrect_former_currency = 2 rate_error = 3 OTHERS = 4.

TPM_TRD_POS_CURR_CHANGE CALL FUNCTION 'TPM_TRD_POS_CURR_CHANGE' EXPORTING i_company_code = eu_fha-bukrs i_deal_number = eu_fha-rfha i_date = p_stich i_new_currency = u_new_curr i_old_currency = u_old_curr i_commit_outside = tpmco_xtrue i_cor_action_id = l_corp_action_number i_rate_type = 'M' i_flag_testrun = tpmco_xfalse IMPORTING ex_tab_bustransid = l_tab_bustransid EXCEPTIONS OTHERS = 1.

TPM_TRQ_POS_CURR_CHANGE CALL FUNCTION 'TPM_TRQ_POS_CURR_CHANGE' EXPORTING i_company_code = eu_fha-bukrs i_deal_number = eu_fha-rfha i_date = p_stich i_new_currency = u_new_curr i_old_currency = u_old_curr i_commit_outside = tpmco_xtrue i_cor_action_id = l_corp_action_number i_rate_type = 'M' i_flag_testrun = tpmco_xfalse EXCEPTIONS OTHERS = 1.

TPM_SLD_POS_CURR_CHANGE CALL FUNCTION 'TPM_SLD_POS_CURR_CHANGE' EXPORTING i_company_code = eu_fha-bukrs i_deal_number = eu_fha-rfha i_date = p_stich i_new_currency = u_new_curr i_old_currency = u_old_curr i_commit_outside = tpmco_xtrue i_cor_action_id = l_corp_action_number i_rate_type = 'M' i_flag_testrun = tpmco_xfalse i_tab_bustransid = l_tab_bustransid EXCEPTIONS OTHERS = 1.

COMPANY_CODE_READ CALL FUNCTION 'COMPANY_CODE_READ' EXPORTING i_bukrs = u_company_code IMPORTING e_t001 = l_wrk_t001 EXCEPTIONS OTHERS = 1.

CONVERT_TO_LOCAL_CURRENCY CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY' EXPORTING date = u_key_date foreign_amount = l_trd_flow-position_data-position_amt foreign_currency = u_old_curr local_currency = u_new_curr type_of_rate = 'M' IMPORTING local_amount = l_trd_flow-position_data-position_amt EXCEPTIONS OTHERS = 1.

PRODUCT_TYPE_READ_SEC CALL FUNCTION 'PRODUCT_TYPE_READ_SEC' EXPORTING i_gsart = l_diff_values-product_type IMPORTING e_tzpa = l_product_type EXCEPTIONS OTHERS = 1.

TPM_REVERSE_PC_CONV * call function 'TPM_REVERSE_PC_CONV'.

TPM_SLD_POS_CURR_CHANGE_REV * call function 'TPM_SLD_POS_CURR_CHANGE_REV'.

TPM_TRD_POS_CURR_CHANGE_REV * call function 'TPM_TRD_POS_CURR_CHANGE_REV'.

MESSAGES_GIVE CALL FUNCTION 'MESSAGES_GIVE' * EXPORTING * I_ZEILE = ' ' * I_INCL_TITLE = 'X' TABLES t_mesg = l_tab_message.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = l_percentage text = l_text.

CONVERT_TO_FOREIGN_CURRENCY CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY' EXPORTING client = sy-mandt date = pos_date foreign_currency = pi_fcurr local_amount = 1 local_currency = pi_tcurr type_of_rate = 'M' read_tcurr = 'X' IMPORTING exchange_rate = ld_rate foreign_amount = ld_refe foreign_factor = ld_foreign_factor local_factor = ld_local_factor EXCEPTIONS no_rate_found = 1 overflow = 2 no_factors_found = 3 no_spread_found = 4 derived_2_times = 5 OTHERS = 6.

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.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = 'FVVW_KMNR' ignore_buffer = 'X' IMPORTING number = c_kmnr EXCEPTIONS OTHERS = 1.

FVKM_CORP_ACT_WRITE CALL FUNCTION 'FVKM_CORP_ACT_WRITE' IN UPDATE TASK EXPORTING x_head = l_header x_pos = l_tab_pos[] kz = 'I'.

ENQUEUE_EKMKOPO CALL FUNCTION 'ENQUEUE_EKMKOPO' EXPORTING mode_vwkmko = 'E' mode_vwkmpo = 'E' mandt = sy-mandt kmnr = l_kmnr x_posnr = ' ' _scope = '3' _wait = ' ' _collect = ' '.

DEQUEUE_EKMKOPO CALL FUNCTION 'DEQUEUE_EKMKOPO' EXPORTING mode_vwkmko = 'E' mode_vwkmpo = 'E' mandt = sy-mandt kmnr = l_kmnr EXCEPTIONS OTHERS = 1.

TBNR_NUMBER_GET_NEXT CALL FUNCTION 'TBNR_NUMBER_GET_NEXT' EXPORTING i_nr_range_nr = '01' i_object = 'TKM_NKO' i_quantity = 1 IMPORTING e_number = l_wrk_transaction-canr_execution.

USERDATA_MAINTAIN CALL FUNCTION 'USERDATA_MAINTAIN' EXPORTING inuser = l_user IMPORTING exuser = l_user.

FVKM_POSTING_EXEC_DATA CALL FUNCTION 'FVKM_POSTING_EXEC_DATA' IN UPDATE TASK EXPORTING im_transaction = l_wrk_transaction.

TPM_TRL_FIXINGSUM_REFRESH CALL FUNCTION 'TPM_TRL_FIXINGSUM_REFRESH' EXPORTING im_no_sec = tpmco_xtrue im_no_loa = tpmco_xtrue im_no_pos = tpmco_xtrue im_no_dea = tpmco_xfalse im_tab_otc_deals = l_tab_deal[] im_delete_only = 'X'.



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