[Home] [Help]
115: --SQL What: Query base table to validate vendor site ID
116: --SQL Why: Validate site in specified org_id
117: SELECT vendor_site_id
118: INTO l_vendor_site_id_v
119: FROM po_vendor_sites_all
120: WHERE vendor_site_id = p_vendor_site_id
121: AND org_id = p_org_id
122: AND SYSDATE < NVL(inactive_date, SYSDATE + 1)
123: AND purchasing_site_flag = 'Y'
253: freight_terms_lookup_code,
254: terms_id ,
255: invoice_currency_code,
256: shipping_control --
257: from po_vendor_sites_all --
259:
260: X_progress varchar2(3) := '';
261:
576: */
577:
578: CURSOR C is
579: SELECT PVS.vendor_site_code
580: FROM PO_VENDOR_SITES_ALL PVS --
582:
583: BEGIN
584:
759: x_error_status OUT NOCOPY VARCHAR2,
760: x_error_message OUT NOCOPY VARCHAR2
761: )
762: IS
763: l_hold_all_payments_flag PO_VENDOR_SITES_ALL.hold_all_payments_flag%TYPE;
764: l_pay_site_flag PO_VENDOR_SITES_ALL.pay_site_flag%TYPE;
765: BEGIN
766: IF p_remit_to_site_id IS NULL THEN
767: x_error_status := 'E';
760: x_error_message OUT NOCOPY VARCHAR2
761: )
762: IS
763: l_hold_all_payments_flag PO_VENDOR_SITES_ALL.hold_all_payments_flag%TYPE;
764: l_pay_site_flag PO_VENDOR_SITES_ALL.pay_site_flag%TYPE;
765: BEGIN
766: IF p_remit_to_site_id IS NULL THEN
767: x_error_status := 'E';
768: x_error_message := 'All blanks';
1046: x_document_num OUT NOCOPY VARCHAR2,
1047: p_retrieve_only_flag IN VARCHAR2)
1048: IS
1049:
1050: l_fax_area po_vendor_sites_all.fax_area_code%type;
1051:
1052: l_faxnum varchar2(30); -- Need to change this also as part of bug 5765243
1053:
1054: l_party_site_id po_headers_all.vendor_site_id%type;
1214: -- of the Supplier Site defaults. Also, we default email/fax
1215: -- from 3 places, in order of priority:
1216: -- 1. po_headers_all
1217: -- 2. po_vendor_contacts (see Bug 4597324)
1218: -- 3. po_vendor_sites_all
1219:
1220: -- Bug 6625807 / 6526600
1221: -- Added pvs.vendor_site_id = NVL(pvc.vendor_site_id,
1222: -- pvs.vendor_site_id) condition so that following query returns
1237: x_email_address,
1238: l_fax_area,
1239: l_faxnum
1240: from po_headers_all poh,
1241: po_vendor_sites_all pvs,
1242: po_vendor_contacts pvc
1243: where poh.vendor_site_id = pvs.vendor_site_id and
1244: poh.vendor_contact_id = pvc.vendor_contact_id (+) and
1245: poh.po_header_id = p_document_id and
1261:
1262: elsif (p_document_type = 'RELEASE') then
1263: begin
1264: -- We default email/fax from po_vendor_contacts (see Bug
1265: -- 4597324), then po_vendor_sites_all.
1266:
1267: -- Bug 6625807 / 6526600
1268: -- Added pvs.vendor_site_id = NVL(pvc.vendor_site_id,
1269: -- pvs.vendor_site_id) condition so that following query returns
1277: x_email_address,
1278: l_fax_area,
1279: l_faxnum
1280: from po_headers_all poh,
1281: po_vendor_sites_all pvs,
1282: po_vendor_contacts pvc,
1283: po_releases por
1284: where poh.vendor_site_id = pvs.vendor_site_id and
1285: poh.vendor_contact_id = pvc.vendor_contact_id (+) and
1393: select phv.tp_header_id, nvl(etd.edi_flag,'N')
1394: into l_tp_header_id, l_edi_flag
1395: from
1396: (select pvs.tp_header_id, ph.authorization_status, ph.type_lookup_code
1397: from po_vendor_sites_all pvs,
1398: po_vendors pv,
1399: po_headers_all ph
1400: where ph.vendor_id = pv.vendor_id (+)
1401: and ph.vendor_site_id = pvs.vendor_site_id (+)
1413: select phv.tp_header_id, nvl(etd.edi_flag,'N')
1414: into l_tp_header_id, l_edi_flag
1415: from
1416: (select pvs.tp_header_id, pr.authorization_status
1417: from po_vendor_sites_all pvs,
1418: po_vendors pv,
1419: po_headers_all ph,
1420: po_releases_all pr
1421: where ph.vendor_id = pv.vendor_id (+)
1474: BEGIN
1475:
1476: SELECT org_id
1477: INTO x_org_id
1478: FROM po_vendor_sites_all
1479: WHERE vendor_site_id = p_vendor_site_id;
1480:
1481: return (x_org_id);
1482: