1: PACKAGE BODY IEX_WRITEOFFS_PVT as
2: /* $Header: iexvwrob.pls 120.2 2008/01/09 12:31:01 gnramasa ship $ */
3: -- Start of Comments
4: -- Package name : IEX_writeoffs_PVT
5: -- Purpose :
1: PACKAGE BODY IEX_WRITEOFFS_PVT as
2: /* $Header: iexvwrob.pls 120.2 2008/01/09 12:31:01 gnramasa ship $ */
3: -- Start of Comments
4: -- Package name : IEX_writeoffs_PVT
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_WRITEOFFS_PVT';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'iexvwrob.pls';
13:
14:
15: -- Hint: Primary key needs to be returned.
42: BEGIN
43: -- IF PG_DEBUG < 10 THEN
44: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
45: IEX_DEBUG_PUB.LogMessage ('Create_writeoffs: ' || '********* start of Procedure =>'||
46: 'IEX_WRITEOFFS_PVT.create_WRITEOFFS ******** ');
47: END IF;
48:
49: -- Standard Start of API savepoint
50: SAVEPOINT CREATE_WRITEOFFS_PVT;
242: );
243: -- IF PG_DEBUG < 10 THEN
244: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
245: IEX_DEBUG_PUB.LogMessage ('Create_writeoffs: ' || '********* end of Procedure =>'||
246: 'IEX_WRITEOFFS_PVT.create_WRITEOFFS ******** ');
247: END IF;
248:
249: EXCEPTION
250: WHEN FND_API.G_EXC_ERROR THEN
303: BEGIN
304: -- IF PG_DEBUG < 10 THEN
305: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
306: IEX_DEBUG_PUB.LogMessage ('Update_writeoffs: ' || '********* start of Procedure =>'||
307: 'IEX_WRITEOFFS_PVT.update_WRITEOFFS ******** ');
308: END IF;
309: -- Standard Start of API savepoint
310: SAVEPOINT UPDATE_WRITEOFFS_PVT;
311:
342: l_object_version_number
343: );
344: */
345: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
346: IEX_DEBUG_PUB.LogMessage ('IEX_WRITEOFFS_PVT.update_WRITEOFFS, before calling IEX_WRITEOFFS_PKG.Update_Row');
347: END IF;
348:
349: -- Invoke table handler(IEX_WRITEOFFS_PKG.Update_Row)
350: IEX_WRITEOFFS_PKG.Update_Row(
412: --
413: -- End of API body.
414: --
415: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
416: IEX_DEBUG_PUB.LogMessage ('IEX_WRITEOFFS_PVT.update_WRITEOFFS is successfull');
417: END IF;
418: -- Standard check for p_commit
419: IF FND_API.to_Boolean( p_commit )
420: THEN
429:
430: -- IF PG_DEBUG < 10 THEN
431: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
432: IEX_DEBUG_PUB.LogMessage ('Update_writeoffs: ' || '********* END of Procedure =>'||
433: 'IEX_WRITEOFFS_PVT.update_WRITEOFFS ******** ');
434: END IF;
435:
436:
437: EXCEPTION
487: BEGIN
488: -- IF PG_DEBUG < 10 THEN
489: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
490: IEX_DEBUG_PUB.LogMessage ('Delete_writeoffs: ' || '********* Start of Procedure =>'||
491: 'IEX_WRITEOFFS_PVT.DELETE_WRITEOFFS ******** ');
492: END IF;
493:
494:
495: -- Standard Start of API savepoint
536:
537: -- IF PG_DEBUG < 10 THEN
538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
539: IEX_DEBUG_PUB.LogMessage ('Delete_writeoffs: ' || '********* End of Procedure =>'||
540: 'IEX_WRITEOFFS_PVT.DELETE_WRITEOFFS ******** ');
541: END IF;
542:
543:
544: -- Standard call to get message count and if count is 1, get message info.
582: End Delete_writeoffs;
583:
584:
585:
586: End IEX_WRITEOFFS_PVT;