DBA Data[Home] [Help]

APPS.FA_EXP_PKG dependencies on FA_STD_TYPES

Line 7: X_fin_info_ptr in out nocopy fa_std_types.fin_info_struct

3:
4:
5: Function faxbds
6: (
7: X_fin_info_ptr in out nocopy fa_std_types.fin_info_struct
8: ,X_dpr_ptr out nocopy fa_std_types.dpr_struct
9: ,X_dist_book out nocopy varchar2
10: ,X_deprn_rsv out nocopy number
11: ,X_amortized_flag boolean

Line 8: ,X_dpr_ptr out nocopy fa_std_types.dpr_struct

4:
5: Function faxbds
6: (
7: X_fin_info_ptr in out nocopy fa_std_types.fin_info_struct
8: ,X_dpr_ptr out nocopy fa_std_types.dpr_struct
9: ,X_dist_book out nocopy varchar2
10: ,X_deprn_rsv out nocopy number
11: ,X_amortized_flag boolean
12: ,X_mrc_sob_type_code varchar2

Line 32: deprn_summary fa_std_types.fa_deprn_row_struct;

28: pers_per_yr integer;
29: last_per_ctr integer;
30: cur_fy integer;
31: cur_per_num integer;
32: deprn_summary fa_std_types.fa_deprn_row_struct;
33: h_dummy_int integer;
34: h_dummy_bool boolean;
35: h_dummy_varch varchar2(16);
36: begin <>

Line 114: if (rate_source_rule = fa_std_types.FAD_RSR_CALC) or

110: p_log_level_rec => p_log_level_rec);
111: return (FALSE);
112: end if;
113:
114: if (rate_source_rule = fa_std_types.FAD_RSR_CALC) or
115: (rate_source_rule = fa_std_types.FAD_RSR_FORMULA) then
116: use_jdate := prorate_jdate;
117: else
118: use_jdate := deprn_start_jdate;

Line 115: (rate_source_rule = fa_std_types.FAD_RSR_FORMULA) then

111: return (FALSE);
112: end if;
113:
114: if (rate_source_rule = fa_std_types.FAD_RSR_CALC) or
115: (rate_source_rule = fa_std_types.FAD_RSR_FORMULA) then
116: use_jdate := prorate_jdate;
117: else
118: use_jdate := deprn_start_jdate;
119: end if;

Line 228: X_fin_info_ptr in out nocopy fa_std_types.fin_info_struct

224:
225:
226: Function faxexp
227: (
228: X_fin_info_ptr in out nocopy fa_std_types.fin_info_struct
229: ,X_new_adj_cost out nocopy number
230: ,X_ccid integer
231: ,X_sysdate_val date
232: ,X_last_updated_by number

Line 249: dpr fa_std_types.dpr_struct;

245: h_bonus_deprn_exp number;
246: rate_source_rule varchar2(40);
247: deprn_basis_rule varchar(40);
248: afn_zero number;
249: dpr fa_std_types.dpr_struct;
250: dpr_out fa_std_types.dpr_out_struct;
251: dpr_asset_num varchar2(16);
252: dpr_calendar_type varchar2(16);
253: dpr_ceil_name varchar2(31);

Line 250: dpr_out fa_std_types.dpr_out_struct;

246: rate_source_rule varchar2(40);
247: deprn_basis_rule varchar(40);
248: afn_zero number;
249: dpr fa_std_types.dpr_struct;
250: dpr_out fa_std_types.dpr_out_struct;
251: dpr_asset_num varchar2(16);
252: dpr_calendar_type varchar2(16);
253: dpr_ceil_name varchar2(31);
254: h_dummy_dpr_arr fa_std_types.dpr_arr_type;

Line 254: h_dummy_dpr_arr fa_std_types.dpr_arr_type;

250: dpr_out fa_std_types.dpr_out_struct;
251: dpr_asset_num varchar2(16);
252: dpr_calendar_type varchar2(16);
253: dpr_ceil_name varchar2(31);
254: h_dummy_dpr_arr fa_std_types.dpr_arr_type;
255: h_dummy_int integer;
256: h_dummy_bool boolean;
257:
258: -- NOTE: Fixed to bug#1583869 - hsugimot

Line 271: h_rule_in FA_STD_TYPES.fa_deprn_rule_in_struct;

267: cur_fy integer;
268: cur_per_num integer;
269:
270: -- Added for Depreciable Basis Formula
271: h_rule_in FA_STD_TYPES.fa_deprn_rule_in_struct;
272: h_rule_out FA_STD_TYPES.fa_deprn_rule_out_struct;
273:
274: -- override for what if
275: running_mode number;

Line 272: h_rule_out FA_STD_TYPES.fa_deprn_rule_out_struct;

268: cur_per_num integer;
269:
270: -- Added for Depreciable Basis Formula
271: h_rule_in FA_STD_TYPES.fa_deprn_rule_in_struct;
272: h_rule_out FA_STD_TYPES.fa_deprn_rule_out_struct;
273:
274: -- override for what if
275: running_mode number;
276:

Line 291: X_fin_info_ptr.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

287: --
288: -- Don't calculate expense for CIP/EXPENSED assets
289: --
290:
291: X_fin_info_ptr.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
292:
293: /*+++++++++++++++++++++++++++++++++++++++++++++++
294: + Bug 1952858 +
295: + Need to check if the asset cost = 0 and the +

Line 315: dpr.deprn_override_flag := fa_std_types.FA_NO_OVERRIDE;

311: dpr.bonus_deprn_rsv := 0;
312:
313: -- Manual Override
314: dpr.used_by_adjustment := TRUE;
315: dpr.deprn_override_flag := fa_std_types.FA_NO_OVERRIDE;
316: if X_fin_info_ptr.running_mode = fa_std_types.FA_DPR_PROJECT then
317: running_mode:= fa_std_types.FA_DPR_PROJECT;
318: else
319: running_mode:= fa_std_types.FA_DPR_NORMAL;

Line 316: if X_fin_info_ptr.running_mode = fa_std_types.FA_DPR_PROJECT then

312:
313: -- Manual Override
314: dpr.used_by_adjustment := TRUE;
315: dpr.deprn_override_flag := fa_std_types.FA_NO_OVERRIDE;
316: if X_fin_info_ptr.running_mode = fa_std_types.FA_DPR_PROJECT then
317: running_mode:= fa_std_types.FA_DPR_PROJECT;
318: else
319: running_mode:= fa_std_types.FA_DPR_NORMAL;
320: end if;

Line 317: running_mode:= fa_std_types.FA_DPR_PROJECT;

313: -- Manual Override
314: dpr.used_by_adjustment := TRUE;
315: dpr.deprn_override_flag := fa_std_types.FA_NO_OVERRIDE;
316: if X_fin_info_ptr.running_mode = fa_std_types.FA_DPR_PROJECT then
317: running_mode:= fa_std_types.FA_DPR_PROJECT;
318: else
319: running_mode:= fa_std_types.FA_DPR_NORMAL;
320: end if;
321: dpr.mrc_sob_type_code := x_mrc_sob_type_code;

Line 319: running_mode:= fa_std_types.FA_DPR_NORMAL;

315: dpr.deprn_override_flag := fa_std_types.FA_NO_OVERRIDE;
316: if X_fin_info_ptr.running_mode = fa_std_types.FA_DPR_PROJECT then
317: running_mode:= fa_std_types.FA_DPR_PROJECT;
318: else
319: running_mode:= fa_std_types.FA_DPR_NORMAL;
320: end if;
321: dpr.mrc_sob_type_code := x_mrc_sob_type_code;
322: -- End of Manual Override
323:

Line 542: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV) then

538: -- if/else/endif below implemented due to STRICT_FLAT adjustments
539: -- new_prior_fy_exp is returning value from faxcde that is
540: -- a summary of new calculated (correct) value and old backdated
541: -- value stored in fa_deprn_summary.
542: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV) then
543: h_new_prior_fy_exp := dpr_out.new_prior_fy_exp -
544: dpr.prior_fy_exp;
545: if (p_log_level_rec.statement_level) then
546: fa_debug_pkg.add('faxexp','dpr.prior_fy_exp',

Line 574: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV) then

570:
571: h_new_deprn_rsv := cur_deprn_rsv;
572: h_new_prior_fy_exp := cur_deprn_rsv - dpr.ytd_deprn;
573:
574: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV) then
575: h_new_adj_cost := dpr.rec_cost - h_new_prior_fy_exp;
576:
577: else -- COST basis
578: h_new_adj_cost := dpr.rec_cost;

Line 603: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV and

599:
600: -- X_new_formula_factor is set for FORMULA-NBV assets.
601: -- X_new_formula_factor is 1 in all other cases
602:
603: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV and
604: X_fin_info_ptr.asset_type = 'CAPITALIZED') then
605: if (rate_source_rule <> fa_std_types.FAD_RSR_FORMULA) then
606: -- NOTE: Fixed to bug#1583869 - hsugimot
607: -- X_new_adj_cost := dpr.rec_cost - dpr_out.new_deprn_rsv;

Line 605: if (rate_source_rule <> fa_std_types.FAD_RSR_FORMULA) then

601: -- X_new_formula_factor is 1 in all other cases
602:
603: if (deprn_basis_rule = fa_std_types.FAD_DBR_NBV and
604: X_fin_info_ptr.asset_type = 'CAPITALIZED') then
605: if (rate_source_rule <> fa_std_types.FAD_RSR_FORMULA) then
606: -- NOTE: Fixed to bug#1583869 - hsugimot
607: -- X_new_adj_cost := dpr.rec_cost - dpr_out.new_deprn_rsv;
608: X_new_adj_cost := dpr.rec_cost - h_new_deprn_rsv;
609: X_new_formula_factor := 1;