[Home] [Help]
2324: ,p_entity_id IN NUMBER DEFAULT NULL
2325: ,p_entity_index IN NUMBER DEFAULT NULL
2326: ,p_entity_code IN VARCHAR2 DEFAULT NULL
2327: )
2328: RETURN EGO_VARCHAR_TBL_TYPE
2329: IS
2330:
2331: l_party_id VARCHAR2(30);
2332: l_return_status VARCHAR2(1);
2330:
2331: l_party_id VARCHAR2(30);
2332: l_return_status VARCHAR2(1);
2333: l_user_privileges_table EGO_DATA_SECURITY.EGO_PRIVILEGE_NAME_TABLE_TYPE;
2334: l_user_privileges_on_object EGO_VARCHAR_TBL_TYPE;
2335: l_privilege_table_index NUMBER;
2336: l_token_table ERROR_HANDLER.Token_Tbl_Type;
2337: l_api_name CONSTANT VARCHAR2(30) := 'Get_User_Attrs_Privs';
2338: BEGIN
2408: );
2409:
2410: ---------------------------------------------------------------------
2411: -- If the user has privileges on this instance, we need to convert --
2412: -- the table we have into a table of type EGO_VARCHAR_TBL_TYPE --
2413: ---------------------------------------------------------------------
2414: IF (l_return_status = 'T' AND
2415: l_user_privileges_table.COUNT > 0) THEN
2416:
2413: ---------------------------------------------------------------------
2414: IF (l_return_status = 'T' AND
2415: l_user_privileges_table.COUNT > 0) THEN
2416:
2417: l_user_privileges_on_object := EGO_VARCHAR_TBL_TYPE();
2418:
2419: l_privilege_table_index := l_user_privileges_table.FIRST;
2420: WHILE (l_privilege_table_index <= l_user_privileges_table.LAST)
2421: LOOP
2518: l_pk_column_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
2519: l_class_code_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
2520: l_item_catalog_group_id NUMBER;
2521: l_related_class_codes_list VARCHAR2(150);
2522: l_user_privileges_on_object EGO_VARCHAR_TBL_TYPE;
2523: l_token_table ERROR_HANDLER.Token_Tbl_Type;
2524: l_attributes_row_table EGO_USER_ATTR_ROW_TABLE;
2525: l_return_status VARCHAR2(2);
2526:
2780:
2781: l_api_name CONSTANT VARCHAR2(30) := 'Get_User_Attrs_For_Item';
2782:
2783: l_pk_column_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
2784: l_user_privileges_on_object EGO_VARCHAR_TBL_TYPE;
2785:
2786: BEGIN
2787:
2788: -----------------------
4570: --
4571: -- -----------------------------------------------------------------------------
4572: PROCEDURE Get_Seq_Gen_Item_Nums( p_item_catalog_group_id IN NUMBER
4573: ,p_org_id_tbl IN DBMS_SQL.VARCHAR2_TABLE
4574: ,x_item_num_tbl IN OUT NOCOPY EGO_VARCHAR_TBL_TYPE
4575: ) IS
4576:
4577: -----------------------------------------------------------------------
4578: -- Variables used to query Item Number Generation Method
4585: l_itemgen_method_exec INTEGER;
4586: l_itemgen_method_rows_cnt NUMBER;
4587:
4588: l_item_num VARCHAR(1000);
4589: l_item_num_tbl EGO_VARCHAR_TBL_TYPE;
4590: l_exists VARCHAR2(1);
4591: l_can_itemnum_gen BOOLEAN;
4592: l_itemgen_rownum NUMBER;
4593: l_new_itemgen_sql VARCHAR2(1000);
4723: -----------------------------------------------------------------------
4724: -- If NULL, then create a New VARCHAR table.
4725: -----------------------------------------------------------------------
4726: IF l_item_num_tbl IS NULL THEN
4727: l_item_num_tbl := EGO_VARCHAR_TBL_TYPE();
4728: END IF;
4729:
4730: -----------------------------------------------------------------------
4731: -- Add newly generated Item Number to the end of existing table.
4833: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Required_Attrs';
4834: l_pk_column_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
4835: l_data_level_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
4836: l_class_code_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
4837: l_attr_group_type_table EGO_VARCHAR_TBL_TYPE;
4838: l_item_catalog_group_id NUMBER;
4839: l_related_class_codes_list VARCHAR2(150);
4840: l_token_table ERROR_HANDLER.Token_Tbl_Type;
4841:
4886:
4887: ---------------------------------
4888: -- Setup attribute group type --
4889: ---------------------------------
4890: l_attr_group_type_table := EGO_VARCHAR_TBL_TYPE();
4891: l_attr_group_type_table.EXTEND();
4892: l_attr_group_type_table(l_attr_group_type_table.LAST):= 'EGO_ITEMMGMT_GROUP';
4893:
4894: