The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT SUM(allocation_percent) , rank
FROM mrp_sr_source_org
WHERE sr_receipt_id = receipt_id
GROUP BY rank
HAVING sum(allocation_percent) <> 100;
UPDATE mrp_sr_source_org mrp1
SET mrp1.vendor_id = p_vendor_id,
mrp1.vendor_site_id = p_vendor_site_id
WHERE mrp1.vendor_id = p_dup_vendor_id and
mrp1.vendor_site_id = p_dup_vendor_site_id
AND not exists
(select mrp2.vendor_id
from mrp_sr_source_org mrp2
where mrp2.vendor_id = p_vendor_id and
mrp2.vendor_site_id = p_vendor_site_id and
mrp2.sr_receipt_id = mrp1.sr_receipt_id) ;
UPDATE mrp_sr_source_org mrp1
SET mrp1.vendor_id = p_vendor_id
WHERE mrp1.vendor_id = p_dup_vendor_id
AND mrp1.vendor_site_id is null
AND not exists
(select mrp2.vendor_id
from mrp_sr_source_org mrp2
where mrp2.vendor_id = p_vendor_id
and mrp2.vendor_site_id is null
and mrp2.sr_receipt_id = mrp1.sr_receipt_id) ;
UPDATE mrp_sr_source_org mrp1
SET mrp1.allocation_percent
= (SELECT sum (mrp3.allocation_percent)
FROM mrp_sr_source_org mrp3
WHERE mrp3.sr_receipt_id = mrp1.sr_receipt_id
AND mrp3.rank = mrp1.rank
AND mrp3.vendor_id IN
(p_vendor_id, p_dup_vendor_id)
AND mrp3.vendor_site_id IN
(p_vendor_site_id, p_dup_vendor_site_id ))
WHERE mrp1.vendor_id = p_vendor_id
AND mrp1.vendor_site_id = p_vendor_site_id
AND exists
( select mrp2.vendor_id
from mrp_sr_source_org mrp2
where mrp2.vendor_id = p_dup_vendor_id
and mrp2.vendor_site_id = p_dup_vendor_site_id
and mrp2.rank = mrp1.rank
and mrp2.sr_receipt_id = mrp1.sr_receipt_id) ;
DELETE from mrp_sr_source_org mrp1
WHERE vendor_id = p_dup_vendor_id
AND vendor_site_id = p_dup_vendor_site_id
RETURNING sr_receipt_id
BULK COLLECT INTO l_sr_receipt_id;
FND_MESSAGE.SET_NAME('MRP','MRP_SR_SOURCE_ORG_DELETED');
FND_MESSAGE.SET_TOKEN('ROWS_DELETED',l_row_count);
UPDATE mrp_sourcing_rules
SET planning_active = 2
WHERE sourcing_rule_id = ( SELECT sourcing_rule_id
FROM mrp_sr_receipt_org
WHERE sr_receipt_id = l_sr_receipt_id(j))
AND planning_active = 1
RETURNING sourcing_rule_name INTO l_sourcing_rule_name;