The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT vendor_site_id
INTO x_vendor_site_id
FROM po_headers_all
WHERE po_header_id = p_po_header_id;
SELECT vendor_site_id
INTO l_vendor_site_id_v
FROM po_vendor_sites
WHERE vendor_site_id = p_vendor_site_id
AND SYSDATE < NVL(inactive_date, SYSDATE + 1)
AND purchasing_site_flag = 'Y'
AND ( ( p_document_type IN ('PO', 'BLANKET')
AND NVL(rfq_only_site_flag,'N') = 'N'
)
OR (p_document_type IN ('REQ', 'MENU', 'RFQ', 'QUOTATION'))
);
SELECT vendor_site_id
INTO l_vendor_site_id_v
FROM po_vendor_sites_all
WHERE vendor_site_id = p_vendor_site_id
AND org_id = p_org_id
AND SYSDATE < NVL(inactive_date, SYSDATE + 1)
AND purchasing_site_flag = 'Y'
AND ( ( p_document_type IN ('PO', 'BLANKET')
AND NVL(rfq_only_site_flag,'N') = 'N'
)
OR (p_document_type IN ('REQ', 'MENU', 'RFQ', 'QUOTATION'))
);
select count(vendor_site_id),
max(vendor_site_code),
max(vendor_site_id)
into X_vendor_site_count,
X_temp_vendor_site_code,
X_vendor_site_id
from po_vendor_sites
where vendor_id = X_vendor_id
and purchasing_site_flag = 'Y'
and sysdate < nvl(inactive_date, sysdate + 1)
and nvl(rfq_only_site_flag, 'N') <> 'Y' ;
select count(vendor_site_id),
max(vendor_site_code),
max(vendor_site_id)
into X_vendor_site_count,
X_temp_vendor_site_code,
X_vendor_site_id
from po_vendor_sites
where vendor_id = X_vendor_id
and purchasing_site_flag = 'Y'
and sysdate < nvl(inactive_date, sysdate + 1);
cursor C is select nvl(ship_to_location_id,X_vs_ship_to_location_id),
nvl(bill_to_location_id,X_vs_bill_to_location_id),
ship_via_lookup_code ,
fob_lookup_code,
pay_on_code,
freight_terms_lookup_code,
terms_id ,
invoice_currency_code,
shipping_control --
from po_vendor_sites_all --
where vendor_site_id = X_vendor_site_id;
SELECT PVS.vendor_site_code
FROM PO_VENDOR_SITES_ALL PVS --
WHERE PVS.vendor_site_id = X_vendor_site_id;
sql_str := 'SELECT vendor_site_id, vendor_id, vendor_site_code,org_id FROM po_vendor_sites WHERE ';
SELECT hold_all_payments_flag, pay_site_flag
INTO l_hold_all_payments_flag, l_pay_site_flag
FROM PO_VENDOR_SITES
WHERE vendor_site_id = p_remit_to_site_id;
X_sql_str VARCHAR2(2000) := 'SELECT povs.inactive_date, povs.purchasing_site_flag, povs.pay_site_flag , povs.hold_all_payments_flag FROM po_vendor_sites povs where ';
SELECT poh.authorization_status,
poh.consigned_consumption_flag,
poh.agent_id,
poh.segment1,
poh.vendor_site_id,
poh.vendor_id,
poh.approved_date --Bug 6074733
into l_authorization_status,
l_consigned_consumption_flag,
l_preparer_id,
x_document_num,
l_party_site_id,
l_party_id,
l_approved_date --Bug 6074733
FROM po_headers_all poh
WHERE poh.po_header_id = p_document_id;
SELECT por.authorization_status ,
por.consigned_consumption_flag,
por.agent_id,
poh.segment1,
poh.vendor_site_id,
poh.vendor_id,
por.approved_date --Bug 6074733 Bug 7232666
into l_authorization_status,
l_consigned_consumption_flag,
l_preparer_id,
x_document_num,
l_party_site_id,
l_party_id,
l_approved_date --Bug 6074733
from po_headers_all poh,
po_releases_all por
where por.po_release_id = p_document_id and
poh.po_header_id = por.po_header_id ;
update po_releases_all
set xml_flag = l_xml_flag -- bug 2764348
where po_release_id = p_document_id;
update po_headers_all
set xml_flag = l_xml_flag -- bug 2764348
where po_header_id = p_document_id;
select NVL(poh.supplier_notif_method,
pvs.supplier_notif_method),
DECODE(poh.supplier_notif_method, NULL,
NVL(pvc.email_address, pvs.email_address),
poh.email_address),
DECODE(poh.supplier_notif_method, NULL,
NVL(pvc.fax_area_code, pvs.fax_area_code),
''), -- poh.fax includes the area code
DECODE(poh.supplier_notif_method, NULL,
NVL(pvc.fax, pvs.fax),
poh.fax)
into x_default_method,
x_email_address,
l_fax_area,
l_faxnum
from po_headers_all poh,
po_vendor_sites_all pvs,
po_vendor_contacts pvc
where poh.vendor_site_id = pvs.vendor_site_id and
poh.vendor_contact_id = pvc.vendor_contact_id (+) and
poh.po_header_id = p_document_id and
pvs.vendor_site_id = NVL(pvc.vendor_site_id, pvs.vendor_site_id);
select pvs.supplier_notif_method,
NVL(pvc.email_address, pvs.email_address),
NVL(pvc.fax_area_code, pvs.fax_area_code),
NVL(pvc.fax, pvs.fax)
into x_default_method,
x_email_address,
l_fax_area,
l_faxnum
from po_headers_all poh,
po_vendor_sites_all pvs,
po_vendor_contacts pvc,
po_releases por
where poh.vendor_site_id = pvs.vendor_site_id and
poh.vendor_contact_id = pvc.vendor_contact_id (+) and
poh.po_header_id = por.po_header_id and
por.po_release_id = p_document_id and
pvs.vendor_site_id = NVL(pvc.vendor_site_id, pvs.vendor_site_id);
select phv.tp_header_id, nvl(etd.edi_flag,'N')
into l_tp_header_id, l_edi_flag
from
(select pvs.tp_header_id, ph.authorization_status, ph.type_lookup_code
from po_vendor_sites_all pvs,
po_vendors pv,
po_headers_all ph
where ph.vendor_id = pv.vendor_id (+)
and ph.vendor_site_id = pvs.vendor_site_id (+)
and ph.vendor_id = pvs.vendor_id (+)
and ph.po_header_id = p_document_id
) phv,
ece_tp_details etd
where etd.tp_header_id (+) = phv.tp_header_id
and etd.document_id (+)
= decode(phv.authorization_status,'REQUIRES REAPPROVAL','POCO','POO')
and etd.document_type (+) = phv.type_lookup_code;
select phv.tp_header_id, nvl(etd.edi_flag,'N')
into l_tp_header_id, l_edi_flag
from
(select pvs.tp_header_id, pr.authorization_status
from po_vendor_sites_all pvs,
po_vendors pv,
po_headers_all ph,
po_releases_all pr
where ph.vendor_id = pv.vendor_id (+)
and ph.vendor_site_id = pvs.vendor_site_id (+)
and ph.vendor_id = pvs.vendor_id (+)
and ph.po_header_id = pr.po_header_id
and pr.po_release_id = p_document_id
) phv,
ece_tp_details etd
where etd.tp_header_id (+) = phv.tp_header_id
and etd.document_id (+)
= decode(phv.authorization_status,'REQUIRES REAPPROVAL','POCO','POO')
and rownum = 1;
SELECT org_id
INTO x_org_id
FROM po_vendor_sites_all
WHERE vendor_site_id = p_vendor_site_id;