69: p_primary_key_name IN VARCHAR2
70: ) return BOOLEAN is
71: cursor l_check_csr is
72: select 1
73: from AK_UNIQUE_KEYS
74: where database_object_name = p_database_object_name
75: and unique_key_name = p_primary_key_name;
76: l_dummy number;
77: begin
2894: from AK_FOREIGN_KEYS
2895: where database_object_name = p_database_object_name;
2896: cursor l_get_unique_keys_csr is
2897: select unique_key_name
2898: from AK_UNIQUE_KEYS
2899: where database_object_name = p_database_object_name;
2900: cursor l_get_regions_csr is
2901: select REGION_APPLICATION_ID, REGION_CODE
2902: from AK_REGIONS
2963: raise FND_API.G_EXC_ERROR;
2964: end if;
2965: close l_get_obj_attributes_csr;
2966: --
2967: -- AK_UNIQUE_KEYS
2968: --
2969: open l_get_unique_keys_csr;
2970: fetch l_get_unique_keys_csr into l_unique_key_name;
2971: if l_get_unique_keys_csr%found then
3037: end if;
3038: end loop;
3039: close l_get_obj_attributes_csr;
3040: --
3041: -- AK_UNIQUE_KEYS
3042: --
3043: open l_get_unique_keys_csr;
3044: loop
3045: fetch l_get_unique_keys_csr into l_unique_key_name;