PACKAGE BODY: APPS.CCT_QUEUE

Source

1 PACKAGE BODY CCT_QUEUE AS
2 /* $Header: cctgqnb.pls 120.0 2005/06/02 09:35:58 appldev noship $ */
3 
4      l_schema varchar2(30);
5      l_status varchar2(1);
6      l_industry varchar2(1);
7 
8 BEGIN
9 	IF (fnd_installation.get_app_info('CCT',l_status, l_industry, l_schema))
10 	THEN
11 		CCT_QUEUE.queue_name := l_schema||'.'||'CCT_IBME_QUEUE';
12 	ELSE
13 		raise_application_error(-20000,'Failed to get information for product '|| 'CCT');
14 	END IF;
15     --dbms_output.put_line('QueueName'|| CCT_QUEUE.queue_name);
16 END;