The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pt.sponsored_flag
from pa_projects_all b,
gms_project_types pt
where b.project_id = l_project_id
and b.project_type = pt.project_type
and pt.sponsored_flag = 'Y' ;
SELECT gms_packet_header_id_s.NEXTVAL
FROM DUAL;
SELECT gms_packet_dist_id_s.NEXTVAL
FROM DUAL;
SELECT awd.dist_status
FROM gms_distributions awd
WHERE awd.document_distribution_id = l_distribution_id
AND awd.document_header_id = l_doc_header_id
AND awd.document_type = l_document_source
AND awd.dist_status <>'FABA';
INSERT INTO gms_distributions
( document_header_id ,
document_distribution_id,
document_type,
gl_date,
project_id,
task_id,
expenditure_type,
expenditure_organization_id,
expenditure_item_date,
quantity,
unit_price,
amount,
dist_status,
creation_date)
VALUES ( l_doc_header_id,
l_distribution_id,
l_document_source,
p_gl_encumbered_date,
p_project_id,
p_task_id,
p_expenditure_type,
p_expenditure_organization_id,
p_expenditure_item_date,
p_quantity,
p_unit_price,
p_func_amount,
NULL,
SYSDATE );
SELECT a.award_number ,
awdd.award_id ,
awdd.quantity_distributed,
awdd.amount_distributed
BULK COLLECT INTO l_award_qty_obj.award_num,
l_award_qty_obj.award_id,
l_award_qty_obj.quantity,
l_award_qty_obj.amount
FROM gms_distribution_details awdd,
gms_distributions awd,
gms_awards_all a
WHERE awd.document_distribution_id = awdd.document_distribution_id
AND awd.document_header_id = awdd.document_header_id
AND awd.document_distribution_id = l_distribution_id
AND awd.document_header_id = l_doc_header_id
AND awd.document_type = l_document_source
AND awd. dist_status = 'FABA'
AND awdd.award_id = a.Award_id;