DBA Data[Home] [Help]

APPS.OKL_INTEREST_CALC_PVT dependencies on FND_FILE

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

683: p_msg_name => 'OKL_CNTR_NO_INVALID',
684: p_token1 => 'CONTRACT_NUMBER',
685: p_token1_value => p_contract_number);
686: ELSE
687: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Contract Number ' || p_contract_number ||
688: ' is not Valid');
689:
690: END IF;
691:

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

713: IF (p_mode = 'ONLINE') THEN
714: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
715: p_msg_name => 'OKL_DAYS_IN_YEAR_NOT_FOUND');
716: ELSE
717: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Number of Days in Year');
718: END IF;
719: RAISE OKL_API.G_EXCEPTION_ERROR;
720: END IF;
721: -- gboomina bug 4900213 - End

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

728: IF (p_mode = 'ONLINE') THEN
729: OKL_API.SET_MESSAGE(p_app_name => g_app_name,
730: p_msg_name => 'OKL_INTR_NAME_NOT_FOUND');
731: ELSE
732: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error : Could not get Interest Rate '
733: || 'Name in the Rules');
734:
735: END IF;
736: CLOSE indx_csr;

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

753: p_msg_name => 'OKL_INTR_RATE_NOT_FOUND',
754: p_token1 => 'INTR_DATE',
755: p_token1_value => to_char(change_rec.change_date - 1,'DD-MM-YY'));
756: ELSE
757: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Rate is not available for ' ||
758: to_char(change_rec.change_date-1,'DD-MON-YY'));
759: END IF;
760:
761: CLOSE int_max_csr;

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

785: p_msg_name => 'OKL_INTR_RATE_NOT_FOUND',
786: p_token1 => 'INTR_DATE',
787: p_token1_value => to_char(p_end_date,'DD-MM-YY'));
788: ELSE
789: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Rate is not available for ' ||
790: to_char(p_end_date,'DD-MON-YY'));
791: END IF;
792:
793: CLOSE int_max_csr;

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

925: -- and will be used for further calculations
926:
927: l_int_calc_upto := FND_DATE.CANONICAL_TO_DATE(p_calc_upto);
928:
929: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Given Interest Calculation Upto Date : ' || l_int_calc_upto);
930: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Starting the Interest Calculation Process');
931:
932: OKL_ACCOUNTING_UTIL.get_period_info(p_date => l_int_calc_upto,
933: p_period_name => l_period_name,

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

926:
927: l_int_calc_upto := FND_DATE.CANONICAL_TO_DATE(p_calc_upto);
928:
929: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Given Interest Calculation Upto Date : ' || l_int_calc_upto);
930: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Starting the Interest Calculation Process');
931:
932: OKL_ACCOUNTING_UTIL.get_period_info(p_date => l_int_calc_upto,
933: p_period_name => l_period_name,
934: p_start_date => l_start_date,

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

938: -- the variable l_period_end_date anywhere as Interest Calculation Upto is the correct end date
939:
940: IF (l_start_date IS NULL) THEN
941:
942: FND_FILE.PUT_LINE(FND_FILE.LOG, 'The Period ' || l_period_name || ' is Invalid');
943: RAISE OKL_API.G_EXCEPTION_ERROR;
944:
945: END IF;
946:

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

947: FOR cont_head_rec IN cont_head_csr
948:
949: LOOP
950:
951: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Calculating Interest for Contract Number: ' ||
952: cont_head_rec.contract_number);
953: l_last_calc_date := cont_head_rec.last_calc_date;
954: l_contract_start_date := cont_head_rec.start_date;
955: l_end_date := l_int_calc_upto;

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

962:
963: -- If l_last_calc_date is NULL then it means that no funding is available
964: -- for the contract
965:
966: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Last calculation Date was ' || l_last_calc_Date);
967:
968: -- If the Interest Calculation Upto is given as more than the contract start date
969: -- then Interest should be calculated one day prior to the start date
970:

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

969: -- then Interest should be calculated one day prior to the start date
970:
971: IF l_contract_start_date < l_end_date THEN
972: l_end_date := l_contract_start_date - 1;
973: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest will be calculated only upto contract start date for this contract : '||
974: cont_head_rec.contract_number);
975: END IF;
976:
977:

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

983: p_mode => 'BATCH',
984: x_amount => l_amount,
985: x_return_status => l_return_status);
986:
987: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Total amount calculated was ' || l_amount);
988: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation was made upto ' || l_end_date);
989:
990: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
991:

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

984: x_amount => l_amount,
985: x_return_status => l_return_status);
986:
987: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Total amount calculated was ' || l_amount);
988: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation was made upto ' || l_end_date);
989:
990: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
991:
992: SAVEPOINT CREATE_TRX_ACCT;

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

1001:
1002: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1003: l_count := l_count + 1;
1004: COMMIT WORK;
1005: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Successfully Calculated. ' ||
1006: 'Total Amount was ' || OKL_ACCOUNTING_UTIL.ROUND_AMOUNT(p_amount => l_amount,
1007: p_currency_code => OKL_ACCOUNTING_UTIL.get_func_curr_code));
1008: ELSE
1009: ROLLBACK TO CREATE_TRX_ACCT;

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

1006: 'Total Amount was ' || OKL_ACCOUNTING_UTIL.ROUND_AMOUNT(p_amount => l_amount,
1007: p_currency_code => OKL_ACCOUNTING_UTIL.get_func_curr_code));
1008: ELSE
1009: ROLLBACK TO CREATE_TRX_ACCT;
1010: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||
1011: 'Contract Number ' || cont_head_rec.contract_number);
1012:
1013: -- Commented out code to fix bug 3695764
1014:

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

1016: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
1017: IF (l_error_msg_rec.COUNT > 0) THEN
1018: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
1019: LOOP
1020: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));
1021: END LOOP;
1022: END IF;
1023: */
1024:

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

1031: p_encoded => Fnd_Api.g_false,
1032: p_data => lv_msg_text,
1033: p_msg_index_out => lv_msg_count);
1034:
1035: Fnd_File.PUT_LINE(Fnd_File.LOG, lv_msg_text);
1036:
1037: END IF;
1038:
1039: ELSE

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

1037: END IF;
1038:
1039: ELSE
1040:
1041: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||
1042: ' Contract Number ' || cont_head_rec.contract_number);
1043: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In the else part ' || l_return_status);
1044:
1045: END IF;

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

1039: ELSE
1040:
1041: FND_FILE.PUT_LINE(FND_FILE.LOG, 'There was a problem calculating interest for ' ||
1042: ' Contract Number ' || cont_head_rec.contract_number);
1043: FND_FILE.PUT_LINE(FND_FILE.LOG, 'In the else part ' || l_return_status);
1044:
1045: END IF;
1046:
1047: ELSE

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

1045: END IF;
1046:
1047: ELSE
1048:
1049: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Funding not Available');
1050:
1051: END IF;
1052:
1053: END LOOP;

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

1051: END IF;
1052:
1053: END LOOP;
1054:
1055: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1056: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1057: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
1058: l_count || ' contracts');
1059: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');

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

1052:
1053: END LOOP;
1054:
1055: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1056: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1057: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
1058: l_count || ' contracts');
1059: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
1060:

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

1053: END LOOP;
1054:
1055: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1056: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1057: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
1058: l_count || ' contracts');
1059: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
1060:
1061: EXCEPTION

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

1055: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1056: FND_FILE.PUT_LINE(FND_FILE.LOG, ' ');
1057: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest was successfully calculated for ' ||
1058: l_count || ' contracts');
1059: FND_FILE.PUT_LINE(FND_FILE.LOG, '***Successful End of Interest Calculation Process***');
1060:
1061: EXCEPTION
1062:
1063: WHEN Okl_Api.G_EXCEPTION_ERROR THEN

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

1061: EXCEPTION
1062:
1063: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1064:
1065: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');
1066: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
1067: IF (l_error_msg_rec.COUNT > 0) THEN
1068: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
1069: LOOP

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

1066: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
1067: IF (l_error_msg_rec.COUNT > 0) THEN
1068: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
1069: LOOP
1070: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));
1071: END LOOP;
1072: END IF;
1073:
1074: WHEN OTHERS THEN

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

1075:
1076: p_errbuf := SQLERRM;
1077: p_retcode := 2;
1078:
1079: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Interest Calculation Process Aborted');
1080: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
1081: IF (l_error_msg_rec.COUNT > 0) THEN
1082: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
1083: LOOP

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

1080: Okl_Accounting_Util.GET_ERROR_MESSAGE(l_error_msg_rec);
1081: IF (l_error_msg_rec.COUNT > 0) THEN
1082: FOR i IN l_error_msg_rec.FIRST..l_error_msg_rec.LAST
1083: LOOP
1084: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_msg_rec(i));
1085: END LOOP;
1086: END IF;
1087:
1088: END CALC_INTEREST_PERD;