PACKAGE BODY: APPS.AMV_QUEUE

Source

1 PACKAGE BODY amv_queue AS
2 /* $Header: amvvaqib.pls 115.2 2000/04/11 23:12:10 pkm ship      $ */
3  l_schema varchar2(30);
4  l_status varchar2(1);
5  l_industry varchar2(1);
6 begin
7    if (FND_INSTALLATION.get_app_info('AMV', l_status, l_industry, l_schema))
8    then
9 	AMV_QUEUE.queue_name := l_schema||'.'||'AMV_MATCHING_QUEUE';
10 	AMV_QUEUE.queue_table_name := l_schema||'.'||'AMV_MATCHING_QUEUE_TBL';
11    else
12    	raise_application_error(-20000,
13 				'Failed to get information for product '||
14 				 'AMV');
15   end if;
16 end;