DBA Data[Home] [Help]

APPS.CZ_SECURITY_PVT dependencies on FND_GLOBAL

Line 94: VALUES (p_entity_type,p_entity_id ,0,0,0,p_event,sysdate,FND_GLOBAL.user_name,p_event_note);

90:
91: BEGIN
92: insert into cz_lock_history (ENTITY_TYPE,INSTANCE_PK1_VALUE,INSTANCE_PK2_VALUE,INSTANCE_PK3_VALUE
93: ,INSTANCE_PK4_VALUE,EVENT,EVENT_DATE,USER_NAME,EVENT_NOTE)
94: VALUES (p_entity_type,p_entity_id ,0,0,0,p_event,sysdate,FND_GLOBAL.user_name,p_event_note);
95: EXCEPTION
96: WHEN OTHERS THEN
97: NULL; ----message needs to be logged
98: END log_lock_history ;

Line 214: l_user_name := FND_GLOBAL.user_name;

210: l_user_name VARCHAR2(100) := 'NOUSER';
211: l_priv VARCHAR2(1) := 'N';
212: l_cur REF_CURSOR;
213: BEGIN
214: l_user_name := FND_GLOBAL.user_name;
215: OPEN l_cur FOR 'SELECT '||l_user_name||'_MANAGE FROM CZ_GRANTS_ON_ENTITIES_VIEW
216: WHERE model_id = '||p_model_id||' AND entity_type = ''MODEL'' ';
217: LOOP
218: FETCH l_cur INTO l_priv;

Line 346: l_user_name := FND_GLOBAL.USER_NAME;

342: END IF;
343:
344: ----default user name
345: IF (p_user_name IS NULL) THEN
346: l_user_name := FND_GLOBAL.USER_NAME;
347: ELSE
348: l_user_name := p_user_name;
349: END IF;
350:

Line 386: l_resp_id := FND_GLOBAL.resp_id;

382: RAISE OBJECT_ID_NOT_FOUND;
383: END IF;
384:
385: -----initialize resp id
386: l_resp_id := FND_GLOBAL.resp_id;
387: IF (l_resp_id IS NULL) THEN
388: RAISE RESP_IS_NULL;
389: END IF;
390:

Line 421: ,'INSTANCE',l_instance_set_id,p_instance_pk1_value,'*NULL*','*NULL*','*NULL*','*NULL*',FND_GLOBAL.USER_ID,

417: ,INSTANCE_PK3_VALUE,INSTANCE_PK4_VALUE,INSTANCE_PK5_VALUE,CREATED_BY
418: ,CREATION_DATE,LAST_UPDATED_BY,LAST_UPDATE_DATE,LAST_UPDATE_LOGIN
419: ,CTX_SECGRP_ID,CTX_RESP_ID,CTX_RESP_APPL_ID,CTX_ORG_ID)
420: VALUES (sys_guid(),'GLOBAL',p_user_name,l_menu_id,sysdate,l_object_id
421: ,'INSTANCE',l_instance_set_id,p_instance_pk1_value,'*NULL*','*NULL*','*NULL*','*NULL*',FND_GLOBAL.USER_ID,
422: sysdate,FND_GLOBAL.USER_ID,sysdate,FND_GLOBAL.USER_ID,-1,l_resp_id,-1,-1);
423: END IF;
424: EXCEPTION
425: WHEN G_INCOMPATIBLE_API THEN

Line 422: sysdate,FND_GLOBAL.USER_ID,sysdate,FND_GLOBAL.USER_ID,-1,l_resp_id,-1,-1);

418: ,CREATION_DATE,LAST_UPDATED_BY,LAST_UPDATE_DATE,LAST_UPDATE_LOGIN
419: ,CTX_SECGRP_ID,CTX_RESP_ID,CTX_RESP_APPL_ID,CTX_ORG_ID)
420: VALUES (sys_guid(),'GLOBAL',p_user_name,l_menu_id,sysdate,l_object_id
421: ,'INSTANCE',l_instance_set_id,p_instance_pk1_value,'*NULL*','*NULL*','*NULL*','*NULL*',FND_GLOBAL.USER_ID,
422: sysdate,FND_GLOBAL.USER_ID,sysdate,FND_GLOBAL.USER_ID,-1,l_resp_id,-1,-1);
423: END IF;
424: EXCEPTION
425: WHEN G_INCOMPATIBLE_API THEN
426: x_msg_data := CZ_UTILS.GET_TEXT('CZ_SEC_API_VERSION_ERR','CODEVERSION',l_api_version,'VERSION',p_api_version);

Line 990: l_user_id NUMBER := FND_GLOBAL.USER_ID;

986: IS
987:
988: l_table_name VARCHAR2(128);
989: l_primary_key_name VARCHAR2(128);
990: l_user_id NUMBER := FND_GLOBAL.USER_ID;
991: l_str VARCHAR2(2000);
992: l_event_note VARCHAR2(2000);
993: l_entity NUMBER;
994: BEGIN

Line 1350: fnd_global.apps_initialize(l_user_id,l_resp_id,l_application_id);

1346: RAISE INVALID_RESPONSIBILITY;
1347: END IF;
1348:
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,

Line 1447: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN

1443: AND cz_devl_projects.deleted_flag = '0';
1444:
1445: IF (l_checkout_user IS NULL) THEN
1446: l_status := '0';
1447: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN
1448: l_status := '1';
1449: ELSE
1450: l_status := '2';
1451: EXIT;

Line 1492: IF (l_checkout_user_tbl(i) = FND_GLOBAL.user_name) THEN

1488:
1489: IF (l_checkout_user_tbl.COUNT > 0) THEN
1490: FOR I IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1491: LOOP
1492: IF (l_checkout_user_tbl(i) = FND_GLOBAL.user_name) THEN
1493: l_status := '1';
1494: ELSIF (l_checkout_user_tbl(i) <> FND_GLOBAL.user_name) THEN
1495: l_status := '2';
1496: EXIT;

Line 1494: ELSIF (l_checkout_user_tbl(i) <> FND_GLOBAL.user_name) THEN

1490: FOR I IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
1491: LOOP
1492: IF (l_checkout_user_tbl(i) = FND_GLOBAL.user_name) THEN
1493: l_status := '1';
1494: ELSIF (l_checkout_user_tbl(i) <> FND_GLOBAL.user_name) THEN
1495: l_status := '2';
1496: EXIT;
1497: END IF;
1498: END LOOP;

Line 1545: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN

1541: when no_data_found then
1542: null;
1543: end;
1544:
1545: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
1546: RETURN '3';
1547: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
1548: RETURN '4';
1549: ELSE

Line 1547: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN

1543: end;
1544:
1545: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
1546: RETURN '3';
1547: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
1548: RETURN '4';
1549: ELSE
1550: RETURN '0';
1551: END IF;

Line 1562: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user = FND_GLOBAL.user_name) ) THEN

1558: FUNCTION check_devl_project(p_checkout_user IN VARCHAR2)
1559: RETURN VARCHAR2
1560: IS
1561: BEGIN
1562: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user = FND_GLOBAL.user_name) ) THEN
1563: RETURN '3';
1564: ELSIF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN
1565: RETURN '4';
1566: ELSE

Line 1564: ELSIF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN

1560: IS
1561: BEGIN
1562: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user = FND_GLOBAL.user_name) ) THEN
1563: RETURN '3';
1564: ELSIF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN
1565: RETURN '4';
1566: ELSE
1567: RETURN '0';
1568: END IF;

Line 1596: SET checkout_user = FND_GLOBAL.user_name

1592: END;
1593:
1594: IF (l_checkout_user IS NULL) THEN
1595: UPDATE cz_ps_nodes
1596: SET checkout_user = FND_GLOBAL.user_name
1597: WHERE ps_node_id = p_model_id;
1598:
1599: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_MODEL_STRUCTURE',
1600: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',

Line 1600: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',

1596: SET checkout_user = FND_GLOBAL.user_name
1597: WHERE ps_node_id = p_model_id;
1598:
1599: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_MODEL_STRUCTURE',
1600: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',
1601: to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1602: log_lock_history (2,p_model_id,'LOCK_STRUCTURE',l_event_note);
1603: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1604: l_ret_status := 'F';

Line 1603: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN

1599: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_MODEL_STRUCTURE',
1600: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',
1601: to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1602: log_lock_history (2,p_model_id,'LOCK_STRUCTURE',l_event_note);
1603: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1604: l_ret_status := 'F';
1605: END IF;
1606: RETURN l_ret_status;
1607: EXCEPTION

Line 1639: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN

1635: AND cz_ps_nodes.deleted_flag = '0';
1636:
1637: IF (l_checkout_user IS NULL) THEN
1638: l_status := '0';
1639: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN
1640: l_status := '1';
1641: ELSE
1642: l_status := '2';
1643: END IF;

Line 1684: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN

1680: WHEN NO_DATA_FOUND THEN
1681: l_checkout_user := NULL;
1682: END;
1683:
1684: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
1685: UPDATE cz_ps_nodes
1686: SET checkout_user = NULL
1687: WHERE ps_node_id = p_model_id;
1688:

Line 1690: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));

1686: SET checkout_user = NULL
1687: WHERE ps_node_id = p_model_id;
1688:
1689: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_UNLOCK_MODEL_STRUCTURE',
1690: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1691: log_lock_history (2,p_model_id,'UNLOCK_STRUCTURE',l_event_note);
1692: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN
1693: l_ret_status := 'F';
1694: END IF;

Line 1692: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN

1688:
1689: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_UNLOCK_MODEL_STRUCTURE',
1690: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1691: log_lock_history (2,p_model_id,'UNLOCK_STRUCTURE',l_event_note);
1692: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN
1693: l_ret_status := 'F';
1694: END IF;
1695: RETURN l_ret_status;
1696: EXCEPTION

Line 1727: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user_tbl(uiId) <> FND_GLOBAL.user_name)) THEN

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
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;

Line 1774: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN

1770: AND cz_ui_defs.deleted_flag = '0';
1771:
1772: IF (l_checkout_user IS NULL) THEN
1773: l_status := '0';
1774: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN
1775: l_status := '1';
1776: ELSE
1777: l_status := '2';
1778: END IF;

Line 1805: IF (l_checkout_user = FND_GLOBAL.user_name) THEN

1801: l_checkout_user VARCHAR2(40) := '';
1802:
1803: BEGIN
1804: l_status := '0';
1805: IF (l_checkout_user = FND_GLOBAL.user_name) THEN
1806: l_status := '1';
1807: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1808: l_status := '2';
1809: END IF;

Line 1807: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN

1803: BEGIN
1804: l_status := '0';
1805: IF (l_checkout_user = FND_GLOBAL.user_name) THEN
1806: l_status := '1';
1807: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1808: l_status := '2';
1809: END IF;
1810: RETURN l_status;
1811: EXCEPTION

Line 1838: SET checkout_user = FND_GLOBAL.user_name

1834: END;
1835:
1836: IF (l_checkout_user IS NULL) THEN
1837: UPDATE cz_ui_defs
1838: SET checkout_user = FND_GLOBAL.user_name
1839: WHERE ui_def_id = p_ui_def_id ;
1840: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_UI_EVENT',
1841: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1842: log_lock_history (3,p_ui_def_id,'LOCK_UI',l_event_note);

Line 1841: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));

1837: UPDATE cz_ui_defs
1838: SET checkout_user = FND_GLOBAL.user_name
1839: WHERE ui_def_id = p_ui_def_id ;
1840: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_UI_EVENT',
1841: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1842: log_lock_history (3,p_ui_def_id,'LOCK_UI',l_event_note);
1843: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1844: l_ret_status := 'F';
1845: END IF;

Line 1843: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN

1839: WHERE ui_def_id = p_ui_def_id ;
1840: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_LOCK_UI_EVENT',
1841: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1842: log_lock_history (3,p_ui_def_id,'LOCK_UI',l_event_note);
1843: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1844: l_ret_status := 'F';
1845: END IF;
1846: RETURN l_ret_status;
1847: EXCEPTION

Line 1877: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN

1873: WHEN NO_DATA_FOUND THEN
1874: l_checkout_user := NULL;
1875: END;
1876:
1877: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
1878: UPDATE cz_ui_defs
1879: SET checkout_user = NULL
1880: WHERE ui_def_id = p_ui_def_id ;
1881: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_UNLOCK_UI_EVENT',

Line 1882: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));

1878: UPDATE cz_ui_defs
1879: SET checkout_user = NULL
1880: WHERE ui_def_id = p_ui_def_id ;
1881: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_UNLOCK_UI_EVENT',
1882: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1883: log_lock_history (3,p_ui_def_id,'UNLOCK_UI',l_event_note);
1884: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN
1885: l_ret_status := 'F';
1886: END IF;

Line 1884: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN

1880: WHERE ui_def_id = p_ui_def_id ;
1881: l_event_note := CZ_UTILS.GET_TEXT('CZ_SEC_UNLOCK_UI_EVENT',
1882: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
1883: log_lock_history (3,p_ui_def_id,'UNLOCK_UI',l_event_note);
1884: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN
1885: l_ret_status := 'F';
1886: END IF;
1887: RETURN l_ret_status;
1888: EXCEPTION

Line 1902: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;

1898: l_status VARCHAR2(2000);
1899: rec_count NUMBER := 0;
1900: l_checkout_user VARCHAR2(40) := '';
1901: l_checkout_user_tbl varchar_type_tbl;
1902: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;
1903: MODELID_IS_NULL EXCEPTION;
1904:
1905: BEGIN
1906: l_status := '0';

Line 1923: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN

1919: LOOP
1920: l_checkout_user := l_checkout_user_tbl(FldId);
1921: IF (l_checkout_user IS NULL) THEN
1922: l_status := '0';
1923: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN
1924: l_status := '1';
1925: ELSE
1926: l_status := '2';
1927: EXIT;

Line 1952: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;

1948: l_status VARCHAR2(2000);
1949: rec_count NUMBER := 0;
1950: l_checkout_user VARCHAR2(40) := '';
1951: l_checkout_user_tbl varchar_type_tbl;
1952: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;
1953:
1954: BEGIN
1955: l_status := '0';
1956: SELECT rule_folder_id,checkout_user

Line 1970: IF (l_checkout_user = FND_GLOBAL.user_name) THEN

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
1969: l_checkout_user := l_checkout_user_tbl(FldId);
1970: IF (l_checkout_user = FND_GLOBAL.user_name) THEN
1971: l_status := '1';
1972: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1973: l_status := '2';
1974: EXIT;

Line 1972: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN

1968: LOOP
1969: l_checkout_user := l_checkout_user_tbl(FldId);
1970: IF (l_checkout_user = FND_GLOBAL.user_name) THEN
1971: l_status := '1';
1972: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
1973: l_status := '2';
1974: EXIT;
1975: END IF;
1976: END LOOP;

Line 1993: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;

1989:
1990: l_status VARCHAR2(2000);
1991: l_checkout_user VARCHAR2(40) := '';
1992: l_parent_user VARCHAR2(40) := '';
1993: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;
1994: l_parent_rule_folder_id NUMBER := 0;
1995: l_fld_user VARCHAR2(40) := '';
1996:
1997: RULE_FOLDER_ID_IS_NULL EXCEPTION;

Line 2031: IF ( (l_fld_user IS NOT NULL) AND (l_fld_user = FND_GLOBAL.user_name) ) THEN

2027: WHEN OTHERS THEN
2028: l_fld_user := NULL;
2029: END;
2030:
2031: IF ( (l_fld_user IS NOT NULL) AND (l_fld_user = FND_GLOBAL.user_name) ) THEN
2032: RETURN 'Y';
2033: ELSIF ( (l_fld_user IS NOT NULL) AND (l_fld_user <> FND_GLOBAL.user_name) ) THEN
2034: RETURN 'N';
2035: END IF;

Line 2033: ELSIF ( (l_fld_user IS NOT NULL) AND (l_fld_user <> FND_GLOBAL.user_name) ) THEN

2029: END;
2030:
2031: IF ( (l_fld_user IS NOT NULL) AND (l_fld_user = FND_GLOBAL.user_name) ) THEN
2032: RETURN 'Y';
2033: ELSIF ( (l_fld_user IS NOT NULL) AND (l_fld_user <> FND_GLOBAL.user_name) ) THEN
2034: RETURN 'N';
2035: END IF;
2036:
2037: BEGIN

Line 2053: IF (l_parent_user IS NOT NULL) THEN ----AND (l_parent_user <> FND_GLOBAL.user_name) THEN

2049: l_parent_rule_folder_id := 0;
2050: l_parent_user := NULL;
2051: END;
2052:
2053: IF (l_parent_user IS NOT NULL) THEN ----AND (l_parent_user <> FND_GLOBAL.user_name) THEN
2054: l_status := 'N';
2055: RAISE MODEL_LOCKED;
2056: END IF;
2057:

Line 2093: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;

2089: IS
2090:
2091: l_status VARCHAR2(2000);
2092: l_checkout_user VARCHAR2(40) := '';
2093: l_user_name VARCHAR2(40) := FND_GLOBAL.user_name;
2094: l_is_locakable VARCHAR2(2000) := 'N';
2095: RULE_FOLDER_ID_IS_NULL EXCEPTION;
2096:
2097: BEGIN

Line 2128: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN

2124: END;
2125:
2126: IF (l_checkout_user IS NULL) THEN
2127: l_status := '0';
2128: ELSIF (l_checkout_user = FND_GLOBAL.user_name) THEN
2129: l_status := '1';
2130: ELSE
2131: l_status := '2';
2132: END IF;

Line 2192: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN

2188: IF (l_checkout_user_tbl.COUNT > 0) THEN
2189: FOR FldId IN l_checkout_user_tbl.FIRST..l_checkout_user_tbl.LAST
2190: LOOP
2191: l_checkout_user := l_checkout_user_tbl(FldId);
2192: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
2193: RETURN 'F';
2194: END IF;
2195: END LOOP;
2196: END IF;

Line 2202: SET checkout_user = FND_GLOBAL.user_name

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',
2206: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));

Line 2206: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));

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',
2206: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
2207: log_lock_history (4,p_rule_folder_id,'LOCK_RULEFOLDER',l_event_note);
2208: END LOOP;
2209: END IF;
2210: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN

Line 2210: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN

2206: 'LOCKEDBY',FND_GLOBAL.user_name,'LOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
2207: log_lock_history (4,p_rule_folder_id,'LOCK_RULEFOLDER',l_event_note);
2208: END LOOP;
2209: END IF;
2210: ELSIF (l_checkout_user <> FND_GLOBAL.user_name) THEN
2211: l_ret_status := 'F';
2212: END IF;
2213: RETURN l_ret_status;
2214: EXCEPTION

Line 2246: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN

2242: WHEN NO_DATA_FOUND THEN
2243: l_checkout_user := NULL;
2244: END;
2245:
2246: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
2247: BEGIN
2248: select rule_folder_id
2249: BULK
2250: COLLECT

Line 2270: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));

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',
2270: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
2271: log_lock_history (4,p_rule_folder_id,'UNLOCK_RULEFOLDER',l_event_note);
2272: END LOOP;
2273: END IF;
2274: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN

Line 2274: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN

2270: 'UNLOCKEDBY',FND_GLOBAL.user_name,'UNLOCKDATE',to_char(sysdate,'mm-dd-yyyy hh24:mi:ss'));
2271: log_lock_history (4,p_rule_folder_id,'UNLOCK_RULEFOLDER',l_event_note);
2272: END LOOP;
2273: END IF;
2274: ELSIF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) )THEN
2275: l_ret_status := 'F';
2276: END IF;
2277: RETURN l_ret_status;
2278: EXCEPTION

Line 2300: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN

2296: INTO l_checkout_user
2297: FROM cz_devl_projects
2298: WHERE cz_devl_projects.devl_project_id = p_model_id;
2299:
2300: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
2301: RETURN '1';
2302: ELSIF ((l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
2303: RETURN '2';
2304: END IF;

Line 2302: ELSIF ((l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN

2298: WHERE cz_devl_projects.devl_project_id = p_model_id;
2299:
2300: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
2301: RETURN '1';
2302: ELSIF ((l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
2303: RETURN '2';
2304: END IF;
2305:
2306: ---check model structure

Line 2364: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user = FND_GLOBAL.user_name) ) THEN

2360: l_ui_checkout_tbl varchar_type_tbl;
2361:
2362:
2363: BEGIN
2364: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user = FND_GLOBAL.user_name) ) THEN
2365: RETURN '1';
2366: ELSIF ((p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN
2367: RETURN '2';
2368: END IF;

Line 2366: ELSIF ((p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN

2362:
2363: BEGIN
2364: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user = FND_GLOBAL.user_name) ) THEN
2365: RETURN '1';
2366: ELSIF ((p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN
2367: RETURN '2';
2368: END IF;
2369:
2370: ---check model structure

Line 2471: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN

2467: INTO l_checkout_user
2468: FROM cz_devl_projects
2469: WHERE cz_devl_projects.devl_project_id = p_model_id;
2470:
2471: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
2472: RETURN 'Y';
2473: ELSIF ((l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
2474: RETURN 'N';
2475: END IF;

Line 2473: ELSIF ((l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN

2469: WHERE cz_devl_projects.devl_project_id = p_model_id;
2470:
2471: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user = FND_GLOBAL.user_name) ) THEN
2472: RETURN 'Y';
2473: ELSIF ((l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
2474: RETURN 'N';
2475: END IF;
2476:
2477: ---check model structure

Line 2533: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN

2529: FROM cz_devl_projects
2530: WHERE devl_project_id = p_model_id
2531: AND deleted_flag = '0';
2532:
2533: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name) ) THEN
2534: l_is_lockable := 'F';
2535: END IF;
2536: l_has_priv_status := has_model_privileges(p_model_id);
2537: IF ((l_has_priv_status = 'T') AND (l_is_lockable = 'T') ) THEN

Line 2554: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN

2550: l_status VARCHAR2(1) := 'N';
2551: l_checkout_user VARCHAR2(40);
2552: l_profile_value VARCHAR2(100);
2553: BEGIN
2554: IF ( (p_checkout_user IS NOT NULL) AND (p_checkout_user <> FND_GLOBAL.user_name) ) THEN
2555: l_is_lockable := 'F';
2556: END IF;
2557: IF ((g_has_priv_status = 'T') AND (l_is_lockable = 'T') ) THEN
2558: RETURN '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 2645: l_has_priv_status := has_privileges(1.0,FND_GLOBAL.user_name,LOCK_RULEFOLDER_FUNC,

2641: l_is_lockable VARCHAR2(2000) := 'N';
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:

Line 2743: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name)) THEN

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

Line 2781: IF ( (l_checkout_user IS NOT NULL) AND (l_checkout_user <> FND_GLOBAL.user_name)) THEN

2777: FROM cz_ui_defs
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;

Line 2906: l_return_status := is_model_locked (p_model_id,p_checkout_user,fnd_global.user_name);

2902: IS
2903: l_return_status VARCHAR2(1);
2904: BEGIN
2905: IF (p_object_type = 'PRJ') THEN
2906: l_return_status := is_model_locked (p_model_id,p_checkout_user,fnd_global.user_name);
2907: ELSE
2908: l_return_status := 'T';
2909: END IF;
2910: RETURN l_return_status;

Line 2937: l_return_status := is_model_editable (p_model_id,p_checkout_user,fnd_global.user_name);

2933: IS
2934: l_return_status VARCHAR2(1);
2935: BEGIN
2936: IF (p_object_type = 'PRJ') THEN
2937: l_return_status := is_model_editable (p_model_id,p_checkout_user,fnd_global.user_name);
2938: ELSE
2939: l_return_status := 'T';
2940: END IF;
2941: RETURN l_return_status;

Line 3034: AND cz_devl_projects.checkout_user <> FND_GLOBAL.user_name)

3030: FROM cz_model_ref_expls
3031: WHERE cz_model_ref_expls.deleted_flag = '0'
3032: AND cz_model_ref_expls.model_id = p_model_id)
3033: AND (cz_devl_projects.checkout_user IS NOT NULL
3034: AND cz_devl_projects.checkout_user <> FND_GLOBAL.user_name)
3035: AND cz_devl_projects.deleted_flag = '0';
3036: EXCEPTION
3037: WHEN OTHERS THEN
3038: NULL;

Line 3219: --FND_MESSAGE.SET_TOKEN('USERNAME',FND_GLOBAL.USER_NAME);

3215: WHEN NO_FORCE_UNLOCK_PRIV THEN
3216: x_return_status := FND_API.G_RET_STS_ERROR;
3217: x_msg_count := 1;
3218: FND_MESSAGE.SET_NAME( 'CZ','CZ_NO_FORCE_UNLOCK_PRIV');
3219: --FND_MESSAGE.SET_TOKEN('USERNAME',FND_GLOBAL.USER_NAME);
3220: FND_MSG_PUB.ADD;
3221: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
3222: WHEN MODEL_UNLOCK_ERR THEN
3223: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3316: --FND_MESSAGE.SET_TOKEN('USERNAME',FND_GLOBAL.USER_NAME);

3312: WHEN NO_FORCE_UNLOCK_PRIV THEN
3313: x_return_status := FND_API.G_RET_STS_ERROR;
3314: x_msg_count := 1;
3315: FND_MESSAGE.SET_NAME( 'CZ','CZ_NO_FORCE_UNLOCK_PRIV');
3316: --FND_MESSAGE.SET_TOKEN('USERNAME',FND_GLOBAL.USER_NAME);
3317: FND_MSG_PUB.ADD;
3318: fnd_msg_pub.count_and_get(p_count => x_msg_count,p_data => x_msg_data);
3319: WHEN TEMPLATE_UNLOCK_ERR THEN
3320: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3406: SET cz_ui_templates.checkout_user = FND_GLOBAL.user_name,

3402: END IF; /* IF (p_commit_flag IS NULL) */
3403:
3404: -----set the checkout_user and checkout_time
3405: UPDATE cz_ui_templates
3406: SET cz_ui_templates.checkout_user = FND_GLOBAL.user_name,
3407: cz_ui_templates.checkout_time = sysdate
3408: WHERE cz_ui_templates.template_id = p_template_id
3409: AND (cz_ui_templates.checkout_user IS NULL);
3410: IF (SQL%ROWCOUNT = 0) THEN

Line 3412: IF(l_checkout_user<>FND_GLOBAL.user_name AND l_checkout_user is not null)

3408: WHERE cz_ui_templates.template_id = p_template_id
3409: AND (cz_ui_templates.checkout_user IS NULL);
3410: IF (SQL%ROWCOUNT = 0) THEN
3411: get_checkout_user(p_template_id,'UIT',l_checkout_user,l_template_name);
3412: IF(l_checkout_user<>FND_GLOBAL.user_name AND l_checkout_user is not null)
3413: THEN
3414: RAISE TEMPLATE_IS_LOCKED;
3415: END IF;
3416: END IF;

Line 3496: AND checkout_user = FND_GLOBAL.user_name;

3492: SELECT checkout_user
3493: INTO l_checkout_user
3494: FROM cz_ui_templates
3495: WHERE template_id = p_templates_to_lock(i)
3496: AND checkout_user = FND_GLOBAL.user_name;
3497: EXCEPTION
3498: WHEN NO_DATA_FOUND THEN
3499: l_checkout_user := NULL;
3500: END;

Line 3592: OR cz_ui_templates.checkout_user = FND_GLOBAL.user_name);

3588: SET cz_ui_templates.checkout_user = NULL,
3589: cz_ui_templates.checkout_time = NULL
3590: WHERE cz_ui_templates.template_id = p_template_id
3591: AND (cz_ui_templates.checkout_user IS NULL
3592: OR cz_ui_templates.checkout_user = FND_GLOBAL.user_name);
3593: IF (SQL%ROWCOUNT = 0) THEN
3594: get_checkout_user(p_template_id,'UIT',l_checkout_user,l_template_name);
3595: RAISE TEMPLATE_UNLOCK_ERR;
3596: END IF; /* IF (SQL%ROWCOUNT = 0) */

Line 3841: SET cz_devl_projects.checkout_user = FND_GLOBAL.user_name,

3837: FOR I IN l_model_tbl.FIRST..l_model_tbl.LAST
3838: LOOP
3839: l_count := 0;
3840: UPDATE cz_devl_projects
3841: SET cz_devl_projects.checkout_user = FND_GLOBAL.user_name,
3842: cz_devl_projects.checkout_time = sysdate
3843: WHERE cz_devl_projects.devl_project_id = l_model_tbl(i)
3844: AND (cz_devl_projects.checkout_user IS NULL)
3845: AND cz_devl_projects.deleted_flag = '0';

Line 3851: IF(l_checkout_user<>FND_GLOBAL.user_name AND l_checkout_user is not null)

3847: l_count := SQL%ROWCOUNT;
3848: IF (l_count = 0)
3849: THEN
3850: get_checkout_user(l_model_tbl(i),'PRJ',l_checkout_user,l_model_name);
3851: IF(l_checkout_user<>FND_GLOBAL.user_name AND l_checkout_user is not null)
3852: THEN
3853: RAISE MODEL_IS_LOCKED;
3854: END IF;
3855: END IF;

Line 3862: SET cz_devl_projects.checkout_user = FND_GLOBAL.user_name,

3858: ELSE
3859: l_count := 0;
3860: get_models_to_lock(p_model_id,1,x_locked_entities);
3861: UPDATE cz_devl_projects
3862: SET cz_devl_projects.checkout_user = FND_GLOBAL.user_name,
3863: cz_devl_projects.checkout_time = SYSDATE
3864: WHERE cz_devl_projects.devl_project_id = p_model_id
3865: AND (cz_devl_projects.checkout_user IS NULL);
3866: l_count := SQL%ROWCOUNT;

Line 3870: IF(l_checkout_user<>FND_GLOBAL.user_name AND l_checkout_user is not null)

3866: l_count := SQL%ROWCOUNT;
3867: IF (l_count = 0)
3868: THEN
3869: get_checkout_user(p_model_id,'PRJ',l_checkout_user,l_model_name);
3870: IF(l_checkout_user<>FND_GLOBAL.user_name AND l_checkout_user is not null)
3871: THEN
3872: RAISE LOCK_SINGLE_MODEL_ERR;
3873: END IF;
3874: END IF;

Line 4054: OR cz_devl_projects.checkout_user = FND_GLOBAL.user_name);

4050: SET cz_devl_projects.checkout_user = NULL,
4051: cz_devl_projects.checkout_time = NULL
4052: WHERE cz_devl_projects.devl_project_id = p_model_id
4053: AND (cz_devl_projects.checkout_user IS NULL
4054: OR cz_devl_projects.checkout_user = FND_GLOBAL.user_name);
4055:
4056: IF (SQL%ROWCOUNT = 0) THEN
4057: get_checkout_user(p_model_id,'PRJ',l_checkout_user,l_model_name);
4058: RAISE MODEL_UNLOCK_ERR;