158: END IF;
159: EXCEPTION
160: WHEN OTHERS THEN
161: g_retcode := -2;
162: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
163: fnd_message.set_token('Error is : ' ,SQLCODE);
164: fnd_message.set_token('Reason is : ', SQLERRM);
165: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
166: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
159: EXCEPTION
160: WHEN OTHERS THEN
161: g_retcode := -2;
162: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
163: fnd_message.set_token('Error is : ' ,SQLCODE);
164: fnd_message.set_token('Reason is : ', SQLERRM);
165: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
166: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
167: p_module => g_pkg || l_proc || 'proc_error',
160: WHEN OTHERS THEN
161: g_retcode := -2;
162: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
163: fnd_message.set_token('Error is : ' ,SQLCODE);
164: fnd_message.set_token('Reason is : ', SQLERRM);
165: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
166: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
167: p_module => g_pkg || l_proc || 'proc_error',
168: p_msg => fnd_message.get,
164: fnd_message.set_token('Reason is : ', SQLERRM);
165: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
166: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
167: p_module => g_pkg || l_proc || 'proc_error',
168: p_msg => fnd_message.get,
169: p_force_log => TRUE
170: );
171: END IF;
172: g_errbuf := sqlerrm;
273: g_errbuf := sqlerrm;
274: clean_up;
275: retcode := g_retcode;
276: errbuf := g_errbuf;
277: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
278: fnd_message.set_token('Error is : ' ,SQLCODE);
279: fnd_message.set_token('Reason is : ', SQLERRM);
280: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
281: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
274: clean_up;
275: retcode := g_retcode;
276: errbuf := g_errbuf;
277: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
278: fnd_message.set_token('Error is : ' ,SQLCODE);
279: fnd_message.set_token('Reason is : ', SQLERRM);
280: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
281: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
282: p_module => g_pkg || l_proc || 'proc_error',
275: retcode := g_retcode;
276: errbuf := g_errbuf;
277: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
278: fnd_message.set_token('Error is : ' ,SQLCODE);
279: fnd_message.set_token('Reason is : ', SQLERRM);
280: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
281: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
282: p_module => g_pkg || l_proc || 'proc_error',
283: p_msg => fnd_message.get,
279: fnd_message.set_token('Reason is : ', SQLERRM);
280: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
281: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
282: p_module => g_pkg || l_proc || 'proc_error',
283: p_msg => fnd_message.get,
284: p_force_log => TRUE
285: );
286: END IF;
287: END purge_obj;
374: ROLLBACK;
375: g_retcode := -2;
376: g_status := FALSE;
377: g_errbuf := sqlerrm ;
378: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
379: fnd_message.set_token('Error is : ' ,SQLCODE);
380: fnd_message.set_token('Reason is : ', SQLERRM);
381: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
382: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
375: g_retcode := -2;
376: g_status := FALSE;
377: g_errbuf := sqlerrm ;
378: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
379: fnd_message.set_token('Error is : ' ,SQLCODE);
380: fnd_message.set_token('Reason is : ', SQLERRM);
381: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
382: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
383: p_module => g_pkg || l_proc || 'proc_error',
376: g_status := FALSE;
377: g_errbuf := sqlerrm ;
378: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
379: fnd_message.set_token('Error is : ' ,SQLCODE);
380: fnd_message.set_token('Reason is : ', SQLERRM);
381: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
382: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
383: p_module => g_pkg || l_proc || 'proc_error',
384: p_msg => fnd_message.get,
380: fnd_message.set_token('Reason is : ', SQLERRM);
381: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
382: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
383: p_module => g_pkg || l_proc || 'proc_error',
384: p_msg => fnd_message.get,
385: p_force_log => TRUE
386: );
387: END IF;
388: END opdtl_f_purge;
504: ROLLBACK;
505: g_retcode := -2;
506: g_status := FALSE;
507: g_errbuf := sqlerrm ;
508: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
509: fnd_message.set_token('Error is : ' ,SQLCODE);
510: fnd_message.set_token('Reason is : ', SQLERRM);
511: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
512: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
505: g_retcode := -2;
506: g_status := FALSE;
507: g_errbuf := sqlerrm ;
508: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
509: fnd_message.set_token('Error is : ' ,SQLCODE);
510: fnd_message.set_token('Reason is : ', SQLERRM);
511: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
512: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
513: p_module => g_pkg || l_proc || 'proc_error',
506: g_status := FALSE;
507: g_errbuf := sqlerrm ;
508: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
509: fnd_message.set_token('Error is : ' ,SQLCODE);
510: fnd_message.set_token('Reason is : ', SQLERRM);
511: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
512: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
513: p_module => g_pkg || l_proc || 'proc_error',
514: p_msg => fnd_message.get,
510: fnd_message.set_token('Reason is : ', SQLERRM);
511: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
512: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
513: p_module => g_pkg || l_proc || 'proc_error',
514: p_msg => fnd_message.get,
515: p_force_log => TRUE);
516: END IF;
517:
518: END pipeline_f_purge;
565:
566:
567: IF (NOT bis_common_parameters.check_global_parameters(l_list)) THEN -- Check Parameters
568: bis_common_parameters.get_global_parameters(l_list, l_val);
569: fnd_message.set_name('BIL','BIL_BI_SETUP_INCOMPLETE');
570: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_ERROR,
571: p_module => g_pkg || l_proc || 'proc_error',
572: p_msg => fnd_message.get,
573: p_force_log => TRUE);
568: bis_common_parameters.get_global_parameters(l_list, l_val);
569: fnd_message.set_name('BIL','BIL_BI_SETUP_INCOMPLETE');
570: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_ERROR,
571: p_module => g_pkg || l_proc || 'proc_error',
572: p_msg => fnd_message.get,
573: p_force_log => TRUE);
574: FOR v_counter IN 1..3 LOOP
575: IF (l_val(v_counter) IS NULL) THEN
576: fnd_message.set_name('BIL','BIL_BI_PROFILE_MISSING');
572: p_msg => fnd_message.get,
573: p_force_log => TRUE);
574: FOR v_counter IN 1..3 LOOP
575: IF (l_val(v_counter) IS NULL) THEN
576: fnd_message.set_name('BIL','BIL_BI_PROFILE_MISSING');
577: fnd_message.set_token('PROFILE_USER_NAME' ,
578: bil_bi_util_collection_pkg.get_user_profile_name(l_list(v_counter)));
579: fnd_message.set_token('PROFILE_INTERNAL_NAME' ,l_list(v_counter));
580: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_ERROR,
573: p_force_log => TRUE);
574: FOR v_counter IN 1..3 LOOP
575: IF (l_val(v_counter) IS NULL) THEN
576: fnd_message.set_name('BIL','BIL_BI_PROFILE_MISSING');
577: fnd_message.set_token('PROFILE_USER_NAME' ,
578: bil_bi_util_collection_pkg.get_user_profile_name(l_list(v_counter)));
579: fnd_message.set_token('PROFILE_INTERNAL_NAME' ,l_list(v_counter));
580: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_ERROR,
581: p_module => g_pkg || l_proc || 'proc_error',
575: IF (l_val(v_counter) IS NULL) THEN
576: fnd_message.set_name('BIL','BIL_BI_PROFILE_MISSING');
577: fnd_message.set_token('PROFILE_USER_NAME' ,
578: bil_bi_util_collection_pkg.get_user_profile_name(l_list(v_counter)));
579: fnd_message.set_token('PROFILE_INTERNAL_NAME' ,l_list(v_counter));
580: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_ERROR,
581: p_module => g_pkg || l_proc || 'proc_error',
582: p_msg => fnd_message.get,
583: p_force_log => TRUE);
578: bil_bi_util_collection_pkg.get_user_profile_name(l_list(v_counter)));
579: fnd_message.set_token('PROFILE_INTERNAL_NAME' ,l_list(v_counter));
580: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_ERROR,
581: p_module => g_pkg || l_proc || 'proc_error',
582: p_msg => fnd_message.get,
583: p_force_log => TRUE);
584: END IF;
585: END LOOP;
586: RAISE G_SETUP_VALID_ERROR;
708:
709: EXCEPTION
710:
711: WHEN OTHERS THEN
712: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
713: fnd_message.set_token('Error is : ' ,SQLCODE);
714: fnd_message.set_token('Reason is : ', SQLERRM);
715: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
716: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
709: EXCEPTION
710:
711: WHEN OTHERS THEN
712: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
713: fnd_message.set_token('Error is : ' ,SQLCODE);
714: fnd_message.set_token('Reason is : ', SQLERRM);
715: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
716: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
717: p_module => g_pkg || l_proc || 'proc_error',
710:
711: WHEN OTHERS THEN
712: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
713: fnd_message.set_token('Error is : ' ,SQLCODE);
714: fnd_message.set_token('Reason is : ', SQLERRM);
715: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
716: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
717: p_module => g_pkg || l_proc || 'proc_error',
718: p_msg => fnd_message.get,
714: fnd_message.set_token('Reason is : ', SQLERRM);
715: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
716: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
717: p_module => g_pkg || l_proc || 'proc_error',
718: p_msg => fnd_message.get,
719: p_force_log => TRUE);
720: END IF;
721: END;
722:
767: ROLLBACK;
768: g_retcode := -2;
769: g_status := FALSE;
770: g_errbuf := sqlerrm ;
771: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
772: fnd_message.set_token('Error is : ' ,SQLCODE);
773: fnd_message.set_token('Reason is : ', SQLERRM);
774: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
775: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
768: g_retcode := -2;
769: g_status := FALSE;
770: g_errbuf := sqlerrm ;
771: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
772: fnd_message.set_token('Error is : ' ,SQLCODE);
773: fnd_message.set_token('Reason is : ', SQLERRM);
774: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
775: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
776: p_module => g_pkg || l_proc || 'proc_error',
769: g_status := FALSE;
770: g_errbuf := sqlerrm ;
771: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
772: fnd_message.set_token('Error is : ' ,SQLCODE);
773: fnd_message.set_token('Reason is : ', SQLERRM);
774: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
775: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
776: p_module => g_pkg || l_proc || 'proc_error',
777: p_msg => fnd_message.get,
773: fnd_message.set_token('Reason is : ', SQLERRM);
774: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
775: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
776: p_module => g_pkg || l_proc || 'proc_error',
777: p_msg => fnd_message.get,
778: p_force_log => TRUE
779: );
780: END IF;
781: END fst_dtl_f_purge;
847: EXCEPTION
848: WHEN OTHERS THEN
849: g_retcode := -1;
850: g_errbuf := sqlerrm ;
851: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
852: fnd_message.set_token('Error is : ' ,SQLCODE);
853: fnd_message.set_token('Reason is : ', SQLERRM);
854: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
855: bil_bi_util_collection_pkg.writeLog
848: WHEN OTHERS THEN
849: g_retcode := -1;
850: g_errbuf := sqlerrm ;
851: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
852: fnd_message.set_token('Error is : ' ,SQLCODE);
853: fnd_message.set_token('Reason is : ', SQLERRM);
854: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
855: bil_bi_util_collection_pkg.writeLog
856: (
849: g_retcode := -1;
850: g_errbuf := sqlerrm ;
851: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
852: fnd_message.set_token('Error is : ' ,SQLCODE);
853: fnd_message.set_token('Reason is : ', SQLERRM);
854: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
855: bil_bi_util_collection_pkg.writeLog
856: (
857: p_log_level => fnd_log.LEVEL_UNEXPECTED,
855: bil_bi_util_collection_pkg.writeLog
856: (
857: p_log_level => fnd_log.LEVEL_UNEXPECTED,
858: p_module => g_pkg || l_proc || 'proc_error',
859: p_msg => fnd_message.get,
860: p_force_log => TRUE
861: );
862: END IF;
863:
904: EXCEPTION
905: WHEN OTHERS THEN
906: g_retcode := -1;
907: g_errbuf := sqlerrm;
908: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
909: fnd_message.set_token('Error is : ' ,SQLCODE);
910: fnd_message.set_token('Reason is : ', SQLERRM);
911: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
912: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
905: WHEN OTHERS THEN
906: g_retcode := -1;
907: g_errbuf := sqlerrm;
908: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
909: fnd_message.set_token('Error is : ' ,SQLCODE);
910: fnd_message.set_token('Reason is : ', SQLERRM);
911: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
912: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
913: p_module => g_pkg || l_proc || 'proc_error',
906: g_retcode := -1;
907: g_errbuf := sqlerrm;
908: fnd_message.set_name('FND','SQL_PLSQL_ERROR'); -- Seeded Message
909: fnd_message.set_token('Error is : ' ,SQLCODE);
910: fnd_message.set_token('Reason is : ', SQLERRM);
911: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
912: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
913: p_module => g_pkg || l_proc || 'proc_error',
914: p_msg => fnd_message.get,
910: fnd_message.set_token('Reason is : ', SQLERRM);
911: IF bil_bi_util_collection_pkg.chkLogLevel(fnd_log.LEVEL_UNEXPECTED) THEN
912: bil_bi_util_collection_pkg.writeLog(p_log_level => fnd_log.LEVEL_UNEXPECTED,
913: p_module => g_pkg || l_proc || 'proc_error',
914: p_msg => fnd_message.get,
915: p_force_log => TRUE
916: );
917: END IF;
918: END clean_up;