910: CURSOR c_Master_Level IS
911: SELECT Short_Name
912: , Master_Level
913: , Name
914: FROM BIS_LEVELS_VL
915: WHERE Short_Name = p_Master_Level;
916: BEGIN
917:
918: SAVEPOINT CreateBSCDimObjPMD;
941: FROM BSC_SYS_DIM_LEVELS_VL
942: WHERE UPPER(Short_Name) = UPPER(l_temp_var)
943: UNION
944: SELECT COUNT(1) rec_count
945: FROM BIS_LEVELS_VL
946: WHERE UPPER(Short_Name) = UPPER(l_temp_var))
947: WHERE rec_count > 0;
948: IF (l_count = 0) THEN
949: l_flag := FALSE;
1012: END IF;
1013: END IF;
1014: --check for uniqueness of l_dim_obj_name in PMF's metadata
1015: SELECT COUNT(1) INTO l_count
1016: FROM BIS_LEVELS_VL
1017: WHERE UPPER(short_name) = UPPER(l_dim_obj_name);
1018: IF (l_count > 0) THEN
1019: FND_MESSAGE.SET_NAME('BSC','BSC_UNIQUE_NAME_REQUIRED');
1020: FND_MESSAGE.SET_TOKEN('SHORT_NAME', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'DIM_OBJ_SHORT_NAME'));
1055: -- start checkin for Default names
1056: l_pmf_disp_name := p_display_name;
1057: IF (p_data_source = 'PMF') THEN
1058: SELECT COUNT(1) INTO l_count
1059: FROM BIS_LEVELS_VL
1060: WHERE UPPER(name) = UPPER(p_display_name);
1061: IF (l_count <> 0) THEN
1062: FND_MESSAGE.SET_NAME('BSC','BSC_UNIQUE_NAME_REQUIRED');
1063: FND_MESSAGE.SET_TOKEN('SHORT_NAME', BSC_APPS.Get_Lookup_Value('BSC_UI_COMMON', 'DISPLAY_NAME'));
1066: RAISE FND_API.G_EXC_ERROR;
1067: END IF;
1068: ELSIF (p_data_source = 'BSC') THEN -- Allow insertion into BSC Data Model, with the same display name
1069: SELECT COUNT(1) INTO l_count
1070: FROM BIS_LEVELS_VL
1071: WHERE UPPER(name) = UPPER(l_pmf_disp_name);
1072: WHILE(l_count > 0) LOOP
1073: l_pmf_disp_name := BSC_UTILITY.get_Next_DispName(l_pmf_disp_name);
1074: SELECT COUNT(1) INTO l_count
1071: WHERE UPPER(name) = UPPER(l_pmf_disp_name);
1072: WHILE(l_count > 0) LOOP
1073: l_pmf_disp_name := BSC_UTILITY.get_Next_DispName(l_pmf_disp_name);
1074: SELECT COUNT(1) INTO l_count
1075: FROM BIS_LEVELS_VL
1076: WHERE UPPER(name) = UPPER(l_pmf_disp_name);
1077: END LOOP;
1078: END IF;
1079:
2115: CURSOR c_Master_Level IS
2116: SELECT Short_Name
2117: , Master_Level
2118: , Name
2119: FROM BIS_LEVELS_VL
2120: WHERE Short_Name = p_Master_Level;
2121:
2122:
2123: CURSOR c_Kpi_Dim_Set1 IS
2215: l_pmf_disp_name := p_display_name;
2216: IF (p_display_name <> l_bis_dim_level_rec.Dimension_Level_Name) THEN
2217: IF (p_data_source = 'PMF') THEN
2218: SELECT COUNT(1) INTO l_count
2219: FROM BIS_LEVELS_VL
2220: WHERE UPPER(short_name) <> UPPER(l_dim_obj_name)
2221: AND UPPER(name) = UPPER(p_display_name);
2222: IF (l_count <> 0) THEN
2223: FND_MESSAGE.SET_NAME('BSC','BSC_UNIQUE_NAME_REQUIRED');
2227: RAISE FND_API.G_EXC_ERROR;
2228: END IF;
2229: ELSIF (p_data_source = 'BSC') THEN -- Allow insertion into BSC Data Model, with the same display name
2230: SELECT COUNT(1) INTO l_count
2231: FROM BIS_LEVELS_VL
2232: WHERE UPPER(short_name) <> UPPER(l_dim_obj_name)
2233: AND UPPER(name) = UPPER(l_pmf_disp_name);
2234:
2235: WHILE(l_count > 0) LOOP
2234:
2235: WHILE(l_count > 0) LOOP
2236: l_pmf_disp_name := BSC_UTILITY.get_Next_DispName(l_pmf_disp_name);
2237: SELECT COUNT(1) INTO l_count
2238: FROM BIS_LEVELS_VL
2239: WHERE UPPER(name) = UPPER(l_pmf_disp_name);
2240: END LOOP;
2241: END IF;
2242: END IF;
7177: BEGIN
7178:
7179: SELECT bsc.name, bis.LEVEL_VALUES_VIEW_NAME, bsc.source
7180: INTO l_name, l_Dim_Obj_View_Name, l_source
7181: FROM bsc_sys_dim_levels_vl bsc, bis_levels_vl bis
7182: WHERE bsc.short_name = bis.short_name
7183: AND bsc.short_name = p_Dim_Obj_Short_Name;
7184:
7185: IF (l_source = BSC_UTILITY.c_PMF) THEN