The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_update_dpis VARCHAR2(1);
SELECT ad.asset_id,
st.deprn_reserve,
nvl(st.ytd_deprn,0),
dp.period_counter - 1,
mt.deprn_basis_rule,
bk.recoverable_cost,
bk.date_placed_in_service,
st.date_placed_in_service,
bk.prorate_convention_code,
st.prorate_convention_code,
bk.deprn_method_code,
st.deprn_method_code,
bk.life_in_months,
st.life_in_months,
nvl(st.original_deprn_start_date, bk.original_deprn_start_date),
bk.rowid
FROM
fa_books bk,
fa_methods mt,
fa_deprn_periods dp,
fa_book_controls bc,
fa_transaction_headers th,
fa_short_tax_reserves st,
fa_additions ad
WHERE
ad.asset_number = st.asset_number
AND ad.asset_id = th.asset_id
AND bc.book_type_code = p_book_type_code
AND bk.book_type_code = bc.book_type_code
AND st.tax_book = bk.book_type_code
AND bk.short_fiscal_year_flag = 'YES'
AND bk.conversion_date is not null
AND th.book_type_code = p_book_type_code
AND th.asset_id = bk.asset_id
AND th.date_effective between dp.period_open_date and
nvl(dp.period_close_date, sysdate)
AND th.transaction_type_code = 'ADDITION'
AND th.transaction_header_id = bk.transaction_header_id_in
AND bk.date_ineffective is null
AND dp.period_close_date is null
AND dp.book_type_code = th.book_type_code
AND bk.deprn_method_code = mt.method_code
AND bk.life_in_months = mt.life_in_months;
SELECT CONV.PRORATE_DATE
FROM
FA_FISCAL_YEAR FY,
FA_DEPRN_PERIODS DP,
FA_CALENDAR_PERIODS CP,
FA_BOOK_CONTROLS BC,
FA_CONVENTIONS CONV
WHERE
BC.BOOK_TYPE_CODE = p_book_type_code
AND CONV.PRORATE_CONVENTION_CODE = l_new_conv_code
AND l_new_dpis >= CONV.START_DATE
AND l_new_dpis <= CONV.END_DATE
AND CP.CALENDAR_TYPE = BC.PRORATE_CALENDAR
AND CONV.PRORATE_DATE >= CP.START_DATE
AND CONV.PRORATE_DATE <= CP.END_DATE
AND FY.FISCAL_YEAR_NAME = BC.FISCAL_YEAR_NAME
AND FY.FISCAL_YEAR = BC.CURRENT_FISCAL_YEAR
AND CONV.PRORATE_DATE <= FY.END_DATE
AND DP.BOOK_TYPE_CODE = p_book_type_code
AND DP.PERIOD_CLOSE_DATE is NULL
AND l_new_dpis <= DP.CALENDAR_PERIOD_CLOSE_DATE;
SELECT DEPRN_BASIS_RULE
FROM FA_METHODS
WHERE method_code = nvl(l_new_method_code,
l_old_method_code)
AND life_in_months = nvl(l_new_life_in_months,
l_old_life_in_months);
l_update_dpis := 'N';
l_update_dpis := 'Y';
UPDATE fa_books
SET annual_deprn_rounding_flag = 'RES',
adjusted_cost = decode(l_deprn_basis_rule,
'NBV', recoverable_cost - (l_rsv - l_ytd_deprn),
recoverable_cost),
date_placed_in_service = decode(l_update_dpis,
'Y', l_new_dpis,
date_placed_in_service),
prorate_date = decode(l_update_dpis,
'Y', l_prorate_date,
prorate_date),
prorate_convention_code = nvl(l_new_conv_code, l_old_conv_code),
original_deprn_start_date = l_orig_deprn_start_date,
deprn_method_code = nvl(l_new_method_code, l_old_method_code),
life_in_months = nvl(l_new_life_in_months, l_old_life_in_months)
WHERE rowid = l_rowid;
UPDATE fa_deprn_summary
SET deprn_reserve = l_rsv,
ytd_deprn = l_ytd_deprn,
adjusted_cost = l_rec_cost - (l_rsv - l_ytd_deprn)
WHERE asset_id = l_asset_id
AND book_type_code = p_book_type_code
AND period_counter = l_pc
AND deprn_source_code = 'BOOKS';