DBA Data[Home] [Help]

APPS.CZ_SECURITY_PVT dependencies on CZ_SECURITY_PVT

Line 1: PACKAGE BODY cz_security_pvt

1: PACKAGE BODY cz_security_pvt
2: /* $Header: czsecurb.pls 120.4 2007/09/05 20:38:54 smanna ship $ */
3:
4: AS
5:

Line 252: l_execute_str := l_execute_str ||', cz_security_pvt.get_grant_access(model_id) as has_grant_access ' ||

248: l_execute_str := l_execute_str||' '||l_column_name||',';
249: END LOOP;
250: CLOSE C1;
251: l_execute_str := RTRIM(l_execute_str,',');
252: l_execute_str := l_execute_str ||', cz_security_pvt.get_grant_access(model_id) as has_grant_access ' ||
253: ' FROM CZ_GRANTS_ON_ENTITIES_VIEW WHERE entity_type = ''MODEL'' ';
254: EXECUTE IMMEDIATE l_execute_str;
255: EXCEPTION
256: WHEN OTHERS THEN

Line 279: IF (p_entity_type = cz_security_pvt.MODEL) THEN

275:
276: l_set_name VARCHAR2(30);
277:
278: BEGIN
279: IF (p_entity_type = cz_security_pvt.MODEL) THEN
280: l_set_name := 'CZ_MODEL:'||to_char(p_instance_pk1_value);
281: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
282: l_set_name := 'CZ_UI_DEF_ID:'||to_char(p_instance_pk1_value);
283: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

Line 281: ELSIF (p_entity_type = cz_security_pvt.UI) THEN

277:
278: BEGIN
279: IF (p_entity_type = cz_security_pvt.MODEL) THEN
280: l_set_name := 'CZ_MODEL:'||to_char(p_instance_pk1_value);
281: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
282: l_set_name := 'CZ_UI_DEF_ID:'||to_char(p_instance_pk1_value);
283: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
284: l_set_name := 'CZ_RULEFOLDER:'||to_char(p_instance_pk1_value);
285: END IF;

Line 283: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

279: IF (p_entity_type = cz_security_pvt.MODEL) THEN
280: l_set_name := 'CZ_MODEL:'||to_char(p_instance_pk1_value);
281: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
282: l_set_name := 'CZ_UI_DEF_ID:'||to_char(p_instance_pk1_value);
283: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
284: l_set_name := 'CZ_RULEFOLDER:'||to_char(p_instance_pk1_value);
285: END IF;
286: RETURN l_set_name ;
287: END get_instance_set_name;

Line 299: IF (p_entity_type = cz_security_pvt.MODEL) THEN

295:
296: l_predicate VARCHAR2(4000);
297:
298: BEGIN
299: IF (p_entity_type = cz_security_pvt.MODEL) THEN
300: l_predicate := 'DEVL_PROJECT_ID='||p_instance_pk1_value;
301: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
302: l_predicate := 'DEVL_PROJECT_ID='||p_instance_pk1_value;
303: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

Line 301: ELSIF (p_entity_type = cz_security_pvt.UI) THEN

297:
298: BEGIN
299: IF (p_entity_type = cz_security_pvt.MODEL) THEN
300: l_predicate := 'DEVL_PROJECT_ID='||p_instance_pk1_value;
301: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
302: l_predicate := 'DEVL_PROJECT_ID='||p_instance_pk1_value;
303: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
304: l_predicate := 'RULE_FOLDER_ID='||p_instance_pk1_value;
305: END IF;

Line 303: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

299: IF (p_entity_type = cz_security_pvt.MODEL) THEN
300: l_predicate := 'DEVL_PROJECT_ID='||p_instance_pk1_value;
301: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
302: l_predicate := 'DEVL_PROJECT_ID='||p_instance_pk1_value;
303: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
304: l_predicate := 'RULE_FOLDER_ID='||p_instance_pk1_value;
305: END IF;
306: RETURN l_predicate;
307: END get_predicate;

Line 363: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN

359: IF (l_menu_id = 0) THEN
360: RAISE MENU_ID_NOT_FOUND;
361: END IF;
362:
363: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
364: l_entity_type := cz_security_pvt.MODEL;
365: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
367: l_entity_type := cz_security_pvt.MODEL;

Line 364: l_entity_type := cz_security_pvt.MODEL;

360: RAISE MENU_ID_NOT_FOUND;
361: END IF;
362:
363: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
364: l_entity_type := cz_security_pvt.MODEL;
365: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
367: l_entity_type := cz_security_pvt.MODEL;
368: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;

Line 366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN

362:
363: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
364: l_entity_type := cz_security_pvt.MODEL;
365: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
367: l_entity_type := cz_security_pvt.MODEL;
368: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
370: l_entity_type := cz_security_pvt.RULEFOLDER;

Line 367: l_entity_type := cz_security_pvt.MODEL;

363: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
364: l_entity_type := cz_security_pvt.MODEL;
365: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
367: l_entity_type := cz_security_pvt.MODEL;
368: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
370: l_entity_type := cz_security_pvt.RULEFOLDER;
371: l_inst_name := 'CZ_RULEFOLDER:'||p_instance_pk1_value;

Line 369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN

365: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
367: l_entity_type := cz_security_pvt.MODEL;
368: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
370: l_entity_type := cz_security_pvt.RULEFOLDER;
371: l_inst_name := 'CZ_RULEFOLDER:'||p_instance_pk1_value;
372: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
373: l_entity_type := cz_security_pvt.UI;

Line 370: l_entity_type := cz_security_pvt.RULEFOLDER;

366: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
367: l_entity_type := cz_security_pvt.MODEL;
368: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
370: l_entity_type := cz_security_pvt.RULEFOLDER;
371: l_inst_name := 'CZ_RULEFOLDER:'||p_instance_pk1_value;
372: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
373: l_entity_type := cz_security_pvt.UI;
374: l_inst_name := 'CZ_UI_DEF_ID:'||p_instance_pk1_value;

Line 372: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN

368: l_inst_name := 'CZ_MODEL:'||p_instance_pk1_value;
369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
370: l_entity_type := cz_security_pvt.RULEFOLDER;
371: l_inst_name := 'CZ_RULEFOLDER:'||p_instance_pk1_value;
372: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
373: l_entity_type := cz_security_pvt.UI;
374: l_inst_name := 'CZ_UI_DEF_ID:'||p_instance_pk1_value;
375: ELSE
376: RAISE INVALID_ROLE;

Line 373: l_entity_type := cz_security_pvt.UI;

369: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
370: l_entity_type := cz_security_pvt.RULEFOLDER;
371: l_inst_name := 'CZ_RULEFOLDER:'||p_instance_pk1_value;
372: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
373: l_entity_type := cz_security_pvt.UI;
374: l_inst_name := 'CZ_UI_DEF_ID:'||p_instance_pk1_value;
375: ELSE
376: RAISE INVALID_ROLE;
377: END IF;

Line 507: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN

503: IF (l_menu_id = 0) THEN
504: RAISE MENU_ID_NOT_FOUND;
505: END IF;
506:
507: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
508: l_entity_type := cz_security_pvt.MODEL;
509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN

Line 508: l_entity_type := cz_security_pvt.MODEL;

504: RAISE MENU_ID_NOT_FOUND;
505: END IF;
506:
507: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
508: l_entity_type := cz_security_pvt.MODEL;
509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;

Line 509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN

505: END IF;
506:
507: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
508: l_entity_type := cz_security_pvt.MODEL;
509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;
513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN

Line 510: l_entity_type := cz_security_pvt.MODEL;

506:
507: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
508: l_entity_type := cz_security_pvt.MODEL;
509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;
513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
514: l_entity_type := cz_security_pvt.UI;

Line 511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN

507: IF (p_entity_role = cz_security_pvt.MANAGE_MODEL_ROLE) THEN
508: l_entity_type := cz_security_pvt.MODEL;
509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;
513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
514: l_entity_type := cz_security_pvt.UI;
515: ELSE

Line 512: l_entity_type := cz_security_pvt.RULEFOLDER;

508: l_entity_type := cz_security_pvt.MODEL;
509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;
513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
514: l_entity_type := cz_security_pvt.UI;
515: ELSE
516: RAISE INVALID_ROLE;

Line 513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN

509: ELSIF (p_entity_role = cz_security_pvt.EDIT_MODEL_ROLE) THEN
510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;
513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
514: l_entity_type := cz_security_pvt.UI;
515: ELSE
516: RAISE INVALID_ROLE;
517: END IF;

Line 514: l_entity_type := cz_security_pvt.UI;

510: l_entity_type := cz_security_pvt.MODEL;
511: ELSIF (p_entity_role = cz_security_pvt.EDIT_RULE_ROLE) THEN
512: l_entity_type := cz_security_pvt.RULEFOLDER;
513: ELSIF (p_entity_role = cz_security_pvt.EDIT_UI_ROLE) THEN
514: l_entity_type := cz_security_pvt.UI;
515: ELSE
516: RAISE INVALID_ROLE;
517: END IF;
518:

Line 594: l_entity_type := cz_security_pvt.MODEL;

590: l_instance_set_name VARCHAR2(30);
591: l_entity_type VARCHAR2(30);
592:
593: BEGIN
594: l_entity_type := cz_security_pvt.MODEL;
595: l_object_id := get_object_id (l_entity_type);
596: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
597: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
598: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.MANAGE_MODEL_ROLE);

Line 598: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.MANAGE_MODEL_ROLE);

594: l_entity_type := cz_security_pvt.MODEL;
595: l_object_id := get_object_id (l_entity_type);
596: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
597: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
598: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.MANAGE_MODEL_ROLE);
599:
600: DELETE FROM fnd_grants WHERE menu_id = l_menu_id AND object_id = l_object_id
601: AND instance_set_id = l_instance_set_id AND instance_pk1_value = to_char(p_instance_pk1_value);
602:

Line 606: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_MODEL_ROLE);

602:
603: l_object_id := get_object_id (l_entity_type);
604: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
605: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
606: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_MODEL_ROLE);
607:
608: DELETE FROM fnd_grants WHERE menu_id = l_menu_id AND object_id = l_object_id
609: AND instance_set_id = l_instance_set_id AND instance_pk1_value = to_char(p_instance_pk1_value);
610:

Line 611: l_entity_type := cz_security_pvt.RULEFOLDER;

607:
608: DELETE FROM fnd_grants WHERE menu_id = l_menu_id AND object_id = l_object_id
609: AND instance_set_id = l_instance_set_id AND instance_pk1_value = to_char(p_instance_pk1_value);
610:
611: l_entity_type := cz_security_pvt.RULEFOLDER;
612: l_object_id := get_object_id (l_entity_type);
613: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
614: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
615: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_RULE_ROLE);

Line 615: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_RULE_ROLE);

611: l_entity_type := cz_security_pvt.RULEFOLDER;
612: l_object_id := get_object_id (l_entity_type);
613: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
614: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
615: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_RULE_ROLE);
616:
617: DELETE FROM fnd_grants WHERE menu_id = l_menu_id AND object_id = l_object_id
618: AND instance_set_id = l_instance_set_id AND instance_pk1_value = to_char(p_instance_pk1_value);
619:

Line 620: l_entity_type := cz_security_pvt.UI;

616:
617: DELETE FROM fnd_grants WHERE menu_id = l_menu_id AND object_id = l_object_id
618: AND instance_set_id = l_instance_set_id AND instance_pk1_value = to_char(p_instance_pk1_value);
619:
620: l_entity_type := cz_security_pvt.UI;
621: l_object_id := get_object_id (l_entity_type);
622: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
623: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
624: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_UI_ROLE);

Line 624: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_UI_ROLE);

620: l_entity_type := cz_security_pvt.UI;
621: l_object_id := get_object_id (l_entity_type);
622: l_instance_set_name := get_instance_set_name(l_entity_type,p_instance_pk1_value);
623: l_instance_set_id := get_instance_set_id(l_object_id,l_instance_set_name);
624: l_menu_id := get_menu_id_for_menuname(cz_security_pvt.EDIT_UI_ROLE);
625:
626: DELETE FROM fnd_grants WHERE menu_id = l_menu_id AND object_id = l_object_id
627: AND instance_set_id = l_instance_set_id AND instance_pk1_value = to_char(p_instance_pk1_value);
628: END;

Line 742: IF (p_entity_type = cz_security_pvt.MODEL) THEN

738: l_cz_ui_defs_id_tbl number_type_tbl;
739: l_cz_ui_defs_style_tbl varchar_type_tbl;
740:
741: BEGIN
742: IF (p_entity_type = cz_security_pvt.MODEL) THEN
743: -----get all model entities to lock
744: BEGIN
745: SELECT distinct component_id
746: BULK

Line 761: ELSIF (p_entity_type = cz_security_pvt.UI) THEN

757:
758: rec_count := x_locked_entities.COUNT + 1;
759: x_locked_entities(rec_count) := p_entity_id;
760:
761: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
762:
763: -----get UI style
764: BEGIN
765: SELECT ui_style

Line 816: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

812: rec_count := x_locked_entities.COUNT + 1;
813: x_locked_entities(rec_count) := p_entity_id;
814: END IF;
815:
816: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
817: -----get all RULEFOLDER entities to lock
818: -----Do we user connect by or developer will handle it
819: BEGIN
820: SELECT rule_folder_id

Line 851: IF (p_entity_type = cz_security_pvt.MODEL) THEN

847: l_locked_entities number_type_tbl;
848: l_checkout_user_tbl varchar_type_tbl;
849:
850: BEGIN
851: IF (p_entity_type = cz_security_pvt.MODEL) THEN
852: -----get all model entities to lock
853: SELECT component_id
854: BULK
855: COLLECT

Line 885: ELSIF (p_entity_type = cz_security_pvt.UI) THEN

881: END IF;
882: END LOOP;
883: END IF;
884:
885: ELSIF (p_entity_type = cz_security_pvt.UI) THEN
886:
887: -----get UI style
888: SELECT ui_style
889: INTO l_ui_style

Line 962: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

958: END LOOP;
959: END IF;
960: END IF;
961:
962: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN
963:
964: -----get all RULEFOLDER entities to lock
965: -----Do we user connect by or developer will handle it
966: SELECT rule_folder_id,checkout_user

Line 995: IF (p_entity_type = cz_security_pvt.MODEL) THEN

991: l_str VARCHAR2(2000);
992: l_event_note VARCHAR2(2000);
993: l_entity NUMBER;
994: BEGIN
995: IF (p_entity_type = cz_security_pvt.MODEL) THEN
996: l_table_name := 'cz_devl_projects';
997: l_primary_key_name := 'devl_project_id';
998: l_entity := 2;
999: ELSIF (p_entity_type = cz_security_pvt.UI) THEN

Line 999: ELSIF (p_entity_type = cz_security_pvt.UI) THEN

995: IF (p_entity_type = cz_security_pvt.MODEL) THEN
996: l_table_name := 'cz_devl_projects';
997: l_primary_key_name := 'devl_project_id';
998: l_entity := 2;
999: ELSIF (p_entity_type = cz_security_pvt.UI) 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

Line 1003: ELSIF (p_entity_type = cz_security_pvt.RULEFOLDER) THEN

999: ELSIF (p_entity_type = cz_security_pvt.UI) 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;

Line 1353: cz_security_pvt.lock_entity (p_api_version,

1349: ----fnd initialize
1350: fnd_global.apps_initialize(l_user_id,l_resp_id,l_application_id);
1351:
1352: -----lock entity
1353: cz_security_pvt.lock_entity (p_api_version,
1354: p_user_name,
1355: p_entity_type,
1356: p_instance_pk1_value,
1357: DEEP_LOCK,

Line 1516: IF (p_entity = cz_security_pvt.MODEL) THEN

1512: l_checkout_user VARCHAR2(40);
1513: l_proj_id NUMBER := 0 ;
1514: l_status VARCHAR2(1) := '0';
1515: BEGIN
1516: IF (p_entity = cz_security_pvt.MODEL) THEN
1517: l_proj_id := p_entity_id;
1518: ELSIF (p_entity = cz_security_pvt.UI) THEN
1519: SELECT devl_project_id INTO l_proj_id
1520: FROM cz_ui_defs

Line 1518: ELSIF (p_entity = cz_security_pvt.UI) THEN

1514: l_status VARCHAR2(1) := '0';
1515: BEGIN
1516: IF (p_entity = cz_security_pvt.MODEL) THEN
1517: l_proj_id := p_entity_id;
1518: ELSIF (p_entity = cz_security_pvt.UI) THEN
1519: SELECT devl_project_id INTO l_proj_id
1520: FROM cz_ui_defs
1521: WHERE ui_def_id = p_entity_id
1522: AND deleted_flag = '0';

Line 1523: ELSIF (p_entity = cz_security_pvt.RULEFOLDER) THEN

1519: SELECT devl_project_id INTO l_proj_id
1520: FROM cz_ui_defs
1521: WHERE ui_def_id = p_entity_id
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

Line 1626: l_status := check_devl_project(p_model_id,cz_security_pvt.MODEL);

1622: IF (p_model_id IS NULL) THEN
1623: RAISE MODEL_ID_IS_NULL;
1624: END IF;
1625:
1626: l_status := check_devl_project(p_model_id,cz_security_pvt.MODEL);
1627: IF (l_status IN ('3','4')) THEN
1628: RAISE MODEL_LOCKED;
1629: END IF;
1630:

Line 1667: l_ret_status := check_devl_project(p_model_id,cz_security_pvt.MODEL);

1663: l_ret_status VARCHAR2(1) := 'T';
1664: l_checkout_user VARCHAR2(40);
1665: l_event_note VARCHAR2(2000);
1666: BEGIN
1667: l_ret_status := check_devl_project(p_model_id,cz_security_pvt.MODEL);
1668: IF (l_ret_status <> '0') THEN
1669: RETURN 'F';
1670: ELSE
1671: l_ret_status := 'T';

Line 1718: l_status := check_devl_project(p_ui_def_id,cz_security_pvt.UI);

1714: IF (p_ui_def_id IS NULL) THEN
1715: RAISE UI_DEF_ID_IS_NULL;
1716: END IF;
1717:
1718: l_status := check_devl_project(p_ui_def_id,cz_security_pvt.UI);
1719: IF ( (l_status = '3') OR (l_status = '4') ) THEN
1720: RAISE MODEL_LOCKED;
1721: END IF;
1722:

Line 1723: get_already_locked_entities(cz_security_pvt.UI,p_ui_def_id,l_ui_bl,l_checkout_user_tbl);

1719: IF ( (l_status = '3') OR (l_status = '4') ) THEN
1720: RAISE MODEL_LOCKED;
1721: END IF;
1722:
1723: get_already_locked_entities(cz_security_pvt.UI,p_ui_def_id,l_ui_bl,l_checkout_user_tbl);
1724: IF (l_checkout_user_tbl.COUNT > 0) THEN
1725: FOR uiId IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1726: LOOP
1727: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user_tbl(uiId) <> FND_GLOBAL.user_name)) THEN

Line 1728: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.UI,

1724: IF (l_checkout_user_tbl.COUNT > 0) THEN
1725: FOR uiId IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1726: LOOP
1727: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user_tbl(uiId) <> FND_GLOBAL.user_name)) THEN
1728: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.UI,
1729: 'Id',l_ui_bl(uiId),'User', l_checkout_user_tbl(uiId) );
1730: EXIT;
1731: END IF;
1732: END LOOP;

Line 1761: l_status := check_devl_project(p_ui_def_id,cz_security_pvt.UI);

1757: IF (p_ui_def_id IS NULL) THEN
1758: RAISE UI_DEF_ID_IS_NULL;
1759: END IF;
1760:
1761: l_status := check_devl_project(p_ui_def_id,cz_security_pvt.UI);
1762: IF ( (l_status = '3') OR (l_status = '4') ) THEN
1763: RAISE MODEL_LOCKED;
1764: END IF;
1765:

Line 1860: l_ret_status := check_devl_project(p_ui_def_id,cz_security_pvt.UI);

1856: l_ret_status VARCHAR2(1) := 'T';
1857: l_checkout_user VARCHAR2(40);
1858: l_event_note VARCHAR2(2000);
1859: BEGIN
1860: l_ret_status := check_devl_project(p_ui_def_id,cz_security_pvt.UI);
1861: IF (l_ret_status <> '0') THEN
1862: RETURN 'F';
1863: ELSE
1864: l_ret_status := 'T';

Line 1911: l_status := check_devl_project(p_model_id,cz_security_pvt.RULEFOLDER);

1907: IF (p_model_id IS NULL) THEN
1908: RAISE MODELID_IS_NULL;
1909: END IF;
1910:
1911: l_status := check_devl_project(p_model_id,cz_security_pvt.RULEFOLDER);
1912: IF ( (l_status = '3') OR (l_status = '4') ) THEN
1913: RAISE MODEL_LOCKED;
1914: END IF;
1915:

Line 1916: get_already_locked_entities(cz_security_pvt.RULEFOLDER,p_model_id,l_rule_tbl,l_checkout_user_tbl);

1912: IF ( (l_status = '3') OR (l_status = '4') ) THEN
1913: RAISE MODEL_LOCKED;
1914: END IF;
1915:
1916: get_already_locked_entities(cz_security_pvt.RULEFOLDER,p_model_id,l_rule_tbl,l_checkout_user_tbl);
1917: IF (l_checkout_user_tbl.COUNT > 0) THEN
1918: FOR FldId IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1919: LOOP
1920: l_checkout_user := l_checkout_user_tbl(FldId);

Line 2013: l_status := check_devl_project(p_rule_folder_id,cz_security_pvt.RULEFOLDER);

2009: IF (p_rule_folder_id IS NULL) THEN
2010: RAISE RULE_FOLDER_ID_IS_NULL;
2011: END IF;
2012:
2013: l_status := check_devl_project(p_rule_folder_id,cz_security_pvt.RULEFOLDER);
2014: IF ( (l_status = '3') OR (l_status = '4') ) THEN
2015: l_status := 'N';
2016: RAISE MODEL_LOCKED;
2017: ELSE

Line 2103: l_status := check_devl_project(p_rule_folder_id,cz_security_pvt.RULEFOLDER);

2099: IF (p_rule_folder_id IS NULL) THEN
2100: RAISE RULE_FOLDER_ID_IS_NULL;
2101: END IF;
2102:
2103: l_status := check_devl_project(p_rule_folder_id,cz_security_pvt.RULEFOLDER);
2104: IF (l_status IN ('3','4')) THEN
2105: RAISE MODEL_LOCKED;
2106: END IF;
2107:

Line 2228: l_ret_status := check_devl_project(p_rule_folder_id,cz_security_pvt.RULEFOLDER);

2224: l_checkout_user VARCHAR2(40);
2225: l_rule_fld_tbl number_type_tbl;
2226: l_event_note VARCHAR2(2000);
2227: BEGIN
2228: l_ret_status := check_devl_project(p_rule_folder_id,cz_security_pvt.RULEFOLDER);
2229: IF (l_ret_status <> '0') THEN
2230: RETURN 'F';
2231: ELSE
2232: l_ret_status := 'T';

Line 2611: l_has_priv_status := has_privileges(1.0,FND_GLOBAL.user_name,LOCK_UI_FUNC,cz_security_pvt.UI,l_proj_id);

2607: l_proj_id NUMBER;
2608: l_profile_value VARCHAR2(100);
2609: BEGIN
2610: SELECT devl_project_id INTO l_proj_id FROM cz_ui_defs WHERE ui_def_id = p_ui_def_id ;
2611: l_has_priv_status := has_privileges(1.0,FND_GLOBAL.user_name,LOCK_UI_FUNC,cz_security_pvt.UI,l_proj_id);
2612: l_is_lockable := is_ui_def_locked(p_ui_def_id);
2613: l_profile_value := FND_PROFILE.value(LOCK_MODELS_FOR_EDIT);
2614: IF (l_profile_value = 'N') THEN
2615: IF ((l_has_priv_status = 'T') AND (l_is_lockable = '0') ) THEN

Line 2646: cz_security_pvt.RULEFOLDER,p_rulefolder_id);

2642: l_status VARCHAR2(1) := 'N';
2643: l_profile_value VARCHAR2(100);
2644: BEGIN
2645: l_has_priv_status := has_privileges(1.0,FND_GLOBAL.user_name,LOCK_RULEFOLDER_FUNC,
2646: cz_security_pvt.RULEFOLDER,p_rulefolder_id);
2647: l_is_lockable := is_rulefolder_locked(p_rulefolder_id);
2648: l_profile_value := FND_PROFILE.value(LOCK_MODELS_FOR_EDIT);
2649:
2650: IF (l_profile_value = 'N') THEN

Line 2744: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.RULEFOLDER,

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);
2746: END IF;
2747: RETURN l_status;
2748: EXCEPTION

Line 2782: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.UI,

2778: WHERE cz_ui_defs.ui_def_id = p_ui_def_id
2779: AND cz_ui_defs.deleted_flag = '0';
2780:
2781: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name)) THEN
2782: l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.UI,
2783: 'Id',p_ui_def_id,'User', l_checkout_user);
2784: END IF;
2785: RETURN l_status;
2786: EXCEPTION

Line 2820: ------l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.MODEL,

2816: WHERE cz_devl_projects.devl_project_id = p_model_id
2817: AND cz_devl_projects.deleted_flag = '0';
2818:
2819: IF (l_checkout_user IS NOT NULL) THEN
2820: ------l_status := CZ_UTILS.GET_TEXT('CZ_SEC_ENTITY_IS_LOCKED','ObjectId', cz_security_pvt.MODEL,
2821: ----- 'Id',p_model_id,'User', l_checkout_user); */
2822: l_status := 'Y';
2823: ELSE
2824: l_status := 'N';

Line 3129: l_model_tbl cz_security_pvt.number_type_tbl;

3125:
3126: MODELID_IS_NULL EXCEPTION;
3127: MODEL_UNLOCK_ERR EXCEPTION;
3128: NO_FORCE_UNLOCK_PRIV EXCEPTION;
3129: l_model_tbl cz_security_pvt.number_type_tbl;
3130: l_count NUMBER := 0;
3131: l_unlock_references VARCHAR2(1);
3132: l_has_priv BOOLEAN;
3133: l_checkout_user cz_devl_projects.checkout_user%TYPE;

Line 3266: l_template_tbl cz_security_pvt.number_type_tbl;

3262:
3263: templateID_IS_NULL EXCEPTION;
3264: template_UNLOCK_ERR EXCEPTION;
3265: NO_FORCE_UNLOCK_PRIV EXCEPTION;
3266: l_template_tbl cz_security_pvt.number_type_tbl;
3267: l_count NUMBER := 0;
3268: l_unlock_references VARCHAR2(1);
3269: l_has_priv BOOLEAN;
3270: l_checkout_user cz_devl_projects.checkout_user%TYPE;

Line 3460: p_templates_to_lock IN cz_security_pvt.number_type_tbl,

3456: * @rep:compatibility S
3457: * @rep:category BUSINESS_ENTITY CZ_SECURITY
3458: */
3459: PROCEDURE lock_template(p_api_version IN NUMBER,
3460: p_templates_to_lock IN cz_security_pvt.number_type_tbl,
3461: p_commit_flag IN VARCHAR2,
3462: p_init_msg_list IN VARCHAR2,
3463: x_locked_templates OUT NOCOPY cz_security_pvt.number_type_tbl,
3464: x_return_status OUT NOCOPY VARCHAR2,

Line 3463: x_locked_templates OUT NOCOPY cz_security_pvt.number_type_tbl,

3459: PROCEDURE lock_template(p_api_version IN NUMBER,
3460: p_templates_to_lock IN cz_security_pvt.number_type_tbl,
3461: p_commit_flag IN VARCHAR2,
3462: p_init_msg_list IN VARCHAR2,
3463: x_locked_templates OUT NOCOPY cz_security_pvt.number_type_tbl,
3464: x_return_status OUT NOCOPY VARCHAR2,
3465: x_msg_count OUT NOCOPY NUMBER,
3466: x_msg_data OUT NOCOPY VARCHAR2)
3467: IS

Line 3505: cz_security_pvt.lock_template(1.0,

3501:
3502: IF (l_checkout_user IS NULL) THEN
3503: l_count := x_locked_templates.COUNT + 1;
3504: x_locked_templates(l_count) := p_templates_to_lock(i);
3505: cz_security_pvt.lock_template(1.0,
3506: p_templates_to_lock(i),
3507: FND_API.G_FALSE,
3508: FND_API.G_FALSE,
3509: l_return_status,

Line 3620: p_templates_to_unlock IN cz_security_pvt.number_type_tbl,

3616: END unlock_template;
3617:
3618: ----------------------
3619: PROCEDURE unlock_template(p_api_version IN NUMBER,
3620: p_templates_to_unlock IN cz_security_pvt.number_type_tbl,
3621: p_commit_flag IN VARCHAR2,
3622: p_init_msg_list IN VARCHAR2,
3623: x_return_status OUT NOCOPY VARCHAR2,
3624: x_msg_count OUT NOCOPY NUMBER,

Line 3647: cz_security_pvt.unlock_template(1.0,

3643:
3644: IF (p_templates_to_unlock.COUNT > 0) THEN
3645: FOR I IN p_templates_to_unlock.FIRST..p_templates_to_unlock.LAST
3646: LOOP
3647: cz_security_pvt.unlock_template(1.0,
3648: p_templates_to_unlock(i),
3649: FND_API.G_FALSE,
3650: l_return_status,
3651: x_msg_count,

Line 3709: * lock model and its children : cz_security_pvt.lock_model(

3705: * Error reporting: Messages are written to FND error stack. The caller would have to get all the
3706: * messages from the stack. No messages are logged to cz_db_logs.
3707: *
3708: * Usage
3709: * lock model and its children : cz_security_pvt.lock_model(
3710: * p_model_id => ,
3711: * p_lock_child_models => FND_API.G_TRUE,
3712: * p_commit_flag => FND_API.G_TRUE,
3713: * p_init_msg_list => FND_API.G_TRUE,

Line 3719: * lock root model only : cz_security_pvt.lock_model(

3715: * x_return_status => x_return_status,
3716: * x_msg_count => x_msg_count,
3717: * x_msg_data => x_msg_data);
3718: *
3719: * lock root model only : cz_security_pvt.lock_model(
3720: * p_model_id => ,
3721: * p_lock_child_models => FND_API.G_FALSE,
3722: * p_commit_flag => FND_API.G_TRUE,
3723: * p_init_msg_list => FND_API.G_TRUE,

Line 3743: l_model_name_tbl cz_security_pvt.model_name_tbl;

3739: IS
3740:
3741: l_checkout_user cz_devl_projects.checkout_user%TYPE;
3742: l_model_name cz_devl_projects.name%TYPE;
3743: l_model_name_tbl cz_security_pvt.model_name_tbl;
3744: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;
3745: MODEL_IS_LOCKED EXCEPTION;
3746: MODELID_IS_NULL EXCEPTION;
3747: INVALID_MODEL_ID EXCEPTION;

Line 3744: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;

3740:
3741: l_checkout_user cz_devl_projects.checkout_user%TYPE;
3742: l_model_name cz_devl_projects.name%TYPE;
3743: l_model_name_tbl cz_security_pvt.model_name_tbl;
3744: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;
3745: MODEL_IS_LOCKED EXCEPTION;
3746: MODELID_IS_NULL EXCEPTION;
3747: INVALID_MODEL_ID EXCEPTION;
3748: NO_LOCKING_REQUIRED EXCEPTION;

Line 3750: l_model_tbl cz_security_pvt.number_type_tbl;

3746: MODELID_IS_NULL EXCEPTION;
3747: INVALID_MODEL_ID EXCEPTION;
3748: NO_LOCKING_REQUIRED EXCEPTION;
3749: LOCK_SINGLE_MODEL_ERR EXCEPTION;
3750: l_model_tbl cz_security_pvt.number_type_tbl;
3751: l_prev_locked_models cz_security_pvt.number_type_tbl;
3752: l_count NUMBER := 0;
3753: l_lock_child_models VARCHAR2(1);
3754: l_commit_flag VARCHAR2(1);

Line 3751: l_prev_locked_models cz_security_pvt.number_type_tbl;

3747: INVALID_MODEL_ID EXCEPTION;
3748: NO_LOCKING_REQUIRED EXCEPTION;
3749: LOCK_SINGLE_MODEL_ERR EXCEPTION;
3750: l_model_tbl cz_security_pvt.number_type_tbl;
3751: l_prev_locked_models cz_security_pvt.number_type_tbl;
3752: l_count NUMBER := 0;
3753: l_lock_child_models VARCHAR2(1);
3754: l_commit_flag VARCHAR2(1);
3755: l_lock_profile VARCHAR2(3);

Line 3946: * p_models_to_unlock : cz_security_pvt.unlock_model(

3942: *
3943: * Usage
3944: *
3945: * unlock models in the array
3946: * p_models_to_unlock : cz_security_pvt.unlock_model(
3947: * p_commit_flag => FND_API.G_TRUE,
3948: * p_models_to_unlock => l_locked_entities,
3949: * p_init_msg_list => FND_API.G_TRUE,
3950: * x_return_status => x_return_status,

Line 4007: l_model_tbl cz_security_pvt.number_type_tbl;

4003: MODEL_IS_NOT_UNLOCKED EXCEPTION;
4004: MODELID_IS_NULL EXCEPTION;
4005: MODEL_UNLOCK_ERR EXCEPTION;
4006: NO_LOCKING_REQUIRED EXCEPTION;
4007: l_model_tbl cz_security_pvt.number_type_tbl;
4008: l_count NUMBER := 0;
4009: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4010: l_model_name_tbl cz_security_pvt.model_name_tbl;
4011: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;

Line 4010: l_model_name_tbl cz_security_pvt.model_name_tbl;

4006: NO_LOCKING_REQUIRED EXCEPTION;
4007: l_model_tbl cz_security_pvt.number_type_tbl;
4008: l_count NUMBER := 0;
4009: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4010: l_model_name_tbl cz_security_pvt.model_name_tbl;
4011: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;
4012: l_model_name cz_devl_projects.name%TYPE;
4013: l_commit_flag VARCHAR2(1);
4014: l_lock_profile VARCHAR2(3);

Line 4011: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;

4007: l_model_tbl cz_security_pvt.number_type_tbl;
4008: l_count NUMBER := 0;
4009: l_checkout_user cz_devl_projects.checkout_user%TYPE;
4010: l_model_name_tbl cz_security_pvt.model_name_tbl;
4011: l_checkout_user_tbl cz_security_pvt.checkout_user_tbl;
4012: l_model_name cz_devl_projects.name%TYPE;
4013: l_commit_flag VARCHAR2(1);
4014: l_lock_profile VARCHAR2(3);
4015:

Line 4205: cz_security_pvt.unlock_model(1.0,p_model_id,FND_API.G_FALSE,FND_API.G_FALSE,

4201: x_return_status := FND_API.G_RET_STS_SUCCESS;
4202: x_msg_data := NULL;
4203: x_msg_count := 0;
4204:
4205: cz_security_pvt.unlock_model(1.0,p_model_id,FND_API.G_FALSE,FND_API.G_FALSE,
4206: x_return_status,x_msg_count,x_msg_data);
4207:
4208: END unlock_model;
4209:

Line 4235: cz_security_pvt.unlock_model(1.0,

4231:
4232: IF (p_models_to_unlock.COUNT > 0) THEN
4233: FOR I IN p_models_to_unlock.FIRST..p_models_to_unlock.LAST
4234: LOOP
4235: cz_security_pvt.unlock_model(1.0,
4236: p_models_to_unlock(i),
4237: FND_API.G_FALSE,
4238: FND_API.G_FALSE,
4239: l_return_status,

Line 4259: END cz_security_pvt;

4255: fnd_msg_pub.count_and_get(FND_API.G_FALSE, x_msg_count, x_msg_data);
4256: END;
4257:
4258: ---------->>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
4259: END cz_security_pvt;