22: return boolean
23: is
24: begin
25: if (wf_use_fnd_preferences is null) then
26: if (wf_core.translate('WF_PREFERENCE') = 'FND') then
27: wf_use_fnd_preferences := true;
28: else
29: wf_use_fnd_preferences := false;
30: end if;
52: begin
53: res := ICX_SEC.ValidatePassword(user, pwd, sid);
54: exception
55: when others then
56: wf_core.token('USER', c_user_name);
57: wf_core.token('SQLCODE', SQLCODE);
58: wf_core.token('SQLERRM', SQLERRM);
59: wf_core.raise('WFSEC_CREATE_SESSION');
60: end;
53: res := ICX_SEC.ValidatePassword(user, pwd, sid);
54: exception
55: when others then
56: wf_core.token('USER', c_user_name);
57: wf_core.token('SQLCODE', SQLCODE);
58: wf_core.token('SQLERRM', SQLERRM);
59: wf_core.raise('WFSEC_CREATE_SESSION');
60: end;
61:
54: exception
55: when others then
56: wf_core.token('USER', c_user_name);
57: wf_core.token('SQLCODE', SQLCODE);
58: wf_core.token('SQLERRM', SQLERRM);
59: wf_core.raise('WFSEC_CREATE_SESSION');
60: end;
61:
62: if (res <> '0') then
55: when others then
56: wf_core.token('USER', c_user_name);
57: wf_core.token('SQLCODE', SQLCODE);
58: wf_core.token('SQLERRM', SQLERRM);
59: wf_core.raise('WFSEC_CREATE_SESSION');
60: end;
61:
62: if (res <> '0') then
63: wf_core.token('USER', c_user_name);
59: wf_core.raise('WFSEC_CREATE_SESSION');
60: end;
61:
62: if (res <> '0') then
63: wf_core.token('USER', c_user_name);
64: wf_core.raise('WFSEC_USER_PASSWORD');
65: end if;
66:
67: -- Set the private access global
60: end;
61:
62: if (res <> '0') then
63: wf_core.token('USER', c_user_name);
64: wf_core.raise('WFSEC_USER_PASSWORD');
65: end if;
66:
67: -- Set the private access global
68: wf_session := c_user_name;
68: wf_session := c_user_name;
69:
70: exception
71: when others then
72: wf_core.context('Wfa_Sec', 'CreateSession', c_user_name);
73: raise;
74: end CreateSession;
75:
76: --
106: end if;
107:
108: exception
109: when others then
110: wf_core.token('SQLCODE', SQLCODE);
111: wf_core.token('SQLERRM', SQLERRM);
112: wf_core.raise('WFSEC_GET_SESSION');
113: end;
114:
107:
108: exception
109: when others then
110: wf_core.token('SQLCODE', SQLCODE);
111: wf_core.token('SQLERRM', SQLERRM);
112: wf_core.raise('WFSEC_GET_SESSION');
113: end;
114:
115: if (res = FALSE ) then
108: exception
109: when others then
110: wf_core.token('SQLCODE', SQLCODE);
111: wf_core.token('SQLERRM', SQLERRM);
112: wf_core.raise('WFSEC_GET_SESSION');
113: end;
114:
115: if (res = FALSE ) then
116: wf_core.raise('WFSEC_NO_SESSION');
112: wf_core.raise('WFSEC_GET_SESSION');
113: end;
114:
115: if (res = FALSE ) then
116: wf_core.raise('WFSEC_NO_SESSION');
117: end if;
118:
119: l_user_name := ICX_SEC.GetID(99);
120: end if;
121:
122: user_name := l_user_name;
123: exception
124: when others then
125: wf_core.context('Wfa_Sec', 'GetSession');
126: raise;
127: end GetSession;
128:
129: --
174: end if;
175: end if;
176: exception
177: when others then
178: wf_core.context('Wfa_Sec', 'Header');
179: raise;
180: end Header;
181:
182: --
188: begin
189: icx_admin_sig.footer;
190: exception
191: when others then
192: wf_core.context('Wfa_Sec', 'Footer');
193: raise;
194: end Footer;
195:
196: --
206: begin
207: return('wfa_html.detail?nid='||to_char(nid));
208: exception
209: when others then
210: Wf_Core.Context('Wfa_Sec', 'DetailURL', to_char(nid));
211: raise;
212: end DetailURL;
213:
214: --
276: dbms_session.set_nls('NLS_DATE_FORMAT', c_date_format);
277: end if;
278: exception
279: when others then
280: Wf_Core.Context('Wfa_Sec', 'PseudoSession');
281: raise;
282: end PseudoSession;
283:
284:
299: icx_admin_sig.help_win_script(p_target, p_language_code, 'FND');
300:
301: htp.p('');
302:
303: htp.p('');
304:
305: exception
306: when others then
307: Wf_Core.Context('Wfa_Sec', 'Create_Help_Syntax');
303: htp.p('');
304:
305: exception
306: when others then
307: Wf_Core.Context('Wfa_Sec', 'Create_Help_Syntax');
308: raise;
309: end Create_Help_Syntax;
310:
311: --
332: begin
333: wfa_sec.get_role_info2(role , name ,display_name, description ,email_address,notification_preference,language , territory,orig_system,orig_system_id ,l_fax , l_status,l_exp_date);
334: exception
335: when others then
336: Wf_Core.Context('Wfa_Sec', 'Get_Role_Info', role);
337: raise;
338: end get_role_info;
339: --
340: -- get_role_info2
599: -- Also, in case of null profile value (user and site), getting the session
600: -- values
601: language := nvl(fnd_profile.value_specific('ICX_LANGUAGE',fndUserID /*user_id*/
602: , -1 /*resp_id*/, -1 /*app_id*/, -1 /*org_id*/, -1 /*server_id*/)
603: , wf_core.nls_language);
604: territory := nvl(fnd_profile.value_specific('ICX_TERRITORY',fndUserID, -1, -1, -1, -1)
605: , wf_core.nls_territory);
606:
607: end if;
601: language := nvl(fnd_profile.value_specific('ICX_LANGUAGE',fndUserID /*user_id*/
602: , -1 /*resp_id*/, -1 /*app_id*/, -1 /*org_id*/, -1 /*server_id*/)
603: , wf_core.nls_language);
604: territory := nvl(fnd_profile.value_specific('ICX_TERRITORY',fndUserID, -1, -1, -1, -1)
605: , wf_core.nls_territory);
606:
607: end if;
608: end if;
609:
649: status := '';
650: EXPIRATION_DATE := to_date(null);
651:
652: when others then
653: Wf_Core.Context('Wfa_Sec', 'Get_Role_Info2', role);
654: raise;
655:
656: end get_role_info2;
657:
711: end if;
712:
713: p_nlsCurrency := nvl(fnd_profile.value_specific('ICX_PREFERRED_CURRENCY', l_fndUserID /*user_id*/
714: , -1 /*resp_id*/, -1 /*app_id*/, -1 /*org_id*/, -1 /*server_id*/)
715: , wf_core.nls_currency);
716: p_nlsNumericCharacters := nvl(fnd_profile.value_specific('ICX_NUMERIC_CHARACTERS', l_fndUserID, -1, -1, -1, -1),
717: wf_core.nls_numeric_characters);
718:
719: -- <8220816> returns default value if profile nls_calendar is null
713: p_nlsCurrency := nvl(fnd_profile.value_specific('ICX_PREFERRED_CURRENCY', l_fndUserID /*user_id*/
714: , -1 /*resp_id*/, -1 /*app_id*/, -1 /*org_id*/, -1 /*server_id*/)
715: , wf_core.nls_currency);
716: p_nlsNumericCharacters := nvl(fnd_profile.value_specific('ICX_NUMERIC_CHARACTERS', l_fndUserID, -1, -1, -1, -1),
717: wf_core.nls_numeric_characters);
718:
719: -- <8220816> returns default value if profile nls_calendar is null
720: if (fnd_release.major_version = 12 and fnd_release.minor_version >= 1 and fnd_release.point_version>=1)
721: or (fnd_release.major_version > 12) then
719: -- <8220816> returns default value if profile nls_calendar is null
720: if (fnd_release.major_version = 12 and fnd_release.minor_version >= 1 and fnd_release.point_version>=1)
721: or (fnd_release.major_version > 12) then
722: p_nlsCalendar := nvl(fnd_profile.value_specific('FND_FORMS_USER_CALENDAR', l_fndUserID, -1, -1, -1, -1)
723: , wf_core.nls_calendar);
724: end if;
725:
726: p_nlsDateFormat := nvl(fnd_profile.value_specific('ICX_DATE_FORMAT_MASK', l_fndUserID, -1, -1, -1, -1),
727: wf_core.nls_date_format);
723: , wf_core.nls_calendar);
724: end if;
725:
726: p_nlsDateFormat := nvl(fnd_profile.value_specific('ICX_DATE_FORMAT_MASK', l_fndUserID, -1, -1, -1, -1),
727: wf_core.nls_date_format);
728:
729: p_nlsDateLanguage := nvl(
730: nvl(fnd_profile.value_specific('ICX_DATE_LANGUAGE', l_fndUserID, -1, -1, -1, -1) , p_nlsLanguage),
731: wf_core.nls_date_language);
727: wf_core.nls_date_format);
728:
729: p_nlsDateLanguage := nvl(
730: nvl(fnd_profile.value_specific('ICX_DATE_LANGUAGE', l_fndUserID, -1, -1, -1, -1) , p_nlsLanguage),
731: wf_core.nls_date_language);
732:
733: p_nlsSort := nvl(fnd_profile.value_specific('ICX_NLS_SORT', l_fndUserID, -1, -1, -1, -1),
734: wf_core.nls_sort);
735:
730: nvl(fnd_profile.value_specific('ICX_DATE_LANGUAGE', l_fndUserID, -1, -1, -1, -1) , p_nlsLanguage),
731: wf_core.nls_date_language);
732:
733: p_nlsSort := nvl(fnd_profile.value_specific('ICX_NLS_SORT', l_fndUserID, -1, -1, -1, -1),
734: wf_core.nls_sort);
735:
736: else -- not an EBS user role, therefore, return PHASE 1 default values
737:
738: p_nlsCurrency := wf_core.nls_currency;
734: wf_core.nls_sort);
735:
736: else -- not an EBS user role, therefore, return PHASE 1 default values
737:
738: p_nlsCurrency := wf_core.nls_currency;
739: p_nlsNumericCharacters := wf_core.nls_numeric_characters;
740: p_nlsCalendar := wf_core.nls_calendar;
741: p_nlsDateFormat := wf_core.nls_date_format;
742: p_nlsSort := wf_core.nls_sort;
735:
736: else -- not an EBS user role, therefore, return PHASE 1 default values
737:
738: p_nlsCurrency := wf_core.nls_currency;
739: p_nlsNumericCharacters := wf_core.nls_numeric_characters;
740: p_nlsCalendar := wf_core.nls_calendar;
741: p_nlsDateFormat := wf_core.nls_date_format;
742: p_nlsSort := wf_core.nls_sort;
743:
736: else -- not an EBS user role, therefore, return PHASE 1 default values
737:
738: p_nlsCurrency := wf_core.nls_currency;
739: p_nlsNumericCharacters := wf_core.nls_numeric_characters;
740: p_nlsCalendar := wf_core.nls_calendar;
741: p_nlsDateFormat := wf_core.nls_date_format;
742: p_nlsSort := wf_core.nls_sort;
743:
744: -- for Date language we simply use the role's preference language
737:
738: p_nlsCurrency := wf_core.nls_currency;
739: p_nlsNumericCharacters := wf_core.nls_numeric_characters;
740: p_nlsCalendar := wf_core.nls_calendar;
741: p_nlsDateFormat := wf_core.nls_date_format;
742: p_nlsSort := wf_core.nls_sort;
743:
744: -- for Date language we simply use the role's preference language
745: p_nlsDateLanguage := p_nlsLanguage;
738: p_nlsCurrency := wf_core.nls_currency;
739: p_nlsNumericCharacters := wf_core.nls_numeric_characters;
740: p_nlsCalendar := wf_core.nls_calendar;
741: p_nlsDateFormat := wf_core.nls_date_format;
742: p_nlsSort := wf_core.nls_sort;
743:
744: -- for Date language we simply use the role's preference language
745: p_nlsDateLanguage := p_nlsLanguage;
746:
754: p_nlsDateFormat := '';
755: p_nlsDateLanguage := '';
756: p_nlsSort := '';
757: when others then
758: Wf_Core.Context('Wfa_Sec', 'Get_Role_Info3', p_role);
759: raise;
760: end get_role_info3;
761:
762: --
827: return result;
828:
829: exception
830: when OTHERS then
831: Wf_Core.Context('Wfa_Sec', 'Get_Profile_Value', name, user_name);
832: raise;
833: end Get_Profile_Value;
834:
835: -- Local_Chr
842: is
843: begin
844: if (ascii_chr = 10) then
845:
846: if (WF_CORE.LOCAL_CS_NL is null) then
847: WF_CORE.LOCAL_CS_NL := Fnd_Global.Local_Chr(ascii_chr);
848: end if;
849:
850: return WF_CORE.LOCAL_CS_NL;
843: begin
844: if (ascii_chr = 10) then
845:
846: if (WF_CORE.LOCAL_CS_NL is null) then
847: WF_CORE.LOCAL_CS_NL := Fnd_Global.Local_Chr(ascii_chr);
848: end if;
849:
850: return WF_CORE.LOCAL_CS_NL;
851:
846: if (WF_CORE.LOCAL_CS_NL is null) then
847: WF_CORE.LOCAL_CS_NL := Fnd_Global.Local_Chr(ascii_chr);
848: end if;
849:
850: return WF_CORE.LOCAL_CS_NL;
851:
852: elsif (ascii_chr = 9) then
853:
854: if (WF_CORE.LOCAL_CS_TB is null) then
850: return WF_CORE.LOCAL_CS_NL;
851:
852: elsif (ascii_chr = 9) then
853:
854: if (WF_CORE.LOCAL_CS_TB is null) then
855: WF_CORE.LOCAL_CS_TB := Fnd_Global.Local_Chr(ascii_chr);
856: end if;
857:
858: return WF_CORE.LOCAL_CS_TB;
851:
852: elsif (ascii_chr = 9) then
853:
854: if (WF_CORE.LOCAL_CS_TB is null) then
855: WF_CORE.LOCAL_CS_TB := Fnd_Global.Local_Chr(ascii_chr);
856: end if;
857:
858: return WF_CORE.LOCAL_CS_TB;
859:
854: if (WF_CORE.LOCAL_CS_TB is null) then
855: WF_CORE.LOCAL_CS_TB := Fnd_Global.Local_Chr(ascii_chr);
856: end if;
857:
858: return WF_CORE.LOCAL_CS_TB;
859:
860: elsif (ascii_chr = 13) then
861:
862: if (WF_CORE.LOCAL_CS_CR is null) then
858: return WF_CORE.LOCAL_CS_TB;
859:
860: elsif (ascii_chr = 13) then
861:
862: if (WF_CORE.LOCAL_CS_CR is null) then
863: WF_CORE.LOCAL_CS_CR := Fnd_Global.Local_Chr(ascii_chr);
864: end if;
865:
866: return WF_CORE.LOCAL_CS_CR;
859:
860: elsif (ascii_chr = 13) then
861:
862: if (WF_CORE.LOCAL_CS_CR is null) then
863: WF_CORE.LOCAL_CS_CR := Fnd_Global.Local_Chr(ascii_chr);
864: end if;
865:
866: return WF_CORE.LOCAL_CS_CR;
867:
862: if (WF_CORE.LOCAL_CS_CR is null) then
863: WF_CORE.LOCAL_CS_CR := Fnd_Global.Local_Chr(ascii_chr);
864: end if;
865:
866: return WF_CORE.LOCAL_CS_CR;
867:
868: else
869:
870: return(Fnd_Global.Local_Chr(ascii_chr));
887: nvl(x_mode,'2'));
888:
889: exception
890: when others then
891: Wf_Core.Context('Wfa_Sec', 'DirectLogin', to_char(nid));
892: raise;
893: end DirectLogin;
894:
895:
903: begin
904: return FND_GLOBAL.USER_NAME;
905: exception
906: when others then
907: Wf_Core.Context('Wfa_Sec', 'GetFWKUserName');
908: raise;
909: end GetFWKUserName;
910:
911: --
942: return(cnt);
943:
944: exception
945: when others then
946: WF_CORE.Context('WFA_SEC', 'DS_Count_Local_Role', role_name);
947: raise;
948: end DS_Count_Local_Role;
949:
950: --
988:
989:
990: exception
991: when others then
992: WF_CORE.Context('WFA_SEC', 'DS_Update_Local_Role', OldName, NewName);
993: raise;
994: end DS_Update_Local_Role;
995:
996: function GetUser