DBA Data[Home] [Help]

APPS.IEX_BANKRUPTCIES_PKG dependencies on IEX_BANKRUPTCIES

Line 1: PACKAGE BODY IEX_BANKRUPTCIES_PKG as

1: PACKAGE BODY IEX_BANKRUPTCIES_PKG as
2: /* $Header: iextbkrb.pls 120.0 2004/01/24 03:21:12 appldev noship $ */
3: -- Start of Comments
4: -- Package name : IEX_BANKRUPTCIES_PKG
5: -- Purpose :

Line 4: -- Package name : IEX_BANKRUPTCIES_PKG

1: PACKAGE BODY IEX_BANKRUPTCIES_PKG as
2: /* $Header: iextbkrb.pls 120.0 2004/01/24 03:21:12 appldev noship $ */
3: -- Start of Comments
4: -- Package name : IEX_BANKRUPTCIES_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

Line 11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_BANKRUPTCIES_PKG';

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_BANKRUPTCIES_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'iextbkrb.pls';
13:
14: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
15: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

Line 90: cursor C is select ROWID from IEX_BANKRUPTCIES

86: ,p_FILE_CONTACT_ID IN NUMBER
87: ,p_CASE_NUMBER IN VARCHAR2
88: ) IS
89:
90: cursor C is select ROWID from IEX_BANKRUPTCIES
91: where bankruptcy_id = p_bankruptcy_id ;
92:
93: BEGIN
94: -- IF PG_DEBUG < 10 THEN

Line 96: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_BANKRUPTCIES_PKG.INSERT_ROW ******** ');

92:
93: BEGIN
94: -- IF PG_DEBUG < 10 THEN
95: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
96: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_BANKRUPTCIES_PKG.INSERT_ROW ******** ');
97: END IF;
98: INSERT INTO IEX_BANKRUPTCIES(
99: BANKRUPTCY_ID,
100: CAS_ID,

Line 98: INSERT INTO IEX_BANKRUPTCIES(

94: -- IF PG_DEBUG < 10 THEN
95: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
96: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_BANKRUPTCIES_PKG.INSERT_ROW ******** ');
97: END IF;
98: INSERT INTO IEX_BANKRUPTCIES(
99: BANKRUPTCY_ID,
100: CAS_ID,
101: DELINQUENCY_ID,
102: PARTY_ID,

Line 252: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BANKRUPTCIES_PKG.INSERT_ROW ******** ');

248: end if;
249: close c;
250: -- IF PG_DEBUG < 10 THEN
251: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
252: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BANKRUPTCIES_PKG.INSERT_ROW ******** ');
253: END IF;
254: End Insert_Row;
255:
256:

Line 332: IEX_DEBUG_PUB.LogMessage ('********* start of Procedure =>IEX_BANKRUPTCIES_PKG.UPDATE_ROW ******** ');

328:
329: BEGIN
330: -- IF PG_DEBUG < 10 THEN
331: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
332: IEX_DEBUG_PUB.LogMessage ('********* start of Procedure =>IEX_BANKRUPTCIES_PKG.UPDATE_ROW ******** ');
333: END IF;
334: Update IEX_BANKRUPTCIES
335: SET
336: CAS_ID = decode( p_CAS_ID, FND_API.G_MISS_NUM, CAS_ID, p_CAS_ID),

Line 334: Update IEX_BANKRUPTCIES

330: -- IF PG_DEBUG < 10 THEN
331: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
332: IEX_DEBUG_PUB.LogMessage ('********* start of Procedure =>IEX_BANKRUPTCIES_PKG.UPDATE_ROW ******** ');
333: END IF;
334: Update IEX_BANKRUPTCIES
335: SET
336: CAS_ID = decode( p_CAS_ID, FND_API.G_MISS_NUM, CAS_ID, p_CAS_ID),
337: DELINQUENCY_ID = decode( p_DELINQUENCY_ID, FND_API.G_MISS_NUM, DELINQUENCY_ID, p_DELINQUENCY_ID),
338: PARTY_ID = decode( p_PARTY_ID, FND_API.G_MISS_NUM, PARTY_ID, p_PARTY_ID),

Line 410: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BANKRUPTCIES_PKG.UPDATE_ROW ******** ');

406: RAISE NO_DATA_FOUND;
407: End If;
408: -- IF PG_DEBUG < 10 THEN
409: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
410: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BANKRUPTCIES_PKG.UPDATE_ROW ******** ');
411: END IF;
412: END Update_Row;
413:
414:

Line 419: DELETE FROM IEX_BANKRUPTCIES

415: PROCEDURE Delete_Row(
416: p_BANKRUPTCY_ID NUMBER)
417: IS
418: BEGIN
419: DELETE FROM IEX_BANKRUPTCIES
420: WHERE BANKRUPTCY_ID = p_BANKRUPTCY_ID;
421: If (SQL%NOTFOUND) then
422: RAISE NO_DATA_FOUND;
423: End If;

Line 432: from IEX_BANKRUPTCIES

428: p_bankruptcy_id in NUMBER,
429: p_OBJECT_VERSION_NUMBER in NUMBER
430: ) is
431: cursor c is select OBJECT_VERSION_NUMBER
432: from IEX_BANKRUPTCIES
433: where bankruptcy_id = p_bankruptcy_id
434: and OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER
435: for update of bankruptcy_id nowait;
436: recinfo c%rowtype;

Line 441: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_BANKRUPTCIES_PKG.LOCK_ROW ******** ');

437:
438: begin
439: -- IF PG_DEBUG < 10 THEN
440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
441: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_BANKRUPTCIES_PKG.LOCK_ROW ******** ');
442: END IF;
443: open c;
444: fetch c into recinfo;
445: if (c%notfound) then

Line 461: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BANKRUPTCIES_PKG.LOCK_ROW ******** ');

457: app_exception.raise_exception;
458: end if;
459: --IF PG_DEBUG < 10 THEN
460: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
461: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_BANKRUPTCIES_PKG.LOCK_ROW ******** ');
462: END IF;
463: end LOCK_ROW;
464:
465:

Line 534: FROM IEX_BANKRUPTCIES

530:
531: IS
532: CURSOR C IS
533: SELECT *
534: FROM IEX_BANKRUPTCIES
535: WHERE BANKRUPTCY_ID = p_BANKRUPTCY_ID
536: FOR UPDATE of BANKRUPTCY_ID NOWAIT;
537: Recinfo C%ROWTYPE;
538: BEGIN

Line 735: End IEX_BANKRUPTCIES_PKG;

731: APP_EXCEPTION.RAISE_EXCEPTION;
732: End If;
733: END Lock_Row;
734: */
735: End IEX_BANKRUPTCIES_PKG;