The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_last_updated_by NUMBER;
l_last_updated_by := FND_GLOBAL.user_id;
UPDATE rcv_shipment_headers
SET vendor_id = p_vendor_id,
vendor_site_id = p_vendor_site_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE receipt_source_code = 'VENDOR'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id is not null
AND vendor_site_id = p_dup_vendor_site_id ;
UPDATE rcv_shipment_headers
SET vendor_id = p_vendor_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE receipt_source_code = 'VENDOR'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id is null;
UPDATE rcv_transactions
SET vendor_id = p_vendor_id,
vendor_site_id = p_vendor_site_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE source_document_code = 'PO'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id = p_dup_vendor_site_id ;
UPDATE rcv_headers_interface
SET vendor_id = p_vendor_id,
vendor_site_id = p_vendor_site_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE receipt_source_code = 'VENDOR'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id is not null
AND vendor_site_id = p_dup_vendor_site_id ;
UPDATE rcv_headers_interface
SET vendor_id = p_vendor_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE receipt_source_code = 'VENDOR'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id is null;
UPDATE rcv_transactions_interface
SET vendor_id = p_vendor_id,
vendor_site_id = p_vendor_site_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE source_document_code = 'PO'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id is not null
AND vendor_site_id = p_dup_vendor_site_id ;
UPDATE rcv_transactions_interface
SET vendor_id = p_vendor_id,
last_updated_by = l_last_updated_by,
last_update_date = sysdate
WHERE source_document_code = 'PO'
AND vendor_id = p_dup_vendor_id
AND vendor_site_id is null;
SELECT rt.po_line_location_id,
rt.organization_id,
nvl(pll.lcm_flag,'N')
INTO x_pll_id,
x_org_id,
x_lcm_flag
FROM rcv_transactions rt,
po_line_locations_all pll
WHERE rt.po_line_location_id is not null
AND rt.po_line_location_id = pll.line_location_id
AND transaction_id = p_rcv_transaction_id;
SELECT lcm_account_id,
tax_variance_account_id,
def_charges_account_id,
exchange_variance_account_id,
inv_variance_account_id
INTO x_lcm_account_id,
x_tax_variance_account_id,
x_def_charges_account_id,
x_exchange_variance_account_id,
x_inv_variance_account_id
FROM rcv_parameters
WHERE organization_id = x_org_id;