DBA Data[Home] [Help]

APPS.FV_DUE_DATE_CALCULATION dependencies on FND_LOG

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

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

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

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

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

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

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

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

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

471: WHEN NO_DATA_FOUND THEN
472: v_transaction_date := v_transaction_date_org;
473: END;
474:
475: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'ID :' || V_TRANSACTION_ID ||
477: ' Type : ' || v_transaction_type
478: || ' Qty ' || TO_CHAR(v_quantity) || ' Billed ' ||
479: TO_CHAR(v_quantity_billed) );

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

472: v_transaction_date := v_transaction_date_org;
473: END;
474:
475: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'ID :' || V_TRANSACTION_ID ||
477: ' Type : ' || v_transaction_type
478: || ' Qty ' || TO_CHAR(v_quantity) || ' Billed ' ||
479: TO_CHAR(v_quantity_billed) );
480: END IF;

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

541: -- fnd_file.put_line(FND_FILE.LOG,'v_transaction_date = '||v_transaction_date);
542:
543: ELSE
544:
545: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'TRANSACTION DATE ' ||
547: TO_CHAR(v_transaction_date));
548: END IF;
549: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction date ' ||

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

542:
543: ELSE
544:
545: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'TRANSACTION DATE ' ||
547: TO_CHAR(v_transaction_date));
548: END IF;
549: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction date ' ||
550: to_char(v_transaction_date)); */

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

559: --Fix bug 1425906
560: OPEN c2_parent_receive(v_po_header_id) ;
561: FETCH c2_parent_receive INTO v_parent_transaction_id, v_rec_transaction_date ;
562: CLOSE c2_parent_receive ;
563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RECEIPT DATE IS '||TO_CHAR(V_REC_TRANSACTION_DATE));
565: END IF;
566: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Receipt date is '||to_char(v_rec_transaction_date));
567:

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

560: OPEN c2_parent_receive(v_po_header_id) ;
561: FETCH c2_parent_receive INTO v_parent_transaction_id, v_rec_transaction_date ;
562: CLOSE c2_parent_receive ;
563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RECEIPT DATE IS '||TO_CHAR(V_REC_TRANSACTION_DATE));
565: END IF;
566: --FND_FILE.PUT_LINE(FND_FILE.LOG, 'Receipt date is '||to_char(v_rec_transaction_date));
567:
568: /* Read new transaction date,if any defined on */

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

590: (v_transaction_type = 'RECEIVE') THEN
591:
592: v_rec_transaction_date := v_transaction_date;
593:
594: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
595: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DOING RECEIPT MATCHING. ' ||
596: 'Trans. Id ' || TO_CHAR(v_rcv_transaction_id)|| ' Rec. date '
597: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
598: END IF;

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

591:
592: v_rec_transaction_date := v_transaction_date;
593:
594: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
595: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DOING RECEIPT MATCHING. ' ||
596: 'Trans. Id ' || TO_CHAR(v_rcv_transaction_id)|| ' Rec. date '
597: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
598: END IF;
599: -- Modified for bug 5454497

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

661: end if;
662: end if;
663: v_final_transaction_date := v_transaction_date;
664:
665: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
666: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'FETCHED ACCEPTANCE DATE IS '
667: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
668: END IF;
669: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Fetched Acceptance Date is '

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

662: end if;
663: v_final_transaction_date := v_transaction_date;
664:
665: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
666: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'FETCHED ACCEPTANCE DATE IS '
667: || TO_CHAR(v_transaction_date,'DD-MON-YYYY'));
668: END IF;
669: /*FND_FILE.PUT_LINE(FND_FILE.LOG,'Fetched Acceptance Date is '
670: || to_char(v_transaction_date,'DD-MON-YYYY'));*/

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

733:
734: IF(v_tot_inv_retn > 0) THEN
735: /* Check Invoice return days is null */
736:
737: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
738: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING INV RETURN DAYS NOT NULL');
739: END IF;
740:
741: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');

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

734: IF(v_tot_inv_retn > 0) THEN
735: /* Check Invoice return days is null */
736:
737: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
738: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING INV RETURN DAYS NOT NULL');
739: END IF;
740:
741: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');
742: IF(v_invoice_return_days IS NOT NULL ) THEN

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

739: END IF;
740:
741: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');
742: IF(v_invoice_return_days IS NOT NULL ) THEN
743: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
744: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES IT IS NOT NULL');
745: END IF;
746: SELECT COUNT(*)
747: INTO v_tot_inv_retn

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

740:
741: --FND_FILE.put_line(FND_FILE.LOG,'checking inv return days not null');
742: IF(v_invoice_return_days IS NOT NULL ) THEN
743: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
744: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES IT IS NOT NULL');
745: END IF;
746: SELECT COUNT(*)
747: INTO v_tot_inv_retn
748: FROM fv_invoice_return_dates

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

750: + v_invoice_return_days)
751: AND invoice_id = v_invoice_id;
752: IF(v_tot_inv_retn > 0) THEN /* Total No of Invoice returned */
753:
754: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
755: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES FOUND SOME INVOICE
756: returned later THAN the stipulated TIME');
757: END IF;
758:

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

751: AND invoice_id = v_invoice_id;
752: IF(v_tot_inv_retn > 0) THEN /* Total No of Invoice returned */
753:
754: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
755: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'YES FOUND SOME INVOICE
756: returned later THAN the stipulated TIME');
757: END IF;
758:
759: SELECT SUM(invoice_returned_date -

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

771: -- Added new line here
772: v_total_due_date := v_total_due_date - v_diff_days;
773: ELSE
774:
775: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
776: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'BUT DO NOT FIND ANY INVOICE
777: RETURN later THAN the stipulated TIME');
778: END IF;
779: v_due_date_flag := 'N';

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

772: v_total_due_date := v_total_due_date - v_diff_days;
773: ELSE
774:
775: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
776: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'BUT DO NOT FIND ANY INVOICE
777: RETURN later THAN the stipulated TIME');
778: END IF;
779: v_due_date_flag := 'N';
780: END IF; /* Total No of Invoice returned */

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

780: END IF; /* Total No of Invoice returned */
781: END IF; /* invoice return days is not null */
782: END IF;
783:
784: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
785: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DUE DATE UPDATE FLAG ' || V_DUE_DATE_FLAG);
786: END IF;
787:
788: --FND_FILE.PUT_LINE(FND_FILE.LOG,'due date update flag ' || v_due_date_flag);

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

781: END IF; /* invoice return days is not null */
782: END IF;
783:
784: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
785: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DUE DATE UPDATE FLAG ' || V_DUE_DATE_FLAG);
786: END IF;
787:
788: --FND_FILE.PUT_LINE(FND_FILE.LOG,'due date update flag ' || v_due_date_flag);
789:

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

1029: cleanup;
1030: RETURN;
1031: WHEN OTHERS THEN
1032: errbuf := 'When others ' || SQLERRM;
1033: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
1034: RETURN;
1035: END MAIN; /* Procedure Due_Date_Calculation */
1036: -------------------------------------------------------------------------
1037: /* Prcecure to rollback the transactions */

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

1053: RETURN;
1054: EXCEPTION
1055: WHEN OTHERS THEN
1056: errbuf := 'When others ' || SQLERRM;
1057: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1058: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
1059: END IF;
1060: RAISE;
1061: END cleanup;

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

1054: EXCEPTION
1055: WHEN OTHERS THEN
1056: errbuf := 'When others ' || SQLERRM;
1057: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1058: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
1059: END IF;
1060: RAISE;
1061: END cleanup;
1062: ---------------------------------------------------------------------------