DBA Data[Home] [Help]

APPS.IGC_CC_COPY_PKG dependencies on FND_API

Line 85: x_return_status := FND_API.G_RET_STS_SUCCESS;

81: l_full_path VARCHAR2(500) := g_path||'Acct_Line_Copy';--bug 3199488
82:
83: BEGIN
84:
85: x_return_status := FND_API.G_RET_STS_SUCCESS;
86: IF (g_debug_mode = 'Y') THEN
87: Put_Debug_Msg (l_full_path,' IGCCCPCB - Starting to Insert Account Line.');
88: END IF;
89:

Line 120: p_init_msg_list => FND_API.G_FALSE,

116: END IF;
117:
118: IGC_CC_ACCT_LINES_PKG.Insert_Row
119: (p_api_version => 1.0,
120: p_init_msg_list => FND_API.G_FALSE,
121: p_commit => FND_API.G_FALSE,
122: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
123: X_return_status => l_return_status,
124: X_msg_count => l_msg_count,

Line 121: p_commit => FND_API.G_FALSE,

117:
118: IGC_CC_ACCT_LINES_PKG.Insert_Row
119: (p_api_version => 1.0,
120: p_init_msg_list => FND_API.G_FALSE,
121: p_commit => FND_API.G_FALSE,
122: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
123: X_return_status => l_return_status,
124: X_msg_count => l_msg_count,
125: X_msg_data => l_msg_data,

Line 122: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

118: IGC_CC_ACCT_LINES_PKG.Insert_Row
119: (p_api_version => 1.0,
120: p_init_msg_list => FND_API.G_FALSE,
121: p_commit => FND_API.G_FALSE,
122: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
123: X_return_status => l_return_status,
124: X_msg_count => l_msg_count,
125: X_msg_data => l_msg_data,
126: p_Rowid => l_rowid,

Line 187: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

183:
184: -- ---------------------------------------------------------------
185: -- Check to make sure that the Access Copy was actually done.
186: -- ---------------------------------------------------------------
187: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
188: IF (g_debug_mode = 'Y') THEN
189: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure Inserting new Account Line ID......');
190: END IF;
191: RAISE FND_API.G_EXC_ERROR ;

Line 191: RAISE FND_API.G_EXC_ERROR ;

187: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
188: IF (g_debug_mode = 'Y') THEN
189: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure Inserting new Account Line ID......');
190: END IF;
191: RAISE FND_API.G_EXC_ERROR ;
192: END IF;
193:
194:
195: IF (g_debug_mode = 'Y') THEN

Line 205: WHEN FND_API.G_EXC_ERROR THEN

201: -- --------------------------------------
202: -- Exception Handlers Section
203: -- --------------------------------------
204: EXCEPTION
205: WHEN FND_API.G_EXC_ERROR THEN
206: x_return_status := FND_API.G_RET_STS_ERROR;
207: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
208: p_data => l_msg_data );
209:

Line 206: x_return_status := FND_API.G_RET_STS_ERROR;

202: -- Exception Handlers Section
203: -- --------------------------------------
204: EXCEPTION
205: WHEN FND_API.G_EXC_ERROR THEN
206: x_return_status := FND_API.G_RET_STS_ERROR;
207: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
208: p_data => l_msg_data );
209:
210: IF (g_debug_mode = 'Y') THEN

Line 216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

212: END IF;
213: RETURN;
214:
215: WHEN OTHERS THEN
216: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
217: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
218: p_data => l_msg_data );
219: IF g_unexp_level >= g_debug_level THEN
220: fnd_message.set_name('IGC','IGC_LOGGING_UNEXP_ERROR');

Line 251: x_return_status := FND_API.G_RET_STS_SUCCESS;

247:
248: l_full_path VARCHAR2(500) := g_path||'Det_Pf_Line_Copy';--bug 3199488
249: BEGIN
250:
251: x_return_status := FND_API.G_RET_STS_SUCCESS;
252: IF (g_debug_mode = 'Y') THEN
253: Put_Debug_Msg (l_full_path,' IGCCCPCB - Starting Det PF Line Copy......');
254:
255:

Line 276: p_init_msg_list => FND_API.G_FALSE,

272: END IF;
273:
274: IGC_CC_DET_PF_PKG.Insert_Row
275: (p_api_version => 1.0,
276: p_init_msg_list => FND_API.G_FALSE,
277: p_commit => FND_API.G_FALSE,
278: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
279: X_return_status => l_return_status,
280: X_msg_count => l_msg_count,

Line 277: p_commit => FND_API.G_FALSE,

273:
274: IGC_CC_DET_PF_PKG.Insert_Row
275: (p_api_version => 1.0,
276: p_init_msg_list => FND_API.G_FALSE,
277: p_commit => FND_API.G_FALSE,
278: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
279: X_return_status => l_return_status,
280: X_msg_count => l_msg_count,
281: X_msg_data => l_msg_data,

Line 278: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

274: IGC_CC_DET_PF_PKG.Insert_Row
275: (p_api_version => 1.0,
276: p_init_msg_list => FND_API.G_FALSE,
277: p_commit => FND_API.G_FALSE,
278: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
279: X_return_status => l_return_status,
280: X_msg_count => l_msg_count,
281: X_msg_data => l_msg_data,
282: p_Rowid => l_rowid,

Line 323: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

319:
320: -- ---------------------------------------------------------------
321: -- Check to make sure that the Det PF Line was actually done.
322: -- ---------------------------------------------------------------
323: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
324:
325: IF (g_debug_mode = 'Y') THEN
326: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure Inserting Det PF Line ID on Copy.......');
327: END IF;

Line 328: RAISE FND_API.G_EXC_ERROR ;

324:
325: IF (g_debug_mode = 'Y') THEN
326: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure Inserting Det PF Line ID on Copy.......');
327: END IF;
328: RAISE FND_API.G_EXC_ERROR ;
329: END IF;
330:
331:
332: IF (g_debug_mode = 'Y') THEN

Line 342: WHEN FND_API.G_EXC_ERROR THEN

338: -- --------------------------------------
339: -- Exception Handlers Section
340: -- --------------------------------------
341: EXCEPTION
342: WHEN FND_API.G_EXC_ERROR THEN
343: x_return_status := FND_API.G_RET_STS_ERROR;
344: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
345: p_data => l_msg_data );
346: IF (g_debug_mode = 'Y') THEN

Line 343: x_return_status := FND_API.G_RET_STS_ERROR;

339: -- Exception Handlers Section
340: -- --------------------------------------
341: EXCEPTION
342: WHEN FND_API.G_EXC_ERROR THEN
343: x_return_status := FND_API.G_RET_STS_ERROR;
344: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
345: p_data => l_msg_data );
346: IF (g_debug_mode = 'Y') THEN
347: Put_Debug_Msg (l_full_path,' IGCCCPCB - EXC ERROR Copying new Det PF Line ID.');

Line 352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

348: END IF;
349:
350: RETURN;
351: WHEN OTHERS THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count, p_data => l_msg_data );
354: IF g_unexp_level >= g_debug_level THEN
355: fnd_message.set_name('IGC','IGC_LOGGING_UNEXP_ERROR');
356: fnd_message.set_token('CODE',SQLCODE);

Line 384: x_return_status := FND_API.G_RET_STS_SUCCESS;

380:
381: l_full_path VARCHAR2(500) := g_path||'Access_Copy';--bug 3199488
382: BEGIN
383:
384: x_return_status := FND_API.G_RET_STS_SUCCESS;
385: IF (g_debug_mode = 'Y') THEN
386: Put_Debug_Msg (l_full_path,' IGCCCPCB - Starting the Access Copy routine..........');
387: END IF;
388:

Line 392: p_init_msg_list => FND_API.G_FALSE,

388:
389:
390: IGC_CC_ACCESS_PKG.Insert_Row
391: (p_api_version => 1.0,
392: p_init_msg_list => FND_API.G_FALSE,
393: p_commit => FND_API.G_FALSE,
394: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
395: x_return_status => l_return_status,
396: x_msg_count => l_msg_count,

Line 393: p_commit => FND_API.G_FALSE,

389:
390: IGC_CC_ACCESS_PKG.Insert_Row
391: (p_api_version => 1.0,
392: p_init_msg_list => FND_API.G_FALSE,
393: p_commit => FND_API.G_FALSE,
394: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
395: x_return_status => l_return_status,
396: x_msg_count => l_msg_count,
397: x_msg_data => l_msg_data,

Line 394: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

390: IGC_CC_ACCESS_PKG.Insert_Row
391: (p_api_version => 1.0,
392: p_init_msg_list => FND_API.G_FALSE,
393: p_commit => FND_API.G_FALSE,
394: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
395: x_return_status => l_return_status,
396: x_msg_count => l_msg_count,
397: x_msg_data => l_msg_data,
398: p_row_id => l_rowid,

Line 415: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

411:
412: -- ---------------------------------------------------------------
413: -- Check to make sure that the Access Copy was actually done.
414: -- ---------------------------------------------------------------
415: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
416: RAISE FND_API.G_EXC_ERROR ;
417: END IF;
418:
419:

Line 416: RAISE FND_API.G_EXC_ERROR ;

412: -- ---------------------------------------------------------------
413: -- Check to make sure that the Access Copy was actually done.
414: -- ---------------------------------------------------------------
415: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
416: RAISE FND_API.G_EXC_ERROR ;
417: END IF;
418:
419:
420: IF (g_debug_mode = 'Y') THEN

Line 430: WHEN FND_API.G_EXC_ERROR THEN

426: -- --------------------------------------
427: -- Exception Handlers Section
428: -- --------------------------------------
429: EXCEPTION
430: WHEN FND_API.G_EXC_ERROR THEN
431: x_return_status := FND_API.G_RET_STS_ERROR;
432: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
433: p_data => l_msg_data );
434: IF (g_debug_mode = 'Y') THEN

Line 431: x_return_status := FND_API.G_RET_STS_ERROR;

427: -- Exception Handlers Section
428: -- --------------------------------------
429: EXCEPTION
430: WHEN FND_API.G_EXC_ERROR THEN
431: x_return_status := FND_API.G_RET_STS_ERROR;
432: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
433: p_data => l_msg_data );
434: IF (g_debug_mode = 'Y') THEN
435: Put_Debug_Msg (l_full_path,' IGCCCPCB - EXC ERROR in inserting new Access ID........');

Line 440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

436: END IF;
437: RETURN;
438:
439: WHEN OTHERS THEN
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: FND_MSG_PUB.Count_And_Get (p_count => l_msg_count,
442: p_data => l_msg_data );
443: IF g_unexp_level >= g_debug_level THEN
444: fnd_message.set_name('IGC','IGC_LOGGING_UNEXP_ERROR');

Line 459: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

455: =============================================================================== */
456:
457: PROCEDURE Header_Copy (
458: p_api_version IN NUMBER,
459: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
460: p_commit IN VARCHAR2 := FND_API.G_FALSE,
461: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
462: x_return_status OUT NOCOPY VARCHAR2,
463: x_msg_count OUT NOCOPY NUMBER,

Line 460: p_commit IN VARCHAR2 := FND_API.G_FALSE,

456:
457: PROCEDURE Header_Copy (
458: p_api_version IN NUMBER,
459: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
460: p_commit IN VARCHAR2 := FND_API.G_FALSE,
461: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
462: x_return_status OUT NOCOPY VARCHAR2,
463: x_msg_count OUT NOCOPY NUMBER,
464: x_msg_data OUT NOCOPY VARCHAR2,

Line 461: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

457: PROCEDURE Header_Copy (
458: p_api_version IN NUMBER,
459: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
460: p_commit IN VARCHAR2 := FND_API.G_FALSE,
461: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
462: x_return_status OUT NOCOPY VARCHAR2,
463: x_msg_count OUT NOCOPY NUMBER,
464: x_msg_data OUT NOCOPY VARCHAR2,
465: p_old_cc_header_id IN igc_cc_headers.cc_header_id%TYPE,

Line 526: IF NOT FND_API.Compatible_API_Call ( l_api_version,

522: -- ---------------------------------------------------------------------------------------
523: -- Ensure that the arguments passed in match the appropriate version of this
524: -- procedure.
525: -- ---------------------------------------------------------------------------------------
526: IF NOT FND_API.Compatible_API_Call ( l_api_version,
527: p_api_version,
528: l_api_name,
529: G_PKG_NAME )
530: THEN

Line 531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

527: p_api_version,
528: l_api_name,
529: G_PKG_NAME )
530: THEN
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
532: END IF;
533:
534: IF FND_API.to_Boolean (p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize ;

Line 534: IF FND_API.to_Boolean (p_init_msg_list ) THEN

530: THEN
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
532: END IF;
533:
534: IF FND_API.to_Boolean (p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize ;
536: END IF;
537:
538: X_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 538: X_return_status := FND_API.G_RET_STS_SUCCESS ;

534: IF FND_API.to_Boolean (p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize ;
536: END IF;
537:
538: X_return_status := FND_API.G_RET_STS_SUCCESS ;
539:
540: -- --------------------------------------------------------------------------------------
541: -- Initialize Global variables that are used by procedure.
542: -- --------------------------------------------------------------------------------------

Line 559: -- l_debug := FND_API.G_TRUE;

555: -- --------------------------------------------------------------------------------------
556: -- l_debug := FND_PROFILE.VALUE('IGC_DEBUG_ENABLED');
557:
558: -- IF (l_debug = 'Y') THEN
559: -- l_debug := FND_API.G_TRUE;
560: -- ELSE
561: -- l_debug := FND_API.G_FALSE;
562: -- END IF;
563:

Line 561: -- l_debug := FND_API.G_FALSE;

557:
558: -- IF (l_debug = 'Y') THEN
559: -- l_debug := FND_API.G_TRUE;
560: -- ELSE
561: -- l_debug := FND_API.G_FALSE;
562: -- END IF;
563:
564: -- IGC_MSGS_PKG.g_debug_mode := FND_API.TO_BOOLEAN (l_debug);
565: IF (g_debug_mode = 'Y') THEN

Line 564: -- IGC_MSGS_PKG.g_debug_mode := FND_API.TO_BOOLEAN (l_debug);

560: -- ELSE
561: -- l_debug := FND_API.G_FALSE;
562: -- END IF;
563:
564: -- IGC_MSGS_PKG.g_debug_mode := FND_API.TO_BOOLEAN (l_debug);
565: IF (g_debug_mode = 'Y') THEN
566: Put_Debug_Msg (l_full_path,' IGCCCPCB - Starting Header Copy for New Header : ' || p_new_cc_header_id ||
567: ' from Old Header ID : ' || p_old_cc_header_id);
568: END IF;

Line 584: RAISE FND_API.G_EXC_ERROR;

580: IGC_MSGS_PKG.message_token (p_tokname => 'CC_HEADER_ID',
581: p_tokval => p_old_cc_header_id);
582: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
583: p_msgname => 'IGC_HEADER_ID_NOT_FOUND');
584: RAISE FND_API.G_EXC_ERROR;
585: END IF;
586:
587: CLOSE c_obtain_cc_header;
588:

Line 595: p_init_msg_list => FND_API.G_FALSE,

591: -- the appropriate MRC records.
592: -- ------------------------------------------------------------------------------------
593: IGC_CC_HEADERS_PKG.Insert_Row
594: (p_api_version => 1.0,
595: p_init_msg_list => FND_API.G_FALSE,
596: p_commit => FND_API.G_FALSE,
597: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
598: X_return_status => l_return_status,
599: X_msg_count => l_msg_count,

Line 596: p_commit => FND_API.G_FALSE,

592: -- ------------------------------------------------------------------------------------
593: IGC_CC_HEADERS_PKG.Insert_Row
594: (p_api_version => 1.0,
595: p_init_msg_list => FND_API.G_FALSE,
596: p_commit => FND_API.G_FALSE,
597: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
598: X_return_status => l_return_status,
599: X_msg_count => l_msg_count,
600: X_msg_data => l_msg_data,

Line 597: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

593: IGC_CC_HEADERS_PKG.Insert_Row
594: (p_api_version => 1.0,
595: p_init_msg_list => FND_API.G_FALSE,
596: p_commit => FND_API.G_FALSE,
597: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
598: X_return_status => l_return_status,
599: X_msg_count => l_msg_count,
600: X_msg_data => l_msg_data,
601: p_Rowid => l_rowid,

Line 659: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

655:
656: -- ------------------------------------------------------------------------------------
657: -- Check to make sure that the Header was actually created.
658: -- ------------------------------------------------------------------------------------
659: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
660: IF (g_debug_mode = 'Y') THEN
661: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure inserting New CC Header id.........');
662: END IF;
663: RAISE FND_API.G_EXC_ERROR;

Line 663: RAISE FND_API.G_EXC_ERROR;

659: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
660: IF (g_debug_mode = 'Y') THEN
661: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure inserting New CC Header id.........');
662: END IF;
663: RAISE FND_API.G_EXC_ERROR;
664: END IF;
665:
666: -- ------------------------------------------------------------------------------------
667: -- Add the Entry into the Actions table indicating that the CC action is a COPY. This

Line 672: FND_API.G_FALSE,

668: -- resolves bug 1518478 and the new ACTION_TYPE added into lookups is "CP"
669: -- ------------------------------------------------------------------------------------
670: IGC_CC_ACTIONS_PKG.Insert_Row(
671: 1.0,
672: FND_API.G_FALSE,
673: FND_API.G_FALSE,
674: FND_API.G_VALID_LEVEL_FULL,
675: l_return_status,
676: l_msg_count,

Line 673: FND_API.G_FALSE,

669: -- ------------------------------------------------------------------------------------
670: IGC_CC_ACTIONS_PKG.Insert_Row(
671: 1.0,
672: FND_API.G_FALSE,
673: FND_API.G_FALSE,
674: FND_API.G_VALID_LEVEL_FULL,
675: l_return_status,
676: l_msg_count,
677: l_msg_data,

Line 674: FND_API.G_VALID_LEVEL_FULL,

670: IGC_CC_ACTIONS_PKG.Insert_Row(
671: 1.0,
672: FND_API.G_FALSE,
673: FND_API.G_FALSE,
674: FND_API.G_VALID_LEVEL_FULL,
675: l_return_status,
676: l_msg_count,
677: l_msg_data,
678: l_action_rowid,

Line 696: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

692:
693: -- ------------------------------------------------------------------------------------
694: -- Check to make sure that the Header was actually created.
695: -- ------------------------------------------------------------------------------------
696: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
697: IF (g_debug_mode = 'Y') THEN
698: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure inserting New CC Header id.........');
699: END IF;
700: RAISE FND_API.G_EXC_ERROR;

Line 700: RAISE FND_API.G_EXC_ERROR;

696: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
697: IF (g_debug_mode = 'Y') THEN
698: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure inserting New CC Header id.........');
699: END IF;
700: RAISE FND_API.G_EXC_ERROR;
701: END IF;
702:
703: -- ------------------------------------------------------------------------------------
704: -- Copy all the corresponding account lines for the CC Header given.

Line 722: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

718:
719: -- -----------------------------------------------------------------------------------
720: -- Check to make sure that the Account Line was actually created.
721: -- -----------------------------------------------------------------------------------
722: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
723: IF (g_debug_mode = 'Y') THEN
724: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure returned from Acct_Line_Copy......');
725: END IF;
726: RAISE FND_API.G_EXC_ERROR ;

Line 726: RAISE FND_API.G_EXC_ERROR ;

722: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
723: IF (g_debug_mode = 'Y') THEN
724: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure returned from Acct_Line_Copy......');
725: END IF;
726: RAISE FND_API.G_EXC_ERROR ;
727: END IF;
728:
729: OPEN c_payment_forecast(l_cc_acct_lines_rec.cc_acct_line_id);
730:

Line 745: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

741:
742: -- -----------------------------------------------------------------------------------
743: -- Check to make sure that the Det PF Line was actually created.
744: -- -----------------------------------------------------------------------------------
745: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
746: IF (g_debug_mode = 'Y') THEN
747: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure returned from Det_Pf_Line_Copy........');
748: END IF;
749: RAISE FND_API.G_EXC_ERROR ;

Line 749: RAISE FND_API.G_EXC_ERROR ;

745: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
746: IF (g_debug_mode = 'Y') THEN
747: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure returned from Det_Pf_Line_Copy........');
748: END IF;
749: RAISE FND_API.G_EXC_ERROR ;
750: END IF;
751:
752: END LOOP;
753:

Line 777: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

773:
774: -- -----------------------------------------------------------------------------------
775: -- Check to make sure that the Access Copy was actually done.
776: -- -----------------------------------------------------------------------------------
777: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
778: IF (g_debug_mode = 'Y') THEN
779: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure returned from Access_Copy.......');
780: END IF;
781: RAISE FND_API.G_EXC_ERROR ;

Line 781: RAISE FND_API.G_EXC_ERROR ;

777: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
778: IF (g_debug_mode = 'Y') THEN
779: Put_Debug_Msg (l_full_path,' IGCCCPCB - Failure returned from Access_Copy.......');
780: END IF;
781: RAISE FND_API.G_EXC_ERROR ;
782: END IF;
783:
784: END LOOP;
785:

Line 796: IF FND_API.To_Boolean(p_commit)

792: -- --------------------------------------------------------------------------------------
793: -- If there are no errors and the caller wants the commit to be performed then commit
794: -- since there were no exceptions encountered.
795: -- --------------------------------------------------------------------------------------
796: IF FND_API.To_Boolean(p_commit)
797: THEN
798: IF (g_debug_mode = 'Y') THEN
799: Put_Debug_Msg (l_full_path,' IGCCCPCB - Committing work performed......');
800: END IF;

Line 811: WHEN FND_API.G_EXC_ERROR THEN

807: -- Exception Handler section for procedure.
808: -- --------------------------------------------------------------------------------------
809: EXCEPTION
810:
811: WHEN FND_API.G_EXC_ERROR THEN
812: ROLLBACK TO Header_Copy_Pvt;
813: X_return_status := FND_API.G_RET_STS_ERROR;
814: g_new_cc_header_id := NULL;
815: IF (g_debug_mode = 'Y') THEN

Line 813: X_return_status := FND_API.G_RET_STS_ERROR;

809: EXCEPTION
810:
811: WHEN FND_API.G_EXC_ERROR THEN
812: ROLLBACK TO Header_Copy_Pvt;
813: X_return_status := FND_API.G_RET_STS_ERROR;
814: g_new_cc_header_id := NULL;
815: IF (g_debug_mode = 'Y') THEN
816: Put_Debug_Msg (l_full_path,' IGCCCPCB - EXC ERROR encountered in the Header Copy routine.....');
817: END IF;

Line 834: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

830: FND_MSG_PUB.Count_And_Get (p_count => X_msg_count,
831: p_data => X_msg_data );
832: RETURN;
833:
834: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
835: ROLLBACK TO Header_Copy_Pvt;
836: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
837: g_new_cc_header_id := NULL;
838: IF (g_debug_mode = 'Y') THEN

Line 836: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

832: RETURN;
833:
834: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
835: ROLLBACK TO Header_Copy_Pvt;
836: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
837: g_new_cc_header_id := NULL;
838: IF (g_debug_mode = 'Y') THEN
839: Put_Debug_Msg (l_full_path,' IGCCCPCB - EXC UNEXPECTED ERROR encountered in the Header Copy routine.....');
840: END IF;

Line 859: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

855: RETURN;
856:
857: WHEN OTHERS THEN
858: ROLLBACK TO Header_Copy_Pvt;
859: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
860: g_new_cc_header_id := NULL;
861: IF (g_debug_mode = 'Y') THEN
862: Put_Debug_Msg (l_full_path,' IGCCCPCB - OTHERS ERROR encountered in the Header Copy routine.....');
863: END IF;

Line 918: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN

914: p_filename_val => NULL,
915: x_Return_Status => l_Return_Status
916: );
917:
918: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
919: raise FND_API.G_EXC_ERROR;
920: END IF;
921:
922: RETURN;

Line 919: raise FND_API.G_EXC_ERROR;

915: x_Return_Status => l_Return_Status
916: );
917:
918: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
919: raise FND_API.G_EXC_ERROR;
920: END IF;
921:
922: RETURN;
923:

Line 926: WHEN FND_API.G_EXC_ERROR THEN

922: RETURN;
923:
924: EXCEPTION
925:
926: WHEN FND_API.G_EXC_ERROR THEN
927: RETURN;
928:
929: WHEN OTHERS THEN
930: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN