The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT ROWID,
used_flag used,
production *
(LEAST (TO_DATE (X_period.end_jdate, 'J'), end_date) -
GREATEST (TO_DATE (X_period.start_jdate, 'J'), start_date) + 1)
/ (end_date - start_date + 1) prod
FROM FA_PERIODIC_PRODUCTION
WHERE asset_id = X_dpr_ptr.asset_id
AND book_type_code = h_dist_book
AND start_date <= TO_DATE (X_period.end_jdate, 'J')
AND end_date >= TO_DATE (X_period.start_jdate, 'J')
FOR UPDATE OF used_flag NOWAIT;
UPDATE FA_PERIODIC_PRODUCTION
SET Used_Flag = 'YES'
WHERE ROWID = h.ROWID;
SELECT rate
INTO X_rate
FROM fa_rates
WHERE method_id = X_method_id
AND YEAR = X_year_of_life
AND period_placed_in_service = X_prorate_period;
h_formula := 'SELECT ' || h_formula_parsed ||
' rate FROM fa_books fabk, fa_deprn_periods fadp ' ||
' WHERE (fabk.asset_id = :v1) ' ||
' AND (fabk.book_type_code = :v2' ||
' ) AND (fabk.book_type_code = fadp.book_type_code) ' ||
' AND (fabk.date_ineffective is null) ' ||
' AND (fadp.period_close_date is null)';
h_formula := 'SELECT ' || h_formula_parsed || ' rate FROM dual';
SELECT rate_in_use
INTO X_Rate
FROM ( SELECT rate_in_use,
rank() over(order by transaction_header_id_in desc) rank
FROM fa_books
WHERE book_type_code = X_Book_Type_Code
AND asset_id = X_Asset_Id
AND deprn_method_code = X_Method_Code
)
WHERE rank = 1;
SELECT fy.start_date,
fy.end_date,
bc2.current_fiscal_year,
bk.date_placed_in_service,
bk.deprn_start_date
INTO X_curr_fy_start_date,
X_curr_fy_end_date,
h_curr_fy,
h_dpis,
h_deprn_start_date
FROM fa_books bk,
fa_fiscal_year fy,
fa_book_controls bc,
fa_book_controls bc2
WHERE bc.book_type_code = X_Book_Type_Code
AND fy.fiscal_year_name = bc.fiscal_year_name
AND fy.fiscal_year = X_Fiscal_Year
AND bc2.book_type_code = X_Book_Type_Code
AND bk.book_type_code = X_Book_Type_Code
AND bk.asset_id = X_Asset_Id
AND bk.date_ineffective IS NULL;
SELECT COUNT(*)
INTO h_conversion_year
FROM fa_fiscal_year fy,
fa_book_controls bc
WHERE bc.book_type_code = X_Book_Type_Code
AND bc.fiscal_year_name = fy.fiscal_year_name
AND X_Conversion_Date BETWEEN fy.start_date AND
fy.end_date;
select 'Y'
from fa_calendar_periods fcp1,
fa_calendar_periods fcp2,
fa_book_controls fbc
where to_date (dpr_in.prorate_jdate,'J') BETWEEN fcp1.start_date AND fcp1.end_date
and fbc.book_type_code = dpr_in.book
and fcp1.calendar_type = fbc.deprn_calendar
and to_date (decode( dpr_in.jdate_retired,0,null,dpr_in.jdate_retired),'J') BETWEEN fcp2.start_date AND fcp2.end_date
and fcp2.calendar_type=fcp1.calendar_type
and fcp1.period_name=fcp2.period_name;
select program_short_name
into l_request_short_name
from FND_CONC_REQ_SUMMARY_V
where request_id = fnd_global.conc_request_id;
SELECT nbv_at_switch
INTO l_nbv_at_switch
FROM fa_books
WHERE asset_id = dpr.asset_id
AND book_type_code = dpr.book
AND transaction_header_id_out is null;
SELECT 'Y'
INTO h_deprn_run
FROM fa_deprn_summary
WHERE book_type_code = dpr.book
AND asset_id = dpr.asset_id
AND deprn_source_code = 'DEPRN'
AND period_counter = ((dpr_in.y_begin*perds_per_yr_dcal+dpr_in.p_cl_begin)-1);
SELECT fy.fiscal_year,cl.period_num
INTO dpis_fy,dpis_perd_num
FROM FA_BOOKS bk,
FA_CALENDAR_PERIODS CL,
FA_BOOK_CONTROLS BC,
FA_FISCAL_YEAR fy
WHERE bk.asset_id = dpr.asset_id
AND bk.book_type_code = dpr.book
AND bk.date_ineffective is null
AND BC.book_type_code = dpr.book
AND BC.date_ineffective is null
AND BC.deprn_calendar = CL.Calendar_type
AND bk.date_placed_in_service BETWEEN CL.start_date AND CL.END_DATE
AND fy.fiscal_year_name = bc.fiscal_year_name
AND bk.date_placed_in_service BETWEEN fy.start_date AND fy.END_DATE;
SELECT fiscal_year
INTO book_fy
FROM fa_deprn_periods pd
WHERE pd.book_type_code = dpr.book
AND period_close_date is null;
, dpr.update_override_status
, l_over_depreciate_option
, dpr.asset_type
, dpr.deprn_rsv
, dpr.rec_cost
, dpr.override_period_counter
, p_log_level_rec) THEN
fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faooda', p_log_level_rec => p_log_level_rec);
NVL(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') ='N' AND
NVL(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') ='N') THEN
IF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADD OR
dpr.deprn_rounding_flag IS NULL) THEN
--
-- Go into following logic if this is group (except sumup) or calculating member
--
IF (NVL(dpr.asset_type, 'CAPITALIZED') = 'GROUP' AND
NVL(dpr.member_rollup_flag, 'N') <> 'Y') OR
(NVL(dpr.asset_type, 'CAPITALIZED') <> 'GROUP' AND
NVL(dpr.tracking_method, 'NULL') = 'CALCULATE') THEN
perd_deprn_exp := actual_annual_deprn_amt -
(NVL(cur_deprn_rsv,0)+ NVL(year_deprn_exp,0) - cur_eofy_reserve);
select 'Y'
into prod_life_complete
from fa_books_summary bs,fa_deprn_summary ds
where bs.asset_id = dpr.asset_id
and bs.period_counter = l_period_counter
and bs.life_complete_flag = 'Y'
and bs.book_type_code = dpr.book
and ds.book_type_code = bs.book_type_code
and ds.asset_id = bs.asset_id
and ds.period_counter = bs.period_counter
and ds.deprn_amount = 0 ;
IF (NVL(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') ='Y') THEN -- ENERGY
dpr.adj_capacity := dpr.adj_capacity - perd_prod; -- ENERGY
SELECT adjusted_cost
INTO l_temp_adj_cost
FROM fa_books
WHERE book_type_code = dpr.book
AND asset_id = dpr.asset_id
AND transaction_header_id_out IS NULL;
SELECT fab1.adjusted_recoverable_cost
INTO l_old_adj_rec_cost
FROM fa_books fab1,fa_books fab2
WHERE fab1.transaction_header_id_out = fab2.transaction_header_id_in
AND fab1.asset_id = fab2.asset_id
AND fab1.book_type_code = fab2.book_type_code
AND fab2.asset_id = dpr.asset_id
AND fab2.book_type_code = dpr.book --Bug 8475228
AND fab2.transaction_header_id_out IS NULL;
NVL(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') ='N' AND
NVL(p_subtract_ytd_flag,'N') = 'N' AND
NVL(fa_cache_pkg.fazcdrd_record.use_eofy_reserve_flag, 'N') = 'N'))) THEN
-- Japan Tax Reform Project
IF NVL(fa_cache_pkg.fazccmt_record.guarantee_rate_method_flag, 'NO') = 'YES' THEN
IF (p_log_level_rec.statement_level) THEN
fa_debug_pkg.ADD('faxcde', '+++ JAPAN ', 'in guarantee rate call deprn basis', p_log_level_rec => p_log_level_rec);
p_update_override_status IN BOOLEAN,
p_over_depreciate_option IN NUMBER DEFAULT NULL, --Bug 8487934
p_asset_type IN VARCHAR2 DEFAULT NULL, --Bug 8487934
p_deprn_rsv IN NUMBER DEFAULT NULL, --Bug 8487934
p_cur_adj_cost IN NUMBER DEFAULT NULL, --Bug 8487934
p_override_period_counter IN NUMBER DEFAULT NULL,-- Bug 8211842
p_log_level_rec IN FA_API_TYPES.log_level_rec_type) RETURN BOOLEAN IS
h_calendar_type VARCHAR2(15);
fa_debug_pkg.ADD('faodda', 'p_update_override_status', p_update_override_status, p_log_level_rec => p_log_level_rec);
SELECT cp.period_name,
fy.fiscal_year * h_num_per_fy + cp.period_num
INTO perd_name,
l_period_counter
FROM fa_calendar_periods cp, fa_fiscal_year fy
WHERE cp.calendar_type = h_calendar_type AND
cp.period_num = perd_ctr AND
cp.start_date >= fy.start_date AND
cp.end_date <= fy.end_date AND
fy.fiscal_year_name = h_fy_name AND
fy.fiscal_year = fyctr;
SELECT deprn_amount, bonus_deprn_amount, subtract_ytd_flag, deprn_override_id
INTO override_depr_amt, override_bonus_amt, subtract_ytd_flag, h_deprn_override_id
FROM FA_DEPRN_OVERRIDE
WHERE book_type_code = book
AND asset_id = h_asset_id
AND period_name = perd_name
AND used_by = 'DEPRECIATION'
AND status = 'POSTED';
SELECT deprn_amount
, bonus_deprn_amount
, subtract_ytd_flag
, deprn_override_id
INTO override_depr_amt
, override_bonus_amt
, subtract_ytd_flag
, h_deprn_override_id
FROM FA_DEPRN_OVERRIDE
WHERE book_type_code = book
AND asset_id = h_asset_id
AND period_name = perd_name
AND used_by = 'ADJUSTMENT'
AND status = 'POST';
SELECT deprn_amount
, bonus_deprn_amount
, subtract_ytd_flag
, deprn_override_id
INTO override_depr_amt
, override_bonus_amt
, subtract_ytd_flag
, h_deprn_override_id
FROM FA_DEPRN_OVERRIDE
WHERE book_type_code = book
AND asset_id = h_asset_id
AND period_name = perd_name
AND used_by = 'RETIREMENT'
AND status = 'POST';
SELECT deprn_amount
, bonus_deprn_amount
, subtract_ytd_flag
, deprn_override_id
INTO override_depr_amt
, override_bonus_amt
, subtract_ytd_flag
, h_deprn_override_id
FROM FA_DEPRN_OVERRIDE
WHERE book_type_code = book
AND asset_id = h_asset_id
AND period_name = perd_name
AND used_by = 'DEPRECIATION'
AND status = 'POST';
SELECT bk.cost
INTO report_cost
FROM fa_mc_books bk
WHERE bk.book_type_code = book
AND bk.asset_id = h_asset_id
AND bk.transaction_header_id_out IS NULL
AND bk.set_of_books_id = p_set_of_books_id;
SELECT bk.cost
INTO primary_cost
FROM fa_books bk
WHERE bk.book_type_code = book
AND bk.asset_id = h_asset_id
AND bk.transaction_header_id_out IS NULL;
UPDATE fa_deprn_override
SET status = 'POSTED'
WHERE deprn_override_id = h_deprn_override_id;
ELSIF p_update_override_status THEN
UPDATE fa_deprn_override
SET status = 'SELECTED'
WHERE deprn_override_id = h_deprn_override_id;