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.7 2011/09/08 13:14:03 ehuh ship $ */
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 264: l_sub_exist := iex_gar_pub.exist_subscription(G_BUSINESS_EVENT);

260: -- BES enhancement
261:
262: /** Start Bug 4419234 07/08/2005 No business events for H release **/
263: /**
264: l_sub_exist := iex_gar_pub.exist_subscription(G_BUSINESS_EVENT);
265:
266: IF ((l_return_status = 'S') AND (l_sub_exist = 'Y')) THEN
267:
268: IEX_TERR_WINNERS_PUB.Print_Debug('--- Event subscription exists... ');

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

277: /** End Bug 4419234 07/08/2005 No business events for H release **/
278:
279: EXCEPTION
280: WHEN others THEN
281: IEX_TERR_WINNERS_PUB.Print_Debug('Exception: others in IEX_GAR_PUB::Generate_Access_Records');
282: IEX_TERR_WINNERS_PUB.Print_Debug('SQLCODE ' || to_char(SQLCODE) || ' SQLERRM ' || SQLERRM );
283: errbuf := SQLERRM;
284: retcode := SQLCODE;
285: --retcode := FND_API.G_RET_STS_UNEXP_ERROR;

Line 584: END IEX_GAR_PUB;

580: /** End Bug 4419234 07/08/2005 No business events for H release **/
581:
582: END RAISE_BES;
583:
584: END IEX_GAR_PUB;