DBA Data[Home] [Help]

APPS.OKL_INTEREST_CALC_PVT dependencies on FND_FILE

Line 536: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Contract Number ' || p_contract_number ||

532: p_msg_name => 'OKL_CNTR_NO_INVALID',
533: p_token1 => 'CONTRACT_NUMBER',
534: p_token1_value => p_contract_number);
535: ELSE
536: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Contract Number ' || p_contract_number ||
537: ' is not Valid');
538:
539: END IF;
540:

Line 566: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Number of Days in Year');

562: IF (p_mode = 'ONLINE') THEN
563: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
564: p_msg_name => 'OKL_DAYS_IN_YEAR_NOT_FOUND');
565: ELSE
566: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Number of Days in Year');
567: END IF;
568: RAISE OKL_API.G_EXCEPTION_ERROR;
569: END IF;
570: -- gboomina bug 4900213 - End

Line 582: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Interest Rate '

578: IF (p_mode = 'ONLINE') THEN
579: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
580: p_msg_name => 'OKL_INTR_NAME_NOT_FOUND');
581: ELSE
582: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Interest Rate '
583: || 'Name in the Rules');
584:
585: END IF;
586: CLOSE indx_csr;

Line 607: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Rate is not available for ' ||

603: p_msg_name => 'OKL_INTR_RATE_NOT_FOUND',
604: p_token1 => 'INTR_DATE',
605: p_token1_value => to_char(change_rec.change_date - 1,'DD-MM-YY'));
606: ELSE
607: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Rate is not available for ' ||
608: to_char(change_rec.change_date-1,'DD-MON-YY'));
609: END IF;
610:
611: CLOSE int_max_csr;

Line 639: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Rate is not available for ' ||

635: p_msg_name => 'OKL_INTR_RATE_NOT_FOUND',
636: p_token1 => 'INTR_DATE',
637: p_token1_value => to_char(p_end_date,'DD-MM-YY'));
638: ELSE
639: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Rate is not available for ' ||
640: to_char(p_end_date,'DD-MON-YY'));
641: END IF;
642:
643: CLOSE int_max_csr;

Line 780: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Given Interest Calculation Upto Date : ' || l_int_calc_upto);

776: -- and will be used for further calculations
777:
778: l_int_calc_upto := FND_DATE.CANONICAL_TO_DATE(p_calc_upto);
779:
780: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Given Interest Calculation Upto Date : ' || l_int_calc_upto);
781: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Starting the Interest Calculation Process');
782:
783: OKL_ACCOUNTING_UTIL.get_period_info(p_date => l_int_calc_upto,
784: p_period_name => l_period_name,

Line 781: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Starting the Interest Calculation Process');

777:
778: l_int_calc_upto := FND_DATE.CANONICAL_TO_DATE(p_calc_upto);
779:
780: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Given Interest Calculation Upto Date : ' || l_int_calc_upto);
781: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Starting the Interest Calculation Process');
782:
783: OKL_ACCOUNTING_UTIL.get_period_info(p_date => l_int_calc_upto,
784: p_period_name => l_period_name,
785: p_start_date => l_start_date,

Line 793: FND_FILE.PUT_LINE(FND_FILE.LOG, 'The Period ' || l_period_name || ' is Invalid');

789: -- the variable l_period_end_date anywhere as Interest Calculation Upto is the correct end date
790:
791: IF (l_start_date IS NULL) THEN
792:
793: FND_FILE.PUT_LINE(FND_FILE.LOG, 'The Period ' || l_period_name || ' is Invalid');
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795:
796: END IF;
797:

Line 802: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Calculating Interest for Contract Number: ' ||

798: FOR cont_head_rec IN cont_head_csr
799:
800: LOOP
801:
802: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Calculating Interest for Contract Number: ' ||
803: cont_head_rec.contract_number);
804: l_last_calc_date := cont_head_rec.last_calc_date;
805: l_contract_start_date := cont_head_rec.start_date;
806: l_end_date := l_int_calc_upto;

Line 817: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last calculation Date was ' || l_last_calc_Date);

813:
814: -- If l_last_calc_date is NULL then it means that no funding is available
815: -- for the contract
816:
817: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last calculation Date was ' || l_last_calc_Date);
818:
819: -- If the Interest Calculation Upto is given as more than the contract start date
820: -- then Interest should be calculated one day prior to the start date
821:

Line 824: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest will be calculated only upto contract start date for this contract : '||

820: -- then Interest should be calculated one day prior to the start date
821:
822: IF l_contract_start_date < l_end_date THEN
823: l_end_date := l_contract_start_date - 1;
824: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest will be calculated only upto contract start date for this contract : '||
825: cont_head_rec.contract_number);
826: END IF;
827:
828:

Line 838: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Total amount calculated was ' || l_amount);

834: p_mode => 'BATCH',
835: x_amount => l_amount,
836: x_return_status => l_return_status);
837:
838: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Total amount calculated was ' || l_amount);
839: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation was made upto ' || l_end_date);
840:
841: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
842:

Line 839: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation was made upto ' || l_end_date);

835: x_amount => l_amount,
836: x_return_status => l_return_status);
837:
838: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Total amount calculated was ' || l_amount);
839: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation was made upto ' || l_end_date);
840:
841: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
842:
843: SAVEPOINT CREATE_TRX_ACCT;

Line 856: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Successfully Calculated. ' ||

852:
853: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
854: l_count := l_count + 1;
855: COMMIT WORK;
856: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Successfully Calculated. ' ||
857: 'Total Amount was ' || OKL_ACCOUNTING_UTIL.ROUND_AMOUNT(p_amount => l_amount,
858: p_currency_code => OKL_ACCOUNTING_UTIL.get_func_curr_code));
859: ELSE
860: ROLLBACK TO CREATE_TRX_ACCT;

Line 861: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||

857: 'Total Amount was ' || OKL_ACCOUNTING_UTIL.ROUND_AMOUNT(p_amount => l_amount,
858: p_currency_code => OKL_ACCOUNTING_UTIL.get_func_curr_code));
859: ELSE
860: ROLLBACK TO CREATE_TRX_ACCT;
861: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||
862: 'Contract Number ' || cont_head_rec.contract_number);
863:
864: -- Commented out code to fix bug 3695764
865:

Line 871: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));

867: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
868: IF (l_error_msg_rec.COUNT > 0) THEN
869: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
870: LOOP
871: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));
872: END LOOP;
873: END IF;
874: */
875:

Line 886: Fnd_File.PUT_LINE(Fnd_File.LOG, lv_msg_text);

882: p_encoded => Fnd_Api.g_false,
883: p_data => lv_msg_text,
884: p_msg_index_out => lv_msg_count);
885:
886: Fnd_File.PUT_LINE(Fnd_File.LOG, lv_msg_text);
887:
888: END IF;
889:
890: ELSE

Line 892: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||

888: END IF;
889:
890: ELSE
891:
892: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||
893: ' Contract Number ' || cont_head_rec.contract_number);
894: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In the else part ' || l_return_status);
895:
896: END IF;

Line 894: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In the else part ' || l_return_status);

890: ELSE
891:
892: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||
893: ' Contract Number ' || cont_head_rec.contract_number);
894: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In the else part ' || l_return_status);
895:
896: END IF;
897:
898: ELSE

Line 900: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Funding not Available');

896: END IF;
897:
898: ELSE
899:
900: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Funding not Available');
901:
902: END IF;
903:
904: END LOOP;

Line 906: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');

902: END IF;
903:
904: END LOOP;
905:
906: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
907: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
908: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
909: l_count || ' contracts');
910: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');

Line 907: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');

903:
904: END LOOP;
905:
906: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
907: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
908: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
909: l_count || ' contracts');
910: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
911:

Line 908: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||

904: END LOOP;
905:
906: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
907: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
908: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
909: l_count || ' contracts');
910: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
911:
912: EXCEPTION

Line 910: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');

906: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
907: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
908: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
909: l_count || ' contracts');
910: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
911:
912: EXCEPTION
913:
914: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

Line 916: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');

912: EXCEPTION
913:
914: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
915:
916: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');
917: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
918: IF (l_error_msg_rec.COUNT > 0) THEN
919: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
920: LOOP

Line 921: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));

917: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
918: IF (l_error_msg_rec.COUNT > 0) THEN
919: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
920: LOOP
921: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));
922: END LOOP;
923: END IF;
924:
925: WHEN OTHERS THEN

Line 930: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');

926:
927: p_errbuf := SQLERRM;
928: p_retcode := 2;
929:
930: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');
931: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
932: IF (l_error_msg_rec.COUNT > 0) THEN
933: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
934: LOOP

Line 935: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));

931: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
932: IF (l_error_msg_rec.COUNT > 0) THEN
933: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
934: LOOP
935: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));
936: END LOOP;
937: END IF;
938:
939: END CALC_INTEREST_PERD;