[Home] [Help]
241: x_msg_count OUT NOCOPY NUMBER,
242: x_msg_data OUT NOCOPY VARCHAR2)
243: IS
244:
245: TYPE t_checkout_user_tbl IS TABLE OF cz_devl_projects.checkout_user%TYPE INDEX BY BINARY_INTEGER;
246: TYPE number_type_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
247: TYPE name_tbl IS TABLE OF cz_ps_nodes.name%TYPE INDEX BY BINARY_INTEGER;
248:
249: l_user_name cz_ui_templates.checkout_user%type;
291: LOOP
292:
293: ----collect all projects
294: l_rp_model_tbl.DELETE;
295: SELECT object_id, checkout_user, cz_devl_projects.name
296: BULK COLLECT
297: INTO l_rp_model_tbl, l_checkout_user_tbl, l_devl_prj_name_tbl
298: FROM cz_rp_entries, cz_devl_projects
299: WHERE cz_rp_entries.object_type = 'PRJ'
294: l_rp_model_tbl.DELETE;
295: SELECT object_id, checkout_user, cz_devl_projects.name
296: BULK COLLECT
297: INTO l_rp_model_tbl, l_checkout_user_tbl, l_devl_prj_name_tbl
298: FROM cz_rp_entries, cz_devl_projects
299: WHERE cz_rp_entries.object_type = 'PRJ'
300: AND cz_rp_entries.deleted_flag = '0'
301: AND cz_rp_entries.enclosing_folder = l_rp_fld_tbl(i)
302: AND cz_rp_entries.object_id = cz_devl_projects.devl_project_id;
298: FROM cz_rp_entries, cz_devl_projects
299: WHERE cz_rp_entries.object_type = 'PRJ'
300: AND cz_rp_entries.deleted_flag = '0'
301: AND cz_rp_entries.enclosing_folder = l_rp_fld_tbl(i)
302: AND cz_rp_entries.object_id = cz_devl_projects.devl_project_id;
303:
304: IF (l_rp_model_tbl.COUNT > 0) THEN
305: FOR J IN l_rp_model_tbl.FIRST..l_rp_model_tbl.LAST
306: LOOP
3529: IS
3530:
3531: l_procedure_name CONSTANT VARCHAR2(30) := 'delete_model_node';
3532:
3533: TYPE l_tName IS TABLE OF cz_devl_projects.name%TYPE INDEX BY BINARY_INTEGER;
3534:
3535: MODEL_LOCKED_EXCP EXCEPTION;
3536: INVALID_PS_NODE_ID_EXCP EXCEPTION;
3537: NO_PRIV_EXCP EXCEPTION;
3808: USER_IS_NULL_EXCP EXCEPTION;
3809: DEL_UI_IS_PUBLISHED EXCEPTION;
3810:
3811: l_user_name VARCHAR2(40);
3812: l_checkout_user cz_devl_projects.checkout_user%TYPE;
3813: l_priv VARCHAR2(1) := 'F';
3814: l_ui_def_tbl t_num_array_tbl_type;
3815: l_name_tbl l_tName;
3816:
4114: NOT_EDITABLE_EXCP EXCEPTION;
4115: USER_IS_NULL_EXCP EXCEPTION;
4116:
4117: l_user_name VARCHAR2(40);
4118: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4119: l_model_name_tbl t_varchar_array_tbl_type;
4120: l_rule_folder_id_tbl t_num_array_tbl_type;
4121: l_object_type_tbl t_varchar_array_tbl_type;
4122: l_devl_project_id cz_rule_folders.devl_project_id%TYPE;
4292: NOT_EDITABLE_EXCP EXCEPTION;
4293: USER_IS_NULL_EXCP EXCEPTION;
4294:
4295: l_user_name VARCHAR2(40);
4296: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4297: l_ui_def_tbl t_num_array_tbl_type; -- the referencing models
4298: l_model_name_tbl t_varchar_array_tbl_type;
4299: l_devl_project_id cz_ps_nodes.devl_project_id%TYPE;
4300:
4441: USER_IS_NULL_EXCP EXCEPTION;
4442: NO_PRIV_EXCP EXCEPTION;
4443:
4444: l_user_name VARCHAR2(40);
4445: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4446: l_item_id_tbl t_num_array_tbl_type;
4447:
4448: CURSOR l_item_csr IS
4449: SELECT item_id
4566: x_msg_data OUT NOCOPY VARCHAR2)
4567: IS
4568:
4569: TYPE number_type_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
4570: TYPE tModelNames IS TABLE OF cz_devl_projects.name%TYPE INDEX BY BINARY_INTEGER;
4571: TYPE tModelIds IS TABLE OF cz_devl_projects.devl_project_id%TYPE INDEX BY BINARY_INTEGER;
4572:
4573: SEEDED_FLAG_EXCP EXCEPTION;
4574: MODEL_LOCKED EXCEPTION;
4567: IS
4568:
4569: TYPE number_type_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
4570: TYPE tModelNames IS TABLE OF cz_devl_projects.name%TYPE INDEX BY BINARY_INTEGER;
4571: TYPE tModelIds IS TABLE OF cz_devl_projects.devl_project_id%TYPE INDEX BY BINARY_INTEGER;
4572:
4573: SEEDED_FLAG_EXCP EXCEPTION;
4574: MODEL_LOCKED EXCEPTION;
4575: NO_PRIV EXCEPTION;
4580: USER_IS_NULL_EXCP EXCEPTION;
4581: MODEL_DELETED EXCEPTION;
4582:
4583: l_user_name VARCHAR2(40);
4584: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4585: l_model_name cz_devl_projects.name%TYPE;
4586: l_devl_project_id cz_devl_projects.devl_project_id%TYPE;
4587:
4588: l_priv VARCHAR2(1) := 'F';
4581: MODEL_DELETED EXCEPTION;
4582:
4583: l_user_name VARCHAR2(40);
4584: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4585: l_model_name cz_devl_projects.name%TYPE;
4586: l_devl_project_id cz_devl_projects.devl_project_id%TYPE;
4587:
4588: l_priv VARCHAR2(1) := 'F';
4589: l_return_status VARCHAR2(1);
4582:
4583: l_user_name VARCHAR2(40);
4584: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4585: l_model_name cz_devl_projects.name%TYPE;
4586: l_devl_project_id cz_devl_projects.devl_project_id%TYPE;
4587:
4588: l_priv VARCHAR2(1) := 'F';
4589: l_return_status VARCHAR2(1);
4590: l_msg_count NUMBER := 0;
4609: ------------------------------
4610: BEGIN
4611: SELECT a.seeded_flag, a.name, a.deleted_flag, checkout_user
4612: INTO l_seeded_flag, l_model_name, l_deleted_flag, l_checkout_user
4613: FROM cz_rp_entries a, cz_devl_projects b
4614: WHERE object_id = p_model_id
4615: AND object_type = 'PRJ'
4616: AND object_id = devl_project_id;
4617: EXCEPTION
4647: BEGIN
4648:
4649: SELECT d.devl_project_id, d.name
4650: BULK COLLECT INTO x_ref_model_ids_tbl, x_ref_model_names_tbl
4651: FROM cz_ps_nodes p, cz_devl_projects d
4652: WHERE p.reference_id = p_model_id
4653: AND p.ps_node_type IN (263, 264)
4654: AND p.deleted_flag = '0'
4655: AND p.devl_project_id = d.devl_project_id
4778: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
4779: RAISE LOCK_MODEL_EXCP;
4780: END IF;
4781:
4782: UPDATE cz_devl_projects
4783: SET deleted_flag = '1',
4784: name = append_name (p_model_id, 'PRJ', name)
4785: WHERE devl_project_id = p_model_id
4786: AND deleted_flag = '0';
6396: x_msg_count OUT NOCOPY NUMBER,
6397: x_msg_data OUT NOCOPY VARCHAR2)
6398: IS
6399:
6400: TYPE prj_name_tbl_type IS TABLE of cz_devl_projects.name%TYPE INDEX BY BINARY_INTEGER;
6401: l_prj_name_tbl prj_name_tbl_type;
6402:
6403: l_eff_set_id NUMBER;
6404: l_eff_name VARCHAR2(255);
6418: AND cz_rp_entries.deleted_flag = '0'
6419: AND cz_rp_entries.seeded_flag <> '1';
6420:
6421: SELECT name BULK COLLECT INTO l_prj_name_tbl
6422: FROM cz_devl_projects
6423: WHERE deleted_flag = '0' AND devl_project_id IN
6424: (SELECT devl_project_id FROM cz_rules
6425: WHERE effectivity_set_id = p_eff_set_id
6426: AND deleted_flag = '0'
6508: l_devl_project_tbl t_indexes;
6509: l_object_id cz_rp_entries.object_id%TYPE;
6510: l_object_name cz_rp_entries.name%TYPE;
6511: l_seeded_flag cz_rp_entries.seeded_flag%TYPE;
6512: l_devl_name cz_devl_projects.name%TYPE;
6513: BEGIN
6514: FND_MSG_PUB.initialize;
6515: x_return_status := FND_API.G_RET_STS_SUCCESS;
6516: x_msg_count := 0;
6554: x_return_status := FND_API.G_RET_STS_ERROR;
6555: FOR I IN l_devl_project_tbl.FIRST..l_devl_project_tbl.LAST
6556: LOOP
6557: x_msg_count := x_msg_count + 1;
6558: SELECT name into l_devl_name FROM cz_devl_projects WHERE devl_project_id = l_devl_project_tbl(i);
6559: handle_Error(p_message_name => 'CZ_ARC_IN_USE',
6560: p_token_name1 => 'ARCHIVENAME',
6561: p_token_value1 => l_object_name,
6562: p_token_name2 => 'MODELNAME',
7526: x_msg_data OUT NOCOPY VARCHAR2)
7527: IS
7528:
7529: TYPE number_type_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
7530: TYPE model_names_tbl IS TABLE OF cz_devl_projects.name%TYPE INDEX BY BINARY_INTEGER;
7531: TYPE t_mask IS TABLE OF cz_ps_nodes.effective_usage_mask%TYPE INDEX BY BINARY_INTEGER;
7532: TYPE name_tbl IS TABLE OF cz_ps_nodes.name%TYPE INDEX BY BINARY_INTEGER;
7533: TYPE t_checkout_user_tbl IS TABLE OF cz_devl_projects.checkout_user%TYPE INDEX BY BINARY_INTEGER;
7534: l_rp_folder NUMBER;
7529: TYPE number_type_tbl IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
7530: TYPE model_names_tbl IS TABLE OF cz_devl_projects.name%TYPE INDEX BY BINARY_INTEGER;
7531: TYPE t_mask IS TABLE OF cz_ps_nodes.effective_usage_mask%TYPE INDEX BY BINARY_INTEGER;
7532: TYPE name_tbl IS TABLE OF cz_ps_nodes.name%TYPE INDEX BY BINARY_INTEGER;
7533: TYPE t_checkout_user_tbl IS TABLE OF cz_devl_projects.checkout_user%TYPE INDEX BY BINARY_INTEGER;
7534: l_rp_folder NUMBER;
7535: l_rp_fld_tbl number_type_tbl;
7536: l_rp_model_tbl number_type_tbl;
7537: l_rp_model_ref number_type_tbl;
7547: l_devl_project_tbl number_type_tbl;
7548: l_object_id cz_rp_entries.object_id%TYPE;
7549: l_object_name cz_rp_entries.name%TYPE;
7550: l_seeded_flag cz_rp_entries.seeded_flag%TYPE;
7551: l_devl_name cz_devl_projects.name%TYPE;
7552: l_encl_arc_fld NUMBER := 0;
7553:
7554: l_usg_tbl number_type_tbl;
7555: l_usg_ref number_type_tbl;
7569: l_ref_model_ids_tbl number_type_tbl;
7570: l_ref_model_names_tbl model_names_tbl;
7571: l_eff_encl_fld_id NUMBER := 0;
7572: rec_count NUMBER := 0;
7573: l_checkout_user cz_devl_projects.checkout_user%TYPE;
7574: l_model_name cz_devl_projects.name%TYPE;
7575: l_template_name cz_ui_templates.template_name%TYPE;
7576: l_fld_name cz_rp_entries.name%TYPE;
7577: l_priv VARCHAR2(1) := 'F';
7570: l_ref_model_names_tbl model_names_tbl;
7571: l_eff_encl_fld_id NUMBER := 0;
7572: rec_count NUMBER := 0;
7573: l_checkout_user cz_devl_projects.checkout_user%TYPE;
7574: l_model_name cz_devl_projects.name%TYPE;
7575: l_template_name cz_ui_templates.template_name%TYPE;
7576: l_fld_name cz_rp_entries.name%TYPE;
7577: l_priv VARCHAR2(1) := 'F';
7578: l_return_status VARCHAR2(1);
7598: v_masks_nodes t_mask;
7599: v_masks_rules t_mask;
7600: l_nodes_name_tbl name_tbl;
7601: l_rules_name_tbl name_tbl;
7602: l_ref_model_name cz_devl_projects.name%TYPE;
7603: l_locked_models_tbl number_type_tbl;
7604: l_all_locked_models_tbl number_type_tbl;
7605: l_checkout_user_tbl t_checkout_user_tbl;
7606: l_user_name cz_devl_projects.checkout_user%TYPE;
7602: l_ref_model_name cz_devl_projects.name%TYPE;
7603: l_locked_models_tbl number_type_tbl;
7604: l_all_locked_models_tbl number_type_tbl;
7605: l_checkout_user_tbl t_checkout_user_tbl;
7606: l_user_name cz_devl_projects.checkout_user%TYPE;
7607: l_devl_prj_name_tbl name_tbl;
7608: l_template_name_tbl name_tbl;
7609: BEGIN
7610: FND_MSG_PUB.initialize;
7645: l_encl_idx_ref(l_rp_fld_tbl(i)) := l_rp_fld_tbl(i);
7646:
7647: ----collect all projects
7648: l_rp_model_tbl.DELETE;
7649: SELECT object_id, checkout_user, cz_devl_projects.name
7650: BULK COLLECT
7651: INTO l_rp_model_tbl, l_checkout_user_tbl, l_devl_prj_name_tbl
7652: FROM cz_rp_entries, cz_devl_projects
7653: WHERE cz_rp_entries.object_type = 'PRJ'
7648: l_rp_model_tbl.DELETE;
7649: SELECT object_id, checkout_user, cz_devl_projects.name
7650: BULK COLLECT
7651: INTO l_rp_model_tbl, l_checkout_user_tbl, l_devl_prj_name_tbl
7652: FROM cz_rp_entries, cz_devl_projects
7653: WHERE cz_rp_entries.object_type = 'PRJ'
7654: AND cz_rp_entries.deleted_flag = '0'
7655: AND cz_rp_entries.enclosing_folder = l_rp_fld_tbl(i)
7656: AND cz_rp_entries.object_id = cz_devl_projects.devl_project_id;
7652: FROM cz_rp_entries, cz_devl_projects
7653: WHERE cz_rp_entries.object_type = 'PRJ'
7654: AND cz_rp_entries.deleted_flag = '0'
7655: AND cz_rp_entries.enclosing_folder = l_rp_fld_tbl(i)
7656: AND cz_rp_entries.object_id = cz_devl_projects.devl_project_id;
7657:
7658: IF (l_rp_model_tbl.COUNT > 0) THEN
7659: rec_count := l_rp_model_ref.COUNT;
7660: FOR J IN l_rp_model_tbl.FIRST..l_rp_model_tbl.LAST
7811: BULK
7812: COLLECT
7813: INTO l_ref_model_ids_tbl,l_ref_model_names_tbl,l_encl_devl_tbl
7814: FROM cz_ps_nodes p,
7815: cz_devl_projects d,
7816: cz_rp_entries rp
7817: WHERE p.reference_id = l_rp_model_ref(modelId)
7818: AND p.ps_node_type IN (263, 264)
7819: AND p.deleted_flag = '0'
7825: IF (l_ref_model_ids_tbl.COUNT > 0) THEN
7826: FOR I IN l_ref_model_ids_tbl.FIRST..l_ref_model_ids_tbl.LAST
7827: LOOP
7828: IF (NOT l_encl_idx_ref.EXISTS( l_encl_devl_tbl(i) ) ) THEN
7829: SELECT name into l_model_name from cz_devl_projects
7830: WHERE devl_project_id = l_ref_model_ids_tbl(i);
7831:
7832: SELECT name into l_ref_model_name from cz_devl_projects
7833: WHERE devl_project_id = l_rp_model_ref(modelId);
7828: IF (NOT l_encl_idx_ref.EXISTS( l_encl_devl_tbl(i) ) ) THEN
7829: SELECT name into l_model_name from cz_devl_projects
7830: WHERE devl_project_id = l_ref_model_ids_tbl(i);
7831:
7832: SELECT name into l_ref_model_name from cz_devl_projects
7833: WHERE devl_project_id = l_rp_model_ref(modelId);
7834:
7835: FND_MESSAGE.SET_NAME('CZ', 'CZ_DEL_MODEL_IS_REFD_BY');
7836: FND_MESSAGE.SET_TOKEN('MODELNAME',l_ref_model_name);
7851:
7852: IF (l_publication_tbl.COUNT > 0) THEN
7853: FOR I IN l_publication_tbl.FIRST..l_publication_tbl.LAST
7854: LOOP
7855: SELECT name into l_model_name from cz_devl_projects
7856: WHERE devl_project_id = l_ref_model_ids_tbl(i);
7857: FND_MESSAGE.SET_NAME('CZ', 'CZ_DEL_MODEL_IS_PUBLD');
7858: FND_MESSAGE.SET_TOKEN('MODELNAME', l_model_name);
7859: FND_MESSAGE.SET_TOKEN('PUBID', l_publication_tbl(i));
8305: l_rp_fld_tbl number_type_tbl;
8306: l_object_id_tbl number_type_tbl;
8307: l_object_typ_tbl object_type_tbl;
8308: l_locked_models_tbl cz_security_pvt.number_type_tbl;
8309: l_model_name cz_devl_projects.name%TYPE;
8310: l_template_name cz_ui_templates.template_name%TYPE;
8311: l_count NUMBER := 0;
8312: FAILED_TO_LOCK_PRJ EXCEPTION;
8313: FAILED_TO_LOCK_UCT EXCEPTION;
8364: x_return_status => x_return_status,
8365: x_msg_count => x_msg_count,
8366: x_msg_data => x_msg_data);
8367: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
8368: SELECT name INTO l_model_name FROM cz_devl_projects
8369: WHERE devl_project_id = l_object_id_tbl(i);
8370: RAISE FAILED_TO_LOCK_PRJ;
8371: END IF;
8372: UPDATE cz_devl_projects
8368: SELECT name INTO l_model_name FROM cz_devl_projects
8369: WHERE devl_project_id = l_object_id_tbl(i);
8370: RAISE FAILED_TO_LOCK_PRJ;
8371: END IF;
8372: UPDATE cz_devl_projects
8373: SET deleted_flag = '1'
8374: WHERE devl_project_id = l_object_id_tbl(i) ;
8375:
8376: ELSIF (l_object_typ_tbl(i) = 'UCT') THEN
8501: RETURN VARCHAR2
8502:
8503: AS
8504:
8505: original_name cz_devl_projects.name%TYPE;
8506: copy_name cz_devl_projects.name%TYPE;
8507: L PLS_INTEGER := 0;
8508: x_error BOOLEAN := FALSE;
8509:
8502:
8503: AS
8504:
8505: original_name cz_devl_projects.name%TYPE;
8506: copy_name cz_devl_projects.name%TYPE;
8507: L PLS_INTEGER := 0;
8508: x_error BOOLEAN := FALSE;
8509:
8510: BEGIN
10629:
10630: IF v_model_id > 0 THEN
10631: BEGIN
10632: SELECT name INTO v_model_name
10633: FROM cz_devl_projects
10634: WHERE devl_project_id = v_model_id;
10635: EXCEPTION
10636: WHEN NO_DATA_FOUND THEN
10637: RAISE;
11854: RETURN CZ_FCE_FILES.CREATION_DATE%TYPE
11855:
11856: IS
11857: l_last_log_gen_date cz_fce_files.creation_date%TYPE;
11858: l_config_engine_type cz_devl_projects.config_engine_type%TYPE;
11859: BEGIN
11860:
11861: SELECT config_engine_type
11862: INTO l_config_engine_type
11859: BEGIN
11860:
11861: SELECT config_engine_type
11862: INTO l_config_engine_type
11863: FROM cz_devl_projects
11864: WHERE devl_project_id = p_model_id;
11865:
11866:
11867: if (l_config_engine_type = LCE_ENGINE_TYPE OR l_config_engine_type IS NULL) THEN