5718: --End of Comments
5719: --------------------------------------------------------------------------------
5720: FUNCTION is_dup_vendor_record(p_vendor_id IN NUMBER,
5721: p_vendor_site_id IN NUMBER,
5722: p_vendor_id_list IN po_tbl_number,
5723: p_vendor_site_id_list IN po_tbl_number)
5724: RETURN BOOLEAN
5725: IS
5726: BEGIN
5719: --------------------------------------------------------------------------------
5720: FUNCTION is_dup_vendor_record(p_vendor_id IN NUMBER,
5721: p_vendor_site_id IN NUMBER,
5722: p_vendor_id_list IN po_tbl_number,
5723: p_vendor_site_id_list IN po_tbl_number)
5724: RETURN BOOLEAN
5725: IS
5726: BEGIN
5727: IF (p_vendor_id_list.FIRST IS NOT NULL) THEN
5793: --Notes : None
5794: --Testing : None
5795: --End of Comments
5796: --------------------------------------------------------------------------------
5797: PROCEDURE validate_vendor_sites(px_vendor_site_id_list IN OUT NOCOPY po_tbl_number)
5798: IS
5799: l_vendor_site_status VARCHAR2(20);
5800: BEGIN
5801: IF (px_vendor_site_id_list.FIRST IS NULL) THEN
5888: p_destination_org_id IN NUMBER,
5889: p_api_version IN NUMBER,
5890: -- Bug# 3404477: Follow the API standards
5891: p_init_msg_list IN VARCHAR2,
5892: x_vendor_id OUT NOCOPY po_tbl_number,
5893: x_vendor_site_id OUT NOCOPY po_tbl_number,
5894: x_vendor_contact_id OUT NOCOPY po_tbl_number,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5889: p_api_version IN NUMBER,
5890: -- Bug# 3404477: Follow the API standards
5891: p_init_msg_list IN VARCHAR2,
5892: x_vendor_id OUT NOCOPY po_tbl_number,
5893: x_vendor_site_id OUT NOCOPY po_tbl_number,
5894: x_vendor_contact_id OUT NOCOPY po_tbl_number,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5890: -- Bug# 3404477: Follow the API standards
5891: p_init_msg_list IN VARCHAR2,
5892: x_vendor_id OUT NOCOPY po_tbl_number,
5893: x_vendor_site_id OUT NOCOPY po_tbl_number,
5894: x_vendor_contact_id OUT NOCOPY po_tbl_number,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5898: x_src_doc_type_code OUT NOCOPY po_tbl_varchar30,
5891: p_init_msg_list IN VARCHAR2,
5892: x_vendor_id OUT NOCOPY po_tbl_number,
5893: x_vendor_site_id OUT NOCOPY po_tbl_number,
5894: x_vendor_contact_id OUT NOCOPY po_tbl_number,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5898: x_src_doc_type_code OUT NOCOPY po_tbl_varchar30,
5899: x_base_price OUT NOCOPY po_tbl_number,
5892: x_vendor_id OUT NOCOPY po_tbl_number,
5893: x_vendor_site_id OUT NOCOPY po_tbl_number,
5894: x_vendor_contact_id OUT NOCOPY po_tbl_number,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5898: x_src_doc_type_code OUT NOCOPY po_tbl_varchar30,
5899: x_base_price OUT NOCOPY po_tbl_number,
5900: x_currency_price OUT NOCOPY po_tbl_number,
5893: x_vendor_site_id OUT NOCOPY po_tbl_number,
5894: x_vendor_contact_id OUT NOCOPY po_tbl_number,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5898: x_src_doc_type_code OUT NOCOPY po_tbl_varchar30,
5899: x_base_price OUT NOCOPY po_tbl_number,
5900: x_currency_price OUT NOCOPY po_tbl_number,
5901: x_currency_code OUT NOCOPY po_tbl_varchar15,
5895: x_src_doc_header_id OUT NOCOPY po_tbl_number,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5898: x_src_doc_type_code OUT NOCOPY po_tbl_varchar30,
5899: x_base_price OUT NOCOPY po_tbl_number,
5900: x_currency_price OUT NOCOPY po_tbl_number,
5901: x_currency_code OUT NOCOPY po_tbl_varchar15,
5902: x_unit_of_measure OUT NOCOPY po_tbl_varchar25,
5903: x_price_override_flag OUT NOCOPY po_tbl_varchar1,
5896: x_src_doc_line_id OUT NOCOPY po_tbl_number,
5897: x_src_doc_line_num OUT NOCOPY po_tbl_number,
5898: x_src_doc_type_code OUT NOCOPY po_tbl_varchar30,
5899: x_base_price OUT NOCOPY po_tbl_number,
5900: x_currency_price OUT NOCOPY po_tbl_number,
5901: x_currency_code OUT NOCOPY po_tbl_varchar15,
5902: x_unit_of_measure OUT NOCOPY po_tbl_varchar25,
5903: x_price_override_flag OUT NOCOPY po_tbl_varchar1,
5904: x_not_to_exceed_price OUT NOCOPY po_tbl_number,
5900: x_currency_price OUT NOCOPY po_tbl_number,
5901: x_currency_code OUT NOCOPY po_tbl_varchar15,
5902: x_unit_of_measure OUT NOCOPY po_tbl_varchar25,
5903: x_price_override_flag OUT NOCOPY po_tbl_varchar1,
5904: x_not_to_exceed_price OUT NOCOPY po_tbl_number,
5905: x_price_break_id OUT NOCOPY po_tbl_number,
5906: x_price_differential_flag OUT NOCOPY po_tbl_varchar1,
5907: x_rate_type OUT NOCOPY po_tbl_varchar30,
5908: x_rate_date OUT NOCOPY po_tbl_date,
5901: x_currency_code OUT NOCOPY po_tbl_varchar15,
5902: x_unit_of_measure OUT NOCOPY po_tbl_varchar25,
5903: x_price_override_flag OUT NOCOPY po_tbl_varchar1,
5904: x_not_to_exceed_price OUT NOCOPY po_tbl_number,
5905: x_price_break_id OUT NOCOPY po_tbl_number,
5906: x_price_differential_flag OUT NOCOPY po_tbl_varchar1,
5907: x_rate_type OUT NOCOPY po_tbl_varchar30,
5908: x_rate_date OUT NOCOPY po_tbl_date,
5909: x_rate OUT NOCOPY po_tbl_number,
5905: x_price_break_id OUT NOCOPY po_tbl_number,
5906: x_price_differential_flag OUT NOCOPY po_tbl_varchar1,
5907: x_rate_type OUT NOCOPY po_tbl_varchar30,
5908: x_rate_date OUT NOCOPY po_tbl_date,
5909: x_rate OUT NOCOPY po_tbl_number,
5910: x_return_status OUT NOCOPY VARCHAR2,
5911: -- Bug# 3404477: Return msg count and data
5912: x_msg_count OUT NOCOPY NUMBER,
5913: x_msg_data OUT NOCOPY VARCHAR2
6150: l_api_name VARCHAR2(60) := 'get_services_asl_list';
6151: l_log_head CONSTANT varchar2(100) := g_log_head || l_api_name;
6152: l_progress VARCHAR2(3) := '000';
6153:
6154: x_asl_id po_tbl_number;
6155: l_sysdate DATE := trunc(sysdate); -- Bug 3282423
6156:
6157: -- Bug# 3379053
6158: l_supplier_site_status VARCHAR2(20);
6155: l_sysdate DATE := trunc(sysdate); -- Bug 3282423
6156:
6157: -- Bug# 3379053
6158: l_supplier_site_status VARCHAR2(20);
6159: l_vendor_id_list po_tbl_number := po_tbl_number();
6160: l_vendor_site_id_list po_tbl_number := po_tbl_number();
6161: l_asl_id_list po_tbl_number := po_tbl_number();
6162: l_count NUMBER;
6163: l_prev_vendor_id NUMBER;
6156:
6157: -- Bug# 3379053
6158: l_supplier_site_status VARCHAR2(20);
6159: l_vendor_id_list po_tbl_number := po_tbl_number();
6160: l_vendor_site_id_list po_tbl_number := po_tbl_number();
6161: l_asl_id_list po_tbl_number := po_tbl_number();
6162: l_count NUMBER;
6163: l_prev_vendor_id NUMBER;
6164: l_prev_vendor_site_id NUMBER;
6157: -- Bug# 3379053
6158: l_supplier_site_status VARCHAR2(20);
6159: l_vendor_id_list po_tbl_number := po_tbl_number();
6160: l_vendor_site_id_list po_tbl_number := po_tbl_number();
6161: l_asl_id_list po_tbl_number := po_tbl_number();
6162: l_count NUMBER;
6163: l_prev_vendor_id NUMBER;
6164: l_prev_vendor_site_id NUMBER;
6165: l_current_vendor_id NUMBER;
6178: PO_DEBUG.debug_var(l_log_head,l_progress,'p_api_version',p_api_version);
6179: END IF;
6180:
6181: -- Initialize the out parameter tables
6182: x_vendor_id := po_tbl_number(); -- Bug# 3379053: Initialize x_vendor_id and
6183: x_vendor_site_id := po_tbl_number(); -- x_vendor_site_id collections
6184: x_base_price := po_tbl_number();
6185: x_currency_price := po_tbl_number();
6186: x_currency_code := po_tbl_varchar15();
6179: END IF;
6180:
6181: -- Initialize the out parameter tables
6182: x_vendor_id := po_tbl_number(); -- Bug# 3379053: Initialize x_vendor_id and
6183: x_vendor_site_id := po_tbl_number(); -- x_vendor_site_id collections
6184: x_base_price := po_tbl_number();
6185: x_currency_price := po_tbl_number();
6186: x_currency_code := po_tbl_varchar15();
6187: x_price_break_id := po_tbl_number();
6180:
6181: -- Initialize the out parameter tables
6182: x_vendor_id := po_tbl_number(); -- Bug# 3379053: Initialize x_vendor_id and
6183: x_vendor_site_id := po_tbl_number(); -- x_vendor_site_id collections
6184: x_base_price := po_tbl_number();
6185: x_currency_price := po_tbl_number();
6186: x_currency_code := po_tbl_varchar15();
6187: x_price_break_id := po_tbl_number();
6188: x_price_differential_flag := po_tbl_varchar1();
6181: -- Initialize the out parameter tables
6182: x_vendor_id := po_tbl_number(); -- Bug# 3379053: Initialize x_vendor_id and
6183: x_vendor_site_id := po_tbl_number(); -- x_vendor_site_id collections
6184: x_base_price := po_tbl_number();
6185: x_currency_price := po_tbl_number();
6186: x_currency_code := po_tbl_varchar15();
6187: x_price_break_id := po_tbl_number();
6188: x_price_differential_flag := po_tbl_varchar1();
6189: x_rate_type := po_tbl_varchar30();
6183: x_vendor_site_id := po_tbl_number(); -- x_vendor_site_id collections
6184: x_base_price := po_tbl_number();
6185: x_currency_price := po_tbl_number();
6186: x_currency_code := po_tbl_varchar15();
6187: x_price_break_id := po_tbl_number();
6188: x_price_differential_flag := po_tbl_varchar1();
6189: x_rate_type := po_tbl_varchar30();
6190: x_rate_date := po_tbl_date();
6191: x_rate := po_tbl_number();
6187: x_price_break_id := po_tbl_number();
6188: x_price_differential_flag := po_tbl_varchar1();
6189: x_rate_type := po_tbl_varchar30();
6190: x_rate_date := po_tbl_date();
6191: x_rate := po_tbl_number();
6192: x_vendor_contact_id := po_tbl_number();
6193: x_src_doc_header_id := po_tbl_number();
6194: x_src_doc_line_id := po_tbl_number();
6195: x_src_doc_line_num := po_tbl_number();
6188: x_price_differential_flag := po_tbl_varchar1();
6189: x_rate_type := po_tbl_varchar30();
6190: x_rate_date := po_tbl_date();
6191: x_rate := po_tbl_number();
6192: x_vendor_contact_id := po_tbl_number();
6193: x_src_doc_header_id := po_tbl_number();
6194: x_src_doc_line_id := po_tbl_number();
6195: x_src_doc_line_num := po_tbl_number();
6196: x_src_doc_type_code := po_tbl_varchar30();
6189: x_rate_type := po_tbl_varchar30();
6190: x_rate_date := po_tbl_date();
6191: x_rate := po_tbl_number();
6192: x_vendor_contact_id := po_tbl_number();
6193: x_src_doc_header_id := po_tbl_number();
6194: x_src_doc_line_id := po_tbl_number();
6195: x_src_doc_line_num := po_tbl_number();
6196: x_src_doc_type_code := po_tbl_varchar30();
6197: x_price_override_flag := po_tbl_varchar1();
6190: x_rate_date := po_tbl_date();
6191: x_rate := po_tbl_number();
6192: x_vendor_contact_id := po_tbl_number();
6193: x_src_doc_header_id := po_tbl_number();
6194: x_src_doc_line_id := po_tbl_number();
6195: x_src_doc_line_num := po_tbl_number();
6196: x_src_doc_type_code := po_tbl_varchar30();
6197: x_price_override_flag := po_tbl_varchar1();
6198: x_not_to_exceed_price := po_tbl_number();
6191: x_rate := po_tbl_number();
6192: x_vendor_contact_id := po_tbl_number();
6193: x_src_doc_header_id := po_tbl_number();
6194: x_src_doc_line_id := po_tbl_number();
6195: x_src_doc_line_num := po_tbl_number();
6196: x_src_doc_type_code := po_tbl_varchar30();
6197: x_price_override_flag := po_tbl_varchar1();
6198: x_not_to_exceed_price := po_tbl_number();
6199: x_unit_of_measure := po_tbl_varchar25();
6194: x_src_doc_line_id := po_tbl_number();
6195: x_src_doc_line_num := po_tbl_number();
6196: x_src_doc_type_code := po_tbl_varchar30();
6197: x_price_override_flag := po_tbl_varchar1();
6198: x_not_to_exceed_price := po_tbl_number();
6199: x_unit_of_measure := po_tbl_varchar25();
6200:
6201: l_progress := '010';
6202: