90: END IF; --(l_proc_level >= l_dbg_level)
91:
92: --To check if the profile JG: Product' is set to 'Asia/Pacific Localizations'
93: --and the profile 'JG: Territory' is set to 'China'
94: IF (Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') <> 'JA' OR
95: Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') IS NULL)
96: OR (Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') <> 'CN' OR
97: Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') IS NULL)
98: THEN
91:
92: --To check if the profile JG: Product' is set to 'Asia/Pacific Localizations'
93: --and the profile 'JG: Territory' is set to 'China'
94: IF (Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') <> 'JA' OR
95: Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') IS NULL)
96: OR (Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') <> 'CN' OR
97: Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') IS NULL)
98: THEN
99: --Raise error message for caller
92: --To check if the profile JG: Product' is set to 'Asia/Pacific Localizations'
93: --and the profile 'JG: Territory' is set to 'China'
94: IF (Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') <> 'JA' OR
95: Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') IS NULL)
96: OR (Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') <> 'CN' OR
97: Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') IS NULL)
98: THEN
99: --Raise error message for caller
100: l_False_Flag := 'Y';
93: --and the profile 'JG: Territory' is set to 'China'
94: IF (Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') <> 'JA' OR
95: Fnd_Profile.VALUE(NAME => 'JGZZ_PRODUCT_CODE') IS NULL)
96: OR (Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') <> 'CN' OR
97: Fnd_Profile.VALUE(NAME => 'JGZZ_COUNTRY_CODE') IS NULL)
98: THEN
99: --Raise error message for caller
100: l_False_Flag := 'Y';
101: Fnd_Message.Set_Name(Application => 'JA',
106: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);
107: END IF;
108:
109: --To check if current responsibility has profile 'JA: CNAO Legal Entity'
110: IF Fnd_Profile.VALUE(NAME => 'JA_CN_LEGAL_ENTITY') IS NULL
111: THEN
112: --Raise error message for caller
113: l_False_Flag := 'Y';
114: Fnd_Message.Set_Name(Application => 'JA',
116: l_Error_Msg := Fnd_Message.Get;
117:
118: --Output error message
119: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);
120: END IF; -- FND_PROFILE.Value(NAME => 'JA_CN_LEGAL_ENTITY')IS NULL
121:
122: IF l_False_Flag = 'N'
123: THEN
124: --log for debug