SAP Reports / Programs | Financial Accounting | Asset Accounting | Handling of Inflation(FI-AA-SVA-HI) SAP FI
J_1AA1F1 SAP ABAP INCLUDE - Forms for automatic revaluation
J_1AA1F1 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 J_1AA1F1 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 J_1AA1F1. "Basic submit
SUBMIT J_1AA1F1 AND RETURN. "Return to original report after report execution complete
SUBMIT J_1AA1F1 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Forms for automatic revaluation
INCLUDES used within this REPORT J_1AA1F1
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:
T093B_READ_MULTIPLE CALL FUNCTION 'T093B_READ_MULTIPLE' EXPORTING i_bukrs = p_bukrs TABLES t_t093b = i_t093b * T_T093T = EXCEPTIONS T093B_NOT_FOUND = 1 OTHERS = 2 .
DATE_TO_PERIOD_CONVERT CALL FUNCTION 'DATE_TO_PERIOD_CONVERT' EXPORTING i_date = f_date * I_MONMIT = 00 i_periv = f_periv IMPORTING e_buper = f_perid e_gjahr = f_gjahr EXCEPTIONS input_false = 1 t009_notfound = 2 t009b_notfound = 3 OTHERS = 4.
J_1A_CUSTOMIZING_CHECK CALL FUNCTION 'J_1A_CUSTOMIZING_CHECK' EXPORTING i_bukrs = p_bukrs i_gjahr = p_gjahr TABLES i_rev_areas = i_at089 i_rev_keys = i_a2 i_control_methods = i_a2m i_tty_areas = i_tabwa i_par_cur_areas = i_pacur CHANGING c_aa_gjahr = i_gjahr c_cc_infl_data = i_infmet c_t093c = xt093c c_t001 = xt001.
J_1A_GET_POSTING_DATES CALL FUNCTION 'J_1A_GET_POSTING_DATES' EXPORTING i_bez_date = p_bzdat i_posting_variant = i_infmet-j_1atpodep IMPORTING e_next_post_date = i_ldate e_prev_post_date = i_fdate TABLES t_inft14 = i_inft14.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = 0 text = TEXT-159 .
ANLA_READ_RANGE_TRIGGER CALL FUNCTION 'ANLA_READ_RANGE_TRIGGER' EXPORTING i_abra = i_iabra * I_VORRAT = IMPORTING e_goon = i_goon TABLES * T_DOPT = * t_r_afabe = r_aafabe t_r_anln1 = s_anln1 t_r_anln2 = s_anln2 t_anla = i_anla EXCEPTIONS no_records_found = 1 input_false = 2 OTHERS = 3.
ABRA_SET_ANLN2 CALL FUNCTION 'ABRA_SET_ANLN2' EXPORTING i_aanln2 = i_anla-anln2 i_banln2 = i_anla-anln2.
GET_NEXT_ANLB CALL FUNCTION 'GET_NEXT_ANLB' TABLES t_anlb = i_janlb * T_FSEL_ANLB = EXCEPTIONS no_records_found = 1 OTHERS = 2.
GET_NEXT_ANLZ CALL FUNCTION 'GET_NEXT_ANLZ' TABLES t_anlz = i_anlz EXCEPTIONS no_records_found = 1 OTHERS = 2.
GET_NEXT_ANLC CALL FUNCTION 'GET_NEXT_ANLC' EXPORTING i_agjahr = p_gjahr i_bgjahr = p_gjahr TABLES t_anlc = i_anlc EXCEPTIONS no_records_found = 1 OTHERS = 2.
GET_NEXT_ANEP CALL FUNCTION 'GET_NEXT_ANEP' TABLES t_anep = h_anep_org EXCEPTIONS no_records_found = 1 OTHERS = 2.
GET_NEXT_ANEA CALL FUNCTION 'GET_NEXT_ANEA' TABLES t_anea = i_anea EXCEPTIONS no_records_found = 1 OTHERS = 2.
J_1A_ASSET_CALCULATE_RV CALL FUNCTION 'J_1A_ASSET_CALCULATE_RV' EXPORTING i_tdate = p_bzdat i_stdat = i_gjahr_beg i_gjahr = p_gjahr i_bukrs = p_bukrs i_buper = i_poper i_nopost = con_x i_xzugne = flg_xzugne i_exect = con_x I_FLG_POST_ERROR = FLG_POST_ERROR I_FLG_END_OF_LIFE = FLG_END_OF_LIFE IMPORTING e_rlamin = i_rlamin e_provi = h_provi E_FLG_POST_ERROR = FLG_POST_ERROR E_FLG_END_OF_LIFE = FLG_END_OF_LIFE TABLES t_anlc = i_anlc t_anep = i_anep t_anea = i_anea t_anlb = i_janlb t_anepi = i_anepi t_anlz = i_anlz t_anla = i_anla t_fimsg = i_fimsg EXCEPTIONS OTHERS = 1.
FAA_NEWDCP_BUFFER_REFRESH CALL FUNCTION 'FAA_NEWDCP_BUFFER_REFRESH' EXPORTING IB_REFRESH_ASSET_MANAGER = con_x IB_REFRESH_SEGMENT_BUFFER = con_x IB_REFRESH_BUFFER_REGISTRY = con_x.
AMBU_INTERFACE_FOR_AB01_FB01 CALL FUNCTION 'AMBU_INTERFACE_FOR_AB01_FB01' EXPORTING i_awtyp = 'AMBU' i_tcode = 'J1AI' " by Note 638435 TABLES t_anea = lt_anea t_anep = lt_anep t_ants = lt_ants t_anbz = lt_anbz EXCEPTIONS error_occurred = 1 OTHERS = 2.
AMBU_AC_TABLES_GET_FROM_BUFFER CALL FUNCTION 'AMBU_AC_TABLES_GET_FROM_BUFFER' TABLES t_acchd = lt_acchd t_accit = lt_accit t_accda = lt_accda t_acccr = lt_acccr EXCEPTIONS not_found = 1 OTHERS = 2.
AMSP_FLAG_DIALOG_CALL_SET_GET CALL FUNCTION 'AMSP_FLAG_DIALOG_CALL_SET_GET' EXPORTING i_xdial = space.
AMBU_CALL_AC_DOCUMENT_POST CALL FUNCTION 'AMBU_CALL_AC_DOCUMENT_POST' TABLES t_accit = lt_accit t_acchd = lt_acchd t_acccr = lt_acccr t_accda = lt_accda t_return = lt_return EXCEPTIONS error_message = 01.
CALL FUNCTION 'AMDP_MESSAGE_SEND' TABLES t_return = lt_return EXCEPTIONS OTHERS = 4.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = n_percent text = txt_perc.
FI_MESSAGE_COLLECT CALL FUNCTION 'FI_MESSAGE_COLLECT' EXPORTING i_fimsg = i_fimsg * I_XAPPN = ' ' EXCEPTIONS msgid_missing = 1 msgno_missing = 2 msgty_missing = 3 OTHERS = 4.
FIRST_DAY_IN_PERIOD_GET CALL FUNCTION 'FIRST_DAY_IN_PERIOD_GET' EXPORTING i_gjahr = p_gjahr * I_MONMIT = 00 i_periv = i_periv i_poper = i_poper IMPORTING e_date = f_date1 EXCEPTIONS input_false = 1 t009_notfound = 2 t009b_notfound = 3 OTHERS = 4.
ENQUEUE_EJ_1AT10 CALL FUNCTION 'ENQUEUE_EJ_1AT10' EXPORTING mode_j_1ainft10 = 'S' mandt = sy-mandt j_1aapplkp = con_appl bukrs = p_bukrs * X_J_1AAPPLKP = ' ' * X_BUKRS = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
J_1A_SET_LOCK_DATE CALL FUNCTION 'J_1A_SET_LOCK_DATE' EXPORTING application_call = con_appl i_bukrs = p_bukrs EXCEPTIONS OTHERS = 1.
DEQUEUE_EJ_1AT10 CALL FUNCTION 'DEQUEUE_EJ_1AT10' EXPORTING mode_j_1ainft10 = 'S' mandt = sy-mandt j_1aapplkp = con_appl bukrs = p_bukrs * X_J_1AAPPLKP = ' ' * X_BUKRS = ' ' * _SCOPE = '3' * _SYNCHRON = ' ' * _COLLECT = ' ' EXCEPTIONS OTHERS = 1.
RA_ASSET_ENQUEUE CALL FUNCTION 'RA_ASSET_ENQUEUE' EXPORTING bukrs = p_bukrs anln1 = l_anln1_init anln2 = l_anln2_init i_scope = '1'.
RA_ASSET_DEQUEUE CALL FUNCTION 'RA_ASSET_DEQUEUE' EXPORTING bukrs = p_bukrs anln1 = l_anln1_init anln2 = l_anln2_init.
DEQUEUE_EANLA CALL FUNCTION 'DEQUEUE_EANLA' EXPORTING mode_anla = 'S' bukrs = p_bukrs _scope = '1'.
FI_MESSAGE_PRINT CALL FUNCTION 'FI_MESSAGE_PRINT' EXPORTING * I_MSORT = ' ' i_xausn = 'X' * I_XEAUS = ' ' * I_XSKIP = ' ' i_cemsg = 6 i_cwmsg = 3 i_comsg = 2 EXCEPTIONS OTHERS = 1.
FIRST_DAY_IN_PERIOD_GET CALL FUNCTION 'FIRST_DAY_IN_PERIOD_GET' EXPORTING i_gjahr = xt093c-lgjahr * I_MONMIT = 00 i_periv = i_periv i_poper = i_poper IMPORTING e_date = h_date EXCEPTIONS input_false = 1 t009_notfound = 2 t009b_notfound = 3 OTHERS = 4.
DATE_TO_PERIOD_CONVERT CALL FUNCTION 'DATE_TO_PERIOD_CONVERT' EXPORTING i_date = f_bzdat * I_MONMIT = 00 i_periv = i_periv IMPORTING e_buper = h_poper e_gjahr = h_gjahr EXCEPTIONS input_false = 1 t009_notfound = 2 t009b_notfound = 3 OTHERS = 4.
J_1A_ASSET_CALCULATE_RV CALL FUNCTION 'J_1A_ASSET_CALCULATE_RV' EXPORTING i_odate = f_stdat i_tdate = f_bzdat i_stdat = f_stdat i_gjahr = h_gjahr i_buper = h_poper i_bukrs = p_bukrs i_nopost = con_x i_xzugne = flg_xzugne i_exect = flg_first_execute IMPORTING e_rlamin = h_rlamin e_provi = i_1aprolog-provi TABLES t_anlc = f_anlc t_anep = f_anep t_anea = f_anea t_anlb = f_anlb t_anepi = i_anepi t_anlz = i_anlz t_anla = i_anla t_fimsg = i_fimsg EXCEPTIONS OTHERS = 1.
DEPR_RECALCULATE CALL FUNCTION 'DEPR_RECALCULATE' EXPORTING * E_VORTRAG = 'X' i_ants = h_ants i_fehler = 'X' i_function = 'N' i_perbis = h_poper * I_TRACE = ' ' * I_CAL_CLOSED_FYEARS = ' ' IMPORTING e_kafabe = h_afabe e_vortrag = h_cfeld TABLES t_anea = f_anea t_anep = f_anep t_anfm = h_anfm t_anlb = f_anlb t_anlc = h_anlc t_anlz = i_anlz * T_ANLC_XZUGNE = EXCEPTIONS * answpruef_verletzt = 1 ANSWPRUEF_VERLETZT = 8 "> 911033 depr_not_posible = 2 minwert_verletzt = 3 normal_afa_verletzt = 4 period_false = 5 rbw_virt_afaber_verletzt = 6 sonder_afa_verletzt = 7 OTHERS = 8.
TABW_READ CALL FUNCTION 'TABW_READ' EXPORTING f_tabw = h_tabw IMPORTING f_tabw = h_tabw e_tabwg = h_tabwg.
ANEP_AFARECHNEN CALL FUNCTION 'ANEP_AFARECHNEN' EXPORTING i_ants = h_ants * I_DATBIS = '00000000' i_fehler = 'X' i_perbis = h_poper * I_TRACE = ' ' * I_NACHAKT = ' ' * I_CAL_CLOSED_FYEARS = ' ' IMPORTING e_kafabe = h_afabe TABLES t_anea = h_ranea t_anep = h_ranep t_anfm = h_anfm t_anlb = f_anlb t_anlc = h_anlc t_anlz = h_anlz EXCEPTIONS depr_not_posible = 1 man_auto_afa = 2 minwert_verletzt = 3 normal_afa_verletzt = 4 period_false = 5 rbw_virt_afaber_verletzt = 6 sonder_afa_verletzt = 7 OTHERS = 8.
TABW_READ CALL FUNCTION 'TABW_READ' EXPORTING f_tabw = h_tabw IMPORTING f_tabw = h_tabw e_tabwg = h_tabwg.
J_1A_GET_END_OF_TB_PERIOD CALL FUNCTION 'J_1A_GET_END_OF_TB_PERIOD' EXPORTING i_ordat = h_manep-bzdat i_tbedep = i_a2-j_1atbedep i_postdt = 'X' IMPORTING i_tbdate = h_date.
TABW_READ CALL FUNCTION 'TABW_READ' EXPORTING f_tabw = h_tabw IMPORTING f_tabw = h_tabw e_tabwg = h_tabwg.
ANEK_READ_SINGLE CALL FUNCTION 'ANEK_READ_SINGLE' EXPORTING f_anek = anek IMPORTING f_anek = anek EXCEPTIONS not_found = 1 OTHERS = 2.
ANEK_READ_MULTIPLE_AC_DOCUMENT CALL FUNCTION 'ANEK_READ_MULTIPLE_AC_DOCUMENT' EXPORTING i_belnr = anek-belnr i_bukrs = anek-bukrs i_aworg = anek-aworg i_awtyp = anek-awtyp i_awsys = anek-awsys TABLES t_anek = h_anek EXCEPTIONS not_found = 1 OTHERS = 2.
T090C_READ CALL FUNCTION 'T090C_READ' EXPORTING f_t090c = s_t090c * i_flg_access = 'O' i_bukrs = p_anlb_bukrs i_afaber = p_anlb_afabe IMPORTING f_t090c = s_t090c * E_T090T = EXCEPTIONS not_found = 1 OTHERS = 2.
T090_READ CALL FUNCTION 'T090_READ' * TABLES * T_T090P = CHANGING f_t090 = s_t090 EXCEPTIONS not_found = 1 OTHERS = 2.
ENQUEUE_EANLA CALL FUNCTION 'ENQUEUE_EANLA' EXPORTING mode_anla = 'S' bukrs = p_bukrs _scope = '1' EXCEPTIONS foreign_lock = 1 system_failure = 2.
FIRST_AND_LAST_DAY_IN_YEAR_GET CALL FUNCTION 'FIRST_AND_LAST_DAY_IN_YEAR_GET' EXPORTING I_GJAHR = P_GJAHR I_PERIV = I_PERIV IMPORTING E_LAST_DAY = F_LAST_DAY E_FIRST_DAY = F_FIRST_DAY.
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 J_1AA1F1 or its description.