[Home] [Help]
86: -- adjusted_recoverable_cost is also set to this amount so that the asset can
87: -- depreciate to this new basis amount even if it is greater than the asset's
88: -- cost. This brings up an important point with regard to the code. The
89: -- Polish asset's adjusted_cost and adjusted_recoverable cost that it uses
90: -- to determine the depreciation basis are the ones in fa_books. Instead, I
91: -- currently use polish_deprn_basis in fa_books_summary for adjusted_cost and
92: -- polish_adj_rec_cost in fa_books_summary for adjusted_recoverable_cost.
93: -- The reason for this is that I treat the values in fa_books as the baseline.
94: -- For example, when the user changes the cost from 20,000 to 12,000, the
87: -- depreciate to this new basis amount even if it is greater than the asset's
88: -- cost. This brings up an important point with regard to the code. The
89: -- Polish asset's adjusted_cost and adjusted_recoverable cost that it uses
90: -- to determine the depreciation basis are the ones in fa_books. Instead, I
91: -- currently use polish_deprn_basis in fa_books_summary for adjusted_cost and
92: -- polish_adj_rec_cost in fa_books_summary for adjusted_recoverable_cost.
93: -- The reason for this is that I treat the values in fa_books as the baseline.
94: -- For example, when the user changes the cost from 20,000 to 12,000, the
95: -- value of adjusted_cost and adjusted_recoverable_cost are both 12,000 in
88: -- cost. This brings up an important point with regard to the code. The
89: -- Polish asset's adjusted_cost and adjusted_recoverable cost that it uses
90: -- to determine the depreciation basis are the ones in fa_books. Instead, I
91: -- currently use polish_deprn_basis in fa_books_summary for adjusted_cost and
92: -- polish_adj_rec_cost in fa_books_summary for adjusted_recoverable_cost.
93: -- The reason for this is that I treat the values in fa_books as the baseline.
94: -- For example, when the user changes the cost from 20,000 to 12,000, the
95: -- value of adjusted_cost and adjusted_recoverable_cost are both 12,000 in
96: -- fa_books. However, since we need to run negative adjustments through a
89: -- Polish asset's adjusted_cost and adjusted_recoverable cost that it uses
90: -- to determine the depreciation basis are the ones in fa_books. Instead, I
91: -- currently use polish_deprn_basis in fa_books_summary for adjusted_cost and
92: -- polish_adj_rec_cost in fa_books_summary for adjusted_recoverable_cost.
93: -- The reason for this is that I treat the values in fa_books as the baseline.
94: -- For example, when the user changes the cost from 20,000 to 12,000, the
95: -- value of adjusted_cost and adjusted_recoverable_cost are both 12,000 in
96: -- fa_books. However, since we need to run negative adjustments through a
97: -- formula to determine the basis, etc, these numbers will be different from
92: -- polish_adj_rec_cost in fa_books_summary for adjusted_recoverable_cost.
93: -- The reason for this is that I treat the values in fa_books as the baseline.
94: -- For example, when the user changes the cost from 20,000 to 12,000, the
95: -- value of adjusted_cost and adjusted_recoverable_cost are both 12,000 in
96: -- fa_books. However, since we need to run negative adjustments through a
97: -- formula to determine the basis, etc, these numbers will be different from
98: -- the 12,000. However, I still want the user to see the 12,000, so if they
99: -- perform an subsequent transactions on the asset, they are using the 12,000
100: -- figure and not the new figure calculated by the program. Therefore, for
191: -- only need to be calculated at the end of the year, and at times
192: -- when a transaction occurs. However, I calculate the switch
193: -- during every period regardless. Theoretically, in the middle of a
194: -- year w/ no transactions, I could take a look at the switch_code in
195: -- fa_books_summary, and just use that for the current period. If
196: -- performance improvements need to be made, that can be one of the
197: -- first places to look. One of the reasons that I didn't do this
198: -- was that I wanted to make the code as generic as possible. That is,
199: -- when transactions occur, you do need to do the switch mid-year on
198: -- was that I wanted to make the code as generic as possible. That is,
199: -- when transactions occur, you do need to do the switch mid-year on
200: -- occasion. When backdated adjustments happen, you might need to do
201: -- this over a range of periods, and here the switch_code in
202: -- fa_books_summary may not give you the value that you are looking
203: -- for anymore since that was the switch value at the time of that
204: -- period, but now that the backdated adjustment has occurred, it's
205: -- obsolete. To try to avoid these complexities, I just do the
206: -- switch all the time even though there are performance drawbacks.
314: select fy.fiscal_year
315: into l_first_fiscal_year
316: from fa_fiscal_year fy,
317: fa_book_controls_mrc_v bc,
318: fa_books_mrc_v bks
319: where bc.book_type_code = p_Book_Type_Code
320: and bc.fiscal_year_name = fy.fiscal_year_name
321: and bks.book_type_code = p_Book_Type_Code
322: and bks.asset_id = p_Asset_Id
326:
327: select dp.period_counter
328: into l_first_period_counter
329: from fa_deprn_periods_mrc_v dp,
330: fa_books_mrc_v bks
331: where dp.book_type_code = p_Book_Type_Code
332: and bks.book_type_code = p_Book_Type_Code
333: and bks.asset_id = p_Asset_Id
334: and bks.transaction_header_id_out is null
346: select fy.fiscal_year
347: into l_first_fiscal_year
348: from fa_fiscal_year fy,
349: fa_book_controls bc,
350: fa_books bks
351: where bc.book_type_code = p_Book_Type_Code
352: and bc.fiscal_year_name = fy.fiscal_year_name
353: and bks.book_type_code = p_Book_Type_Code
354: and bks.asset_id = p_Asset_Id
358:
359: select dp.period_counter
360: into l_first_period_counter
361: from fa_deprn_periods dp,
362: fa_books bks
363: where dp.book_type_code = p_Book_Type_Code
364: and bks.book_type_code = p_Book_Type_Code
365: and bks.asset_id = p_Asset_Id
366: and bks.transaction_header_id_out is null
391: if (p_MRC_SOB_Type_Code = 'R') then
392:
393: select adjusted_cost
394: into l_old_adjusted_cost
395: from fa_books_mrc_v
396: where book_type_code = p_Book_Type_Code
397: and asset_id = p_Asset_Id
398: and transaction_header_id_out is null;
399:
400: else
401:
402: select adjusted_cost
403: into l_old_adjusted_cost
404: from fa_books
405: where book_type_code = p_Book_Type_Code
406: and asset_id = p_Asset_Id
407: and transaction_header_id_out is null;
408: end if;
555: select polish_deprn_basis,
556: polish_adj_rec_cost
557: into l_prev_year_adjusted_cost,
558: l_prev_year_adj_rec_cost
559: from fa_books_summary_mrc_v
560: where book_type_code = p_Book_Type_Code
561: and asset_id = p_Asset_Id
562: and period_counter = l_prev_year_period_counter;
563:
589: select bks.adjusted_cost,
590: bks.adjusted_recoverable_cost
591: into l_prev_year_adjusted_cost,
592: l_prev_year_adj_rec_cost
593: from fa_books_mrc_v bks
594: where bks.book_type_code = p_Book_Type_Code
595: and bks.asset_id = p_Asset_Id
596: and bks.rowid =
597: (
595: and bks.asset_id = p_Asset_Id
596: and bks.rowid =
597: (
598: select max(bks1.rowid)
599: from fa_books_mrc_v bks1,
600: fa_deprn_periods_mrc_v dp
601: where bks1.book_type_code = p_Book_Type_Code
602: and bks1.asset_id = p_Asset_Id
603: and bks1.book_type_code = dp.book_type_code
616: select bks.adjusted_cost,
617: bks.adjusted_recoverable_cost
618: into l_prev_year_adjusted_cost,
619: l_prev_year_adj_rec_cost
620: from fa_books_mrc_v bks
621: where bks.book_type_code = p_Book_Type_Code
622: and bks.asset_id = p_Asset_Id
623: and bks.rowid =
624: (
622: and bks.asset_id = p_Asset_Id
623: and bks.rowid =
624: (
625: select min(bks1.rowid)
626: from fa_books_mrc_v bks1
627: where bks1.book_type_code = p_Book_Type_Code
628: and bks1.asset_id = p_Asset_Id
629: );
630: exception
657: select polish_deprn_basis,
658: polish_adj_rec_cost
659: into l_prev_year_adjusted_cost,
660: l_prev_year_adj_rec_cost
661: from fa_books_summary
662: where book_type_code = p_Book_Type_Code
663: and asset_id = p_Asset_Id
664: and period_counter = l_prev_year_period_counter;
665:
692: select bks.adjusted_cost,
693: bks.adjusted_recoverable_cost
694: into l_prev_year_adjusted_cost,
695: l_prev_year_adj_rec_cost
696: from fa_books bks
697: where bks.book_type_code = p_Book_Type_Code
698: and bks.asset_id = p_Asset_Id
699: and bks.rowid =
700: (
698: and bks.asset_id = p_Asset_Id
699: and bks.rowid =
700: (
701: select max(bks1.rowid)
702: from fa_books bks1,
703: fa_deprn_periods dp
704: where bks1.book_type_code = p_Book_Type_Code
705: and bks1.asset_id = p_Asset_Id
706: and bks1.book_type_code = dp.book_type_code
719: select bks.adjusted_cost,
720: bks.adjusted_recoverable_cost
721: into l_prev_year_adjusted_cost,
722: l_prev_year_adj_rec_cost
723: from fa_books bks
724: where bks.book_type_code = p_Book_Type_Code
725: and bks.asset_id = p_Asset_Id
726: and bks.rowid =
727: (
725: and bks.asset_id = p_Asset_Id
726: and bks.rowid =
727: (
728: select min(bks1.rowid)
729: from fa_books bks1
730: where bks1.book_type_code = p_Book_Type_Code
731: and bks1.asset_id = p_Asset_Id
732: );
733: exception
760: if (p_MRC_SOB_Type_Code = 'R') then
761:
762: select adjusted_cost
763: into l_prev_year_adjusted_cost
764: from fa_books_mrc_v
765: where asset_id = p_asset_id
766: and book_type_code = p_book_type_code
767: and transaction_header_id_out is null;
768:
768:
769: else
770: select adjusted_cost
771: into l_prev_year_adjusted_cost
772: from fa_books
773: where asset_id = p_asset_id
774: and book_type_code = p_book_type_code
775: and transaction_header_id_out is null;
776: end if;
1383: select polish_deprn_basis,
1384: polish_adj_rec_cost
1385: into x_prev_basis,
1386: x_prev_adj_rec_cost
1387: from fa_books_summary_mrc_v
1388: where book_type_code = p_Book_Type_Code
1389: and asset_id = p_Asset_Id
1390: and period_counter = x_bef_trxn_period_counter;
1391:
1418: select bks.adjusted_cost,
1419: bks.adjusted_recoverable_cost
1420: into x_prev_basis,
1421: x_prev_adj_rec_cost
1422: from fa_books_mrc_v bks
1423: where bks.book_type_code = p_Book_Type_Code
1424: and bks.asset_id = p_Asset_Id
1425: and bks.rowid =
1426: (
1424: and bks.asset_id = p_Asset_Id
1425: and bks.rowid =
1426: (
1427: select max(bks1.rowid)
1428: from fa_books_mrc_v bks1,
1429: fa_deprn_periods_mrc_v dp
1430: where bks1.book_type_code = p_Book_Type_Code
1431: and bks1.asset_id = p_Asset_Id
1432: and bks1.book_type_code = dp.book_type_code
1441: select bks.adjusted_cost,
1442: bks.adjusted_recoverable_cost
1443: into x_prev_basis,
1444: x_prev_adj_rec_cost
1445: from fa_books_mrc_v bks
1446: where bks.book_type_code = p_Book_Type_Code
1447: and bks.asset_id = p_Asset_Id
1448: and bks.rowid =
1449: (
1447: and bks.asset_id = p_Asset_Id
1448: and bks.rowid =
1449: (
1450: select min(bks1.rowid)
1451: from fa_books_mrc_v bks1
1452: where bks1.book_type_code = p_Book_Type_Code
1453: and bks1.asset_id = p_Asset_Id
1454: );
1455: end;
1471: select polish_deprn_basis,
1472: polish_adj_rec_cost
1473: into x_prev_basis,
1474: x_prev_adj_rec_cost
1475: from fa_books_summary
1476: where book_type_code = p_Book_Type_Code
1477: and asset_id = p_Asset_Id
1478: and period_counter = x_bef_trxn_period_counter;
1479:
1506: select bks.adjusted_cost,
1507: bks.adjusted_recoverable_cost
1508: into x_prev_basis,
1509: x_prev_adj_rec_cost
1510: from fa_books bks
1511: where bks.book_type_code = p_Book_Type_Code
1512: and bks.asset_id = p_Asset_Id
1513: and bks.rowid =
1514: (
1512: and bks.asset_id = p_Asset_Id
1513: and bks.rowid =
1514: (
1515: select max(bks1.rowid)
1516: from fa_books bks1,
1517: fa_deprn_periods dp
1518: where bks1.book_type_code = p_Book_Type_Code
1519: and bks1.asset_id = p_Asset_Id
1520: and bks1.book_type_code = dp.book_type_code
1529: select bks.adjusted_cost,
1530: bks.adjusted_recoverable_cost
1531: into x_prev_basis,
1532: x_prev_adj_rec_cost
1533: from fa_books bks
1534: where bks.book_type_code = p_Book_Type_Code
1535: and bks.asset_id = p_Asset_Id
1536: and bks.rowid =
1537: (
1535: and bks.asset_id = p_Asset_Id
1536: and bks.rowid =
1537: (
1538: select min(bks1.rowid)
1539: from fa_books bks1
1540: where bks1.book_type_code = p_Book_Type_Code
1541: and bks1.asset_id = p_Asset_Id
1542: );
1543: end;
1631: select polish_deprn_basis,
1632: polish_adj_rec_cost
1633: into x_prev_basis,
1634: x_prev_adj_rec_cost
1635: from fa_books_summary_mrc_v
1636: where book_type_code = p_Book_Type_Code
1637: and asset_id = p_Asset_Id
1638: and period_counter = x_bef_trxn_period_counter;
1639:
1666: select bks.adjusted_cost,
1667: bks.adjusted_recoverable_cost
1668: into x_prev_basis,
1669: x_prev_adj_rec_cost
1670: from fa_books_mrc_v bks
1671: where bks.book_type_code = p_Book_Type_Code
1672: and bks.asset_id = p_Asset_Id
1673: and bks.rowid =
1674: (
1672: and bks.asset_id = p_Asset_Id
1673: and bks.rowid =
1674: (
1675: select max(bks1.rowid)
1676: from fa_books_mrc_v bks1,
1677: fa_deprn_periods_mrc_v dp
1678: where bks1.book_type_code = p_Book_Type_Code
1679: and bks1.asset_id = p_Asset_Id
1680: and bks1.book_type_code = dp.book_type_code
1689: select bks.adjusted_cost,
1690: bks.adjusted_recoverable_cost
1691: into x_prev_basis,
1692: x_prev_adj_rec_cost
1693: from fa_books_mrc_v bks
1694: where bks.book_type_code = p_Book_Type_Code
1695: and bks.asset_id = p_Asset_Id
1696: and bks.rowid =
1697: (
1695: and bks.asset_id = p_Asset_Id
1696: and bks.rowid =
1697: (
1698: select min(bks1.rowid)
1699: from fa_books_mrc_v bks1
1700: where bks1.book_type_code = p_Book_Type_Code
1701: and bks1.asset_id = p_Asset_Id
1702: );
1703: end;
1713: select polish_deprn_basis,
1714: polish_adj_rec_cost
1715: into x_prev_basis,
1716: x_prev_adj_rec_cost
1717: from fa_books_summary
1718: where book_type_code = p_Book_Type_Code
1719: and asset_id = p_Asset_Id
1720: and period_counter = x_bef_trxn_period_counter;
1721:
1748: select bks.adjusted_cost,
1749: bks.adjusted_recoverable_cost
1750: into x_prev_basis,
1751: x_prev_adj_rec_cost
1752: from fa_books bks
1753: where bks.book_type_code = p_Book_Type_Code
1754: and bks.asset_id = p_Asset_Id
1755: and bks.rowid =
1756: (
1754: and bks.asset_id = p_Asset_Id
1755: and bks.rowid =
1756: (
1757: select max(bks1.rowid)
1758: from fa_books bks1,
1759: fa_deprn_periods dp
1760: where bks1.book_type_code = p_Book_Type_Code
1761: and bks1.asset_id = p_Asset_Id
1762: and bks1.book_type_code = dp.book_type_code
1771: select bks.adjusted_cost,
1772: bks.adjusted_recoverable_cost
1773: into x_prev_basis,
1774: x_prev_adj_rec_cost
1775: from fa_books bks
1776: where bks.book_type_code = p_Book_Type_Code
1777: and bks.asset_id = p_Asset_Id
1778: and bks.rowid =
1779: (
1777: and bks.asset_id = p_Asset_Id
1778: and bks.rowid =
1779: (
1780: select min(bks1.rowid)
1781: from fa_books bks1
1782: where bks1.book_type_code = p_Book_Type_Code
1783: and bks1.asset_id = p_Asset_Id
1784: );
1785: end;
1946: begin
1947:
1948: select nvl(switch_code, 'XX')
1949: into x_switch_code
1950: from fa_books_summary_mrc_v
1951: where book_type_code = p_book_type_code
1952: and asset_id = p_asset_id
1953: and period_counter = p_period_counter;
1954: exception
1959:
1960: begin
1961: select nvl(switch_code, 'XX')
1962: into x_switch_code
1963: from fa_books_summary
1964: where book_type_code = p_book_type_code
1965: and asset_id = p_asset_id
1966: and period_counter = p_period_counter;
1967: exception
1977:
1978: begin
1979: select nvl(switch_code, 'XX')
1980: into l_prev_switch_code
1981: from fa_books_summary_mrc_v
1982: where book_type_code = p_book_type_code
1983: and asset_id = p_asset_id
1984: and period_counter = p_period_counter - 1;
1985: exception
1990:
1991: begin
1992: select nvl(switch_code, 'XX')
1993: into l_prev_switch_code
1994: from fa_books_summary
1995: where book_type_code = p_book_type_code
1996: and asset_id = p_asset_id
1997: and period_counter = p_period_counter - 1;
1998: exception