DBA Data[Home] [Help]

APPS.IEX_GAR_PUB dependencies on IEX_GAR_PUB

Line 1: PACKAGE BODY IEX_GAR_PUB AS

1: PACKAGE BODY IEX_GAR_PUB AS
2: /* $Header: iextptwb.pls 120.5 2006/05/17 06:15:44 lkkumar noship $ */
3:
4: ---------------------------------------------------------------------------
5: -- Start of Comments

Line 7: -- PACKAGE NAME: IEX_GAR_PUB

3:
4: ---------------------------------------------------------------------------
5: -- Start of Comments
6: ---------------------------------------------------------------------------
7: -- PACKAGE NAME: IEX_GAR_PUB
8: -- ---------------------------------------------------------------------
9: -- PURPOSE
10: --
11: -- Main Package for the concurrent program

Line 28: G_PKG_NAME CONSTANT VARCHAR2(30):='IEX_GAR_PUB';

24:
25: /*-------------------------------------------------------------------------+
26: | PRIVATE CONSTANTS
27: +-------------------------------------------------------------------------*/
28: G_PKG_NAME CONSTANT VARCHAR2(30):='IEX_GAR_PUB';
29: G_FILE_NAME CONSTANT VARCHAR2(12):='iextptwb.pls';
30: G_SORT_AREA_SIZE CONSTANT NUMBER := 100000000;
31: G_HASH_AREA_SIZE CONSTANT NUMBER := 100000000;
32: G_CURSOR_LIMIT CONSTANT NUMBER := 10000;

Line 252: l_sub_exist := iex_gar_pub.exist_subscription(G_BUSINESS_EVENT);

248: -- BES enhancement
249:
250: /** Start Bug 4419234 07/08/2005 No business events for H release **/
251: /**
252: l_sub_exist := iex_gar_pub.exist_subscription(G_BUSINESS_EVENT);
253:
254: IF ((l_return_status = 'S') AND (l_sub_exist = 'Y')) THEN
255:
256: IEX_TERR_WINNERS_PUB.Print_Debug('--- Event subscription exists... ');

Line 269: IEX_TERR_WINNERS_PUB.Print_Debug('Exception: others in IEX_GAR_PUB::Generate_Access_Records');

265: /** End Bug 4419234 07/08/2005 No business events for H release **/
266:
267: EXCEPTION
268: WHEN others THEN
269: IEX_TERR_WINNERS_PUB.Print_Debug('Exception: others in IEX_GAR_PUB::Generate_Access_Records');
270: IEX_TERR_WINNERS_PUB.Print_Debug('SQLCODE ' || to_char(SQLCODE) || ' SQLERRM ' || SQLERRM );
271: errbuf := SQLERRM;
272: retcode := SQLCODE;
273: --retcode := FND_API.G_RET_STS_UNEXP_ERROR;

Line 572: END IEX_GAR_PUB;

568: /** End Bug 4419234 07/08/2005 No business events for H release **/
569:
570: END RAISE_BES;
571:
572: END IEX_GAR_PUB;