820: SELECT rule_folder_id
821: BULK
822: COLLECT
823: INTO x_locked_entities
824: FROM cz_rule_folders
825: WHERE cz_rule_folders.object_type = 'RFL'
826: AND cz_rule_folders.deleted_flag = '0'
827: AND cz_rule_folders.rule_folder_id = p_entity_id;
828: EXCEPTION
821: BULK
822: COLLECT
823: INTO x_locked_entities
824: FROM cz_rule_folders
825: WHERE cz_rule_folders.object_type = 'RFL'
826: AND cz_rule_folders.deleted_flag = '0'
827: AND cz_rule_folders.rule_folder_id = p_entity_id;
828: EXCEPTION
829: WHEN NO_DATA_FOUND THEN
822: COLLECT
823: INTO x_locked_entities
824: FROM cz_rule_folders
825: WHERE cz_rule_folders.object_type = 'RFL'
826: AND cz_rule_folders.deleted_flag = '0'
827: AND cz_rule_folders.rule_folder_id = p_entity_id;
828: EXCEPTION
829: WHEN NO_DATA_FOUND THEN
830: NULL;
823: INTO x_locked_entities
824: FROM cz_rule_folders
825: WHERE cz_rule_folders.object_type = 'RFL'
826: AND cz_rule_folders.deleted_flag = '0'
827: AND cz_rule_folders.rule_folder_id = p_entity_id;
828: EXCEPTION
829: WHEN NO_DATA_FOUND THEN
830: NULL;
831: END;
966: SELECT rule_folder_id,checkout_user
967: BULK
968: COLLECT
969: INTO x_locked_entities,x_checkout_user_tbl
970: FROM cz_rule_folders
971: WHERE cz_rule_folders.object_type = 'RFL'
972: AND cz_rule_folders.deleted_flag = '0'
973: AND cz_rule_folders.devl_project_id = p_entity_id
974: AND cz_rule_folders.checkout_user IS NOT NULL;
967: BULK
968: COLLECT
969: INTO x_locked_entities,x_checkout_user_tbl
970: FROM cz_rule_folders
971: WHERE cz_rule_folders.object_type = 'RFL'
972: AND cz_rule_folders.deleted_flag = '0'
973: AND cz_rule_folders.devl_project_id = p_entity_id
974: AND cz_rule_folders.checkout_user IS NOT NULL;
975:
968: COLLECT
969: INTO x_locked_entities,x_checkout_user_tbl
970: FROM cz_rule_folders
971: WHERE cz_rule_folders.object_type = 'RFL'
972: AND cz_rule_folders.deleted_flag = '0'
973: AND cz_rule_folders.devl_project_id = p_entity_id
974: AND cz_rule_folders.checkout_user IS NOT NULL;
975:
976: END IF;
969: INTO x_locked_entities,x_checkout_user_tbl
970: FROM cz_rule_folders
971: WHERE cz_rule_folders.object_type = 'RFL'
972: AND cz_rule_folders.deleted_flag = '0'
973: AND cz_rule_folders.devl_project_id = p_entity_id
974: AND cz_rule_folders.checkout_user IS NOT NULL;
975:
976: END IF;
977: EXCEPTION
970: FROM cz_rule_folders
971: WHERE cz_rule_folders.object_type = 'RFL'
972: AND cz_rule_folders.deleted_flag = '0'
973: AND cz_rule_folders.devl_project_id = p_entity_id
974: AND cz_rule_folders.checkout_user IS NOT NULL;
975:
976: END IF;
977: EXCEPTION
978: WHEN OTHERS THEN
1000: l_table_name := 'cz_ui_defs';
1001: l_primary_key_name := 'ui_def_id';
1002: l_entity := 3;
1003: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
1004: l_table_name := 'cz_rule_folders';
1005: l_primary_key_name := 'rule_folder_id';
1006: l_entity := 4;
1007: END IF;
1008:
1522: AND deleted_flag = '0';
1523: ELSIF (p_entity = cz_security_pvt.RULEFOLDER) THEN
1524: begin
1525: SELECT devl_project_id INTO l_proj_id
1526: FROM cz_rule_folders
1527: WHERE rule_folder_id = p_entity_id
1528: AND object_type = 'RFL'
1529: AND deleted_flag = '0';
1530: exception
1956: SELECT rule_folder_id,checkout_user
1957: BULK
1958: COLLECT
1959: INTO l_rule_tbl,l_checkout_user_tbl
1960: FROM cz_rule_folders
1961: WHERE cz_rule_folders.object_type = 'RFL'
1962: AND cz_rule_folders.deleted_flag = '0'
1963: AND cz_rule_folders.devl_project_id = p_model_id
1964: AND cz_rule_folders.checkout_user IS NOT NULL;
1957: BULK
1958: COLLECT
1959: INTO l_rule_tbl,l_checkout_user_tbl
1960: FROM cz_rule_folders
1961: WHERE cz_rule_folders.object_type = 'RFL'
1962: AND cz_rule_folders.deleted_flag = '0'
1963: AND cz_rule_folders.devl_project_id = p_model_id
1964: AND cz_rule_folders.checkout_user IS NOT NULL;
1965:
1958: COLLECT
1959: INTO l_rule_tbl,l_checkout_user_tbl
1960: FROM cz_rule_folders
1961: WHERE cz_rule_folders.object_type = 'RFL'
1962: AND cz_rule_folders.deleted_flag = '0'
1963: AND cz_rule_folders.devl_project_id = p_model_id
1964: AND cz_rule_folders.checkout_user IS NOT NULL;
1965:
1966: IF (l_checkout_user_tbl.COUNT > 0) THEN
1959: INTO l_rule_tbl,l_checkout_user_tbl
1960: FROM cz_rule_folders
1961: WHERE cz_rule_folders.object_type = 'RFL'
1962: AND cz_rule_folders.deleted_flag = '0'
1963: AND cz_rule_folders.devl_project_id = p_model_id
1964: AND cz_rule_folders.checkout_user IS NOT NULL;
1965:
1966: IF (l_checkout_user_tbl.COUNT > 0) THEN
1967: FOR FldId IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1960: FROM cz_rule_folders
1961: WHERE cz_rule_folders.object_type = 'RFL'
1962: AND cz_rule_folders.deleted_flag = '0'
1963: AND cz_rule_folders.devl_project_id = p_model_id
1964: AND cz_rule_folders.checkout_user IS NOT NULL;
1965:
1966: IF (l_checkout_user_tbl.COUNT > 0) THEN
1967: FOR FldId IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1968: LOOP
1996:
1997: RULE_FOLDER_ID_IS_NULL EXCEPTION;
1998: CURSOR checkout_user_cur IS
1999: select checkout_user
2000: FROM cz_rule_folders
2001: where deleted_flag = '0'
2002: and object_type = 'RFL'
2003: and checkout_user is not null
2004: start with rule_folder_id = p_rule_folder_id
2019: END IF;
2020:
2021: BEGIN
2022: SELECT checkout_user INTO l_fld_user
2023: FROM cz_rule_folders
2024: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2025: AND cz_rule_folders.object_type = 'RFL';
2026: EXCEPTION
2027: WHEN OTHERS THEN
2020:
2021: BEGIN
2022: SELECT checkout_user INTO l_fld_user
2023: FROM cz_rule_folders
2024: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2025: AND cz_rule_folders.object_type = 'RFL';
2026: EXCEPTION
2027: WHEN OTHERS THEN
2028: l_fld_user := NULL;
2021: BEGIN
2022: SELECT checkout_user INTO l_fld_user
2023: FROM cz_rule_folders
2024: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2025: AND cz_rule_folders.object_type = 'RFL';
2026: EXCEPTION
2027: WHEN OTHERS THEN
2028: l_fld_user := NULL;
2029: END;
2036:
2037: BEGIN
2038: SELECT checkout_user,parent_rule_folder_id
2039: INTO l_parent_user,l_parent_rule_folder_id
2040: FROM cz_rule_folders
2041: WHERE cz_rule_folders.rule_folder_id = (SELECT parent_rule_folder_id
2042: FROM cz_rule_folders
2043: WHERE rule_folder_id = p_rule_folder_id
2044: AND object_type = 'RFL'
2037: BEGIN
2038: SELECT checkout_user,parent_rule_folder_id
2039: INTO l_parent_user,l_parent_rule_folder_id
2040: FROM cz_rule_folders
2041: WHERE cz_rule_folders.rule_folder_id = (SELECT parent_rule_folder_id
2042: FROM cz_rule_folders
2043: WHERE rule_folder_id = p_rule_folder_id
2044: AND object_type = 'RFL'
2045: AND deleted_flag = '0')
2038: SELECT checkout_user,parent_rule_folder_id
2039: INTO l_parent_user,l_parent_rule_folder_id
2040: FROM cz_rule_folders
2041: WHERE cz_rule_folders.rule_folder_id = (SELECT parent_rule_folder_id
2042: FROM cz_rule_folders
2043: WHERE rule_folder_id = p_rule_folder_id
2044: AND object_type = 'RFL'
2045: AND deleted_flag = '0')
2046: AND cz_rule_folders.object_type = 'RFL';
2042: FROM cz_rule_folders
2043: WHERE rule_folder_id = p_rule_folder_id
2044: AND object_type = 'RFL'
2045: AND deleted_flag = '0')
2046: AND cz_rule_folders.object_type = 'RFL';
2047: EXCEPTION
2048: WHEN OTHERS THEN
2049: l_parent_rule_folder_id := 0;
2050: l_parent_user := NULL;
2113:
2114: BEGIN
2115: SELECT checkout_user
2116: INTO l_checkout_user
2117: FROM cz_rule_folders
2118: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2119: AND cz_rule_folders.object_type = 'RFL'
2120: AND cz_rule_folders.deleted_flag = '0';
2121: EXCEPTION
2114: BEGIN
2115: SELECT checkout_user
2116: INTO l_checkout_user
2117: FROM cz_rule_folders
2118: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2119: AND cz_rule_folders.object_type = 'RFL'
2120: AND cz_rule_folders.deleted_flag = '0';
2121: EXCEPTION
2122: WHEN NO_DATA_FOUND THEN
2115: SELECT checkout_user
2116: INTO l_checkout_user
2117: FROM cz_rule_folders
2118: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2119: AND cz_rule_folders.object_type = 'RFL'
2120: AND cz_rule_folders.deleted_flag = '0';
2121: EXCEPTION
2122: WHEN NO_DATA_FOUND THEN
2123: l_checkout_user := NULL;
2116: INTO l_checkout_user
2117: FROM cz_rule_folders
2118: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2119: AND cz_rule_folders.object_type = 'RFL'
2120: AND cz_rule_folders.deleted_flag = '0';
2121: EXCEPTION
2122: WHEN NO_DATA_FOUND THEN
2123: l_checkout_user := NULL;
2124: END;
2159: l_ret_status := 'T';
2160: BEGIN
2161: SELECT checkout_user
2162: INTO l_checkout_user
2163: FROM cz_rule_folders
2164: WHERE rule_folder_id = p_rule_folder_id
2165: AND deleted_flag = '0'
2166: AND object_type = 'RFL';
2167: EXCEPTION
2174: select rule_folder_id,checkout_user
2175: BULK
2176: COLLECT
2177: INTO l_rule_fld_tbl,l_checkout_user_tbl
2178: FROM cz_rule_folders
2179: where deleted_flag = '0'
2180: and object_type = 'RFL'
2181: start with rule_folder_id = p_rule_folder_id
2182: connect by prior rule_folder_id = parent_rule_folder_id;
2197:
2198: IF (l_rule_fld_tbl.COUNT > 0) THEN
2199: FOR I IN l_rule_fld_tbl.FIRST..l_rule_fld_tbl.LAST
2200: LOOP
2201: UPDATE cz_rule_folders
2202: SET checkout_user = FND_GLOBAL.user_name
2203: WHERE rule_folder_id = l_rule_fld_tbl(i)
2204: AND object_type = 'RFL';
2205: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_RFL_EVENT',
2234:
2235: BEGIN
2236: SELECT checkout_user
2237: INTO l_checkout_user
2238: FROM cz_rule_folders
2239: WHERE rule_folder_id = p_rule_folder_id
2240: AND object_type = 'RFL';
2241: EXCEPTION
2242: WHEN NO_DATA_FOUND THEN
2248: select rule_folder_id
2249: BULK
2250: COLLECT
2251: INTO l_rule_fld_tbl
2252: FROM cz_rule_folders
2253: where deleted_flag = '0'
2254: and object_type = 'RFL'
2255: start with rule_folder_id = p_rule_folder_id
2256: connect by prior rule_folder_id = parent_rule_folder_id;
2261:
2262: IF (l_rule_fld_tbl.COUNT > 0) THEN
2263: FOR I IN l_rule_fld_tbl.FIRST..l_rule_fld_tbl.LAST
2264: LOOP
2265: UPDATE cz_rule_folders
2266: SET checkout_user = NULL
2267: WHERE rule_folder_id = l_rule_fld_tbl(i)
2268: AND object_type = 'RFL';
2269: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_UNLOCK_RFL_EVENT',
2734: END IF;
2735:
2736: SELECT checkout_user
2737: INTO l_checkout_user
2738: FROM cz_rule_folders
2739: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2740: AND cz_rule_folders.object_type = 'RFL'
2741: AND cz_rule_folders.deleted_flag = '0';
2742:
2735:
2736: SELECT checkout_user
2737: INTO l_checkout_user
2738: FROM cz_rule_folders
2739: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2740: AND cz_rule_folders.object_type = 'RFL'
2741: AND cz_rule_folders.deleted_flag = '0';
2742:
2743: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name)) THEN
2736: SELECT checkout_user
2737: INTO l_checkout_user
2738: FROM cz_rule_folders
2739: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2740: AND cz_rule_folders.object_type = 'RFL'
2741: AND cz_rule_folders.deleted_flag = '0';
2742:
2743: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name)) THEN
2744: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.RULEFOLDER,
2737: INTO l_checkout_user
2738: FROM cz_rule_folders
2739: WHERE cz_rule_folders.rule_folder_id = p_rule_folder_id
2740: AND cz_rule_folders.object_type = 'RFL'
2741: AND cz_rule_folders.deleted_flag = '0';
2742:
2743: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name)) THEN
2744: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.RULEFOLDER,
2745: 'Id',p_rule_folder_id,'User', l_checkout_user);