The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT ah.intgr_hdr_attach_flag,
ah.auction_header_id,
bh.bid_number
FROM pon_auction_headers_all ah,
pon_bid_headers bh
WHERE ah.auction_header_id = bh.auction_header_id
AND ah.auction_status = 'AUCTION_CLOSED'
AND bh.bid_status = 'ACTIVE'
AND bh.trading_partner_id = p_requested_supplier_id
AND bh.vendor_id = -1;
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;
X_last_update_login => fnd_global.login_id);
UPDATE pon_bid_headers
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),
vendor_id = p_po_vendor_id
WHERE trading_partner_id = p_requested_supplier_id
AND vendor_id = -1;
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;
-- Updates pon_bid_headers with the first contact id and name
IF (x = 1) THEN
UPDATE pon_bid_headers
SET trading_partner_contact_id = l_vendor_contact_id,
trading_partner_contact_name = l_user_name
WHERE trading_partner_id = p_supplier_hz_party_id
AND nvl(evaluation_flag, 'N') = 'N';
-- 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;