1: PACKAGE body ISG_BPEL_CTX_PKG AS
2: /* $Header: ISGBPELCTXB.pls 120.0.12020000.5 2013/05/21 09:55:27 smunnalu noship $ */
3: pAppsBaseLang fnd_languages.nls_language%type;
4:
5:
7: return varchar2
8: is
9: begin
10:
11: IF ISG_BPEL_CTX_PKG.pAppsBaseLang IS NULL THEN
12: SELECT language_code
13: INTO ISG_BPEL_CTX_PKG.pAppsBaseLang
14: FROM fnd_languages
15: WHERE Installed_flag = 'B';
9: begin
10:
11: IF ISG_BPEL_CTX_PKG.pAppsBaseLang IS NULL THEN
12: SELECT language_code
13: INTO ISG_BPEL_CTX_PKG.pAppsBaseLang
14: FROM fnd_languages
15: WHERE Installed_flag = 'B';
16: END IF;
17: return ISG_BPEL_CTX_PKG.pAppsBaseLang;
13: INTO ISG_BPEL_CTX_PKG.pAppsBaseLang
14: FROM fnd_languages
15: WHERE Installed_flag = 'B';
16: END IF;
17: return ISG_BPEL_CTX_PKG.pAppsBaseLang;
18:
19: end;
20:
21:
32: WHERE nls_language = pTemp
33: and Installed_flag in ('B','I');
34: exception
35: WHEN No_Data_found THEN
36: lang_code :=ISG_BPEL_CTX_PKG.getAppsBaseLang;
37: end;
38:
39:
40: PROCEDURE GET_MESSAGE( pUserName VARCHAR2,
77: FROM fnd_user
78: WHERE user_name = upper(pUserName);
79: IF ( pLang IS NULL OR pISGErrorCode = 'ISG_INVALID_LANGUAGE_CODE') THEN
80: --No language specified get the details from profile, else default to US
81: ISG_BPEL_CTX_PKG.getUserLang( pUserID, pLangCode);
82: ELSE
83: SELECT language_code
84: INTO pLangCode
85: FROM fnd_languages
126:
127:
128:
129:
130: END ISG_BPEL_CTX_PKG;