1 PACKAGE BODY jg_context AS
2 /* $Header: jgzzscxb.pls 120.4 2005/07/29 23:06:09 appradha ship $ */
3 PROCEDURE initialize IS
4
5 BEGIN
6 dbms_session.set_context(
7 'JG'
8 ,'JGZZ_APPL_SHORT_NAME'
9 , fnd_profile.value('JGZZ_APPL_SHORT_NAME'));
10
11 dbms_session.set_context(
12 'JG'
13 ,'JGZZ_PRODUCT_CODE'
14 , fnd_profile.value('JGZZ_PRODUCT_CODE'));
15
16 dbms_session.set_context(
17 'JG'
18 ,'JGZZ_COUNTRY_CODE'
19 , fnd_profile.value('JGZZ_COUNTRY_CODE'));
20
21 END initialize;
22
23 procedure name_value(name varchar2, value varchar2) as
24 begin
25 -- can only be called within the package to which it belongs
26 -- If you try to execute DBMS_SESSION.SET_CONTEXT you'll get an error, as shown here:
27 -- ORA-01031: insufficient privileges
28 dbms_session.set_context('JG',name,value);
29 end;
30 end jg_context;