[Home] [Help]
2550: ,p_entity_id IN NUMBER DEFAULT NULL
2551: ,p_entity_index IN NUMBER DEFAULT NULL
2552: ,p_entity_code IN VARCHAR2 DEFAULT NULL
2553: )
2554: RETURN EGO_VARCHAR_TBL_TYPE
2555: IS
2556:
2557: l_party_id VARCHAR2(30);
2558: l_return_status VARCHAR2(1);
2556:
2557: l_party_id VARCHAR2(30);
2558: l_return_status VARCHAR2(1);
2559: l_user_privileges_table EGO_DATA_SECURITY.EGO_PRIVILEGE_NAME_TABLE_TYPE;
2560: l_user_privileges_on_object EGO_VARCHAR_TBL_TYPE;
2561: l_privilege_table_index NUMBER;
2562: l_token_table ERROR_HANDLER.Token_Tbl_Type;
2563: l_api_name CONSTANT VARCHAR2(30) := 'Get_User_Attrs_Privs';
2564: BEGIN
2634: );
2635:
2636: ---------------------------------------------------------------------
2637: -- If the user has privileges on this instance, we need to convert --
2638: -- the table we have into a table of type EGO_VARCHAR_TBL_TYPE --
2639: ---------------------------------------------------------------------
2640: IF (l_return_status = 'T' AND
2641: l_user_privileges_table.COUNT > 0) THEN
2642:
2639: ---------------------------------------------------------------------
2640: IF (l_return_status = 'T' AND
2641: l_user_privileges_table.COUNT > 0) THEN
2642:
2643: l_user_privileges_on_object := EGO_VARCHAR_TBL_TYPE();
2644:
2645: l_privilege_table_index := l_user_privileges_table.FIRST;
2646: WHILE (l_privilege_table_index <= l_user_privileges_table.LAST)
2647: LOOP
2744: l_pk_column_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
2745: l_class_code_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
2746: l_item_catalog_group_id NUMBER;
2747: l_related_class_codes_list VARCHAR2(150);
2748: l_user_privileges_on_object EGO_VARCHAR_TBL_TYPE;
2749: l_token_table ERROR_HANDLER.Token_Tbl_Type;
2750: l_attributes_row_table EGO_USER_ATTR_ROW_TABLE;
2751: l_return_status VARCHAR2(2);
2752:
3006:
3007: l_api_name CONSTANT VARCHAR2(30) := 'Get_User_Attrs_For_Item';
3008:
3009: l_pk_column_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
3010: l_user_privileges_on_object EGO_VARCHAR_TBL_TYPE;
3011:
3012: BEGIN
3013: x_attributes_row_table := EGO_USER_ATTR_ROW_TABLE(NULL);--Bug 14140340
3014: -----------------------
5061: --
5062: -- -----------------------------------------------------------------------------
5063: PROCEDURE Get_Seq_Gen_Item_Nums( p_item_catalog_group_id IN NUMBER
5064: ,p_org_id_tbl IN DBMS_SQL.VARCHAR2_TABLE
5065: ,x_item_num_tbl IN OUT NOCOPY EGO_VARCHAR_TBL_TYPE
5066: ) IS
5067:
5068: -----------------------------------------------------------------------
5069: -- Variables used to query Item Number Generation Method
5076: l_itemgen_method_exec INTEGER;
5077: l_itemgen_method_rows_cnt NUMBER;
5078:
5079: l_item_num VARCHAR(1000);
5080: l_item_num_tbl EGO_VARCHAR_TBL_TYPE;
5081: l_exists VARCHAR2(1);
5082: l_can_itemnum_gen BOOLEAN;
5083: l_itemgen_rownum NUMBER;
5084: l_new_itemgen_sql VARCHAR2(1000);
5219: -----------------------------------------------------------------------
5220: -- If NULL, then create a New VARCHAR table.
5221: -----------------------------------------------------------------------
5222: IF l_item_num_tbl IS NULL THEN
5223: l_item_num_tbl := EGO_VARCHAR_TBL_TYPE();
5224: END IF;
5225:
5226: -----------------------------------------------------------------------
5227: -- Add newly generated Item Number to the end of existing table.
5329: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Required_Attrs';
5330: l_pk_column_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
5331: l_data_level_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
5332: l_class_code_values EGO_COL_NAME_VALUE_PAIR_ARRAY;
5333: l_attr_group_type_table EGO_VARCHAR_TBL_TYPE;
5334: l_item_catalog_group_id NUMBER;
5335: l_related_class_codes_list VARCHAR2(150);
5336: l_token_table ERROR_HANDLER.Token_Tbl_Type;
5337:
5382:
5383: ---------------------------------
5384: -- Setup attribute group type --
5385: ---------------------------------
5386: l_attr_group_type_table := EGO_VARCHAR_TBL_TYPE();
5387: l_attr_group_type_table.EXTEND();
5388: l_attr_group_type_table(l_attr_group_type_table.LAST):= 'EGO_ITEMMGMT_GROUP';
5389:
5390: