132: errbuf := v_error_mesg ;
133: EXCEPTION
134: WHEN OTHERS THEN
135: l_errbuf := SQLERRM;
136: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',l_errbuf);
137: End Main ;
138:
139:
140: ----------------------------------------------------------------------
148: Exception
149: When Others Then
150: v_error_code := sqlcode ;
151: v_error_mesg := sqlerrm ;
152: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
153: End Initialize ;
154:
155: ----------------------------------------------------------------------
156: -- PROCESS_INVOICES
175: Exception
176: When Others Then
177: v_error_code := sqlcode ;
178: v_error_mesg := sqlerrm ;
179: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
180: End ;
181:
182: -- Get all the Invoices
183: v_select :=
219: Exception
220: When Others Then
221: v_error_code := sqlcode ;
222: v_error_mesg := sqlerrm ;
223: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
224: End ;
225:
226:
227: dbms_sql.define_column(v_inv_cursor, 1, v_invnum,50);
245: Exception
246: When Others Then
247: v_error_code := sqlcode ;
248: v_error_mesg := sqlerrm ;
249: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
250: End ;
251:
252: Loop
253: if dbms_sql.fetch_rows(v_inv_cursor) = 0 then
343: to_char(v_inv_po_distribution_id) ;
344: When Others Then
345: v_error_code := sqlcode ;
346: v_error_mesg := sqlerrm ;
347: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
348: End ;
349:
350:
351: If v_po_req_distribution_id is NOT NULL Then
403: to_char(v_po_req_distribution_id) ;
404: When Others Then
405: v_error_code := sqlcode ;
406: v_error_mesg := sqlerrm ;
407: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
408: End ;
409:
410: Else
411: -- Requisition does not exist, Reset the variables.
450: Exception
451: When Others then
452: v_error_code := sqlcode ;
453: v_error_mesg := sqlerrm ;
454: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
455: End ;
456: EXCEPTION
457: WHEN OTHERS THEN
458: l_errbuf := SQLERRM;
455: End ;
456: EXCEPTION
457: WHEN OTHERS THEN
458: l_errbuf := SQLERRM;
459: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',l_errbuf);
460: raise;
461: End process_invoices ;
462:
463: ----------------------------------------------------------------------
489: End If ;
490: EXCEPTION
491: WHEN OTHERS THEN
492: l_errbuf := SQLERRM;
493: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',l_errbuf);
494: raise;
495: End build_where_clause ;
496:
497:
512: Exception
513: When Others then
514: v_error_code := sqlcode ;
515: v_error_mesg := sqlerrm ;
516: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
517: End ;
518:
519: v_invnum := NULL ;
520: v_invdate := NULL ;
582: Exception
583: When Others then
584: v_error_code := sqlcode ;
585: v_error_mesg := sqlerrm ;
586: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
587: End ;
588:
589:
590: dbms_sql.define_column(v_po_cursor, 1, v_oblignum, 50);
607: Exception
608: When Others then
609: v_error_code := sqlcode ;
610: v_error_mesg := sqlerrm ;
611: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
612: End ;
613:
614:
615: loop
674: to_char(v_po_req_distribution_id) ;
675: When Others Then
676: v_error_code := sqlcode ;
677: v_error_mesg := sqlerrm ;
678: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
679:
680: End ;
681: Else
682: v_reqnum := Null ;
695: Exception
696: When Others then
697: v_error_code := sqlcode ;
698: v_error_mesg := sqlerrm ;
699: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',v_error_mesg);
700: End ;
701:
702: EXCEPTION
703: WHEN OTHERS THEN
701:
702: EXCEPTION
703: WHEN OTHERS THEN
704: l_errbuf := SQLERRM;
705: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',l_errbuf);
706: raise;
707: End process_pos ;
708:
709:
757: v_po_distribution_id ) ;
758: EXCEPTION
759: WHEN OTHERS THEN
760: l_errbuf := SQLERRM;
761: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception',l_errbuf);
762: raise;
763: End Insert_Processing ;
764:
765: -----------------------------------------------------------------