The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT doc_number, revision_num, treasury_symbol_id,
fund_value, budgeting_segments, budget_level_id
FROM Fv_Be_Trx_Hdrs
WHERE doc_id = p_doc_id
AND set_of_books_id = p_sob_id;
SELECT treasury_symbol
FROM Fv_Treasury_Symbols
WHERE treasury_symbol_id = vl_ts_id
AND set_of_books_id = p_sob_id;
SELECT description
FROM Fv_Budget_Levels
WHERE budget_level_id = vl_budlevel_id
AND set_of_books_id = p_sob_id;
SELECT SUM(amount)
FROM Fv_Be_Trx_Dtls
WHERE doc_id = p_doc_id
AND set_of_books_id = p_sob_id
AND revision_num = vl_revision_num;
SELECT currency_code
FROM Gl_Sets_Of_Books
WHERE set_of_books_id = p_sob_id;
SELECT fv_be_wf_itemkey_s.NEXTVAL
INTO vl_item_seq
FROM DUAL;
SELECT doc_status
FROM Fv_Be_Trx_Hdrs
WHERE set_of_books_id = vg_sob_id
AND doc_id = vg_doc_id;
SELECT description
FROM Fv_Lookup_Codes
WHERE lookup_type = 'BE_DOC_STATUS'
AND lookup_code = vl_doc_status;
-- Update the status for the doc_id to Rejected
Update_Status(vg_sob_id,vg_doc_id,'RJ',vg_errbuf,vg_retcode);
-- Update the status for the to_rpr_doc_id to Rejected
Update_Status(vg_sob_id,vg_to_rpr_doc_id,'RJ',vg_errbuf,vg_retcode);
PROCEDURE Update_Status(p_sob_id NUMBER,
p_doc_id NUMBER,
p_doc_status VARCHAR2,
errbuf OUT NOCOPY VARCHAR2,
retcode OUT NOCOPY NUMBER) IS
l_module_name VARCHAR2(200) := g_module_name || 'Update_Status';
-- Update the Headers table
UPDATE Fv_Be_Trx_Hdrs
SET doc_status = p_doc_status
WHERE doc_id = p_doc_id
AND set_of_books_id = p_sob_id;
-- Update the Details table
UPDATE Fv_Be_Trx_Dtls
SET transaction_status = p_doc_status
WHERE doc_id = p_doc_id
AND set_of_books_id = p_sob_id
AND transaction_status = 'IP';
errbuf := SQLERRM || ' -- Error in the Update_Status Procedure';
END Update_Status;
SELECT doc_id, transaction_date, budget_level_id, source
FROM fv_be_trx_hdrs
WHERE doc_id = p_doc_id
FOR doc_rec IN fetch_doc_info LOOP
IF doc_rec.source = 'RPR' then
l_doc_type := 'BE_RPR_TRANSACTIONS';
SELECT transaction_date, budget_level_id, source
INTO vg_gl_date, vg_budget_level_id, vg_source
FROM fv_be_trx_hdrs
WHERE doc_id = vg_doc_id;
SELECT MAX(revision_num)
FROM Fv_Be_Trx_Dtls
WHERE set_of_books_id = sob_id
AND doc_id = doc_id
AND transaction_status = 'IP';
Update_Status(sob_id,doc_id,'IN',errbuf,retcode);
Update_Status(sob_id,doc_id,'RA',errbuf,retcode);
SELECT employee_id
FROM Fnd_User
WHERE user_id = c_user_id;
SELECT D.gl_date,
T.apprn_transaction_type ,
D.sub_type ,
decode(D.increase_decrease_flag,'I','Increase','Decrease') ,
D.amount ,
D.budgeting_segments
FROM Fv_Be_Trx_Dtls D, Fv_Be_Transaction_Types T
WHERE D.set_of_books_id = vg_sob_id
AND D.doc_id = vg_doc_id
AND D.transaction_type_id = T.be_tt_id
AND D.revision_num = (SELECT MAX(revision_num)
FROM Fv_Be_Trx_Hdrs
WHERE doc_id = vg_doc_id
AND set_of_books_id = vg_sob_id)
ORDER BY D.gl_date ;