1 PACKAGE BODY CN_DISCO AS
2 /* $Header: cndisinitb.pls 120.0.12000000.2 2007/02/09 14:24:38 apink ship $ */
3 -- --------------------------------------------------------------------------
4 -- Name : INIT
5 -- Type : Procedure
6 -- Description : This procedure initializes MO Security when the user logs into
7 -- discoverer
8 -----------------------------------------------------------------------------
9
10 PROCEDURE INIT IS
11 l_application_short_name varchar2(15);
12 l_init_function_name varchar2(240);
13 BEGIN
14 l_application_short_name := 'C'||'N';
15
16 SELECT UPPER(init_function_name) INTO l_init_function_name
17 FROM fnd_product_initialization
18 WHERE application_short_name = UPPER(l_application_short_name);
19
20 IF ('CN_DISCO.INIT' = l_init_function_name) THEN
21 mo_global.init(l_application_short_name);
22 END IF;
23 END INIT;
24 END CN_DISCO;