The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT FL.LOOKUP_CODE,FL.MEANING INTO L_DOCUMENT_TYPE_CODE,L_DOCUMENT_TYPE
FROM
PON_AUCTION_HEADERS_ALL PAH,
PON_AUC_DOCTYPES DOC,
FND_LOOKUPS FL
WHERE
PAH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
PAH.DOCTYPE_ID=DOC.DOCTYPE_ID
AND
FL.LOOKUP_TYPE='PON_AUCTION_DOC_TYPES'
AND
FL.LOOKUP_CODE = DOC.INTERNAL_NAME ;
SELECT Nvl(SOL_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='S_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_SUPPLIER'
AND
ROWNUM=1;
SELECT Nvl(AUCTION_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='S_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_SUPPLIER'
AND
ROWNUM=1;
SELECT Nvl(RFI_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='S_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_SUPPLIER'
AND
ROWNUM=1;
SELECT Nvl(RFQ_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='S_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_SUPPLIER'
AND
ROWNUM=1;
SELECT PAH.DOCUMENT_NUMBER,PAH.AUCTION_TITLE,PAH.TRADING_PARTNER_ID,
PAH.VIEW_BY_DATE,PAH.OPEN_BIDDING_DATE,PAH.CLOSE_BIDDING_DATE,PAH.TRADING_PARTNER_CONTACT_ID,
PAH.TRADING_PARTNER_CONTACT_NAME,
PAH.AUCTION_HEADER_ID_ORIG_AMEND
INTO L_DOCUMENT_NUMBER,L_AUCTION_TITLE,L_TRADING_PARTNER_ID,
L_PREVIEW_DATE,L_START_DATE,L_END_DATE,L_TRADING_PARTNER_CONTACT_ID,
L_FROM_USER,
L_AUCTION_HEADER_ID_ORIG_AMEND
FROM
PON_AUCTION_HEADERS_ALL PAH WHERE PAH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID;
SELECT PBH.TRADING_PARTNER_CONTACT_NAME INTO L_TRADING_PARTNER_CONTACT_NAME
FROM PON_BID_HEADERS PBH
WHERE
PBH.BID_NUMBER=L_BID_NUMBER
AND
PBH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
ROWNUM<2;
SELECT HZ.PARTY_NAME INTO L_PREPARER_TP_NAME
FROM
HZ_PARTIES HZ
WHERE
PARTY_ID=L_TRADING_PARTNER_ID;
SELECT PBH.TRADING_PARTNER_NAME,PBH.VENDOR_SITE_ID
INTO L_SUPPLIER,L_SUPPLIER_SITE_ID
FROM
PON_BID_HEADERS PBH
WHERE
PBH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
PBH.BID_NUMBER=L_BID_NUMBER;
SELECT APS.VENDOR_SITE_CODE INTO L_SUPPLIER_SITE_NAME
FROM
AP_SUPPLIER_SITES_ALL APS
WHERE
APS.VENDOR_SITE_ID=L_SUPPLIER_SITE_ID;
SELECT notification_id INTO x_notification_id from
WF_ITEM_ACTIVITY_STATUSES WHERE ITEM_TYPE=l_itemtype
AND ITEM_KEY=l_itemkey
AND ASSIGNED_USER IS NOT NULL
AND ROWNUM<=1;
UPDATE PON_BID_HEADERS
SET
WITHDRAW_REASON=L_WITHDRAW_REASON,
BID_STATUS='ARCHIVED'
WHERE
AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
BID_NUMBER=L_BID_NUMBER;
SELECT PBH.TRADING_PARTNER_ID,PBH.TRADING_PARTNER_CONTACT_ID,
PAH.AUCTION_HEADER_ID_ORIG_AMEND
INTO L_BID_TRADING_PARTNER_ID,L_BID_TRADPART_CNTC_ID,
L_AUCTION_HEADER_ID_ORIG_AMEND
FROM PON_BID_HEADERS PBH,
PON_AUCTION_HEADERS_ALL PAH
WHERE
PAH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID and
PBH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID AND
PBH.BID_NUMBER=L_BID_NUMBER;
SELECT FL.LOOKUP_CODE,FL.MEANING INTO L_DOCUMENT_TYPE_CODE,L_DOCUMENT_TYPE
FROM
PON_AUCTION_HEADERS_ALL PAH,
PON_AUC_DOCTYPES DOC,
FND_LOOKUPS FL
WHERE
PAH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
PAH.DOCTYPE_ID=DOC.DOCTYPE_ID
AND
FL.LOOKUP_TYPE='PON_AUCTION_DOC_TYPES'
AND
FL.LOOKUP_CODE = DOC.INTERNAL_NAME ;
SELECT Nvl(SOL_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='B_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_BUYER'
AND
ROWNUM=1;
SELECT Nvl(AUCTION_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='B_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_BUYER'
AND
ROWNUM=1;
SELECT Nvl(RFI_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='B_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_BUYER'
AND
ROWNUM=1;
SELECT Nvl(RFQ_SUBSCRIPTION_FLAG,'N') INTO L_NOTIF_SUBSCR_FLAG
FROM
PON_NOTIF_SUBSCRIPTION_GROUPS
WHERE
NOTIF_GROUP_CODE='B_OFFER_WITH_DRAW'
AND
NOTIF_GROUP_TYPE='TO_BUYER'
AND
ROWNUM=1;
SELECT PAH.TRADING_PARTNER_CONTACT_NAME,PAH.DOCUMENT_NUMBER,PAH.AUCTION_TITLE,PAH.TRADING_PARTNER_ID,
PAH.VIEW_BY_DATE,PAH.OPEN_BIDDING_DATE,PAH.CLOSE_BIDDING_DATE,PAH.TRADING_PARTNER_CONTACT_ID,
PAH.AUCTION_HEADER_ID_ORIG_AMEND
INTO L_TRADING_PARTNER_CONTACT_NAME,L_DOCUMENT_NUMBER,L_AUCTION_TITLE,L_TRADING_PARTNER_ID,
L_PREVIEW_DATE,L_START_DATE,L_END_DATE,L_TRADING_PARTNER_CONTACT_ID,
L_AUCTION_HEADER_ID_ORIG_AMEND
FROM
PON_AUCTION_HEADERS_ALL PAH WHERE PAH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID;
SELECT PBH.TRADING_PARTNER_CONTACT_NAME INTO L_FROM_USER
FROM PON_BID_HEADERS PBH
WHERE
PBH.BID_NUMBER=L_BID_NUMBER
AND
PBH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
ROWNUM<2;
SELECT HZ.PARTY_NAME INTO L_PREPARER_TP_NAME
FROM
HZ_PARTIES HZ
WHERE
PARTY_ID=L_TRADING_PARTNER_ID;
SELECT PBH.TRADING_PARTNER_NAME,PBH.VENDOR_SITE_ID
INTO L_SUPPLIER,L_SUPPLIER_SITE_ID
FROM
PON_BID_HEADERS PBH
WHERE
PBH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
PBH.BID_NUMBER=L_BID_NUMBER;
SELECT APS.VENDOR_SITE_CODE INTO L_SUPPLIER_SITE_NAME
FROM
AP_SUPPLIER_SITES_ALL APS
WHERE
APS.VENDOR_SITE_ID=L_SUPPLIER_SITE_ID;
SELECT notification_id INTO x_notification_id from
WF_ITEM_ACTIVITY_STATUSES WHERE ITEM_TYPE=l_itemtype
AND ITEM_KEY=l_itemkey
AND ASSIGNED_USER IS NOT NULL
AND ROWNUM<=1;
UPDATE PON_BID_HEADERS
SET
WITHDRAW_REASON=L_WITHDRAW_REASON,
BID_STATUS='ARCHIVED'
WHERE
AUCTION_HEADER_ID=L_AUCTION_HEADER_ID
AND
BID_NUMBER=L_BID_NUMBER;
SELECT PBH.TRADING_PARTNER_ID,PBH.TRADING_PARTNER_CONTACT_ID,
PAH.AUCTION_HEADER_ID_ORIG_AMEND
INTO L_BID_TRADING_PARTNER_ID,L_BID_TRADPART_CNTC_ID,
L_AUCTION_HEADER_ID_ORIG_AMEND
FROM PON_BID_HEADERS PBH,
PON_AUCTION_HEADERS_ALL PAH
WHERE
PAH.AUCTION_HEADER_ID = L_AUCTION_HEADER_ID AND
PBH.AUCTION_HEADER_ID=L_AUCTION_HEADER_ID AND
PBH.BID_NUMBER=L_BID_NUMBER;