DBA Data[Home] [Help]

APPS.FV_DUE_DATE_CALCULATION dependencies on FND_LOG

Line 150: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

146: NULL;
147: END;
148:
149: l_hol_day := TO_CHAR(p_date_out ,'day');
150: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
151: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES ' || l_hol_day);
152: END IF;
153:
154: IF(SUBSTR(l_hol_day,1,8) = 'saturday') THEN

Line 151: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES ' || l_hol_day);

147: END;
148:
149: l_hol_day := TO_CHAR(p_date_out ,'day');
150: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
151: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES ' || l_hol_day);
152: END IF;
153:
154: IF(SUBSTR(l_hol_day,1,8) = 'saturday') THEN
155: p_date_out := p_date_out + 2;

Line 166: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

162:
163: EXCEPTION
164: WHEN OTHERS THEN
165: l_error_mesg := 'When others ' || SQLERRM;
166: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
167: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,l_error_mesg);
168: END IF;
169: RAISE;
170: END;

Line 167: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,l_error_mesg);

163: EXCEPTION
164: WHEN OTHERS THEN
165: l_error_mesg := 'When others ' || SQLERRM;
166: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
167: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,l_error_mesg);
168: END IF;
169: RAISE;
170: END;
171:

Line 482: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

478: WHEN NO_DATA_FOUND THEN
479: v_transaction_date := v_transaction_date_org;
480: END;
481:
482: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
483: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'ID :' || V_TRANSACTION_ID ||
484: ' Type : ' || v_transaction_type
485: || ' Qty ' || TO_CHAR(v_quantity) || ' Billed ' ||
486: TO_CHAR(v_quantity_billed) );

Line 483: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'ID :' || V_TRANSACTION_ID ||

479: v_transaction_date := v_transaction_date_org;
480: END;
481:
482: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
483: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'ID :' || V_TRANSACTION_ID ||
484: ' Type : ' || v_transaction_type
485: || ' Qty ' || TO_CHAR(v_quantity) || ' Billed ' ||
486: TO_CHAR(v_quantity_billed) );
487: END IF;

Line 552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

548: -- fnd_file.put_line(FND_FILE.LOG,'v_transaction_date = '||v_transaction_date);
549:
550: ELSE
551:
552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
553: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'TRANSACTION DATE ' ||
554: TO_CHAR(v_transaction_date));
555: END IF;
556: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction date ' ||

Line 553: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'TRANSACTION DATE ' ||

549:
550: ELSE
551:
552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
553: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'TRANSACTION DATE ' ||
554: TO_CHAR(v_transaction_date));
555: END IF;
556: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction date ' ||
557: to_char(v_transaction_date)); */

Line 570: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

566: --Fix bug 1425906
567: OPEN c2_parent_receive(v_po_header_id) ;
568: FETCH c2_parent_receive INTO v_parent_transaction_id, v_rec_transaction_date ;
569: CLOSE c2_parent_receive ;
570: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RECEIPT DATE IS '||TO_CHAR(V_REC_TRANSACTION_DATE));
572: END IF;
573: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Receipt date is '||to_char(v_rec_transaction_date));
574:

Line 571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RECEIPT DATE IS '||TO_CHAR(V_REC_TRANSACTION_DATE));

567: OPEN c2_parent_receive(v_po_header_id) ;
568: FETCH c2_parent_receive INTO v_parent_transaction_id, v_rec_transaction_date ;
569: CLOSE c2_parent_receive ;
570: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
571: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RECEIPT DATE IS '||TO_CHAR(V_REC_TRANSACTION_DATE));
572: END IF;
573: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Receipt date is '||to_char(v_rec_transaction_date));
574:
575: /* Read new transaction date,if any defined on */

Line 601: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

597: (v_transaction_type = 'RECEIVE') THEN
598:
599: v_rec_transaction_date := v_transaction_date;
600:
601: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
602: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DOING RECEIPT MATCHING. ' ||
603: 'Trans. Id ' || TO_CHAR(v_rcv_transaction_id)|| ' Rec. date '
604: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
605: END IF;

Line 602: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DOING RECEIPT MATCHING. ' ||

598:
599: v_rec_transaction_date := v_transaction_date;
600:
601: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
602: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DOING RECEIPT MATCHING. ' ||
603: 'Trans. Id ' || TO_CHAR(v_rcv_transaction_id)|| ' Rec. date '
604: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
605: END IF;
606: -- Modified for bug 5454497

Line 672: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

668: end if;
669: end if;
670: v_final_transaction_date := v_transaction_date;
671:
672: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
673: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'FETCHED ACCEPTANCE DATE IS '
674: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
675: END IF;
676: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Fetched Acceptance Date is '

Line 673: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'FETCHED ACCEPTANCE DATE IS '

669: end if;
670: v_final_transaction_date := v_transaction_date;
671:
672: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
673: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'FETCHED ACCEPTANCE DATE IS '
674: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
675: END IF;
676: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Fetched Acceptance Date is '
677: || to_char(v_transaction_date,'DD-MON-YYYY'));*/

Line 749: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

745:
746: IF(v_tot_inv_retn > 0) THEN
747: /* Check Invoice return days is null */
748:
749: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
750: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING INV RETURN DAYS NOT NULL');
751: END IF;
752:
753: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');

Line 750: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING INV RETURN DAYS NOT NULL');

746: IF(v_tot_inv_retn > 0) THEN
747: /* Check Invoice return days is null */
748:
749: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
750: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING INV RETURN DAYS NOT NULL');
751: END IF;
752:
753: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');
754: IF(v_invoice_return_days IS NOT NULL ) THEN

Line 755: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

751: END IF;
752:
753: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');
754: IF(v_invoice_return_days IS NOT NULL ) THEN
755: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
756: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES IT IS NOT NULL');
757: END IF;
758: SELECT COUNT(*)
759: INTO v_tot_inv_retn

Line 756: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES IT IS NOT NULL');

752:
753: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');
754: IF(v_invoice_return_days IS NOT NULL ) THEN
755: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
756: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES IT IS NOT NULL');
757: END IF;
758: SELECT COUNT(*)
759: INTO v_tot_inv_retn
760: FROM fv_invoice_return_dates

Line 766: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

762: + v_invoice_return_days)
763: AND invoice_id = v_invoice_id;
764: IF(v_tot_inv_retn > 0) THEN /* Total No of Invoice returned */
765:
766: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES FOUND SOME INVOICE
768: returned later THAN the stipulated TIME');
769: END IF;
770:

Line 767: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES FOUND SOME INVOICE

763: AND invoice_id = v_invoice_id;
764: IF(v_tot_inv_retn > 0) THEN /* Total No of Invoice returned */
765:
766: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES FOUND SOME INVOICE
768: returned later THAN the stipulated TIME');
769: END IF;
770:
771: SELECT SUM(invoice_returned_date -

Line 787: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

783: -- Added new line here
784: v_total_due_date := v_total_due_date - v_diff_days;
785: ELSE
786:
787: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
788: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'BUT DO NOT FIND ANY INVOICE
789: RETURN later THAN the stipulated TIME');
790: END IF;
791: v_due_date_flag := 'N';

Line 788: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'BUT DO NOT FIND ANY INVOICE

784: v_total_due_date := v_total_due_date - v_diff_days;
785: ELSE
786:
787: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
788: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'BUT DO NOT FIND ANY INVOICE
789: RETURN later THAN the stipulated TIME');
790: END IF;
791: v_due_date_flag := 'N';
792: END IF; /* Total No of Invoice returned */

Line 796: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

792: END IF; /* Total No of Invoice returned */
793: END IF; /* invoice return days is not null */
794: END IF;
795:
796: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
797: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DUE DATE UPDATE FLAG ' || V_DUE_DATE_FLAG);
798: END IF;
799:
800: --FND_FILE.PUT_LINE(FND_FILE.LOG,'due date update flag ' || v_due_date_flag);

Line 797: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DUE DATE UPDATE FLAG ' || V_DUE_DATE_FLAG);

793: END IF; /* invoice return days is not null */
794: END IF;
795:
796: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
797: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DUE DATE UPDATE FLAG ' || V_DUE_DATE_FLAG);
798: END IF;
799:
800: --FND_FILE.PUT_LINE(FND_FILE.LOG,'due date update flag ' || v_due_date_flag);
801:

Line 1051: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);

1047: cleanup;
1048: RETURN;
1049: WHEN OTHERS THEN
1050: errbuf := 'When others ' || SQLERRM;
1051: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
1052: RETURN;
1053: END MAIN; /* Procedure Due_Date_Calculation */
1054: -------------------------------------------------------------------------
1055: /* Prcecure to rollback the transactions */

Line 1075: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1071: RETURN;
1072: EXCEPTION
1073: WHEN OTHERS THEN
1074: errbuf := 'When others ' || SQLERRM;
1075: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1076: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
1077: END IF;
1078: RAISE;
1079: END cleanup;

Line 1076: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);

1072: EXCEPTION
1073: WHEN OTHERS THEN
1074: errbuf := 'When others ' || SQLERRM;
1075: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1076: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
1077: END IF;
1078: RAISE;
1079: END cleanup;
1080: ---------------------------------------------------------------------------