DBA Data[Home] [Help]

APPS.FA_CDE_PKG dependencies on FA_CDE_PKG

Line 1: PACKAGE BODY FA_CDE_PKG as

1: PACKAGE BODY FA_CDE_PKG as
2: /* $Header: FACDEB.pls 120.90.12010000.4 2008/10/15 11:52:05 gigupta ship $ */
3:
4: ROUND_WITH_RESTRICTIONS constant integer:= 0;
5: ROUND_ALWAYS constant integer:= 1;

Line 61: calling_fn => 'fa_cde_pkg.faxgpr',

57: WHERE RowID = h.rowid;
58:
59: If SQL%NOTFOUND then
60: fa_srvr_msg.add_message (
61: calling_fn => 'fa_cde_pkg.faxgpr',
62: name => 'FA_DEPRN_FETCH_PROD',
63: p_log_level_rec => p_log_level_rec);
64: raise NO_DATA_FOUND;
65: end if;

Line 74: calling_fn => 'fa_cde_pkg.faxgpr'

70:
71: exception
72: when others then
73: fa_srvr_msg.add_sql_error (
74: calling_fn => 'fa_cde_pkg.faxgpr'
75: ,p_log_level_rec => p_log_level_rec);
76: return (FALSE);
77: end FAXGPR;
78:

Line 104: calling_fn => 'fa_cde_pkg.faxgtr'

100: X_rate := 0;
101: return (TRUE);
102: when others then
103: fa_srvr_msg.add_sql_error (
104: calling_fn => 'fa_cde_pkg.faxgtr'
105: ,p_log_level_rec => p_log_level_rec);
106: return (FALSE);
107: end FAXGTR;
108:

Line 355: calling_fn => 'fa_cde_pkg.faxgfr',

351: X_Success := 1;
352: exception
353: when no_data_found then
354: fa_srvr_msg.add_message (
355: calling_fn => 'fa_cde_pkg.faxgfr',
356: name => 'FA_FORMULA_RATE_NO_DATA_FOUND',
357: token1 => 'ASSET_ID',
358: value1 => to_char(X_Asset_Id),
359: p_log_level_rec => p_log_level_rec);

Line 364: calling_fn => 'fa_cde_pkg.faxgfr',

360: X_rate := 0;
361: X_Success := -2;
362: when zero_divide then
363: fa_srvr_msg.add_message (
364: calling_fn => 'fa_cde_pkg.faxgfr',
365: name => 'FA_FORMULA_RATE_ZERO_DIVIDE',
366: token1 => 'ASSET_ID',
367: value1 => to_char(X_Asset_Id),
368: p_log_level_rec => p_log_level_rec);

Line 373: calling_fn => 'fa_cde_pkg.faxgfr',

369: X_rate := 0;
370: X_Success := 1;
371: when cache_exception then
372: fa_srvr_msg.add_message (
373: calling_fn => 'fa_cde_pkg.faxgfr',
374: name => 'FA_SHARED_INVALID_METHOD_RATE',
375: p_log_level_rec => p_log_level_rec);
376: X_rate := 0;
377: X_Success := -7;

Line 380: calling_fn => 'fa_cde_pkg.faxgfr',

376: X_rate := 0;
377: X_Success := -7;
378: when rate_null_exception then
379: fa_srvr_msg.add_message (
380: calling_fn => 'fa_cde_pkg.faxgfr',
381: name => 'FA_FORMULA_RATE_NULL',
382: token1 => 'ASSET_ID',
383: value1 => to_char(X_Asset_Id),
384: p_log_level_rec => p_log_level_rec);

Line 389: calling_fn => 'fa_cde_pkg.faxgfr',

385: X_rate := 0;
386: X_Success := -4;
387: when rem_life_exception then
388: fa_srvr_msg.add_message (
389: calling_fn => 'fa_cde_pkg.faxgfr',
390: name => 'FA_FORMULA_RATE_LIFE',
391: token1 => 'ASSET_ID',
392: value1 => to_char(X_Asset_Id),
393: p_log_level_rec => p_log_level_rec);

Line 398: calling_fn => 'fa_cde_pkg.faxgfr',

394: X_rate := 0;
395: X_Success := -5;
396: when rate_neg_exception then
397: fa_srvr_msg.add_message (
398: calling_fn => 'fa_cde_pkg.faxgfr',
399: name => 'FA_FORMULA_RATE_NEGATIVE',
400: token1 => 'ASSET_ID',
401: value1 => to_char(round(X_Rate, 5)),
402: p_log_level_rec => p_log_level_rec);

Line 407: calling_fn => 'fa_cde_pkg.faxgfr'

403: X_rate := 0;
404: X_Success := 1;
405: when others then
406: fa_srvr_msg.add_sql_error (
407: calling_fn => 'fa_cde_pkg.faxgfr'
408: ,p_log_level_rec => p_log_level_rec);
409: X_rate := 0;
410: X_Success := 0;
411: end FAXGFR;

Line 565: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

561: last_divide_evenly_flag :=
562: substr (fa_cache_pkg.fazcbc_record.DEPRN_ALLOCATION_CODE,1,1) = 'E';
563:
564: if not fa_cache_pkg.fazcct (last_pro_cal) then
565: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
566: p_log_level_rec => p_log_level_rec);
567: return (FALSE);
568: end if;
569: p_pers_per_yr := fa_cache_pkg.fazcct_record.NUMBER_PER_FISCAL_YEAR;

Line 572: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

568: end if;
569: p_pers_per_yr := fa_cache_pkg.fazcct_record.NUMBER_PER_FISCAL_YEAR;
570:
571: if not fa_cache_pkg.fazcct (X_dpr.calendar_type, p_log_level_rec) then
572: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
573: p_log_level_rec => p_log_level_rec);
574: return (FALSE);
575: end if;
576: end if;

Line 594: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

590: h_b_temp := (X_d_pers_per_yr - X_dp_begin) / X_d_pers_per_yr;
591:
592: else
593: if not fa_cache_pkg.fazcff (last_pro_cal, X_dpr.book, X_y_begin,h_p_period_fracs, p_log_level_rec) then
594: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
595: p_log_level_rec => p_log_level_rec);
596: return (FALSE);
597: end if;
598:

Line 600: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

596: return (FALSE);
597: end if;
598:
599: if not fa_cache_pkg.fazcff (X_dpr.calendar_type,X_dpr.book,X_y_begin,h_d_period_fracs, p_log_level_rec) then
600: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
601: p_log_level_rec => p_log_level_rec);
602: return (FALSE);
603: end if;
604:

Line 626: calling_fn => 'fa_cde_pkg.faxcfyf',

622:
623: if X_rate_source_rule = 'TABLE' then
624: if h_by_dfrac <= 0 then
625: fa_srvr_msg.add_message (
626: calling_fn => 'fa_cde_pkg.faxcfyf',
627: name => 'FA_DEPRN_ILLEGAL_VALUE',
628: token1 => 'VARIABLE',
629: value1 => 'BY_DFRAC',
630: token2 => 'VALUE',

Line 642: calling_fn => 'fa_cde_pkg.faxcfyf',

638: X_by_factor := 1/h_by_dfrac;
639: elsif X_rate_source_rule = 'FLAT' then
640: if h_by_dfrac <= 0 then
641: fa_srvr_msg.add_message (
642: calling_fn => 'fa_cde_pkg.faxcfyf',
643: name => 'FA_DEPRN_ILLEGAL_VALUE',
644: token1 => 'VARIABLE',
645: value1 => 'BY_DFRAC',
646: token2 => 'VALUE',

Line 658: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf.switch',

654:
655: elsif X_rate_source_rule in ('PRODUCTION','CALCULATED', 'FORMULA') then
656: X_by_factor := 1;
657: else
658: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf.switch',
659: p_log_level_rec => p_log_level_rec);
660: return(FALSE);
661: end if;
662:

Line 682: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

678: else
679: if not fa_cache_pkg.fazcff (last_pro_cal, X_dpr.book, X_y_ret,
680: h_p_period_fracs
681: ,p_log_level_rec => p_log_level_rec) then
682: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
683: p_log_level_rec => p_log_level_rec);
684: return (FALSE);
685: end if;
686:

Line 691: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

687: -- Bug#4953366: if not fa_cache_pkg.fazcff (X_dpr.calendar_type, X_dpr.book, X_y_ret,
688: if not fa_cache_pkg.fazcff (X_dpr.calendar_type, X_dpr.book, h_cur_fy,
689: h_d_period_fracs
690: ,p_log_level_rec => p_log_level_rec) then
691: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
692: p_log_level_rec => p_log_level_rec);
693: return (FALSE);
694: end if;
695:

Line 727: calling_fn => 'fa_cde_pkg.faxcfyf',

723:
724: if X_y_ret = X_y_begin then
725: if X_by_frac <= 0 then
726: fa_srvr_msg.add_message (
727: calling_fn => 'fa_cde_pkg.faxcfyf',
728: name => 'FA_DEPRN_ILLEGAL_VALUE',
729: token1 => 'VARIABLE',
730: value1 => 'BY_FRAC',
731: token2 => 'VALUE',

Line 773: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

769: h_d_temp := (X_dp_d_ptr - 1) / X_d_pers_per_yr;
770: else
771: if not fa_cache_pkg.fazcff (last_pro_cal, X_dpr.book, X_y_dead,
772: h_p_period_fracs, p_log_level_rec) then
773: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
774: p_log_level_rec => p_log_level_rec);
775: return (FALSE);
776: end if;
777:

Line 780: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',

776: end if;
777:
778: if not fa_cache_pkg.fazcff (X_dpr.calendar_type, X_dpr.book, X_y_dead,
779: h_d_period_fracs, p_log_level_rec) then
780: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcfyf',
781: p_log_level_rec => p_log_level_rec);
782: return (FALSE);
783: end if;
784:

Line 831: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxcfyf'

827: return (TRUE);
828:
829: exception
830: when others then
831: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxcfyf'
832: ,p_log_level_rec => p_log_level_rec);
833: return (FALSE);
834: end FAXCFYF;
835:

Line 1315: h_dummy_bool := fa_cde_pkg.faprds(dpr_in

1311: --
1312: -- Debug
1313: --
1314: if (p_log_level_rec.statement_level) then
1315: h_dummy_bool := fa_cde_pkg.faprds(dpr_in
1316: ,p_log_level_rec => p_log_level_rec);
1317: end if;
1318:
1319: -- int_debug.enable;

Line 1367: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',

1363: ret_year_frac := 0;
1364:
1365: if not fa_cache_pkg.fazccmt (dpr_in.method_code,dpr_in.life, p_log_level_rec) then
1366:
1367: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',
1368: p_log_level_rec => p_log_level_rec);
1369: return (FALSE);
1370: end if;
1371:

Line 1413: calling_fn => 'fa_cde_pkg.faxcde',

1409: flat_rate_src_flag or
1410: formula_rate_src_flag) then
1411:
1412: fa_srvr_msg.add_message (
1413: calling_fn => 'fa_cde_pkg.faxcde',
1414: name => 'FA_SHARED_NO_RATE_SOURCE_RULE',
1415: translate => FALSE,
1416: p_log_level_rec => p_log_level_rec);
1417: return (FALSE);

Line 1427: calling_fn => 'fa_cde_pkg.faxcde',

1423:
1424: if not (cost_deprn_basis_flag or nbv_deprn_basis_flag) then
1425:
1426: fa_srvr_msg.add_message (
1427: calling_fn => 'fa_cde_pkg.faxcde',
1428: name => 'FA_SHARED_NO_DEPRN_BASIS_RULE',
1429: translate => FALSE,
1430: p_log_level_rec => p_log_level_rec);
1431:

Line 1442: calling_fn => 'fa_cde_pkg.faxcde',

1438: formula_rate_src_flag or -- ENERGY
1439: prod_rate_src_flag) then -- ENERGY
1440:
1441: fa_srvr_msg.add_message (
1442: calling_fn => 'fa_cde_pkg.faxcde',
1443: name => 'FA_SHARED_NBV_NOT_FLAT',
1444: translate => FALSE,
1445: p_log_level_rec => p_log_level_rec);
1446: return (FALSE);

Line 1494: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1490: --
1491: -- Get the number of periods per year in the depreciation calendar
1492: --
1493: if not fa_cache_pkg.fazcct(dpr_in.calendar_type) then
1494: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1495: p_log_level_rec => p_log_level_rec);
1496: return (FALSE);
1497: end if;
1498:

Line 1505: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1501: --
1502: -- Get the number of periods per year in the rate calendar
1503: --
1504: if not fa_cache_pkg.fazcct(prorate_calendar) then
1505: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1506: p_log_level_rec => p_log_level_rec);
1507: return (FALSE);
1508: end if;
1509:

Line 1537: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1533: deprn_period_dcal_begin,
1534: deprn_year_dcal_begin,
1535: h_dummy,
1536: p_log_level_rec) then
1537: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1538: p_log_level_rec => p_log_level_rec);
1539: return (FALSE);
1540: end if;
1541:

Line 1553: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1549: , deprn_period_pcal_begin
1550: , deprn_year_pcal_begin
1551: , h_dummy
1552: , p_log_level_rec) then
1553: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1554: p_log_level_rec => p_log_level_rec);
1555: return (FALSE);
1556: end if;
1557:

Line 1568: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1564: , prorate_period_pcal_begin
1565: , prorate_year_pcal_begin
1566: , h_dummy
1567: , p_log_level_rec) then
1568: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1569: p_log_level_rec => p_log_level_rec);
1570: return (FALSE);
1571: end if;
1572:

Line 1602: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1598: , ret_period_dcal
1599: , ret_year_pcal
1600: , h_dummy
1601: , p_log_level_rec) then
1602: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1603: p_log_level_rec => p_log_level_rec);
1604: return (FALSE);
1605: end if;
1606:

Line 1618: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1614: , ret_period_pcal
1615: , ret_year_pcal
1616: , h_dummy
1617: , p_log_level_rec) then
1618: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1619: p_log_level_rec => p_log_level_rec);
1620: return (FALSE);
1621: end if;
1622:

Line 1630: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1626: , ret_prorate_period_pcal
1627: , ret_year_pcal
1628: , h_dummy
1629: , p_log_level_rec) then
1630: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1631: p_log_level_rec => p_log_level_rec);
1632: return (FALSE);
1633: end if;
1634: else

Line 1670: if not fa_cde_pkg.faxcde(dpr

1666: dpr.p_cl_begin := 1;
1667: dpr.p_cl_end := MOD(dpr_in.p_cl_begin - 2 + perds_per_yr_dcal,
1668: perds_per_yr_dcal) + 1;
1669:
1670: if not fa_cde_pkg.faxcde(dpr
1671: , h_dummy_dpr
1672: , dpr_out
1673: , fmode, 0
1674: , p_log_level_rec) then

Line 1675: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1671: , h_dummy_dpr
1672: , dpr_out
1673: , fmode, 0
1674: , p_log_level_rec) then
1675: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1676: p_log_level_rec => p_log_level_rec);
1677: return (FALSE);
1678: end if;
1679:

Line 1760: if not fa_cde_pkg.faxcfyf(dpr

1756: if c_prd_flag%NOTFOUND then
1757: prd_flag := 'N';
1758: end if;
1759: close c_prd_flag;
1760: if not fa_cde_pkg.faxcfyf(dpr
1761: , perds_per_yr_dcal
1762: , rate_source_rule
1763: , prorate_year_pcal_begin
1764: , fy_fully_rsv_1

Line 1784: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',

1780: , ret_year_frac
1781: , prd_flag
1782: , p_log_level_rec) then
1783:
1784: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',
1785: p_log_level_rec => p_log_level_rec);
1786: return (FALSE);
1787: end if;
1788:

Line 1823: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',

1819: , dpr.book
1820: , fyctr
1821: , perds_fracs_arr
1822: , p_log_level_rec) then
1823: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',
1824: p_log_level_rec => p_log_level_rec);
1825: return (FALSE);
1826: end if;
1827:

Line 1898: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1894: , dpr_out.deprn_factor_used
1895: , dpr_out.alternate_deprn_factor_used
1896: , p_log_level_rec) then
1897:
1898: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1899: p_log_level_rec => p_log_level_rec);
1900: return (FALSE);
1901: end if;
1902:

Line 1952: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde'

1948: if dpr_cur_fy_flag and (calc_rate_src_flag) then
1949: -- Calculate the rate for Straight-Line Depreciation --
1950:
1951: if (dpr.life < 1) then
1952: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde'
1953: , name => 'FA_DEPRN_ILLEGAL_VALUE'
1954: , token1 => 'VARIABLE'
1955: , value1 => 'Life'
1956: , token2 => 'VALUE'

Line 1985: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

1981: , fyctr - prorate_year_pcal_begin + 1
1982: , prorate_period_pcal_begin
1983: , ann_deprn_rate
1984: , p_log_level_rec) then
1985: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
1986: p_log_level_rec => p_log_level_rec);
1987: return (FALSE);
1988: end if;
1989:

Line 2043: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2039: formula_rate_src_flag := (rate_source_rule = 'FORMULA');
2040: end if;
2041:
2042: if (success <= 0) then
2043: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2044: p_log_level_rec => p_log_level_rec);
2045: return (FALSE);
2046: end if;
2047:

Line 2060: fa_cde_pkg.faxgpolr (

2056: FA_STD_TYPES.FAD_DBR_POLISH_5)) then
2057:
2058: l_rate := dpr.adj_rate;
2059:
2060: fa_cde_pkg.faxgpolr (
2061: X_Book_Type_Code => dpr.book,
2062: X_Asset_Id => dpr.asset_id,
2063: X_Polish_Rule => l_polish_rule,
2064: X_Deprn_Factor => dpr_out.deprn_factor_used,

Line 2082: X_Calling_Fn => 'fa_cde_pkg.faxcde'

2078: X_Current_Adjusted_Cost => cur_adj_cost,
2079: X_Adjusted_Recoverable_Cost
2080: => adj_rec_cost,
2081: X_Success => success,
2082: X_Calling_Fn => 'fa_cde_pkg.faxcde'
2083: ,p_log_level_rec => p_log_level_rec);
2084: ann_deprn_rate := l_rate;
2085: else
2086: -- bonus: changed this so we keep deprn_exp and

Line 2141: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2137: --
2138: -- Check that RAF is between 0 and 1
2139: --
2140: if dpr.rate_adj_factor not between 0 and 1 then
2141: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2142: name => 'FA_DEPRN_ILLEGAL_VALUE',
2143: token1 => 'VARIABLE',
2144: value1 => 'Rate_Adjustment_Factor',
2145: token2 => 'VALUE',

Line 2214: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2210: --
2211: if not fa_cache_pkg.fazccl(dpr.ceil_name, dpr.jdate_in_service
2212: , fyctr - prorate_year_pcal_begin + 1, deprn_ceiling_amt
2213: ,p_log_level_rec => p_log_level_rec) then
2214: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2215: p_log_level_rec => p_log_level_rec);
2216: return (FALSE);
2217: end if;
2218:

Line 2713: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faooda',

2709: , dpr.salvage_value
2710: , dpr.update_override_status
2711: , p_log_level_rec) then
2712:
2713: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faooda',
2714: p_log_level_rec => p_log_level_rec);
2715: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
2716: return(FALSE);
2717:

Line 2839: if not fa_cde_pkg.faxcde (dpr_sub, h_dummy_dpr, dpr_out, fmode) then

2835: else
2836: dpr_sub.adj_cost := cur_adj_cost;
2837: end if;
2838:
2839: if not fa_cde_pkg.faxcde (dpr_sub, h_dummy_dpr, dpr_out, fmode) then
2840: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2841: p_log_level_rec => p_log_level_rec);
2842: return (FALSE);
2843: end if;

Line 2840: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2836: dpr_sub.adj_cost := cur_adj_cost;
2837: end if;
2838:
2839: if not fa_cde_pkg.faxcde (dpr_sub, h_dummy_dpr, dpr_out, fmode) then
2840: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2841: p_log_level_rec => p_log_level_rec);
2842: return (FALSE);
2843: end if;
2844:

Line 2849: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2845: perd_deprn_exp := actual_annual_deprn_amt - dpr_out.deprn_exp;
2846: end if; -- ann_rounding_mode=ROUND_ALWAYS then
2847:
2848: else
2849: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2850: name => 'FA_DEPRN_ILLEGAL_VALUE',
2851: token1 => 'VARIABLE',
2852: value1 => 'Deprn_Rounding_Flag',
2853: token2 => 'VALUE',

Line 2882: if not fa_cde_pkg.faxgpr(dpr

2878: perds_fracs_arr(perd_ctr-1).start_jdate;
2879: period_fracs_single.end_jdate :=
2880: perds_fracs_arr(perd_ctr-1).end_jdate;
2881:
2882: if not fa_cde_pkg.faxgpr(dpr
2883: , period_fracs_single
2884: , deprn_projecting_flag
2885: , perd_prod
2886: , p_log_level_rec) then

Line 2888: fa_srvr_msg.add_message ( calling_fn => 'fa_cde_pkg.faxcde',

2884: , deprn_projecting_flag
2885: , perd_prod
2886: , p_log_level_rec) then
2887:
2888: fa_srvr_msg.add_message ( calling_fn => 'fa_cde_pkg.faxcde',
2889: p_log_level_rec => p_log_level_rec);
2890: return (FALSE);
2891: end if;
2892:

Line 2894: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2890: return (FALSE);
2891: end if;
2892:
2893: if dpr.rate_adj_factor <= 0 then
2894: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2895: name => 'FA_DEPRN_ILLEGAL_VALUE',
2896: token1 => 'VARIABLE',
2897: value1 => 'Rate_Adjustment_Factor',
2898: token2 => 'VALUE',

Line 2906: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2902: return (FALSE);
2903: end if;
2904:
2905: if dpr.capacity <= 0 then
2906: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2907: name => 'FA_DEPRN_ILLEGAL_VALUE',
2908: token1 => 'VARIABLE',
2909: value1 => 'Capacity',
2910: token2 => 'VALUE',

Line 2918: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2914: return (FALSE);
2915: end if;
2916:
2917: if dpr.adj_capacity <= 0 then
2918: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2919: name => 'FA_DEPRN_ILLEGAL_VALUE',
2920: token1 => 'VARIABLE',
2921: value1 => 'Adjusted_Capacity',
2922: token2 => 'VALUE',

Line 2967: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2963: -- Round perd_deprn_exp ONLY if Projecting
2964: --
2965:
2966: if not fa_utils_pkg.faxrnd(perd_deprn_exp, dpr.book) then
2967: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2968: p_log_level_rec => p_log_level_rec);
2969: return (FALSE);
2970: end if;
2971:

Line 2974: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

2970: end if;
2971:
2972: -- bonus: Assignment to perd_bonus_deprn_amount earlier should be checked.
2973: if not fa_utils_pkg.faxrnd(perd_bonus_deprn_amount, dpr.book) then
2974: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
2975: p_log_level_rec => p_log_level_rec);
2976: return (FALSE);
2977: end if;
2978:

Line 3262: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde');

3258: * (1 - dpr.cost_frac))
3259: + nvl(perd_deprn_exp,0) + nvl(year_deprn_exp,0);
3260:
3261: if not fa_utils_pkg.faxrnd(l_adjusted_rsv_absval, dpr.book) then
3262: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde');
3263: return (FALSE);
3264: end if;
3265:
3266:

Line 3294: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

3290: if (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) and
3291: (adj_rec_cost_absval < rsv_absval) and
3292: not (deprn_projecting_flag) then
3293:
3294: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
3295: name => 'FA_OVER_DEPRN_LIMIT',
3296: translate=> FALSE,
3297: p_log_level_rec => p_log_level_rec);
3298: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

Line 3329: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

3325: if not dpr_cur_fy_flag then
3326:
3327: if deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE then
3328:
3329: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
3330: name => 'FA_NO_DEPRECIATION',
3331: translate=> FALSE,
3332: p_log_level_rec => p_log_level_rec);
3333: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

Line 3591: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',

3587: px_new_raf => dpr.rate_adj_factor,
3588: px_new_formula_factor => dpr.formula_factor,
3589: x_annual_deprn_rounding_flag => dpr.deprn_rounding_flag)) then
3590:
3591: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.faxcde',
3592: p_log_level_rec => p_log_level_rec);
3593: return (FALSE);
3594: end if;
3595: else

Line 4022: h_dummy_bool := fa_cde_pkg.faprdos(dpr_out

4018: --
4019: -- Debug
4020: --
4021: if (p_log_level_rec.statement_level) then
4022: h_dummy_bool := fa_cde_pkg.faprdos(dpr_out
4023: ,p_log_level_rec => p_log_level_rec);
4024: end if;
4025:
4026: return (TRUE);

Line 4030: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxcde'

4026: return (TRUE);
4027:
4028: EXCEPTION
4029: when others then
4030: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxcde'
4031: ,p_log_level_rec => p_log_level_rec);
4032: return (FALSE);
4033:
4034: END FAXCDE;

Line 4089: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faprds'

4085: return (TRUE);
4086:
4087: exception
4088: when others then
4089: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faprds'
4090: ,p_log_level_rec => p_log_level_rec);
4091: return (FALSE);
4092: end FAPRDS;
4093:

Line 4134: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faprdos'

4130: return (TRUE);
4131:
4132: exception
4133: when others then
4134: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faprdos'
4135: ,p_log_level_rec => p_log_level_rec);
4136: return (FALSE);
4137: end FAPRDOS;
4138:

Line 4199: l_calling_fn varchar2(40) := 'fa_cde_pkg.faodda';

4195: perd_name varchar2(15);
4196: report_cost number;
4197: l_exchange_rate number;
4198: l_avg_rate number;
4199: l_calling_fn varchar2(40) := 'fa_cde_pkg.faodda';
4200: faodda_err EXCEPTION;
4201:
4202: begin <>
4203:

Line 4337: calling_fn => 'fa_cde_pkg.faodda',

4333: -- Data Validation for manual override feature
4334: IF (nvl(bonus_rule,'NONE') = 'NONE' and override_bonus_amt is not null) then
4335: -- need to raise an error even for projection because projection needs to output the bonus account on the report.
4336: fa_srvr_msg.add_message(
4337: calling_fn => 'fa_cde_pkg.faodda',
4338: name => 'FA_NO_BONUS_RULE',
4339: translate=> FALSE,
4340: p_log_level_rec => p_log_level_rec);
4341:

Line 4612: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.fatrkm',

4608: X_new_bonus_amount => h_new_bonus_amount
4609: ,p_log_level_rec => p_log_level_rec);
4610: if x_ret_code <> 0 then
4611:
4612: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.fatrkm',
4613: p_log_level_rec => p_log_level_rec);
4614: return (FALSE);
4615: else
4616: if (p_log_level_rec.statement_level) then

Line 4668: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.fatrkm',

4664: X_fully_reserved_flag => h_fully_reserved_flag
4665: ,p_log_level_rec => p_log_level_rec);
4666: if x_ret_code <> 0 then
4667:
4668: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.fatrkm',
4669: p_log_level_rec => p_log_level_rec);
4670: return (FALSE);
4671:
4672: else

Line 4696: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.fatrkm',

4692: return(true);
4693:
4694: exception
4695: when others then
4696: fa_srvr_msg.add_message (calling_fn => 'fa_cde_pkg.fatrkm',
4697: p_log_level_rec => p_log_level_rec);
4698: return(TRUE);
4699:
4700: end FATRKM;

Line 4760: l_calling_fn := 'fa_cde_pkg.whatif.faxgpolr';

4756: l_year_retired := 'N';
4757: end if;
4758:
4759: if (X_Projecting_Flag) then
4760: l_calling_fn := 'fa_cde_pkg.whatif.faxgpolr';
4761: else
4762: l_calling_fn := 'fa_cde_pkg.faxgpolr';
4763: end if;
4764:

Line 4762: l_calling_fn := 'fa_cde_pkg.faxgpolr';

4758:
4759: if (X_Projecting_Flag) then
4760: l_calling_fn := 'fa_cde_pkg.whatif.faxgpolr';
4761: else
4762: l_calling_fn := 'fa_cde_pkg.faxgpolr';
4763: end if;
4764:
4765: FA_POLISH_PVT.Calc_Polish_Rate_Cost (
4766: p_Book_Type_Code => X_Book_Type_Code,

Line 4805: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxgpolr'

4801: X_Success := 1;
4802:
4803: EXCEPTION
4804: WHEN faxgpolr_err THEN
4805: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxgpolr'
4806: ,p_log_level_rec => p_log_level_rec);
4807: X_rate := 0;
4808: X_Success := 0;
4809:

Line 4811: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxgpolr'

4807: X_rate := 0;
4808: X_Success := 0;
4809:
4810: WHEN OTHERS THEN
4811: fa_srvr_msg.add_sql_error (calling_fn => 'fa_cde_pkg.faxgpolr'
4812: ,p_log_level_rec => p_log_level_rec);
4813: X_rate := 0;
4814: X_Success := 0;
4815:

Line 4818: END FA_CDE_PKG;

4814: X_Success := 0;
4815:
4816: END faxgpolr;
4817:
4818: END FA_CDE_PKG;