The following lines contain the word 'select', 'insert', 'update' or 'delete':
X_last_update_date date default sysdate,
X_last_updated_by number default -1,
X_last_update_login number default -1,
X_mrc_sob_type_code varchar2,
p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
return boolean
is
h_book_type_code fa_book_controls.book_type_code%type;
element=>'X_last_update_date',
value=>X_last_update_date,
p_log_level_rec => p_log_level_rec);
adj_ptr_faxiat.selection_mode
:= FA_ADJUST_TYPE_PKG.FA_AJ_ACTIVE;
adj_ptr_faxiat.selection_thid := 0;
adj_ptr_faxiat.selection_retid := 0;
adj_ptr_faxiat.last_update_date := X_last_update_date;
X_last_update_date=>X_last_update_date,
X_last_updated_by=>X_last_updated_by,
X_last_update_login=>X_last_update_login,
p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxiat',
p_log_level_rec => p_log_level_rec);
element=>'Amount Inserted',
value=>adj_ptr_faxiat.amount_inserted,
p_log_level_rec => p_log_level_rec);
X_last_update_date=>X_last_update_date,
X_last_updated_by=>X_last_updated_by,
X_last_update_login=>X_last_update_login,
p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxiat',
p_log_level_rec => p_log_level_rec);
X_last_update_date=>X_last_update_date,
X_last_updated_by=>X_last_updated_by,
X_last_update_login=>X_last_update_login,
p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxiat',
p_log_level_rec => p_log_level_rec);
X_last_update_date=>X_last_update_date,
X_last_updated_by=>X_last_updated_by,
X_last_update_login=>X_last_update_login,
p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxiat',
p_log_level_rec => p_log_level_rec);
X_last_update_date=>X_last_update_date,
X_last_updated_by=>X_last_updated_by,
X_last_update_login=>X_last_update_login,
p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxiat',
p_log_level_rec => p_log_level_rec);
X_last_update_date=>X_last_update_date,
X_last_updated_by=>X_last_updated_by,
X_last_update_login=>X_last_update_login,
p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxiat',
p_log_level_rec => p_log_level_rec);
element =>'Amount Inserted',
value =>adj_ptr_faxiat.amount_inserted,
p_log_level_rec => p_log_level_rec);
select 'Y' -- 'Y' if the current period of the asset is period of addition.
from dual
where not exists
(select 'x'
from fa_deprn_summary
where asset_id = X_fin_info_ptr.asset_id
and book_type_code = X_fin_info_ptr.book
and deprn_amount <> 0
and deprn_source_code = 'DEPRN'
);
select th.transaction_header_id
from fa_transaction_headers th, fa_deprn_periods dp
where th.book_type_code = X_fin_info_ptr.book
and th.asset_id = X_fin_info_ptr.asset_id
and th.transaction_type_code = 'ADDITION'
and th.book_type_code = dp.book_type_code
and th.date_effective between dp.period_open_date and
nvl(dp.period_close_date,sysdate)
and X_fin_info_ptr.amortization_start_date < dp.calendar_period_open_date;
select 1
from fa_transaction_headers th
, fa_deprn_periods dp
, fa_fiscal_year fy
, fa_calendar_periods cp
where th.transaction_header_id = c_thid
and th.date_effective between dp.period_open_date and
nvl(dp.period_close_date,sysdate)
and dp.book_type_code = X_fin_info_ptr.book
and fy.fiscal_year_name = fa_cache_pkg.fazcbc_record.fiscal_year_name
and cp.start_date = fy.start_date
and cp.period_num = 1
and cp.calendar_type = fa_cache_pkg.fazcbc_record.deprn_calendar
and dp.calendar_period_open_date between fy.start_date and fy.end_date
and X_fin_info_ptr.amortization_start_date between fy.start_date and fy.end_date;
select deprn_reserve - ytd_deprn
, bonus_deprn_reserve - bonus_ytd_deprn
from fa_deprn_summary
where book_type_code = X_fin_info_ptr.book
and asset_id = X_fin_info_ptr.asset_id
and deprn_source_code = 'BOOKS';
select deprn_reserve - ytd_deprn
, bonus_deprn_reserve - bonus_ytd_deprn
from fa_deprn_summary_mrc_v
where book_type_code = X_fin_info_ptr.book
and asset_id = X_fin_info_ptr.asset_id
and deprn_source_code = 'BOOKS';
UPDATE FA_DEPRN_OVERRIDE
SET status = 'POST'
WHERE
used_by = 'ADJUSTMENT' and
status = 'SELECTED' and
transaction_header_id is null;
select deprn_reserve, bonus_deprn_reserve, ytd_deprn
into deprn_summary.deprn_rsv, deprn_summary.bonus_deprn_rsv,
deprn_summary.ytd_deprn
from fa_deprn_summary_mrc_v
where asset_id = X_fin_info_ptr.asset_id
and book_type_code = X_fin_info_ptr.book
and deprn_source_code = 'BOOKS';
select deprn_reserve, bonus_deprn_reserve, ytd_deprn
into deprn_summary.deprn_rsv, deprn_summary.bonus_deprn_rsv,
deprn_summary.ytd_deprn
from fa_deprn_summary
where asset_id = X_fin_info_ptr.asset_id
and book_type_code = X_fin_info_ptr.book
and deprn_source_code = 'BOOKS';
SELECT NVL(SUM(DECODE(ADJUSTMENT_TYPE,
'EXPENSE',
DECODE(DEBIT_CREDIT_FLAG,
'DR', ADJUSTMENT_AMOUNT,
'CR', -1 * ADJUSTMENT_AMOUNT))),0),
-- backdate amortization enhancement - begin
NVL(SUM(DECODE(ADJUSTMENT_TYPE,
'RESERVE',
DECODE(DEBIT_CREDIT_FLAG,
'DR', ADJUSTMENT_AMOUNT,
'CR', -1 * ADJUSTMENT_AMOUNT))),0)
-- backdate amortization enhancement - end
INTO adjustment_amount, h_rsv_amount
FROM FA_ADJUSTMENTS_MRC_V
WHERE asset_id = X_fin_info_ptr.asset_id
AND book_type_code = X_fin_info_ptr.book
AND period_counter_adjusted = amortize_per_ctr;
SELECT NVL(SUM(DECODE(ADJUSTMENT_TYPE,
'EXPENSE',
DECODE(DEBIT_CREDIT_FLAG,
'DR', ADJUSTMENT_AMOUNT,
'CR', -1 * ADJUSTMENT_AMOUNT))),0),
-- backdate amortization enhancement - begin
NVL(SUM(DECODE(ADJUSTMENT_TYPE,
'RESERVE',
DECODE(DEBIT_CREDIT_FLAG,
'DR', ADJUSTMENT_AMOUNT,
'CR', -1 * ADJUSTMENT_AMOUNT))),0)
-- backdate amortization enhancement - end
INTO adjustment_amount, h_rsv_amount
FROM FA_ADJUSTMENTS
WHERE asset_id = X_fin_info_ptr.asset_id
AND book_type_code = X_fin_info_ptr.book
AND period_counter_adjusted = amortize_per_ctr;
X_last_update_date date default sysdate,
X_last_updated_by number default -1,
X_last_update_login number default -1,
p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
return boolean is
h_reval_deprn_rsv_adj number :=0;
X_last_update_date,
X_last_updated_by,
X_last_update_login,
X_mrc_sob_type_code
,p_log_level_rec => p_log_level_rec))
then
FA_SRVR_MSG.ADD_MESSAGE
(CALLING_FN => 'FA_AMORT_PKG.faxama',
NAME=>h_err_string,
p_log_level_rec => p_log_level_rec);
select bk.BOOK_TYPE_CODE ,
bk.ASSET_ID ,
bk.DATE_PLACED_IN_SERVICE ,
bk.DATE_EFFECTIVE ,
bk.DEPRN_START_DATE ,
bk.DEPRN_METHOD_CODE ,
bk.LIFE_IN_MONTHS ,
bk.RATE_ADJUSTMENT_FACTOR ,
bk.ADJUSTED_COST ,
bk.COST ,
bk.ORIGINAL_COST ,
bk.SALVAGE_VALUE ,
bk.PRORATE_CONVENTION_CODE ,
bk.PRORATE_DATE ,
bk.COST_CHANGE_FLAG ,
bk.ADJUSTMENT_REQUIRED_STATUS ,
bk.CAPITALIZE_FLAG ,
bk.RETIREMENT_PENDING_FLAG ,
bk.DEPRECIATE_FLAG ,
bk.LAST_UPDATE_DATE ,
bk.LAST_UPDATED_BY ,
bk.DATE_INEFFECTIVE ,
bk.TRANSACTION_HEADER_ID_IN ,
bk.TRANSACTION_HEADER_ID_OUT ,
bk.ITC_AMOUNT_ID ,
bk.ITC_AMOUNT ,
bk.RETIREMENT_ID ,
bk.TAX_REQUEST_ID ,
bk.ITC_BASIS ,
bk.BASIC_RATE ,
bk.ADJUSTED_RATE ,
bk.BONUS_RULE ,
bk.CEILING_NAME ,
bk.RECOVERABLE_COST ,
bk.LAST_UPDATE_LOGIN ,
bk.ADJUSTED_CAPACITY ,
bk.FULLY_RSVD_REVALS_COUNTER ,
bk.IDLED_FLAG ,
bk.PERIOD_COUNTER_CAPITALIZED ,
bk.PERIOD_COUNTER_FULLY_RESERVED,
bk.PERIOD_COUNTER_FULLY_RETIRED ,
bk.PRODUCTION_CAPACITY ,
bk.REVAL_AMORTIZATION_BASIS ,
bk.REVAL_CEILING ,
bk.UNIT_OF_MEASURE ,
bk.UNREVALUED_COST ,
bk.ANNUAL_DEPRN_ROUNDING_FLAG ,
bk.PERCENT_SALVAGE_VALUE ,
bk.ALLOWED_DEPRN_LIMIT ,
bk.ALLOWED_DEPRN_LIMIT_AMOUNT ,
bk.PERIOD_COUNTER_LIFE_COMPLETE ,
bk.ADJUSTED_RECOVERABLE_COST ,
bk.ANNUAL_ROUNDING_FLAG ,
bk.GLOBAL_ATTRIBUTE1 ,
bk.GLOBAL_ATTRIBUTE2 ,
bk.GLOBAL_ATTRIBUTE3 ,
bk.GLOBAL_ATTRIBUTE4 ,
bk.GLOBAL_ATTRIBUTE5 ,
bk.GLOBAL_ATTRIBUTE6 ,
bk.GLOBAL_ATTRIBUTE7 ,
bk.GLOBAL_ATTRIBUTE8 ,
bk.GLOBAL_ATTRIBUTE9 ,
bk.GLOBAL_ATTRIBUTE10 ,
bk.GLOBAL_ATTRIBUTE11 ,
bk.GLOBAL_ATTRIBUTE12 ,
bk.GLOBAL_ATTRIBUTE13 ,
bk.GLOBAL_ATTRIBUTE14 ,
bk.GLOBAL_ATTRIBUTE15 ,
bk.GLOBAL_ATTRIBUTE16 ,
bk.GLOBAL_ATTRIBUTE17 ,
bk.GLOBAL_ATTRIBUTE18 ,
bk.GLOBAL_ATTRIBUTE19 ,
bk.GLOBAL_ATTRIBUTE20 ,
bk.GLOBAL_ATTRIBUTE_CATEGORY ,
bk.EOFY_ADJ_COST ,
bk.EOFY_FORMULA_FACTOR ,
bk.SHORT_FISCAL_YEAR_FLAG ,
bk.CONVERSION_DATE ,
bk.ORIGINAL_DEPRN_START_DATE ,
bk.REMAINING_LIFE1 ,
bk.REMAINING_LIFE2 ,
bk.OLD_ADJUSTED_COST ,
bk.FORMULA_FACTOR ,
bk.GROUP_ASSET_ID
into bk_rec.BOOK_TYPE_CODE ,
bk_rec.ASSET_ID ,
bk_rec.DATE_PLACED_IN_SERVICE ,
bk_rec.DATE_EFFECTIVE ,
bk_rec.DEPRN_START_DATE ,
bk_rec.DEPRN_METHOD_CODE ,
bk_rec.LIFE_IN_MONTHS ,
bk_rec.RATE_ADJUSTMENT_FACTOR ,
bk_rec.ADJUSTED_COST ,
bk_rec.COST ,
bk_rec.ORIGINAL_COST ,
bk_rec.SALVAGE_VALUE ,
bk_rec.PRORATE_CONVENTION_CODE ,
bk_rec.PRORATE_DATE ,
bk_rec.COST_CHANGE_FLAG ,
bk_rec.ADJUSTMENT_REQUIRED_STATUS ,
bk_rec.CAPITALIZE_FLAG ,
bk_rec.RETIREMENT_PENDING_FLAG ,
bk_rec.DEPRECIATE_FLAG ,
bk_rec.LAST_UPDATE_DATE ,
bk_rec.LAST_UPDATED_BY ,
bk_rec.DATE_INEFFECTIVE ,
bk_rec.TRANSACTION_HEADER_ID_IN ,
bk_rec.TRANSACTION_HEADER_ID_OUT ,
bk_rec.ITC_AMOUNT_ID ,
bk_rec.ITC_AMOUNT ,
bk_rec.RETIREMENT_ID ,
bk_rec.TAX_REQUEST_ID ,
bk_rec.ITC_BASIS ,
bk_rec.BASIC_RATE ,
bk_rec.ADJUSTED_RATE ,
bk_rec.BONUS_RULE ,
bk_rec.CEILING_NAME ,
bk_rec.RECOVERABLE_COST ,
bk_rec.LAST_UPDATE_LOGIN ,
bk_rec.ADJUSTED_CAPACITY ,
bk_rec.FULLY_RSVD_REVALS_COUNTER ,
bk_rec.IDLED_FLAG ,
bk_rec.PERIOD_COUNTER_CAPITALIZED ,
bk_rec.PERIOD_COUNTER_FULLY_RESERVED,
bk_rec.PERIOD_COUNTER_FULLY_RETIRED ,
bk_rec.PRODUCTION_CAPACITY ,
bk_rec.REVAL_AMORTIZATION_BASIS ,
bk_rec.REVAL_CEILING ,
bk_rec.UNIT_OF_MEASURE ,
bk_rec.UNREVALUED_COST ,
bk_rec.ANNUAL_DEPRN_ROUNDING_FLAG ,
bk_rec.PERCENT_SALVAGE_VALUE ,
bk_rec.ALLOWED_DEPRN_LIMIT ,
bk_rec.ALLOWED_DEPRN_LIMIT_AMOUNT ,
bk_rec.PERIOD_COUNTER_LIFE_COMPLETE ,
bk_rec.ADJUSTED_RECOVERABLE_COST ,
bk_rec.ANNUAL_ROUNDING_FLAG ,
bk_rec.GLOBAL_ATTRIBUTE1 ,
bk_rec.GLOBAL_ATTRIBUTE2 ,
bk_rec.GLOBAL_ATTRIBUTE3 ,
bk_rec.GLOBAL_ATTRIBUTE4 ,
bk_rec.GLOBAL_ATTRIBUTE5 ,
bk_rec.GLOBAL_ATTRIBUTE6 ,
bk_rec.GLOBAL_ATTRIBUTE7 ,
bk_rec.GLOBAL_ATTRIBUTE8 ,
bk_rec.GLOBAL_ATTRIBUTE9 ,
bk_rec.GLOBAL_ATTRIBUTE10 ,
bk_rec.GLOBAL_ATTRIBUTE11 ,
bk_rec.GLOBAL_ATTRIBUTE12 ,
bk_rec.GLOBAL_ATTRIBUTE13 ,
bk_rec.GLOBAL_ATTRIBUTE14 ,
bk_rec.GLOBAL_ATTRIBUTE15 ,
bk_rec.GLOBAL_ATTRIBUTE16 ,
bk_rec.GLOBAL_ATTRIBUTE17 ,
bk_rec.GLOBAL_ATTRIBUTE18 ,
bk_rec.GLOBAL_ATTRIBUTE19 ,
bk_rec.GLOBAL_ATTRIBUTE20 ,
bk_rec.GLOBAL_ATTRIBUTE_CATEGORY ,
bk_rec.EOFY_ADJ_COST ,
bk_rec.EOFY_FORMULA_FACTOR ,
bk_rec.SHORT_FISCAL_YEAR_FLAG ,
bk_rec.CONVERSION_DATE ,
bk_rec.ORIGINAL_DEPRN_START_DATE ,
bk_rec.REMAINING_LIFE1 ,
bk_rec.REMAINING_LIFE2 ,
bk_rec.OLD_ADJUSTED_COST ,
bk_rec.FORMULA_FACTOR ,
bk_rec.GROUP_ASSET_ID
from fa_books_mrc_v bk
where bk.book_type_code = X_fin_info_ptr.book
and bk.asset_id = X_fin_info_ptr.asset_id
and bk.transaction_header_id_in = x_add_txn_id;
select bk.*
into bk_rec
from fa_books bk
where bk.book_type_code = X_fin_info_ptr.book
and bk.asset_id = X_fin_info_ptr.asset_id
and bk.transaction_header_id_in = x_add_txn_id;