eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGC_CC_ARCHIVE_PURGE_PKG dependencies on FND_API

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

44: --
45: PROCEDURE Arch_Pur_CC
46: (
47: p_api_version IN NUMBER,
48: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
49: p_last_activity_date IN igc_cc_archive_history.user_req_last_activity_date%TYPE,
50: p_mode IN VARCHAR2,
51: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,
52: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,

Line 51: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,

47: p_api_version IN NUMBER,
48: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
49: p_last_activity_date IN igc_cc_archive_history.user_req_last_activity_date%TYPE,
50: p_mode IN VARCHAR2,
51: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,
52: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,
53: x_Return_Status OUT NOCOPY VARCHAR2
54: );
55:

Line 52: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,

48: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
49: p_last_activity_date IN igc_cc_archive_history.user_req_last_activity_date%TYPE,
50: p_mode IN VARCHAR2,
51: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,
52: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,
53: x_Return_Status OUT NOCOPY VARCHAR2
54: );
55:
56: --

Line 239: l_init_msg VARCHAR2 (1) := FND_API.G_TRUE;

235: -- Define Local Variables to be used.
236: -- --------------------------------------------------------------------
237: l_debug VARCHAR2 (1);
238: l_Return_Status VARCHAR2 (1);
239: l_init_msg VARCHAR2 (1) := FND_API.G_TRUE;
240: l_msg_count NUMBER;
241: l_msg_data VARCHAR2(12000);
242: l_error_text VARCHAR2(12000);
243: l_api_version NUMBER := 1.0;

Line 277: l_commit_work := FND_API.G_TRUE;

273: return;
274: END IF;
275:
276: -- l_debug := FND_PROFILE.VALUE('IGC_DEBUG_ENABLED');
277: l_commit_work := FND_API.G_TRUE;
278:
279: -- IF (l_debug = 'Y') THEN
280: IF (g_debug_mode = 'Y') THEN
281: l_debug := FND_API.G_TRUE;

Line 281: l_debug := FND_API.G_TRUE;

277: l_commit_work := FND_API.G_TRUE;
278:
279: -- IF (l_debug = 'Y') THEN
280: IF (g_debug_mode = 'Y') THEN
281: l_debug := FND_API.G_TRUE;
282: ELSE
283: l_debug := FND_API.G_FALSE;
284: END IF;
285:

Line 283: l_debug := FND_API.G_FALSE;

279: -- IF (l_debug = 'Y') THEN
280: IF (g_debug_mode = 'Y') THEN
281: l_debug := FND_API.G_TRUE;
282: ELSE
283: l_debug := FND_API.G_FALSE;
284: END IF;
285:
286: l_date_request := to_date (p_req_last_activity_date, 'YYYY/MM/DD HH24:MI:SS');
287:

Line 296: IF (l_Return_Status = FND_API.G_RET_STS_SUCCESS) THEN

292: p_debug_flag => l_debug,
293: p_commit_work => l_commit_work,
294: x_return_status => l_Return_Status);
295:
296: IF (l_Return_Status = FND_API.G_RET_STS_SUCCESS) THEN
297:
298: errbuf := 'Normal Completion For Request';
299: retcode := 0;
300:

Line 315: -- l_error_text := ' Mesg No : '|| l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);

311: IF (l_msg_count > 0) THEN
312:
313: l_error_text := '';
314: FOR l_cur IN 1..l_msg_count LOOP
315: -- l_error_text := ' Mesg No : '|| l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
316: l_error_text := l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
317: IF (g_excep_level >= g_debug_level ) THEN
318: FND_LOG.STRING (g_excep_level,l_full_path,l_error_text);
319: END IF;

Line 316: l_error_text := l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);

312:
313: l_error_text := '';
314: FOR l_cur IN 1..l_msg_count LOOP
315: -- l_error_text := ' Mesg No : '|| l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
316: l_error_text := l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
317: IF (g_excep_level >= g_debug_level ) THEN
318: FND_LOG.STRING (g_excep_level,l_full_path,l_error_text);
319: END IF;
320: fnd_file.put_line (FND_FILE.LOG,

Line 359: -- l_error_text := ' Mesg No : '|| l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);

355: IF (l_msg_count > 0) THEN
356:
357: l_error_text := '';
358: FOR l_cur IN 1..l_msg_count LOOP
359: -- l_error_text := ' Mesg No : '|| l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
360: l_error_text := l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
361: IF (g_excep_level >= g_debug_level ) THEN
362: FND_LOG.STRING (g_excep_level,l_full_path,l_error_text);
363: END IF;

Line 360: l_error_text := l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);

356:
357: l_error_text := '';
358: FOR l_cur IN 1..l_msg_count LOOP
359: -- l_error_text := ' Mesg No : '|| l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
360: l_error_text := l_cur ||' '|| FND_MSG_PUB.GET(l_cur, FND_API.G_FALSE);
361: IF (g_excep_level >= g_debug_level ) THEN
362: FND_LOG.STRING (g_excep_level,l_full_path,l_error_text);
363: END IF;
364: fnd_file.put_line (FND_FILE.LOG,

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

388: --
389: PROCEDURE Arch_Pur_CC
390: (
391: p_api_version IN NUMBER,
392: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
393: p_last_activity_date IN igc_cc_archive_history.user_req_last_activity_date%TYPE,
394: p_mode IN VARCHAR2,
395: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,
396: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,

Line 395: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,

391: p_api_version IN NUMBER,
392: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
393: p_last_activity_date IN igc_cc_archive_history.user_req_last_activity_date%TYPE,
394: p_mode IN VARCHAR2,
395: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,
396: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,
397: x_Return_Status OUT NOCOPY VARCHAR2
398: ) IS
399:

Line 396: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,

392: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
393: p_last_activity_date IN igc_cc_archive_history.user_req_last_activity_date%TYPE,
394: p_mode IN VARCHAR2,
395: p_debug_flag IN VARCHAR2 := FND_API.G_FALSE,
396: p_commit_work IN VARCHAR2 := FND_API.G_FALSE,
397: x_Return_Status OUT NOCOPY VARCHAR2
398: ) IS
399:
400: -- --------------------------------------------------------------------

Line 436: IF (NOT FND_API.Compatible_API_Call ( l_api_version,

432: -- --------------------------------------------------------------------
433: -- Make sure that the appropriate version is being used and initialize
434: -- the message stack if required.
435: -- --------------------------------------------------------------------
436: IF (NOT FND_API.Compatible_API_Call ( l_api_version,
437: p_api_version,
438: l_api_name,
439: G_PKG_NAME )) THEN
440: raise FND_API.G_EXC_UNEXPECTED_ERROR ;

Line 440: raise FND_API.G_EXC_UNEXPECTED_ERROR ;

436: IF (NOT FND_API.Compatible_API_Call ( l_api_version,
437: p_api_version,
438: l_api_name,
439: G_PKG_NAME )) THEN
440: raise FND_API.G_EXC_UNEXPECTED_ERROR ;
441: END IF;
442:
443: IF (FND_API.to_Boolean ( p_init_msg_list )) THEN
444: FND_MSG_PUB.initialize ;

Line 443: IF (FND_API.to_Boolean ( p_init_msg_list )) THEN

439: G_PKG_NAME )) THEN
440: raise FND_API.G_EXC_UNEXPECTED_ERROR ;
441: END IF;
442:
443: IF (FND_API.to_Boolean ( p_init_msg_list )) THEN
444: FND_MSG_PUB.initialize ;
445: END IF;
446:
447: -- --------------------------------------------------------------------

Line 452: raise FND_API.G_EXC_ERROR;

448: -- Attempt to lock the table and if able to lock continue with process
449: -- otherwise exit after too long a wait.
450: -- --------------------------------------------------------------------
451: IF (NOT Lock_Candidates) THEN
452: raise FND_API.G_EXC_ERROR;
453: END IF;
454:
455: -- --------------------------------------------------------------------
456: -- Initialize Return status and other local variables.

Line 458: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

454:
455: -- --------------------------------------------------------------------
456: -- Initialize Return status and other local variables.
457: -- --------------------------------------------------------------------
458: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
459: -- IGC_MSGS_PKG.g_debug_mode := FND_API.TO_BOOLEAN(p_debug_flag);
460: g_update_login := FND_GLOBAL.LOGIN_ID;
461: g_update_by := FND_GLOBAL.USER_ID;
462: g_mode := p_mode;

Line 459: -- IGC_MSGS_PKG.g_debug_mode := FND_API.TO_BOOLEAN(p_debug_flag);

455: -- --------------------------------------------------------------------
456: -- Initialize Return status and other local variables.
457: -- --------------------------------------------------------------------
458: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
459: -- IGC_MSGS_PKG.g_debug_mode := FND_API.TO_BOOLEAN(p_debug_flag);
460: g_update_login := FND_GLOBAL.LOGIN_ID;
461: g_update_by := FND_GLOBAL.USER_ID;
462: g_mode := p_mode;
463: g_last_activity_date := p_last_activity_date;

Line 474: IF p_debug_flag = FND_API.G_TRUE THEN

470: p_ledger_name => g_ledger_name);
471: /* Select set_of_books_id into g_sob_id
472: FROM hr_operating_units WHERE organization_id = p_org_id;*/
473:
474: IF p_debug_flag = FND_API.G_TRUE THEN
475: g_debug_mode := 'Y';
476: ELSE
477: g_debug_mode := 'N';
478: END IF;

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

498: -- archive / purge process.
499: -- --------------------------------------------------------------------
500: Validate_Inputs (x_return_status => l_return_status);
501:
502: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
503: raise FND_API.G_EXC_ERROR;
504: END IF;
505:
506: -- --------------------------------------------------------------------

Line 503: raise FND_API.G_EXC_ERROR;

499: -- --------------------------------------------------------------------
500: Validate_Inputs (x_return_status => l_return_status);
501:
502: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
503: raise FND_API.G_EXC_ERROR;
504: END IF;
505:
506: -- --------------------------------------------------------------------
507: -- Determine if MRC is available and set global variables accordingly.

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

507: -- Determine if MRC is available and set global variables accordingly.
508: -- --------------------------------------------------------------------
509: Check_MRC (x_return_status => l_return_status);
510:
511: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
512: raise FND_API.G_EXC_ERROR;
513: END IF;
514:
515: -- --------------------------------------------------------------------

Line 512: raise FND_API.G_EXC_ERROR;

508: -- --------------------------------------------------------------------
509: Check_MRC (x_return_status => l_return_status);
510:
511: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
512: raise FND_API.G_EXC_ERROR;
513: END IF;
514:
515: -- --------------------------------------------------------------------
516: -- Build the table for candidate CC Header IDS that can be archived

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

517: -- and or purged.
518: -- --------------------------------------------------------------------
519: Build_Candidate_List (x_return_status => l_return_status);
520:
521: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
522: raise FND_API.G_EXC_ERROR;
523: END IF;
524:
525: -- --------------------------------------------------------------------

Line 522: raise FND_API.G_EXC_ERROR;

518: -- --------------------------------------------------------------------
519: Build_Candidate_List (x_return_status => l_return_status);
520:
521: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
522: raise FND_API.G_EXC_ERROR;
523: END IF;
524:
525: -- --------------------------------------------------------------------
526: -- Archive Process is to be run if user has given the mode to be 'A' or

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

539: END IF;
540:
541: Archive_CC (x_Return_Status => l_Return_Status);
542:
543: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
544: raise FND_API.G_EXC_ERROR;
545: END IF;
546:
547: -- --------------------------------------------------------------------

Line 544: raise FND_API.G_EXC_ERROR;

540:
541: Archive_CC (x_Return_Status => l_Return_Status);
542:
543: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
544: raise FND_API.G_EXC_ERROR;
545: END IF;
546:
547: -- --------------------------------------------------------------------
548: -- Purge process is to be run if user has given the mode to be 'P' or

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

559: END IF;
560:
561: Purge_CC (x_Return_Status => l_Return_Status);
562:
563: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
564: raise FND_API.G_EXC_ERROR;
565: END IF;
566:
567: END IF;

Line 564: raise FND_API.G_EXC_ERROR;

560:
561: Purge_CC (x_Return_Status => l_Return_Status);
562:
563: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
564: raise FND_API.G_EXC_ERROR;
565: END IF;
566:
567: END IF;
568:

Line 657: raise FND_API.G_EXC_ERROR;

653: END IF;
654: ELSE
655: /*FND_FILE.PUT_LINE (FND_FILE.LOG,
656: 'IGC_CC_ARCHIVE_PURGE_PKG - FAILED status of IGCCAPRR request');*/
657: raise FND_API.G_EXC_ERROR;
658: END IF;
659:
660: -- --------------------------------------------------------------------
661: -- Run the xml report to give the user insight into what has

Line 751: raise FND_API.G_EXC_ERROR;

747: END IF;
748: ELSE
749: /*FND_FILE.PUT_LINE (FND_FILE.LOG,
750: 'IGC_CC_ARCHIVE_PURGE_PKG - FAILED status of IGCCAPRR_XML request');*/
751: raise FND_API.G_EXC_ERROR;
752: END IF;
753: END IF;
754:
755: -- -----------------

Line 779: x_Return_Status := FND_API.G_RET_STS_ERROR;

775: -- --------------------------------------------------------------------
776: EXCEPTION
777:
778: WHEN NO_DATA_FOUND THEN
779: x_Return_Status := FND_API.G_RET_STS_ERROR;
780: ROLLBACK TO Archive_Purge_CC_PVT;
781: IF (g_excep_level >= g_debug_level ) THEN
782: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
783: END IF;

Line 786: WHEN FND_API.G_EXC_ERROR THEN

782: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
783: END IF;
784: RETURN;
785:
786: WHEN FND_API.G_EXC_ERROR THEN
787: x_Return_Status := FND_API.G_RET_STS_ERROR;
788: ROLLBACK TO Archive_Purge_CC_PVT;
789: IF (g_excep_level >= g_debug_level ) THEN
790: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

Line 787: x_Return_Status := FND_API.G_RET_STS_ERROR;

783: END IF;
784: RETURN;
785:
786: WHEN FND_API.G_EXC_ERROR THEN
787: x_Return_Status := FND_API.G_RET_STS_ERROR;
788: ROLLBACK TO Archive_Purge_CC_PVT;
789: IF (g_excep_level >= g_debug_level ) THEN
790: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
791: END IF;

Line 790: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

786: WHEN FND_API.G_EXC_ERROR THEN
787: x_Return_Status := FND_API.G_RET_STS_ERROR;
788: ROLLBACK TO Archive_Purge_CC_PVT;
789: IF (g_excep_level >= g_debug_level ) THEN
790: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
791: END IF;
792: RETURN;
793:
794: WHEN OTHERS THEN

Line 795: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

791: END IF;
792: RETURN;
793:
794: WHEN OTHERS THEN
795: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
796: ROLLBACK TO Archive_Purge_CC_PVT;
797: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
798: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
799: END IF;

Line 835: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

831:
832: -- --------------------------------------------------------------------
833: -- Initialize Return status and other local variables.
834: -- --------------------------------------------------------------------
835: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
836:
837: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
838: IF (g_debug_mode = 'Y') THEN
839: g_debug_msg := ' Beginning Archive process for Last Activity Date : ' ||

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

847: IF (g_mrc_installed = 'Y') THEN
848:
849: Cleanup_MRC_Arc_Tbls (x_return_status => l_return_status);
850:
851: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
852: raise FND_API.G_EXC_ERROR;
853: END IF;
854:
855: ELSE

Line 852: raise FND_API.G_EXC_ERROR;

848:
849: Cleanup_MRC_Arc_Tbls (x_return_status => l_return_status);
850:
851: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
852: raise FND_API.G_EXC_ERROR;
853: END IF;
854:
855: ELSE
856:

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

871: -- the Header, set_of_books, and cc_number.
872: -- -------------------------------------------------------------------
873: Cleanup_NON_MRC_Arc_Tbls (x_return_status => l_return_status);
874:
875: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
876: raise FND_API.G_EXC_ERROR;
877: END IF;
878:
879: -- ------------------------------------------------------------------

Line 876: raise FND_API.G_EXC_ERROR;

872: -- -------------------------------------------------------------------
873: Cleanup_NON_MRC_Arc_Tbls (x_return_status => l_return_status);
874:
875: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
876: raise FND_API.G_EXC_ERROR;
877: END IF;
878:
879: -- ------------------------------------------------------------------
880: -- Now that the tables have been cleaned up of any pre-existing data

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

883: IF (g_mrc_installed = 'Y') THEN
884:
885: Archive_MRC_Tbls (x_return_status => l_return_status);
886:
887: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
888: raise FND_API.G_EXC_ERROR;
889: END IF;
890:
891: ELSE

Line 888: raise FND_API.G_EXC_ERROR;

884:
885: Archive_MRC_Tbls (x_return_status => l_return_status);
886:
887: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
888: raise FND_API.G_EXC_ERROR;
889: END IF;
890:
891: ELSE
892:

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

907: -- been updated since the date entered for the ORG ID given.
908: -- -------------------------------------------------------------------
909: Archive_NON_MRC_Tbls (x_return_status => l_return_status);
910:
911: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
912: raise FND_API.G_EXC_ERROR;
913: END IF;
914:
915: -- --------------------------------------------------------------------

Line 912: raise FND_API.G_EXC_ERROR;

908: -- -------------------------------------------------------------------
909: Archive_NON_MRC_Tbls (x_return_status => l_return_status);
910:
911: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
912: raise FND_API.G_EXC_ERROR;
913: END IF;
914:
915: -- --------------------------------------------------------------------
916: -- For all the Headers that were just archived insert the corresponding

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

917: -- records into the Archive History Table.
918: -- --------------------------------------------------------------------
919: Insert_Archive_History (x_return_status => l_return_status);
920:
921: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
922: raise FND_API.G_EXC_ERROR;
923: END IF;
924:
925: RETURN;

Line 922: raise FND_API.G_EXC_ERROR;

918: -- --------------------------------------------------------------------
919: Insert_Archive_History (x_return_status => l_return_status);
920:
921: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
922: raise FND_API.G_EXC_ERROR;
923: END IF;
924:
925: RETURN;
926:

Line 933: x_Return_Status := FND_API.G_RET_STS_ERROR;

929: -- --------------------------------------------------------------------
930: EXCEPTION
931:
932: WHEN NO_DATA_FOUND THEN
933: x_Return_Status := FND_API.G_RET_STS_ERROR;
934: IF (g_excep_level >= g_debug_level ) THEN
935: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
936: END IF;
937: RETURN;

Line 939: WHEN FND_API.G_EXC_ERROR THEN

935: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
936: END IF;
937: RETURN;
938:
939: WHEN FND_API.G_EXC_ERROR THEN
940: x_Return_Status := FND_API.G_RET_STS_ERROR;
941: IF (g_excep_level >= g_debug_level ) THEN
942: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
943: END IF;

Line 940: x_Return_Status := FND_API.G_RET_STS_ERROR;

936: END IF;
937: RETURN;
938:
939: WHEN FND_API.G_EXC_ERROR THEN
940: x_Return_Status := FND_API.G_RET_STS_ERROR;
941: IF (g_excep_level >= g_debug_level ) THEN
942: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
943: END IF;
944: RETURN;

Line 942: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

938:
939: WHEN FND_API.G_EXC_ERROR THEN
940: x_Return_Status := FND_API.G_RET_STS_ERROR;
941: IF (g_excep_level >= g_debug_level ) THEN
942: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
943: END IF;
944: RETURN;
945:
946: WHEN OTHERS THEN

Line 947: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

943: END IF;
944: RETURN;
945:
946: WHEN OTHERS THEN
947: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
948: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
949: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
950: END IF;
951: IF ( g_unexp_level >= g_debug_level ) THEN

Line 985: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

981:
982: -- --------------------------------------------------------------------
983: -- Initialize Return status and other local variables.
984: -- --------------------------------------------------------------------
985: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
986:
987: -- --------------------------------------------------------------------
988: -- Insert all records that are able to be inserted based upon the
989: -- last activity date and org id from the original MRC tables into the

Line 1306: x_Return_Status := FND_API.G_RET_STS_ERROR;

1302: -- --------------------------------------------------------------------
1303: EXCEPTION
1304:
1305: WHEN NO_DATA_FOUND THEN
1306: x_Return_Status := FND_API.G_RET_STS_ERROR;
1307: IF (g_excep_level >= g_debug_level ) THEN
1308: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
1309: END IF;
1310: RETURN;

Line 1312: WHEN FND_API.G_EXC_ERROR THEN

1308: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
1309: END IF;
1310: RETURN;
1311:
1312: WHEN FND_API.G_EXC_ERROR THEN
1313: x_Return_Status := FND_API.G_RET_STS_ERROR;
1314: IF (g_excep_level >= g_debug_level ) THEN
1315: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1316: END IF;

Line 1313: x_Return_Status := FND_API.G_RET_STS_ERROR;

1309: END IF;
1310: RETURN;
1311:
1312: WHEN FND_API.G_EXC_ERROR THEN
1313: x_Return_Status := FND_API.G_RET_STS_ERROR;
1314: IF (g_excep_level >= g_debug_level ) THEN
1315: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1316: END IF;
1317: RETURN;

Line 1315: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

1311:
1312: WHEN FND_API.G_EXC_ERROR THEN
1313: x_Return_Status := FND_API.G_RET_STS_ERROR;
1314: IF (g_excep_level >= g_debug_level ) THEN
1315: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1316: END IF;
1317: RETURN;
1318:
1319: WHEN OTHERS THEN

Line 1320: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

1316: END IF;
1317: RETURN;
1318:
1319: WHEN OTHERS THEN
1320: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
1321: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
1322: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
1323: END IF;
1324: IF ( g_unexp_level >= g_debug_level ) THEN

Line 1358: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

1354:
1355: -- --------------------------------------------------------------------
1356: -- Initialize Return status and other local variables.
1357: -- --------------------------------------------------------------------
1358: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
1359:
1360: -- --------------------------------------------------------------------
1361: -- Insert all records that are able to be inserted based upon the
1362: -- last activity date and org id from the original MRC tables into the

Line 3086: x_Return_Status := FND_API.G_RET_STS_ERROR;

3082: -- --------------------------------------------------------------------
3083: EXCEPTION
3084:
3085: WHEN NO_DATA_FOUND THEN
3086: x_Return_Status := FND_API.G_RET_STS_ERROR;
3087: IF (g_excep_level >= g_debug_level ) THEN
3088: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3089: END IF;
3090: RETURN;

Line 3092: WHEN FND_API.G_EXC_ERROR THEN

3088: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3089: END IF;
3090: RETURN;
3091:
3092: WHEN FND_API.G_EXC_ERROR THEN
3093: x_Return_Status := FND_API.G_RET_STS_ERROR;
3094: IF (g_excep_level >= g_debug_level ) THEN
3095: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3096: END IF;

Line 3093: x_Return_Status := FND_API.G_RET_STS_ERROR;

3089: END IF;
3090: RETURN;
3091:
3092: WHEN FND_API.G_EXC_ERROR THEN
3093: x_Return_Status := FND_API.G_RET_STS_ERROR;
3094: IF (g_excep_level >= g_debug_level ) THEN
3095: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3096: END IF;
3097: RETURN;

Line 3095: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3091:
3092: WHEN FND_API.G_EXC_ERROR THEN
3093: x_Return_Status := FND_API.G_RET_STS_ERROR;
3094: IF (g_excep_level >= g_debug_level ) THEN
3095: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3096: END IF;
3097: RETURN;
3098:
3099: WHEN OTHERS THEN

Line 3100: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

3096: END IF;
3097: RETURN;
3098:
3099: WHEN OTHERS THEN
3100: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
3101: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
3102: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3103: END IF;
3104: IF ( g_unexp_level >= g_debug_level ) THEN

Line 3150: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

3146:
3147: -- --------------------------------------------------------------------
3148: -- Initialize local variables.
3149: -- --------------------------------------------------------------------
3150: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
3151:
3152: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
3153: IF (g_debug_mode = 'Y') THEN
3154: g_debug_msg := ' Building the Candidate List......';

Line 3284: x_Return_Status := FND_API.G_RET_STS_ERROR;

3280: -- --------------------------------------------------------------------
3281: EXCEPTION
3282:
3283: WHEN NO_DATA_FOUND THEN
3284: x_Return_Status := FND_API.G_RET_STS_ERROR;
3285: IF (c_cand_count%ISOPEN) THEN
3286: CLOSE c_cand_count;
3287: END IF;
3288: IF (g_excep_level >= g_debug_level ) THEN

Line 3293: WHEN FND_API.G_EXC_ERROR THEN

3289: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3290: END IF;
3291: RETURN;
3292:
3293: WHEN FND_API.G_EXC_ERROR THEN
3294: x_Return_Status := FND_API.G_RET_STS_ERROR;
3295: IF (c_cand_count%ISOPEN) THEN
3296: CLOSE c_cand_count;
3297: END IF;

Line 3294: x_Return_Status := FND_API.G_RET_STS_ERROR;

3290: END IF;
3291: RETURN;
3292:
3293: WHEN FND_API.G_EXC_ERROR THEN
3294: x_Return_Status := FND_API.G_RET_STS_ERROR;
3295: IF (c_cand_count%ISOPEN) THEN
3296: CLOSE c_cand_count;
3297: END IF;
3298: IF (g_excep_level >= g_debug_level ) THEN

Line 3299: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3295: IF (c_cand_count%ISOPEN) THEN
3296: CLOSE c_cand_count;
3297: END IF;
3298: IF (g_excep_level >= g_debug_level ) THEN
3299: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3300: END IF;
3301: RETURN;
3302:
3303: WHEN OTHERS THEN

Line 3304: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

3300: END IF;
3301: RETURN;
3302:
3303: WHEN OTHERS THEN
3304: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
3305: IF (c_cand_count%ISOPEN) THEN
3306: CLOSE c_cand_count;
3307: END IF;
3308: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN

Line 3346: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

3342:
3343: -- --------------------------------------------------------------------
3344: -- Initialize local variables.
3345: -- --------------------------------------------------------------------
3346: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
3347:
3348: -- --------------------------------------------------------------------
3349: -- Get the information to determine if MRC is installed and enabled for
3350: -- the set_of_books_id given

Line 3390: x_Return_Status := FND_API.G_RET_STS_ERROR;

3386: -- --------------------------------------------------------------------
3387: EXCEPTION
3388:
3389: WHEN NO_DATA_FOUND THEN
3390: x_Return_Status := FND_API.G_RET_STS_ERROR;
3391: IF (g_excep_level >= g_debug_level ) THEN
3392: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3393: END IF;
3394: RETURN;

Line 3396: WHEN FND_API.G_EXC_ERROR THEN

3392: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3393: END IF;
3394: RETURN;
3395:
3396: WHEN FND_API.G_EXC_ERROR THEN
3397: x_Return_Status := FND_API.G_RET_STS_ERROR;
3398: IF (g_excep_level >= g_debug_level ) THEN
3399: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3400: END IF;

Line 3397: x_Return_Status := FND_API.G_RET_STS_ERROR;

3393: END IF;
3394: RETURN;
3395:
3396: WHEN FND_API.G_EXC_ERROR THEN
3397: x_Return_Status := FND_API.G_RET_STS_ERROR;
3398: IF (g_excep_level >= g_debug_level ) THEN
3399: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3400: END IF;
3401: RETURN;

Line 3399: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3395:
3396: WHEN FND_API.G_EXC_ERROR THEN
3397: x_Return_Status := FND_API.G_RET_STS_ERROR;
3398: IF (g_excep_level >= g_debug_level ) THEN
3399: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3400: END IF;
3401: RETURN;
3402:
3403: WHEN OTHERS THEN

Line 3404: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

3400: END IF;
3401: RETURN;
3402:
3403: WHEN OTHERS THEN
3404: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
3405: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
3406: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3407: END IF;
3408: IF ( g_unexp_level >= g_debug_level ) THEN

Line 3443: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

3439:
3440: -- --------------------------------------------------------------------
3441: -- Initialize local variables.
3442: -- --------------------------------------------------------------------
3443: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
3444:
3445: -- --------------------------------------------------------------------
3446: -- Delete MRC Archive Header records before adding again.
3447: -- --------------------------------------------------------------------

Line 3651: x_Return_Status := FND_API.G_RET_STS_ERROR;

3647: -- --------------------------------------------------------------------
3648: EXCEPTION
3649:
3650: WHEN NO_DATA_FOUND THEN
3651: x_Return_Status := FND_API.G_RET_STS_ERROR;
3652: IF (g_excep_level >= g_debug_level ) THEN
3653: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3654: END IF;
3655: RETURN;

Line 3657: WHEN FND_API.G_EXC_ERROR THEN

3653: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3654: END IF;
3655: RETURN;
3656:
3657: WHEN FND_API.G_EXC_ERROR THEN
3658: x_Return_Status := FND_API.G_RET_STS_ERROR;
3659: IF (g_excep_level >= g_debug_level ) THEN
3660: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3661: END IF;

Line 3658: x_Return_Status := FND_API.G_RET_STS_ERROR;

3654: END IF;
3655: RETURN;
3656:
3657: WHEN FND_API.G_EXC_ERROR THEN
3658: x_Return_Status := FND_API.G_RET_STS_ERROR;
3659: IF (g_excep_level >= g_debug_level ) THEN
3660: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3661: END IF;
3662: RETURN;

Line 3660: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3656:
3657: WHEN FND_API.G_EXC_ERROR THEN
3658: x_Return_Status := FND_API.G_RET_STS_ERROR;
3659: IF (g_excep_level >= g_debug_level ) THEN
3660: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3661: END IF;
3662: RETURN;
3663:
3664: WHEN OTHERS THEN

Line 3665: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

3661: END IF;
3662: RETURN;
3663:
3664: WHEN OTHERS THEN
3665: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
3666: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
3667: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3668: END IF;
3669: IF ( g_unexp_level >= g_debug_level ) THEN

Line 3704: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

3700:
3701: -- --------------------------------------------------------------------
3702: -- Initialize local variables.
3703: -- --------------------------------------------------------------------
3704: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
3705:
3706: -- --------------------------------------------------------------------
3707: -- Delete Archive Header records before adding again.
3708: -- --------------------------------------------------------------------

Line 3941: x_Return_Status := FND_API.G_RET_STS_ERROR;

3937: -- --------------------------------------------------------------------
3938: EXCEPTION
3939:
3940: WHEN NO_DATA_FOUND THEN
3941: x_Return_Status := FND_API.G_RET_STS_ERROR;
3942: IF (g_excep_level >= g_debug_level ) THEN
3943: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3944: END IF;
3945: RETURN;

Line 3947: WHEN FND_API.G_EXC_ERROR THEN

3943: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
3944: END IF;
3945: RETURN;
3946:
3947: WHEN FND_API.G_EXC_ERROR THEN
3948: x_Return_Status := FND_API.G_RET_STS_ERROR;
3949: IF (g_excep_level >= g_debug_level ) THEN
3950: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3951: END IF;

Line 3948: x_Return_Status := FND_API.G_RET_STS_ERROR;

3944: END IF;
3945: RETURN;
3946:
3947: WHEN FND_API.G_EXC_ERROR THEN
3948: x_Return_Status := FND_API.G_RET_STS_ERROR;
3949: IF (g_excep_level >= g_debug_level ) THEN
3950: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3951: END IF;
3952: RETURN;

Line 3950: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

3946:
3947: WHEN FND_API.G_EXC_ERROR THEN
3948: x_Return_Status := FND_API.G_RET_STS_ERROR;
3949: IF (g_excep_level >= g_debug_level ) THEN
3950: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
3951: END IF;
3952: RETURN;
3953:
3954: WHEN OTHERS THEN

Line 3955: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

3951: END IF;
3952: RETURN;
3953:
3954: WHEN OTHERS THEN
3955: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
3956: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
3957: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
3958: END IF;
3959: IF ( g_unexp_level >= g_debug_level ) THEN

Line 4036: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

4032:
4033: -- --------------------------------------------------------------------
4034: -- Initialize Return status and other local variables.
4035: -- --------------------------------------------------------------------
4036: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
4037:
4038: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
4039: IF (g_debug_mode = 'Y') THEN
4040: g_debug_msg := ' Initializing History Record for Archive / Purge Process';

Line 4147: raise FND_API.G_EXC_ERROR;

4143: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
4144: p_tokval => 'CC');
4145: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
4146: p_msgname => 'IGC_NUM_PUR_NO_MATCH_ARC');
4147: raise FND_API.G_EXC_ERROR;
4148:
4149: END IF;
4150:
4151: END IF;

Line 4163: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

4159: -- --------------------------------------------------------------------
4160: EXCEPTION
4161:
4162: WHEN OTHERS THEN
4163: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
4164: IF (c_archive_history%ISOPEN) THEN
4165: CLOSE c_archive_history;
4166: END IF;
4167: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN

Line 4269: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

4265:
4266: -- --------------------------------------------------------------------
4267: -- Initialize Return status and other local variables.
4268: -- --------------------------------------------------------------------
4269: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
4270:
4271: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
4272: IF (g_debug_mode = 'Y') THEN
4273: g_debug_msg := ' Beginning Inserting Archive History Records for Last Activity Date : ' ||

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

4305: p_History_Rec => l_history_rec,
4306: x_Return_Status => l_return_status
4307: );
4308:
4309: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4310: raise FND_API.G_EXC_ERROR;
4311: END IF;
4312:
4313: OPEN c_cc_header_info;

Line 4310: raise FND_API.G_EXC_ERROR;

4306: x_Return_Status => l_return_status
4307: );
4308:
4309: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4310: raise FND_API.G_EXC_ERROR;
4311: END IF;
4312:
4313: OPEN c_cc_header_info;
4314: FETCH c_cc_header_info

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

4367: Update_History (p_History_Rec => l_history_rec,
4368: x_Return_Status => l_return_status
4369: );
4370:
4371: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4372: raise FND_API.G_EXC_ERROR;
4373: END IF;
4374:
4375: ELSE

Line 4372: raise FND_API.G_EXC_ERROR;

4368: x_Return_Status => l_return_status
4369: );
4370:
4371: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4372: raise FND_API.G_EXC_ERROR;
4373: END IF;
4374:
4375: ELSE
4376:

Line 4393: raise FND_API.G_EXC_ERROR;

4389: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
4390: p_tokval => 'CC');
4391: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
4392: p_msgname => 'IGC_NUM_PUR_NO_MATCH_ARC');
4393: raise FND_API.G_EXC_ERROR;
4394:
4395: END IF;
4396:
4397: IF (c_cc_header_info%ISOPEN) THEN

Line 4457: WHEN FND_API.G_EXC_ERROR THEN

4453: -- Exception handler section for the Insert_Archive_History procedure.
4454: -- --------------------------------------------------------------------
4455: EXCEPTION
4456:
4457: WHEN FND_API.G_EXC_ERROR THEN
4458: x_Return_Status := FND_API.G_RET_STS_ERROR;
4459: IF (c_get_archived_hdrs%ISOPEN) THEN
4460: CLOSE c_get_archived_hdrs;
4461: END IF;

Line 4458: x_Return_Status := FND_API.G_RET_STS_ERROR;

4454: -- --------------------------------------------------------------------
4455: EXCEPTION
4456:
4457: WHEN FND_API.G_EXC_ERROR THEN
4458: x_Return_Status := FND_API.G_RET_STS_ERROR;
4459: IF (c_get_archived_hdrs%ISOPEN) THEN
4460: CLOSE c_get_archived_hdrs;
4461: END IF;
4462: IF (c_cc_header_info%ISOPEN) THEN

Line 4478: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

4474: IF (c_mc_pf_line_count%ISOPEN) THEN
4475: CLOSE c_mc_pf_line_count;
4476: END IF;
4477: IF (g_excep_level >= g_debug_level ) THEN
4478: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4479: END IF;
4480: RETURN;
4481:
4482: WHEN OTHERS THEN

Line 4483: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

4479: END IF;
4480: RETURN;
4481:
4482: WHEN OTHERS THEN
4483: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
4484: IF (c_get_archived_hdrs%ISOPEN) THEN
4485: CLOSE c_get_archived_hdrs;
4486: END IF;
4487: IF (c_cc_header_info%ISOPEN) THEN

Line 4568: WHEN FND_API.G_EXC_ERROR THEN

4564:
4565: END IF;
4566:
4567: EXCEPTION
4568: WHEN FND_API.G_EXC_ERROR THEN
4569: IF (c_lock_candidates%ISOPEN) THEN
4570: CLOSE c_lock_candidates;
4571: END IF;
4572: IF (g_excep_level >= g_debug_level ) THEN

Line 4573: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

4569: IF (c_lock_candidates%ISOPEN) THEN
4570: CLOSE c_lock_candidates;
4571: END IF;
4572: IF (g_excep_level >= g_debug_level ) THEN
4573: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4574: END IF;
4575: RETURN FALSE;
4576:
4577: WHEN OTHERS THEN

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

4665: p_filename_val => NULL,
4666: x_Return_Status => l_Return_Status
4667: );
4668:
4669: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4670: raise FND_API.G_EXC_ERROR;
4671: END IF;*/
4672:
4673: IF(g_state_level >= g_debug_level) THEN

Line 4670: raise FND_API.G_EXC_ERROR;

4666: x_Return_Status => l_Return_Status
4667: );
4668:
4669: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4670: raise FND_API.G_EXC_ERROR;
4671: END IF;*/
4672:
4673: IF(g_state_level >= g_debug_level) THEN
4674: FND_LOG.STRING(g_state_level, p_path, p_debug_msg);

Line 4684: /*WHEN FND_API.G_EXC_ERROR THEN

4680: -- Exception handler section for the Output_Debug procedure.
4681: -- --------------------------------------------------------------------
4682: EXCEPTION
4683:
4684: /*WHEN FND_API.G_EXC_ERROR THEN
4685: RETURN;*/
4686:
4687: WHEN OTHERS THEN
4688: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN

Line 4721: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

4717:
4718: -- --------------------------------------------------------------------
4719: -- Initialize Return status and other local variables.
4720: -- --------------------------------------------------------------------
4721: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
4722:
4723: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
4724: IF (g_debug_mode = 'Y') THEN
4725: g_debug_msg := ' Beginning Purge process for Last Activity Date : ' ||

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

4743: END IF;
4744:
4745: Purge_MRC_Tbls (x_return_status => l_return_status);
4746:
4747: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4748: raise FND_API.G_EXC_ERROR;
4749: END IF;
4750:
4751: ELSE

Line 4748: raise FND_API.G_EXC_ERROR;

4744:
4745: Purge_MRC_Tbls (x_return_status => l_return_status);
4746:
4747: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4748: raise FND_API.G_EXC_ERROR;
4749: END IF;
4750:
4751: ELSE
4752:

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

4774: -- previously archived.
4775: -- -------------------------------------------------------------------
4776: Purge_NON_MRC_Tbls (x_return_status => l_return_status);
4777:
4778: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4779: raise FND_API.G_EXC_ERROR;
4780: END IF;
4781:
4782: RETURN;

Line 4779: raise FND_API.G_EXC_ERROR;

4775: -- -------------------------------------------------------------------
4776: Purge_NON_MRC_Tbls (x_return_status => l_return_status);
4777:
4778: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
4779: raise FND_API.G_EXC_ERROR;
4780: END IF;
4781:
4782: RETURN;
4783:

Line 4789: WHEN FND_API.G_EXC_ERROR THEN

4785: -- Exception handler section for the Purge_CC procedure.
4786: -- --------------------------------------------------------------------
4787: EXCEPTION
4788:
4789: WHEN FND_API.G_EXC_ERROR THEN
4790: x_Return_Status := FND_API.G_RET_STS_ERROR;
4791: IF (g_excep_level >= g_debug_level ) THEN
4792: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4793: END IF;

Line 4790: x_Return_Status := FND_API.G_RET_STS_ERROR;

4786: -- --------------------------------------------------------------------
4787: EXCEPTION
4788:
4789: WHEN FND_API.G_EXC_ERROR THEN
4790: x_Return_Status := FND_API.G_RET_STS_ERROR;
4791: IF (g_excep_level >= g_debug_level ) THEN
4792: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4793: END IF;
4794: RETURN;

Line 4792: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

4788:
4789: WHEN FND_API.G_EXC_ERROR THEN
4790: x_Return_Status := FND_API.G_RET_STS_ERROR;
4791: IF (g_excep_level >= g_debug_level ) THEN
4792: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
4793: END IF;
4794: RETURN;
4795:
4796: WHEN OTHERS THEN

Line 4797: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

4793: END IF;
4794: RETURN;
4795:
4796: WHEN OTHERS THEN
4797: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
4798: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN
4799: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, l_api_name);
4800: END IF;
4801: IF ( g_unexp_level >= g_debug_level ) THEN

Line 4857: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

4853:
4854: -- --------------------------------------------------------------------
4855: -- Initialize Return status and other local variables.
4856: -- --------------------------------------------------------------------
4857: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
4858:
4859: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
4860: IF (g_debug_mode = 'Y') THEN
4861: g_debug_msg := ' Beginning Purge MRC Tables process for Last Activity Date : ' ||

Line 5072: raise FND_API.G_EXC_ERROR;

5068: IGC_MSGS_PKG.message_token (p_tokname => 'SOB_ID',
5069: p_tokval => g_sob_id);
5070: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5071: p_msgname => 'IGC_NUM_MC_PUR_NO_MATCH_ARC');
5072: raise FND_API.G_EXC_ERROR;
5073:
5074: END IF;
5075:
5076: ELSE

Line 5091: raise FND_API.G_EXC_ERROR;

5087: IGC_MSGS_PKG.message_token (p_tokname => 'SOB_ID',
5088: p_tokval => g_sob_id);
5089: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5090: p_msgname => 'IGC_NUM_MC_PUR_NO_MATCH_ARC');
5091: raise FND_API.G_EXC_ERROR;
5092:
5093: END IF;
5094:
5095: -- -------------------------------------------------------------------

Line 5121: raise FND_API.G_EXC_ERROR;

5117: IGC_MSGS_PKG.message_token (p_tokname => 'SOB_ID',
5118: p_tokval => g_sob_id);
5119: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5120: p_msgname => 'IGC_NUM_MC_PUR_NO_MATCH_ARC');
5121: raise FND_API.G_EXC_ERROR;
5122:
5123: END IF;
5124:
5125: -- -------------------------------------------------------------------

Line 5142: WHEN FND_API.G_EXC_ERROR THEN

5138: -- Exception handler section for the Purge_CC procedure.
5139: -- --------------------------------------------------------------------
5140: EXCEPTION
5141:
5142: WHEN FND_API.G_EXC_ERROR THEN
5143: x_Return_Status := FND_API.G_RET_STS_ERROR;
5144: IF (c_get_purge_candidate%ISOPEN) THEN
5145: CLOSE c_get_purge_candidate;
5146: END IF;

Line 5143: x_Return_Status := FND_API.G_RET_STS_ERROR;

5139: -- --------------------------------------------------------------------
5140: EXCEPTION
5141:
5142: WHEN FND_API.G_EXC_ERROR THEN
5143: x_Return_Status := FND_API.G_RET_STS_ERROR;
5144: IF (c_get_purge_candidate%ISOPEN) THEN
5145: CLOSE c_get_purge_candidate;
5146: END IF;
5147: IF (c_get_arc_hist_info%ISOPEN) THEN

Line 5151: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

5147: IF (c_get_arc_hist_info%ISOPEN) THEN
5148: CLOSE c_get_arc_hist_info;
5149: END IF;
5150: IF (g_excep_level >= g_debug_level ) THEN
5151: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
5152: END IF;
5153: RETURN;
5154:
5155: WHEN OTHERS THEN

Line 5156: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

5152: END IF;
5153: RETURN;
5154:
5155: WHEN OTHERS THEN
5156: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
5157: IF (c_get_purge_candidate%ISOPEN) THEN
5158: CLOSE c_get_purge_candidate;
5159: END IF;
5160: IF (c_get_arc_hist_info%ISOPEN) THEN

Line 5226: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

5222:
5223: -- --------------------------------------------------------------------
5224: -- Initialize Return status and other local variables.
5225: -- --------------------------------------------------------------------
5226: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
5227:
5228: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
5229: IF (g_debug_mode = 'Y') THEN
5230: g_debug_msg := ' Beginning Purge NON MRC Tables process for Last Activity Date : ' ||

Line 5516: raise FND_API.G_EXC_ERROR;

5512: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
5513: p_tokval => 'CC');
5514: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5515: p_msgname => 'IGC_NUM_PUR_NO_MATCH_ARC');
5516: raise FND_API.G_EXC_ERROR;
5517:
5518: END IF;
5519:
5520: -- -------------------------------------------------------------------

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

5524: Initialize_History_Record (p_cc_header_id => l_cc_header_id,
5525: p_History_Rec => l_history_rec,
5526: x_Return_Status => l_return_status
5527: );
5528: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
5529: raise FND_API.G_EXC_ERROR;
5530: END IF;
5531:
5532: -- -------------------------------------------------------------------

Line 5529: raise FND_API.G_EXC_ERROR;

5525: p_History_Rec => l_history_rec,
5526: x_Return_Status => l_return_status
5527: );
5528: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
5529: raise FND_API.G_EXC_ERROR;
5530: END IF;
5531:
5532: -- -------------------------------------------------------------------
5533: -- Update the record initialized so that it now indicates that the CC

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

5544: Update_History (p_History_Rec => l_history_rec,
5545: x_Return_Status => l_return_status
5546: );
5547:
5548: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
5549: raise FND_API.G_EXC_ERROR;
5550: END IF;
5551:
5552: ELSE

Line 5549: raise FND_API.G_EXC_ERROR;

5545: x_Return_Status => l_return_status
5546: );
5547:
5548: IF (l_Return_Status <> FND_API.G_RET_STS_SUCCESS) THEN
5549: raise FND_API.G_EXC_ERROR;
5550: END IF;
5551:
5552: ELSE
5553:

Line 5571: raise FND_API.G_EXC_ERROR;

5567: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
5568: p_tokval => 'CC');
5569: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5570: p_msgname => 'IGC_NUM_PUR_NO_MATCH_ARC');
5571: raise FND_API.G_EXC_ERROR;
5572:
5573: END IF;
5574:
5575: -- -------------------------------------------------------------------

Line 5605: raise FND_API.G_EXC_ERROR;

5601: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
5602: p_tokval => 'CC');
5603: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5604: p_msgname => 'IGC_NUM_PUR_NO_MATCH_ARC');
5605: raise FND_API.G_EXC_ERROR;
5606:
5607: END IF;
5608:
5609: -- -------------------------------------------------------------------

Line 5626: WHEN FND_API.G_EXC_ERROR THEN

5622: -- Exception handler section for the Purge_CC procedure.
5623: -- --------------------------------------------------------------------
5624: EXCEPTION
5625:
5626: WHEN FND_API.G_EXC_ERROR THEN
5627: x_Return_Status := FND_API.G_RET_STS_ERROR;
5628: IF (c_get_purge_candidate%ISOPEN) THEN
5629: CLOSE c_get_purge_candidate;
5630: END IF;

Line 5627: x_Return_Status := FND_API.G_RET_STS_ERROR;

5623: -- --------------------------------------------------------------------
5624: EXCEPTION
5625:
5626: WHEN FND_API.G_EXC_ERROR THEN
5627: x_Return_Status := FND_API.G_RET_STS_ERROR;
5628: IF (c_get_purge_candidate%ISOPEN) THEN
5629: CLOSE c_get_purge_candidate;
5630: END IF;
5631: IF (c_get_arc_hist_info%ISOPEN) THEN

Line 5635: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

5631: IF (c_get_arc_hist_info%ISOPEN) THEN
5632: CLOSE c_get_arc_hist_info;
5633: END IF;
5634: IF (g_excep_level >= g_debug_level ) THEN
5635: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
5636: END IF;
5637: RETURN;
5638:
5639: WHEN OTHERS THEN

Line 5640: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

5636: END IF;
5637: RETURN;
5638:
5639: WHEN OTHERS THEN
5640: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
5641: IF (c_get_purge_candidate%ISOPEN) THEN
5642: CLOSE c_get_purge_candidate;
5643: END IF;
5644: IF (c_get_arc_hist_info%ISOPEN) THEN

Line 5701: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

5697:
5698: -- --------------------------------------------------------------------
5699: -- Initialize Return status and other local variables.
5700: -- --------------------------------------------------------------------
5701: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
5702:
5703: -- IF (IGC_MSGS_PKG.g_debug_mode) THEN
5704: IF (g_debug_mode = 'Y') THEN
5705: g_debug_msg := ' Calling Update History for CC Header ID : ' ||

Line 5794: raise FND_API.G_EXC_ERROR;

5790: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
5791: p_tokval => 'CC');
5792: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5793: p_msgname => 'IGC_INSERT_ARC_PUR_HISTORY');
5794: raise FND_API.G_EXC_ERROR;
5795: END IF;
5796:
5797: ELSE -- Update existing record
5798:

Line 5840: raise FND_API.G_EXC_ERROR;

5836: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
5837: p_tokval => 'CC');
5838: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5839: p_msgname => 'IGC_UPDATE_ARC_PUR_HISTORY');
5840: raise FND_API.G_EXC_ERROR;
5841: END IF;
5842:
5843: END IF;
5844:

Line 5860: x_Return_Status := FND_API.G_RET_STS_ERROR;

5856: -- --------------------------------------------------------------------
5857: EXCEPTION
5858:
5859: WHEN NO_DATA_FOUND THEN
5860: x_Return_Status := FND_API.G_RET_STS_ERROR;
5861: IF (c_archive_history%ISOPEN) THEN
5862: CLOSE c_archive_history;
5863: END IF;
5864: IF (g_excep_level >= g_debug_level ) THEN

Line 5869: WHEN FND_API.G_EXC_ERROR THEN

5865: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
5866: END IF;
5867: RETURN;
5868:
5869: WHEN FND_API.G_EXC_ERROR THEN
5870: x_Return_Status := FND_API.G_RET_STS_ERROR;
5871: IF (c_archive_history%ISOPEN) THEN
5872: CLOSE c_archive_history;
5873: END IF;

Line 5870: x_Return_Status := FND_API.G_RET_STS_ERROR;

5866: END IF;
5867: RETURN;
5868:
5869: WHEN FND_API.G_EXC_ERROR THEN
5870: x_Return_Status := FND_API.G_RET_STS_ERROR;
5871: IF (c_archive_history%ISOPEN) THEN
5872: CLOSE c_archive_history;
5873: END IF;
5874: IF (g_excep_level >= g_debug_level ) THEN

Line 5875: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

5871: IF (c_archive_history%ISOPEN) THEN
5872: CLOSE c_archive_history;
5873: END IF;
5874: IF (g_excep_level >= g_debug_level ) THEN
5875: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
5876: END IF;
5877: RETURN;
5878:
5879: WHEN OTHERS THEN

Line 5880: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

5876: END IF;
5877: RETURN;
5878:
5879: WHEN OTHERS THEN
5880: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
5881: IF (c_archive_history%ISOPEN) THEN
5882: CLOSE c_archive_history;
5883: END IF;
5884: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN

Line 5933: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

5929:
5930: -- --------------------------------------------------------------------
5931: -- Initialize local variables.
5932: -- --------------------------------------------------------------------
5933: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
5934:
5935: -- --------------------------------------------------------------------
5936: -- Make sure that the input mode of the process is a valid input. The
5937: -- set of values allowed are 'A' Archive or 'P' Purge.

Line 5956: raise FND_API.G_EXC_ERROR;

5952: IGC_MSGS_PKG.message_token (p_tokname => 'COMPONENT',
5953: p_tokval => 'CC');
5954: IGC_MSGS_PKG.add_message (p_appname => 'IGC',
5955: p_msgname => 'IGC_INVALID_ARC_PUR_MODE');
5956: raise FND_API.G_EXC_ERROR;
5957: END IF;
5958:
5959: -- --------------------------------------------------------------------
5960: -- Make sure that the set of books ID is valid and that there are

Line 6044: x_Return_Status := FND_API.G_RET_STS_ERROR;

6040: -- --------------------------------------------------------------------
6041: EXCEPTION
6042:
6043: WHEN NO_DATA_FOUND THEN
6044: x_Return_Status := FND_API.G_RET_STS_ERROR;
6045: IF (c_validate_sob_org%ISOPEN) THEN
6046: CLOSE c_validate_sob_org;
6047: END IF;
6048: IF (g_excep_level >= g_debug_level ) THEN

Line 6053: WHEN FND_API.G_EXC_ERROR THEN

6049: FND_LOG.STRING (g_excep_level,l_full_path,'NO_DATA_FOUND Exception Raised');
6050: END IF;
6051: RETURN;
6052:
6053: WHEN FND_API.G_EXC_ERROR THEN
6054: x_Return_Status := FND_API.G_RET_STS_ERROR;
6055: IF (c_validate_sob_org%ISOPEN) THEN
6056: CLOSE c_validate_sob_org;
6057: END IF;

Line 6054: x_Return_Status := FND_API.G_RET_STS_ERROR;

6050: END IF;
6051: RETURN;
6052:
6053: WHEN FND_API.G_EXC_ERROR THEN
6054: x_Return_Status := FND_API.G_RET_STS_ERROR;
6055: IF (c_validate_sob_org%ISOPEN) THEN
6056: CLOSE c_validate_sob_org;
6057: END IF;
6058: IF (g_excep_level >= g_debug_level ) THEN

Line 6059: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');

6055: IF (c_validate_sob_org%ISOPEN) THEN
6056: CLOSE c_validate_sob_org;
6057: END IF;
6058: IF (g_excep_level >= g_debug_level ) THEN
6059: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
6060: END IF;
6061: RETURN;
6062:
6063: WHEN OTHERS THEN

Line 6064: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

6060: END IF;
6061: RETURN;
6062:
6063: WHEN OTHERS THEN
6064: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
6065: IF (c_validate_sob_org%ISOPEN) THEN
6066: CLOSE c_validate_sob_org;
6067: END IF;
6068: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) THEN