1911: * Return a list of classification codes for a prospective supplier
1912: */
1913: PROCEDURE get_prospect_class_codes
1914: ( p_supp_reg_id IN NUMBER,
1915: x_class_codes_tbl OUT NOCOPY EGO_VARCHAR_TBL_TYPE
1916: )
1917: IS
1918:
1919: l_mapping_id pos_supplier_mappings.mapping_id%TYPE;
1996:
1997:
1998: BEGIN
1999:
2000: x_class_codes_tbl := EGO_VARCHAR_TBL_TYPE();
2001:
2002: -- Mapping Id
2003: OPEN c_mapping_id(p_supp_reg_id);
2004: FETCH c_mapping_id INTO l_mapping_id;
2129: /*
2130: * Return a list of prospective supplier's required UDA that does not have
2131: * value, in the following format:
2132: *
2133: * x_attr_req_tbl := EGO_VARCHAR_TBL_TYPE(
2135: *
2136: *
2137: *
2143: */
2144: PROCEDURE validate_required_user_attrs
2145: ( p_supp_reg_id IN NUMBER,
2146: p_buyer_user IN VARCHAR2,
2147: x_attr_req_tbl OUT NOCOPY EGO_VARCHAR_TBL_TYPE,
2148: x_return_status OUT NOCOPY VARCHAR2,
2149: x_msg_count OUT NOCOPY NUMBER,
2150: x_msg_data OUT NOCOPY VARCHAR2
2151: )
2167: TYPE has_value_tbl_type IS TABLE OF NUMBER INDEX BY VARCHAR2(100);
2168:
2169: l_object_id NUMBER;
2170: l_pages_list VARCHAR2(4000);
2171: l_class_codes_tbl EGO_VARCHAR_TBL_TYPE;
2172: l_class_codes_list VARCHAR2(4000);
2173:
2174: l_return_status VARCHAR2(1);
2175: l_privileges VARCHAR2(32767);
2394: END IF;
2395:
2396:
2397: -- Validate Required Attributes
2398: x_attr_req_tbl := EGO_VARCHAR_TBL_TYPE();
2399:
2400: FOR i IN 1..l_ext_attr_tbl.COUNT LOOP
2401: l_attr_group_id := l_ext_attr_tbl(i).attr_group_id;
2402: l_attr_name := l_ext_attr_tbl(i).attr_name;