The following lines contain the word 'select', 'insert', 'update' or 'delete':
UPDATE pon_bidding_parties
SET trading_partner_id = p_supplier_hz_party_id,
trading_partner_name = (
select party_name from hz_parties where party_id = p_supplier_hz_party_id),
requested_supplier_id = null,
requested_supplier_name = null,
last_update_date = l_current_date,
last_updated_by = p_user_id
WHERE
requested_supplier_id = p_requested_supplier_id;
UPDATE pon_party_line_exclusions
SET trading_partner_id =p_supplier_hz_party_id,
requested_supplier_id = null,
last_update_date = l_current_date,
last_updated_by = p_user_id,
last_update_login = p_user_id
WHERE
requested_supplier_id = p_requested_supplier_id;
UPDATE pon_pf_supplier_formula
SET trading_partner_id = p_supplier_hz_party_id,
requested_supplier_id = null,
Last_update_date = l_current_date,
Last_updated_by = p_user_id,
Last_update_login = p_user_id
WHERE
requested_supplier_id = p_requested_supplier_id;
SELECT DISTINCT requested_supplier_contact_id
BULK COLLECT INTO l_req_contact_id
FROM pon_bidding_parties
WHERE trading_partner_id = p_supplier_hz_party_id;
UPDATE pon_bidding_parties
SET trading_partner_contact_id = l_vendor_contact_id,
trading_partner_contact_name =
(SELECT party_name FROM hz_parties WHERE party_id = l_vendor_contact_id),
requested_supplier_contact_id = null,
requested_supp_contact_name = null
WHERE requested_supplier_contact_id = l_req_contact_id(x);
SELECT user_name
INTO l_user_name
FROM fnd_user
WHERE person_party_id = l_vendor_contact_id;
SELECT user_name
INTO l_user_name
FROM fnd_user
WHERE person_party_id = l_vendor_contact_id
AND ROWNUM = 1;
-- and update pon_bidding_parties to null out wf_user_name
SELECT DISTINCT ah.auction_header_id, ah.wf_role_name
BULK COLLECT INTO l_auction_header_id, l_wf_role_name
FROM pon_bidding_parties pbp, pon_auction_headers_all ah
WHERE pbp.trading_partner_contact_id = l_vendor_contact_id
AND pbp.wf_user_name IS NOT NULL
AND pbp.auction_header_id = ah.auction_header_id;
UPDATE pon_bidding_parties
SET wf_user_name = NULL
WHERE auction_header_id = l_auction_header_id(y)
AND trading_partner_contact_id = l_vendor_contact_id;