29: IF p_report = 'Y' THEN
30: hr_utility.set_location (l_proc
31: ,20);
32:
33: fnd_file.put_line (fnd_file.log
34: ,'Report - Shows Unused Security Profiles');
35:
36: fnd_file.put_line (fnd_file.log
37: ,'------------------------------------------');
32:
33: fnd_file.put_line (fnd_file.log
34: ,'Report - Shows Unused Security Profiles');
35:
36: fnd_file.put_line (fnd_file.log
37: ,'------------------------------------------');
38:
39: show_unwanted_sec_prof;
40: ELSIF p_report = 'N' THEN
41: hr_utility.set_location (l_proc
42: ,30);
43:
44: IF p_del_all_sec_profile = 'Y' THEN
45: fnd_file.put_line (fnd_file.log
46: ,'Deleting All Unused Security Profiles');
47:
48: fnd_file.put_line (fnd_file.log
49: ,'----------------------------------------');
44: IF p_del_all_sec_profile = 'Y' THEN
45: fnd_file.put_line (fnd_file.log
46: ,'Deleting All Unused Security Profiles');
47:
48: fnd_file.put_line (fnd_file.log
49: ,'----------------------------------------');
50:
51: del_all_unwanted_sec_prof (l_strong_delete);
52: ELSIF (nvl(p_del_all_sec_profile,'N') = 'N'
62: IF csr_security_prof_name%NOTFOUND THEN
63: hr_utility.set_location (l_proc
64: ,50);
65:
66: fnd_file.put_line (fnd_file.log
67: ,'Security Profile Name Invalid : '
68: || p_security_profile_name);
69: ELSE
70: hr_utility.set_location (l_proc
72:
73: l_wanted := check_unwanted_sec_prof (l_security_profile_id);
74:
75: IF l_wanted = 'N' THEN
76: fnd_file.put_line (fnd_file.log
77: ,'Deleting Security Profile : '
78: || p_security_profile_name);
79:
80: del_sec_prof (l_strong_delete
79:
80: del_sec_prof (l_strong_delete
81: ,l_security_profile_id);
82: ELSE
83: fnd_file.put_line (fnd_file.log
84: ,'Not an unused Security Profile : '
85: || p_security_profile_name);
86:
87: fnd_file.put_line (fnd_file.log
83: fnd_file.put_line (fnd_file.log
84: ,'Not an unused Security Profile : '
85: || p_security_profile_name);
86:
87: fnd_file.put_line (fnd_file.log
88: ,'Hence not deleted');
89: END IF;
90: END IF;
91: END IF;
97: WHEN others THEN
98: hr_utility.set_location (l_proc
99: ,80);
100:
101: fnd_file.put_line (fnd_file.log
102: ,'Exception Occurred: '
103: || sqlcode
104: || ' - '
105: || sqlerrm);
204:
205: hr_utility.set_location (l_proc
206: ,10);
207:
208: fnd_file.put_line (fnd_file.log
209: ,' Inactive Security Profile Names ');
210:
211: fnd_file.put_line (fnd_file.log
212: ,'-------+---------------------');
207:
208: fnd_file.put_line (fnd_file.log
209: ,' Inactive Security Profile Names ');
210:
211: fnd_file.put_line (fnd_file.log
212: ,'-------+---------------------');
213:
214: fnd_file.put_line (fnd_file.log
215: ,'Row# | Security Profile Name');
210:
211: fnd_file.put_line (fnd_file.log
212: ,'-------+---------------------');
213:
214: fnd_file.put_line (fnd_file.log
215: ,'Row# | Security Profile Name');
216:
217: fnd_file.put_line (fnd_file.log
218: ,'-------+---------------------');
213:
214: fnd_file.put_line (fnd_file.log
215: ,'Row# | Security Profile Name');
216:
217: fnd_file.put_line (fnd_file.log
218: ,'-------+---------------------');
219:
220: FOR csr_security_profile IN c_security_profile LOOP
221: l_valid := 'N';
307: CLOSE c_mo_profile_site;
308:
309: IF nvl (l_valid
310: ,'N') = 'N' THEN
311: fnd_file.put_line (fnd_file.log
312: ,rpad (l_profile_counter
313: ,7
314: ,' ')
315: || '| '
321:
322: hr_utility.set_location (l_proc
323: ,60);
324:
325: fnd_file.put_line (fnd_file.log
326: ,'-----------------------------------------------------');
327: END show_unwanted_sec_prof;
328:
329: PROCEDURE del_sec_prof
652:
653: hr_utility.set_location (l_proc
654: ,10);
655:
656: fnd_file.put_line (fnd_file.log
657: ,' Inactive Security Profile Names ');
658:
659: fnd_file.put_line (fnd_file.log
660: ,'-------+---------------------');
655:
656: fnd_file.put_line (fnd_file.log
657: ,' Inactive Security Profile Names ');
658:
659: fnd_file.put_line (fnd_file.log
660: ,'-------+---------------------');
661:
662: fnd_file.put_line (fnd_file.log
663: ,'Row# | Security Profile Name');
658:
659: fnd_file.put_line (fnd_file.log
660: ,'-------+---------------------');
661:
662: fnd_file.put_line (fnd_file.log
663: ,'Row# | Security Profile Name');
664:
665: fnd_file.put_line (fnd_file.log
666: ,'-------+---------------------');
661:
662: fnd_file.put_line (fnd_file.log
663: ,'Row# | Security Profile Name');
664:
665: fnd_file.put_line (fnd_file.log
666: ,'-------+---------------------');
667:
668: FOR csr_security_profile IN c_security_profile LOOP
669: l_valid := 'N';
755: CLOSE c_mo_profile_site;
756:
757: IF nvl (l_valid
758: ,'N') = 'N' THEN
759: fnd_file.put_line (fnd_file.log
760: ,rpad (l_profile_counter
761: ,7
762: ,' ')
763: || '| Deleting Security Profile :'
769: l_profile_counter := l_profile_counter + 1;
770: END IF;
771: END LOOP;
772:
773: fnd_file.put_line (fnd_file.log
774: ,'All unused Security Profiles Deleted');
775:
776: fnd_file.put_line (fnd_file.log
777: ,'-------+-------------------------------');
772:
773: fnd_file.put_line (fnd_file.log
774: ,'All unused Security Profiles Deleted');
775:
776: fnd_file.put_line (fnd_file.log
777: ,'-------+-------------------------------');
778:
779: hr_utility.set_location (l_proc
780: ,60);