SAP Reports / Programs | Financials | Financial Supply Chain Management | Transaction Manager(FIN-FSCM-TRM-TM) SAP FIN

MF77AF01 SAP ABAP INCLUDE - Form Routines for Forex Entry







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


Text pool values


Title: Form Routines for Forex Entry


INCLUDES used within this REPORT MF77AF01

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:

FTR_WORKFLOW_RELEASE_CNCL_STRT CALL FUNCTION 'FTR_WORKFLOW_RELEASE_CNCL_STRT' EXPORTING i_sfgzustt = n_fhazu-sfgzustt * actvt = (01 hinzufgen, 02 ndern, 85 stornieren) i_actvt = wf_activity i_user = sy-uname i_vtbfhazu = n_fhazu i_tab_cashflow = n_fhapo[] IMPORTING e_stufenanz = sav_stufenanz e_workflow_activate = flg_workflow_activate e_deal_changeable = flg_deal_changeable CHANGING c_fha = n_fha. "/ Freigabestatus ndern

TB_FINANCE_DEAL_UPDATE CALL FUNCTION 'TB_FINANCE_DEAL_UPDATE' "IN UPDATE TASK EXPORTING a_fha = a_fha a_fhazu = a_fhazu n_fha = n_fha n_fhazu = n_fhazu TABLES a_fhapo = a_fhapo n_fhapo = n_fhapo.

TB_ACTIVITY_UPDATE_ONLY CALL FUNCTION 'TB_ACTIVITY_UPDATE_ONLY' IN UPDATE TASK EXPORTING fhazu = l_fhazu.

FTR_WORKFLOW_RELEASE_WF_CREATE CALL FUNCTION 'FTR_WORKFLOW_RELEASE_WF_CREATE' IN UPDATE TASK EXPORTING i_bukrs = n_fha-bukrs i_rfha = n_fha-rfha i_stufenanz = sav_stufenanz i_actvt = activity i_user = sy-uname i_deal_changeable = flg_deal_changeable.

TLR_TRADE_ID_UPDATE CALL FUNCTION 'TLR_TRADE_ID_UPDATE' EXPORTING it_trade_id_new = n_trade_id[] it_trade_id_old = a_trade_id[].

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = n_fhazu-sfgzustt i_vtbfha = n_fha TABLES tab_new = n_fhapo tab_old = a_fhapo.

FTR_STAV_STATUS_SAVE CALL FUNCTION 'FTR_STAV_STATUS_SAVE' EXPORTING objnr = n_fha-objnr bukrs = n_fha-bukrs rfha = n_fha-rfha rfhazu = n_fhazu-rfhazu.

STATUS_UPDATE_DIALOG CALL FUNCTION 'STATUS_UPDATE_DIALOG' .

FTR_SAVED_KEY_EXPORT CALL FUNCTION 'FTR_SAVED_KEY_EXPORT' EXPORTING i_bukrs = vtb_header-bukrs i_rfha = vtb_header-rfha.

TCOR_CO_AUTO_CORR_TRIGGER CALL FUNCTION 'TCOR_CO_AUTO_CORR_TRIGGER'.

FTR_SAVED_KEY_EXPORT CALL FUNCTION 'FTR_SAVED_KEY_EXPORT' EXPORTING i_bukrs = vtb_header-bukrs i_rfha = vtb_header-rfha.

TCOR_CO_AUTO_CORR_TRIGGER CALL FUNCTION 'TCOR_CO_AUTO_CORR_TRIGGER'.

DEALDATA_READ CALL FUNCTION 'DEALDATA_READ' EXPORTING companycode = vtb_header-bukrs dealno = vtb_prol-rfha statusno = vtb_prol-rfhazu currently_active_status = 'X' IMPORTING deal = ap_fha status = ap_fhazu TABLES * CONDITIONGROUPS = A_GRFINKO conditions = ap_finko positions = ap_fhapo * DEAL_POSITIONS = A_FHAPO_Z0 EXCEPTIONS deal_not_found = 01 status_not_found = 02.

TLR_TRADE_ID_READ CALL FUNCTION 'TLR_TRADE_ID_READ' EXPORTING iv_bukrs = np_fha-bukrs iv_rfha = np_fha-rfha IMPORTING et_trade_id = a_trade_id[] EXCEPTIONS no_trade_id_found = 1 OTHERS = 2.

TB_ACTIVITY_UPDATE_ONLY CALL FUNCTION 'TB_ACTIVITY_UPDATE_ONLY' IN UPDATE TASK EXPORTING fhazu = l_fhazu.

CASH_FORECAST_TREASURY_POST CALL FUNCTION 'CASH_FORECAST_TREASURY_POST' IN UPDATE TASK EXPORTING i_sfgzustt = n_fhazu-sfgzustt i_vtbfha = n_fha TABLES tab_new = n_fhapo tab_old = a_fhapo.

FINANCE_DEAL_EXPORT_TO_MEM * CALL FUNCTION 'FINANCE_DEAL_EXPORT_TO_MEM' * EXPORTING * N_FHA = N_FHA * N_FHAZU = N_FHAZU * TABLES * N_FHAPO = N_FHAPO * N_FINKO = N_FINKO.

FTR_GET_DATE_TIME CALL FUNCTION 'FTR_GET_DATE_TIME' EXPORTING transaction = vtbfha IMPORTING date = vtbfhazu-dvtrab.

FTR_GET_DATE_TIME





CALL FUNCTION 'FTR_GET_DATE_TIME' EXPORTING transaction = vtbfha IMPORTING date = vtbfhazu-dvtrab time = vtbfhazu-tvtrab.

TB_TRADER_CHECK * CALL FUNCTION 'TB_TRADER_CHECK' * EXPORTING * rdealer = vtbfhazu-rdealer * bukrs = vtb_header-bukrs.

TB_TRADER_AUTHORITY_DETERMINE * CALL FUNCTION 'TB_TRADER_AUTHORITY_DETERMINE' * EXPORTING * rdealer = vtbfhazu-rdealer * bukrs = vtb_header-bukrs * sfhaart = vtb_header-sfhaart * sgsart = vtb_header-sgsart.

STATUS_OBJECT_CREATE * CALL FUNCTION 'STATUS_OBJECT_CREATE' * EXPORTING * CHGKZ = 'X' ** CLIENT = SY-MANDT * OBJNR = OBJNR * OBTYP = 'T41' * STSMA = 'T_00001' ** IONRA_IMP = ** importing ** objnr = * EXCEPTIONS * OBTYP_INVALID = 1 * STATUS_OBJECT_ALREADY_EXISTS = 2 * STSMA_INVALID = 3 * STSMA_OBTYP_INVALID = 4 * OTHERS = 5.

STATUS_BUFFER_REFRESH * CALL FUNCTION 'STATUS_BUFFER_REFRESH' * EXCEPTIONS * OTHERS = 1.

STATUS_MAINTAIN * CALL FUNCTION 'STATUS_MAINTAIN' * EXPORTING ** CLIENT = SY-MANDT * DISPLAY_ONLY = DISP_FLAG ** FLG_NO_STSMA_CHANGE = ' ' ** FLG_OBJECT_LIST = ' ' * OBJNR = VTB_HEADER-OBJNR ** SUBSCREEN_EXT = 0000 ** SUBSCREEN_PROG_EXT = ' ' ** importing ** flg_first_obj = ** flg_last_obj = ** flg_next_obj = ** flg_previous_obj = * EXCEPTIONS * OBJECT_NOT_FOUND = 1 * OTHERS = 2.

STATUS_CHANGES_GET * CALL FUNCTION 'STATUS_CHANGES_GET' * EXPORTING ** CLIENT = SY-MANDT * OBJNR = VTB_HEADER-OBJNR * TABLES * T_CHANGES = CHANGES * EXCEPTIONS * OTHERS = 1.

STATUS_CHANGE_INTERN * CALL FUNCTION 'STATUS_CHANGE_INTERN' * EXPORTING ** CHECK_ONLY = ' ' ** CLIENT = SY-MANDT * OBJNR = OBJNR ** ZEILE = '000' ** importing ** error_occurred = ** object_not_found = ** status_inconsistent = ** status_not_allowed = * TABLES * STATUS = I_STATUS * EXCEPTIONS * OBJECT_NOT_FOUND = 1 * STATUS_INCONSISTENT = 2 * STATUS_NOT_ALLOWED = 3 * OTHERS = 4.

STATUS_CHANGE_FOR_ACTIVITY * CALL FUNCTION 'STATUS_CHANGE_FOR_ACTIVITY' * EXPORTING ** ACTIVITY_ALLOWED = ' ' ** CHECK_ONLY = ' ' ** CLIENT = SY-MANDT ** NO_CHECK = ' ' * OBJNR = OBJNR * VRGNG = STAT_VRGNG ** zeile = '001' ** IMPORTING ** ACTIVITY_NOT_ALLOWED = ** ERROR_OCCURRED = ** OBJECT_NOT_FOUND = ** STATUS_INCONSISTENT = ** STATUS_NOT_ALLOWED = ** WARNING_OCCURRED = * EXCEPTIONS * ACTIVITY_NOT_ALLOWED = 1 * OBJECT_NOT_FOUND = 2 * STATUS_INCONSISTENT = 3 * STATUS_NOT_ALLOWED = 4 * WRONG_INPUT = 5 * WARNING_OCCURED = 6 * OTHERS = 7.

STATUS_CHECK * CALL FUNCTION 'STATUS_CHECK' * EXPORTING ** BYPASS_BUFFER = ' ' ** CLIENT = SY-MANDT * OBJNR = OBJNR * STATUS = I_STAT * EXCEPTIONS * OBJECT_NOT_FOUND = 1 * STATUS_NOT_ACTIVE = 2 * OTHERS = 3.

STATUS_BUFFER_EXPORT_TO_MEMORY * CALL FUNCTION 'STATUS_BUFFER_EXPORT_TO_MEMORY' * EXCEPTIONS * OTHERS = 1.

STATUS_TEXT_CONVERSION * CALL FUNCTION 'STATUS_TEXT_CONVERSION' * EXPORTING ** CLIENT = SY-MANDT * LANGUAGE = SY-LANGU * MODE = 'E' * OBJNR = VTB_HEADER-OBJNR ** STSMA = ' ' * TXT04 = STAT * IMPORTING * STATUS_NUMBER = ESTAT * EXCEPTIONS * INSUFFICIENT_INPUT = 1 * NOT_FOUND = 2 * OBJECT_NOT_FOUND = 3 * WRONG_MODE = 4 * OTHERS = 5.

TB_CHANGEDOCUMENT_CREATE CALL FUNCTION 'TB_CHANGEDOCUMENT_CREATE' EXPORTING bukrs = par_bukrs rfha = par_rfha n_fha = par_n_fha o_fha = par_a_fha n_fhazu = par_n_fhazu o_fhazu = par_a_fhazu * n_ul_of = * o_ul_of = TABLES n_fhapo = n_fhapo o_fhapo = a_fhapo * n_finko = * o_finko = * n_kores = n_kores * o_kores = a_kores n_zv = n_zv o_zv = a_zv * n_afinko = * o_afinko = * N_UL_OFZU = * O_UL_OFZU = * N_UL_FHA = * O_UL_FHA = * N_UL_FHAZU = * O_UL_FHAZU = * N_UL_FHAPO = * O_UL_FHAPO = * N_UL_FINKO = * O_UL_FINKO = n_trade_id = n_trade_id[] o_trade_id = a_trade_id[] EXCEPTIONS OTHERS = 1.

FTR_MIR_CHECK_REF CALL FUNCTION 'FTR_MIR_CHECK_REF' EXPORTING i_objnr = fha-objnr EXCEPTIONS mirrordeal = 1 mirrordeal_exists = 2 swap = 3 option_cylinder = 4 swap_mirror = 5 OTHERS = 7.

FX_DEAL_CREATE_VIA_INTERFACE CALL FUNCTION 'FX_DEAL_CREATE_VIA_INTERFACE' EXPORTING i_vtbfxifdc = h_vtbfxifdc flg_check = con_xon EXCEPTIONS error = 1 OTHERS = 2.

FX_DEAL_CREATE_VIA_INTERFACE CALL FUNCTION 'FX_DEAL_CREATE_VIA_INTERFACE' EXPORTING i_vtbfxifdc = h_vtbfxifdc * FLG_CHECK = EXCEPTIONS error = 1 OTHERS = 2.

TB_RATES_UPDATE CALL FUNCTION 'TB_RATES_UPDATE' IN UPDATE TASK TABLES a_rate = a_rate n_rate = n_rate.

VRM_SET_VALUES call function 'VRM_SET_VALUES' exporting id = 'VTBFHA-RCOMVALCL' values = l_tab_value exceptions others = 0.

VRM_SET_VALUES call function 'VRM_SET_VALUES' exporting id = '*VTBFHA-RCOMVALCL' values = l_tab_value exceptions others = 0.

TB_TRADER_AUTHORITY_DETERMINE * CALL FUNCTION 'TB_TRADER_AUTHORITY_DETERMINE' * EXPORTING * bukrs = p_bukrs * rdealer = p_u_rdealer * sfhaart = p_sfhaart * sgsart = p_sgsart * EXCEPTIONS * authorisation_not_found = 1 * sfhaart_not_found = 2 * sgsart_not_found = 3 * OTHERS = 4.






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