The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(*)
INTO h_mrc_book_count
FROM fa_mc_book_controls
WHERE book_type_code = X_book
AND enabled_flag = 'Y';
SELECT COUNT(*) INTO h_count
FROM fa_retirements faret
WHERE faret.asset_id = X_asset_id
AND faret.book_type_code = X_book
AND UPPER(faret.status) in ('PENDING', 'REINSTATE');
SELECT COUNT(*) INTO h_count_mrc
FROM fa_retirements ret,
fa_mc_retirements mc_ret,
fa_mc_book_controls mc_bks
WHERE ret.asset_id = X_asset_id
AND ret.book_type_code = X_book
AND mc_bks.book_type_code = X_book
AND mc_bks.enabled_flag = 'Y'
AND ret.retirement_id = mc_ret.retirement_id
AND UPPER(mc_ret.status) in ('PENDING', 'REINSTATE')
AND mc_ret.set_of_books_id = mc_bks.set_of_books_id;
(X_trx_type = 'DELETE REINSTATEMENT')) then
/* correcting BUG# 1340968 to not use "!=" */
IF (h_mrc_book_count <> 0) THEN
IF (h_count <> (h_count_mrc/h_mrc_book_count)) THEN
FA_SRVR_MSG.add_message
(CALLING_FN => 'FA_TRX_APPROVAL_PKG.faxcti',
NAME => 'FA_SHARED_PENDING_RETIREMENT', p_log_level_rec => p_log_level_rec);
SELECT COUNT(*) INTO h_count
FROM fa_retirements faret
WHERE faret.asset_id = X_asset_id
AND faret.book_type_code = l_corp_book
AND UPPER(faret.status) in ('PENDING');
SELECT COUNT(*) INTO h_count_mrc
FROM fa_retirements ret,
fa_mc_retirements mc_ret,
fa_mc_book_controls mc_bks
WHERE ret.asset_id = X_asset_id
AND ret.book_type_code = l_corp_book
AND mc_bks.book_type_code = l_corp_book
AND mc_bks.enabled_flag = 'Y'
AND ret.retirement_id = mc_ret.retirement_id
AND UPPER(mc_ret.status) in ('PENDING')
AND mc_ret.set_of_books_id = mc_bks.set_of_books_id;
(X_trx_type = 'DELETE REINSTATEMENT')) then
/* correcting BUG# 1340968 to not use "!=" */
IF (h_mrc_book_count <> 0) THEN
IF (h_count <> (h_count_mrc/h_mrc_book_count)) THEN
FA_SRVR_MSG.add_message
(CALLING_FN => 'FA_TRX_APPROVAL_PKG.faxcti',
NAME => 'FA_SHARED_PENDING_RETIREMENT'
,p_log_level_rec => p_log_level_rec);
SELECT units
INTO h_ah_units
FROM fa_asset_history
WHERE asset_id = X_asset_id
AND date_ineffective IS NULL;
SELECT SUM(units_assigned)
INTO h_dh_units
FROM fa_distribution_history
WHERE asset_id = X_asset_id
AND date_ineffective IS NULL;
FA_TRACK_MEMBER_PVT.p_track_member_table.delete;
FA_TRACK_MEMBER_PVT.p_track_mem_index_table.delete;