DBA Data[Home] [Help]

APPS.OKL_VARIABLE_INTEREST_PVT dependencies on FND_FILE

Line 201: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, p_message);

197: ------------------------------------------------------------------------------
198:
199: PROCEDURE print_line (p_message IN VARCHAR2) IS
200: BEGIN
201: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, p_message);
202: EXCEPTION
203: WHEN OTHERS THEN
204: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN print_line: '||SQLERRM);
205: END print_line;

Line 204: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN print_line: '||SQLERRM);

200: BEGIN
201: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, p_message);
202: EXCEPTION
203: WHEN OTHERS THEN
204: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN print_line: '||SQLERRM);
205: END print_line;
206:
207: ------------------------------------------------------------------------------
208: -- PROCEDURE print

Line 218: FND_FILE.PUT(FND_FILE.OUTPUT, p_message);

214: ------------------------------------------------------------------------------
215: /* Included this procedure to avoid GSCC error file.sql.26 */
216: PROCEDURE print(p_message IN VARCHAR2) IS
217: BEGIN
218: FND_FILE.PUT(FND_FILE.OUTPUT, p_message);
219: EXCEPTION
220: WHEN OTHERS THEN
221: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN print_line: '||SQLERRM);
222: END print;

Line 221: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN print_line: '||SQLERRM);

217: BEGIN
218: FND_FILE.PUT(FND_FILE.OUTPUT, p_message);
219: EXCEPTION
220: WHEN OTHERS THEN
221: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, '** EXCEPTION IN print_line: '||SQLERRM);
222: END print;
223:
224: ------------------------------------------------------------------------------
225: -- PROCEDURE print_debug

Line 236: FND_FILE.PUT_LINE (FND_FILE.LOG, p_message);

232:
233: PROCEDURE print_debug (p_message IN VARCHAR2) IS
234: BEGIN
235: -- IF ( G_DEBUG = 'Y' ) THEN
236: FND_FILE.PUT_LINE (FND_FILE.LOG, p_message);
237: --OKL_DEBUG_PUB.logmessage(p_message, 25);
238: -- dbms_output.put_line(p_message);
239: -- END IF;
240: EXCEPTION

Line 242: FND_FILE.PUT_LINE (FND_FILE.LOG, '** EXCEPTION IN print_line: '||SQLERRM);

238: -- dbms_output.put_line(p_message);
239: -- END IF;
240: EXCEPTION
241: WHEN OTHERS THEN
242: FND_FILE.PUT_LINE (FND_FILE.LOG, '** EXCEPTION IN print_line: '||SQLERRM);
243: END print_debug;
244:
245: ------------------------------------------------------------------------------
246: -- PROCEDURE print_error_message

Line 256: FND_FILE.PUT_LINE (FND_FILE.LOG, p_message);

252: ------------------------------------------------------------------------------
253:
254: PROCEDURE print_error_message (p_message IN VARCHAR2) IS
255: BEGIN
256: FND_FILE.PUT_LINE (FND_FILE.LOG, p_message);
257: EXCEPTION
258: WHEN OTHERS THEN
259: FND_FILE.PUT_LINE (FND_FILE.LOG, '** EXCEPTION IN print_line: '||SQLERRM);
260: END print_error_message;

Line 259: FND_FILE.PUT_LINE (FND_FILE.LOG, '** EXCEPTION IN print_line: '||SQLERRM);

255: BEGIN
256: FND_FILE.PUT_LINE (FND_FILE.LOG, p_message);
257: EXCEPTION
258: WHEN OTHERS THEN
259: FND_FILE.PUT_LINE (FND_FILE.LOG, '** EXCEPTION IN print_line: '||SQLERRM);
260: END print_error_message;
261:
262: ------------------------------------------------------------------------------
263: -- PROCEDURE report_error

Line 1954: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Calculating Interest');

1950: -----------------------------------------------------------------
1951:
1952: l_interest_rec := p_interest_rec;
1953:
1954: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Calculating Interest');
1955: print_debug('In Interest Calculating Procedure');
1956: -----------------------------------------------------------------
1957: -- Derive Variable Interest Basis from Rules
1958: -----------------------------------------------------------------

Line 2015: --FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'In Type '||l_interest_rec.variable_method);

2011: l_interest_rec.interest_method := lx_rulv_rec.rule_information3;
2012: l_method_of_calculation := lx_rulv_rec.rule_information5;
2013:
2014: print_debug('In Type: '||l_interest_rec.variable_method);
2015: --FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'In Type '||l_interest_rec.variable_method);
2016: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: '||l_interest_rec.variable_method);
2017:
2018: open c_last_int_rate(l_interest_rec.khr_id);
2019: fetch c_last_int_rate into l_date,l_last_int_rate;

Line 2016: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: '||l_interest_rec.variable_method);

2012: l_method_of_calculation := lx_rulv_rec.rule_information5;
2013:
2014: print_debug('In Type: '||l_interest_rec.variable_method);
2015: --FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'In Type '||l_interest_rec.variable_method);
2016: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: '||l_interest_rec.variable_method);
2017:
2018: open c_last_int_rate(l_interest_rec.khr_id);
2019: fetch c_last_int_rate into l_date,l_last_int_rate;
2020: l_first_time_calc := FALSE;

Line 2052: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Element Date: '|| l_due_date);

2048: x_return_status => x_return_status,
2049: x_msg_count => x_msg_count,
2050: x_msg_data => x_msg_data);
2051:
2052: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Element Date: '|| l_due_date);
2053:
2054: print_debug('Stream Element Date: '||l_due_date);
2055:
2056: else

Line 2073: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Start Date: '||l_interest_rec.start_date);

2069:
2070: print_debug('Interest Start Date: '||l_interest_rec.start_date||
2071: ' Contract Start Date: '||l_contract_start_date ||
2072: ' Contract End Date: '||l_contract_end_date);
2073: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Start Date: '||l_interest_rec.start_date);
2074: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract Start Date: '||l_contract_start_date);
2075: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract End Date: '||l_contract_end_date);
2076:
2077: x_interest_rec.interest_amount := 0;

Line 2074: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract Start Date: '||l_contract_start_date);

2070: print_debug('Interest Start Date: '||l_interest_rec.start_date||
2071: ' Contract Start Date: '||l_contract_start_date ||
2072: ' Contract End Date: '||l_contract_end_date);
2073: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Start Date: '||l_interest_rec.start_date);
2074: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract Start Date: '||l_contract_start_date);
2075: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract End Date: '||l_contract_end_date);
2076:
2077: x_interest_rec.interest_amount := 0;
2078: ------------------------------------------------------------

Line 2075: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract End Date: '||l_contract_end_date);

2071: ' Contract Start Date: '||l_contract_start_date ||
2072: ' Contract End Date: '||l_contract_end_date);
2073: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Start Date: '||l_interest_rec.start_date);
2074: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract Start Date: '||l_contract_start_date);
2075: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Contract End Date: '||l_contract_end_date);
2076:
2077: x_interest_rec.interest_amount := 0;
2078: ------------------------------------------------------------
2079: -- Derive Effective Interest Rate

Line 2087: -- FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: '||l_interest_rec.variable_method);

2083:
2084: print_debug('Method of Calculation: '||l_interest_rec.variable_method||
2085: ' Base Rate: '||l_interest_rec.base_rate);
2086:
2087: -- FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: '||l_interest_rec.variable_method);
2088: IF l_interest_rec.variable_method = 'FIXEDADJUST' THEN
2089:
2090: --print_debug('Index Name: ' || to_char(l_interest_rec.index_name));
2091: OPEN c_implicit_rate(l_interest_rec.index_name,l_interest_rec.start_date);

Line 2105: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Rate: '||l_interest_rec.effective_rate);

2101: END IF;
2102:
2103: x_interest_rec.effective_rate := l_interest_rec.effective_rate;
2104:
2105: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Rate: '||l_interest_rec.effective_rate);
2106: print_debug('Implicit Rate: '||l_interest_rec.effective_rate);
2107:
2108: ELSIF l_interest_rec.variable_method = 'FLOAT' THEN
2109:

Line 2110: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_interest_rec.start_date||

2106: print_debug('Implicit Rate: '||l_interest_rec.effective_rate);
2107:
2108: ELSIF l_interest_rec.variable_method = 'FLOAT' THEN
2109:
2110: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_interest_rec.start_date||
2111: ' , Interest End Date: '||l_interest_rec.end_date);
2112: print_debug('Params for Interest Days Cursor: Start Date: '||l_interest_rec.start_date||
2113: ' End Date: '||l_interest_rec.end_date);
2114:

Line 2120: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'1 VALID_FROM: '||r_days_rate.VALID_FROM ||

2116: LOOP
2117:
2118: if(l_days_in_month = '30') THEN
2119: if(r_days_rate.VALID_FROM = l_contract_start_date or r_days_rate.VALID_FROM <> l_interest_rec.start_date) THEN
2120: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'1 VALID_FROM: '||r_days_rate.VALID_FROM ||
2121: 'VALID_UNTIL: ' || r_days_rate.VALID_UNTIL);
2122: print_debug('No. of Days in Month in Contract Start Date');
2123: null;
2124: else

Line 2126: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'2 VALID_FROM: '||r_days_rate.VALID_FROM ||

2122: print_debug('No. of Days in Month in Contract Start Date');
2123: null;
2124: else
2125: print_debug('No. of Days in Month NOT in Contract Start Date');
2126: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'2 VALID_FROM: '||r_days_rate.VALID_FROM ||
2127: 'VALID_UNTIL: ' || r_days_rate.VALID_UNTIL);
2128: --r_days_rate.VALID_FROM := r_days_rate.VALID_FROM +1;
2129: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'3 VALID_FROM: '||r_days_rate.VALID_FROM ||
2130: 'VALID_UNTIL: ' || r_days_rate.VALID_UNTIL);

Line 2129: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'3 VALID_FROM: '||r_days_rate.VALID_FROM ||

2125: print_debug('No. of Days in Month NOT in Contract Start Date');
2126: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'2 VALID_FROM: '||r_days_rate.VALID_FROM ||
2127: 'VALID_UNTIL: ' || r_days_rate.VALID_UNTIL);
2128: --r_days_rate.VALID_FROM := r_days_rate.VALID_FROM +1;
2129: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'3 VALID_FROM: '||r_days_rate.VALID_FROM ||
2130: 'VALID_UNTIL: ' || r_days_rate.VALID_UNTIL);
2131: end if;
2132: print_debug('Valid From: '||r_days_rate.VALID_FROM||' Valid To: '||r_days_rate.VALID_UNTIL);
2133:

Line 2141: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'5 VALID_FROM: '||r_days_rate.VALID_FROM ||

2137: x_return_status);
2138: print_debug('No Of Days: '||l_calc_days);
2139: else
2140:
2141: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'5 VALID_FROM: '||r_days_rate.VALID_FROM ||
2142: 'VALID_UNTIL: ' || r_days_rate.VALID_UNTIL);
2143: l_calc_days := (r_days_rate.VALID_UNTIL - r_days_rate.VALID_FROM + 1);
2144: end if;
2145:

Line 2153: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'No. of Days in Month: '||l_days_in_month);

2149:
2150: print_debug('No. of Days in Month: '||l_days_in_month||
2151: ' Interest Calc. Days: '||l_calc_days);
2152:
2153: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'No. of Days in Month: '||l_days_in_month);
2154: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Calc. Days: '||l_calc_days);
2155:
2156: l_year_days := l_interest_rec.days_in_year;
2157:

Line 2154: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Calc. Days: '||l_calc_days);

2150: print_debug('No. of Days in Month: '||l_days_in_month||
2151: ' Interest Calc. Days: '||l_calc_days);
2152:
2153: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'No. of Days in Month: '||l_days_in_month);
2154: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Calc. Days: '||l_calc_days);
2155:
2156: l_year_days := l_interest_rec.days_in_year;
2157:
2158: if(l_year_days = 'ACTUAL') THEN

Line 2188: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Effective Interest Rate: '||l_interest_rec.effective_rate);

2184: l_interest_rec.effective_rate := l_present_int_rate;
2185:
2186: print_debug('Effective Interest Rate: '||l_interest_rec.effective_rate||' Principal: '||l_interest_rec.Principle
2187: ||' Month Days: '||l_calc_days||' Year Days: '||l_year_days);
2188: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Effective Interest Rate: '||l_interest_rec.effective_rate);
2189: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Principal: '||l_interest_rec.Principle);
2190:
2191: -- l_days_rate_tot := l_days_rate_tot + r_days_rate.DAYS*l_present_int_rate;
2192:

Line 2189: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Principal: '||l_interest_rec.Principle);

2185:
2186: print_debug('Effective Interest Rate: '||l_interest_rec.effective_rate||' Principal: '||l_interest_rec.Principle
2187: ||' Month Days: '||l_calc_days||' Year Days: '||l_year_days);
2188: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Effective Interest Rate: '||l_interest_rec.effective_rate);
2189: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Principal: '||l_interest_rec.Principle);
2190:
2191: -- l_days_rate_tot := l_days_rate_tot + r_days_rate.DAYS*l_present_int_rate;
2192:
2193: l_interest_amount := OKL_ACCOUNTING_UTIL.round_amount((l_interest_rec.Principle * l_interest_rec.effective_rate/100)* (l_calc_days/l_year_days),l_currency_code);

Line 2198: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Amount: '||l_interest_amount||' Total Interest Amount: '||x_interest_rec.interest_amount);

2194:
2195: x_interest_rec.interest_amount := l_interest_amount+ x_interest_rec.interest_amount;
2196:
2197: print_debug('Interest Amount: '||l_interest_amount||' Total Interest Amount: '||x_interest_rec.interest_amount);
2198: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'Interest Amount: '||l_interest_amount||' Total Interest Amount: '||x_interest_rec.interest_amount);
2199:
2200: END LOOP;
2201:
2202: -- l_interest_rec.effective_rate := l_days_rate_tot/l_days_tot;

Line 2454: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');

2450: FOR r_contracts_csr IN c_contracts_csr ( p_contract_number, p_to_date) LOOP
2451: print_debug ('--------------------------------------------------------------------------');
2452: print_debug ('--------------------------------------------------------------------------');
2453: print_debug ('Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2454: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2455: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2456: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2457: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Start Date: ' || r_contracts_csr.start_date);
2458: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Last Interest Calculation Date: ' ||r_contracts_csr.date_last_interim_interest_cal);

Line 2455: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');

2451: print_debug ('--------------------------------------------------------------------------');
2452: print_debug ('--------------------------------------------------------------------------');
2453: print_debug ('Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2454: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2455: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2456: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2457: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Start Date: ' || r_contracts_csr.start_date);
2458: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Last Interest Calculation Date: ' ||r_contracts_csr.date_last_interim_interest_cal);
2459:

Line 2456: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);

2452: print_debug ('--------------------------------------------------------------------------');
2453: print_debug ('Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2454: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2455: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2456: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2457: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Start Date: ' || r_contracts_csr.start_date);
2458: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Last Interest Calculation Date: ' ||r_contracts_csr.date_last_interim_interest_cal);
2459:
2460: print_debug('Contract Number: '||r_contracts_csr.contract_number||' Contract Start Date: '||

Line 2457: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Start Date: ' || r_contracts_csr.start_date);

2453: print_debug ('Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2454: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2455: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2456: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2457: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Start Date: ' || r_contracts_csr.start_date);
2458: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Last Interest Calculation Date: ' ||r_contracts_csr.date_last_interim_interest_cal);
2459:
2460: print_debug('Contract Number: '||r_contracts_csr.contract_number||' Contract Start Date: '||
2461: r_contracts_csr.start_date||' Last Interest Calculation Date: '

Line 2458: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Last Interest Calculation Date: ' ||r_contracts_csr.date_last_interim_interest_cal);

2454: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2455: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'--------------------------------------------------------------------------');
2456: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Start Processing for Contract Number: ' ||r_contracts_csr.contract_number);
2457: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Start Date: ' || r_contracts_csr.start_date);
2458: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Last Interest Calculation Date: ' ||r_contracts_csr.date_last_interim_interest_cal);
2459:
2460: print_debug('Contract Number: '||r_contracts_csr.contract_number||' Contract Start Date: '||
2461: r_contracts_csr.start_date||' Last Interest Calculation Date: '
2462: ||r_contracts_csr.date_last_interim_interest_cal);

Line 2473: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose VARIABLE_INTEREST retrieved.');

2469: x_return_status => l_return_status,
2470: x_primary_sty_id => l_sty_id );
2471:
2472: IF (l_return_status = 'S' ) THEN
2473: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose VARIABLE_INTEREST retrieved.');
2474: print_debug (' -- Stream Id for purpose VARIABLE_INTEREST retrieved.');
2475: ELSE
2476: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose VARIABLE_INTEREST.');
2477: END IF;

Line 2476: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose VARIABLE_INTEREST.');

2472: IF (l_return_status = 'S' ) THEN
2473: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Stream Id for purpose VARIABLE_INTEREST retrieved.');
2474: print_debug (' -- Stream Id for purpose VARIABLE_INTEREST retrieved.');
2475: ELSE
2476: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Could not retrieve Stream Id for purpose VARIABLE_INTEREST.');
2477: END IF;
2478:
2479: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2480: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2501: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: ' || l_reamort);

2497: x_msg_data => x_msg_data,
2498: x_rulv_rec => lx_rulv_rec);
2499: l_reamort := lx_rulv_rec.rule_information5;
2500:
2501: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Method of Calculation: ' || l_reamort);
2502:
2503: if (r_contracts_csr.date_last_interim_interest_cal is not null
2504: and r_contracts_csr.date_last_interim_interest_cal > r_contracts_csr.start_date) THEN
2505: l_stm_date := r_contracts_csr.date_last_interim_interest_cal;

Line 2523: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'ReAmort Date: '||l_reamort_date);

2519: end if;
2520:
2521: print_debug('Stream Start Date: '||l_stm_date);
2522: print_debug('ReAmort Date: '||l_reamort_date);
2523: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'ReAmort Date: '||l_reamort_date);
2524:
2525: l_end_of_process := FALSE;
2526:
2527: IF l_reamort = 'REAMORT' THEN

Line 2532: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Reamort date or contract start date is past the provided end date.');

2528: FOR c_next_reamort_date_csr in l_next_reamort_date_csr(r_contracts_csr.khr_id) LOOP
2529: print_debug('Length of To Due Date: ' || length(p_to_date));
2530: print_debug('Next ReAmort Date: '||c_next_reamort_date_csr.next_reamort_date || ' To Due Date: ' || p_to_date);
2531: IF (trunc(c_next_reamort_date_csr.next_reamort_date) > trunc(nvl(p_to_date, sysdate))) THEN
2532: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Reamort date or contract start date is past the provided end date.');
2533: x_return_status := okl_api.G_RET_STS_SUCCESS;
2534: l_end_of_process := TRUE;
2535: END IF;
2536: END LOOP;

Line 2561: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Start Date: '||l_stm_date);

2557: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2558: END IF;
2559:
2560: ELSE
2561: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Start Date: '||l_stm_date);
2562: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Id: '||r_contracts_csr.khr_id);
2563: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'To Date: '||p_to_date);
2564:
2565: print_debug('Stream Start Date: '||l_stm_date||' KHR ID: '||r_contracts_csr.khr_id||

Line 2562: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Id: '||r_contracts_csr.khr_id);

2558: END IF;
2559:
2560: ELSE
2561: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Start Date: '||l_stm_date);
2562: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Id: '||r_contracts_csr.khr_id);
2563: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'To Date: '||p_to_date);
2564:
2565: print_debug('Stream Start Date: '||l_stm_date||' KHR ID: '||r_contracts_csr.khr_id||
2566: ' To Date: '||p_to_date);

Line 2563: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'To Date: '||p_to_date);

2559:
2560: ELSE
2561: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Start Date: '||l_stm_date);
2562: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Contract Id: '||r_contracts_csr.khr_id);
2563: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'To Date: '||p_to_date);
2564:
2565: print_debug('Stream Start Date: '||l_stm_date||' KHR ID: '||r_contracts_csr.khr_id||
2566: ' To Date: '||p_to_date);
2567:

Line 2597: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Element Date: '|| l_due_date);

2593: --EXIT;
2594: l_end_of_process := TRUE;
2595: end if;
2596:
2597: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Element Date: '|| l_due_date);
2598:
2599: print_debug('Stream Element Date: '||l_due_date);
2600:
2601: x_return_status := OKL_API.G_RET_STS_SUCCESS;

Line 2609: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Element Date: '||l_due_date|| ', Bill Date: '||l_bill_date);

2605: ----------------------------------------------------
2606: print_debug('Bill Date: '||l_due_date);
2607: print_debug('Bill Date: '||l_bill_date);
2608:
2609: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Stream Element Date: '||l_due_date|| ', Bill Date: '||l_bill_date);
2610:
2611: IF (l_bill_date is null OR
2612: l_bill_date <> l_due_date OR
2613: (l_bill_date is not null and l_end_of_process)) THEN

Line 2641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Updated the TAI record successfully');

2637: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2638: RAISE Okl_Api.G_EXCEPTION_ERROR;
2639: END IF;
2640: print_debug('Updated the TAI record successfully');
2641: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Updated the TAI record successfully');
2642: COMMIT;
2643: END IF;
2644:
2645: ---------------------------------------------

Line 2687: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Header Created.');

2683: ,i_taiv_rec
2684: ,r_taiv_rec);
2685:
2686: IF (l_return_status = 'S' ) THEN
2687: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Header Created.');
2688: print_debug (' -- Internal TXN Header Created.');
2689: ELSE
2690: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Header.');
2691: END IF;

Line 2690: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Header.');

2686: IF (l_return_status = 'S' ) THEN
2687: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Header Created.');
2688: print_debug (' -- Internal TXN Header Created.');
2689: ELSE
2690: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Header.');
2691: END IF;
2692:
2693: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2694: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2787: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Line Created.');

2783: ,i_tilv_rec
2784: ,r_tilv_rec);
2785:
2786: IF (l_return_status = 'S' ) THEN
2787: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Line Created.');
2788: print_debug (' -- Internal TXN Line Created.');
2789: ELSE
2790: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Line.');
2791: END IF;

Line 2790: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Line.');

2786: IF (l_return_status = 'S' ) THEN
2787: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Line Created.');
2788: print_debug (' -- Internal TXN Line Created.');
2789: ELSE
2790: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Line.');
2791: END IF;
2792:
2793: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2794: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2842: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Amount Back: '||lx_interest_rec.interest_amount);

2838: x_interest_rec => lx_interest_rec);
2839:
2840: l_ste_amount := lx_interest_rec.interest_amount;
2841: print_debug('Interest Amount Back: '||lx_interest_rec.interest_amount);
2842: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Amount Back: '||lx_interest_rec.interest_amount);
2843: print_debug('Interest Rate Back: '||lx_interest_rec.effective_rate);
2844:
2845: ------------------------------------------------------------
2846: -- Derive Stream Type

Line 2868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'No Streams found.');

2864:
2865: OPEN c_tran_num_csr;
2866: FETCH c_tran_num_csr INTO l_stmv_rec.transaction_number;
2867: CLOSE c_tran_num_csr;
2868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'No Streams found.');
2869: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Transaction Number : ' ||l_stmv_rec.transaction_number);
2870: print_debug('No Streams : '||l_stmv_rec.transaction_number);
2871:
2872: l_stmv_rec.sty_id := l_sty_id;

Line 2869: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Transaction Number : ' ||l_stmv_rec.transaction_number);

2865: OPEN c_tran_num_csr;
2866: FETCH c_tran_num_csr INTO l_stmv_rec.transaction_number;
2867: CLOSE c_tran_num_csr;
2868: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'No Streams found.');
2869: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Transaction Number : ' ||l_stmv_rec.transaction_number);
2870: print_debug('No Streams : '||l_stmv_rec.transaction_number);
2871:
2872: l_stmv_rec.sty_id := l_sty_id;
2873: l_stmv_rec.khr_id := r_contracts_csr.khr_id;

Line 2891: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Success in Stream Creation.');

2887: x_stmv_rec => lx_stmv_rec);
2888:
2889: IF (x_return_status = 'S' ) THEN
2890: print_debug (' -- Success in Stream Creation.');
2891: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Success in Stream Creation.');
2892: ELSE
2893: print_debug (' -- Error: '||x_msg_data);
2894: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Error: '||x_msg_data);
2895: END IF;

Line 2894: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Error: '||x_msg_data);

2890: print_debug (' -- Success in Stream Creation.');
2891: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Success in Stream Creation.');
2892: ELSE
2893: print_debug (' -- Error: '||x_msg_data);
2894: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Error: '||x_msg_data);
2895: END IF;
2896:
2897: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2898: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2909: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Id : '||to_char(l_selv_rec.stm_id));

2905: print_debug ('Stm ID: '||l_selv_rec.stm_id);
2906:
2907: END IF;
2908:
2909: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Id : '||to_char(l_selv_rec.stm_id));
2910: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id: '||to_char(l_tilv_rec.sty_id));
2911:
2912: l_selv_rec.accrued_yn := 'N';
2913: l_selv_rec.comments := 'Variable Interest';

Line 2910: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id: '||to_char(l_tilv_rec.sty_id));

2906:
2907: END IF;
2908:
2909: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Id : '||to_char(l_selv_rec.stm_id));
2910: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type Id: '||to_char(l_tilv_rec.sty_id));
2911:
2912: l_selv_rec.accrued_yn := 'N';
2913: l_selv_rec.comments := 'Variable Interest';
2914: l_selv_rec.stream_element_date := l_due_date;

Line 2940: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Success in Creating Stream Elements.');

2936: x_selv_rec => lx_selv_rec);
2937:
2938: IF (x_return_status = 'S' ) THEN
2939: print_debug (' -- Success in Creating Stream Elements.');
2940: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Success in Creating Stream Elements.');
2941: ELSE
2942: print_debug (' -- Error: '||x_msg_data);
2943: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Error in Creating Stream'||x_msg_data);
2944: END IF;

Line 2943: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Error in Creating Stream'||x_msg_data);

2939: print_debug (' -- Success in Creating Stream Elements.');
2940: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Success in Creating Stream Elements.');
2941: ELSE
2942: print_debug (' -- Error: '||x_msg_data);
2943: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- Error in Creating Stream'||x_msg_data);
2944: END IF;
2945:
2946:
2947: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2975: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Inserted .');

2971:
2972:
2973: IF (x_return_status = 'S' ) THEN
2974: print_debug (' -- IPM Inserted .');
2975: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Inserted .');
2976: ELSE
2977: print_debug (' -- IPM Error: '||x_msg_data);
2978: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Error.'||x_msg_data);
2979: END IF;

Line 2978: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Error.'||x_msg_data);

2974: print_debug (' -- IPM Inserted .');
2975: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Inserted .');
2976: ELSE
2977: print_debug (' -- IPM Error: '||x_msg_data);
2978: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Error.'||x_msg_data);
2979: END IF;
2980: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'After Inserting into Trx Params - Status: '||x_return_status);
2981:
2982: ----------------------------------------------------

Line 2980: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'After Inserting into Trx Params - Status: '||x_return_status);

2976: ELSE
2977: print_debug (' -- IPM Error: '||x_msg_data);
2978: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,' -- IPM Error.'||x_msg_data);
2979: END IF;
2980: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'After Inserting into Trx Params - Status: '||x_return_status);
2981:
2982: ----------------------------------------------------
2983: -- Populate required columns
2984: ----------------------------------------------------

Line 2985: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type: '||l_sty_id);

2981:
2982: ----------------------------------------------------
2983: -- Populate required columns
2984: ----------------------------------------------------
2985: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Stream Type: '||l_sty_id);
2986: print_debug (' -- line detail number: '||l_detail_number);
2987:
2988: i_tldv_rec.sty_id := l_sty_id;
2989: i_tldv_rec.amount := lx_interest_rec.interest_amount;

Line 3010: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Details Created.');

3006: ,i_tldv_rec
3007: ,r_tldv_rec);
3008:
3009: IF (l_return_status = 'S' ) THEN
3010: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Details Created.');
3011: print_debug (' -- Internal TXN Details Created.');
3012: ELSE
3013: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Internal TXN Details.');
3014: print_debug (' -- ERROR: Creating Internal TXN Details.');

Line 3013: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Internal TXN Details.');

3009: IF (l_return_status = 'S' ) THEN
3010: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Internal TXN Details Created.');
3011: print_debug (' -- Internal TXN Details Created.');
3012: ELSE
3013: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Creating Internal TXN Details.');
3014: print_debug (' -- ERROR: Creating Internal TXN Details.');
3015: FOR i in 1..x_msg_count
3016: LOOP
3017: FND_MSG_PUB.GET(

Line 3023: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);

3019: p_encoded => FND_API.G_FALSE,
3020: p_data => x_msg_data,
3021: p_msg_index_out => l_msg_index_out
3022: );
3023: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
3024: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
3025: print_debug('Error '||to_char(i)||': '||x_msg_data);
3026: print_debug('Message Index: '||l_msg_index_out);
3027: END LOOP;

Line 3024: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);

3020: p_data => x_msg_data,
3021: p_msg_index_out => l_msg_index_out
3022: );
3023: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
3024: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
3025: print_debug('Error '||to_char(i)||': '||x_msg_data);
3026: print_debug('Message Index: '||l_msg_index_out);
3027: END LOOP;
3028: END IF;

Line 3050: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Accounting Distributions Created.');

3046: ,x_msg_data
3047: ,l_bpd_acc_rec);
3048:
3049: IF (x_return_status = 'S' ) THEN
3050: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Accounting Distributions Created.');
3051: print_debug (' -- Accounting Distributions Created.');
3052: ELSE
3053: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Accounting Distributions NOT Created.');
3054: print_debug (' -- ERROR: Accounting Distributions NOT Created.');

Line 3053: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Accounting Distributions NOT Created.');

3049: IF (x_return_status = 'S' ) THEN
3050: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- Accounting Distributions Created.');
3051: print_debug (' -- Accounting Distributions Created.');
3052: ELSE
3053: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' -- ERROR: Accounting Distributions NOT Created.');
3054: print_debug (' -- ERROR: Accounting Distributions NOT Created.');
3055: FOR i in 1..x_msg_count
3056: LOOP
3057: FND_MSG_PUB.GET(

Line 3063: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);

3059: p_encoded => FND_API.G_FALSE,
3060: p_data => x_msg_data,
3061: p_msg_index_out => l_msg_index_out
3062: );
3063: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
3064: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
3065: print_debug('Error '||to_char(i)||': '||x_msg_data);
3066: print_debug('Message Index: '||l_msg_index_out);
3067: END LOOP;

Line 3064: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);

3060: p_data => x_msg_data,
3061: p_msg_index_out => l_msg_index_out
3062: );
3063: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
3064: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
3065: print_debug('Error '||to_char(i)||': '||x_msg_data);
3066: print_debug('Message Index: '||l_msg_index_out);
3067: END LOOP;
3068: END IF;

Line 3089: FND_FILE.PUT_LINE (FND_FILE.LOG, '===============================================================================');

3085: l_detail_number := l_detail_number + l_line_step;
3086:
3087:
3088:
3089: FND_FILE.PUT_LINE (FND_FILE.LOG, '===============================================================================');
3090:
3091: UPDATE okl_k_headers khr
3092: SET khr.date_last_interim_interest_cal = l_due_date
3093: where khr.id = r_contracts_csr.khr_id;

Line 3096: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'After Updating Contract Header : Status'||x_return_status);

3092: SET khr.date_last_interim_interest_cal = l_due_date
3093: where khr.id = r_contracts_csr.khr_id;
3094:
3095: l_last_interest_cal_date := l_due_date;
3096: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'After Updating Contract Header : Status'||x_return_status);
3097:
3098: END LOOP;
3099: --
3100: -- ---------------------------------------------------

Line 3106: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'End Processing for Contract Number: ' ||r_contracts_csr.contract_number);

3102: -- ---------------------------------------------------
3103: -- COMMIT;
3104: --
3105: END IF;
3106: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'End Processing for Contract Number: ' ||r_contracts_csr.contract_number);
3107: print_debug ('End Processing for Contract Number: ' ||r_contracts_csr.contract_number);
3108: END LOOP;
3109: print_debug('***End of Processing***');
3110:

Line 7012: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Line.');

7008:
7009: IF (x_return_status = 'S' ) THEN
7010: print_debug (' -- Internal TXN Line Created.');
7011: ELSE
7012: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- ERROR: Creating Internal TXN Line.');
7013: END IF;
7014:
7015: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
7016: print_error_message('Unexpected error raised in call to Okl_Txl_Ar_Inv_Lns_Pub.insert_txl_ar_inv_lns');

Line 7295: FND_FILE.PUT_LINE (FND_FILE.LOG, 'Creating Contract Transaction.');

7291: l_trxL_in_tbl(1).description := l_tcl_desc; --G_RAP_TCL_DESC;
7292: l_trxL_in_tbl(1).amount := p_amount;
7293: l_trxL_in_tbl(1).currency_code := G_CURRENCY_CODE;
7294:
7295: FND_FILE.PUT_LINE (FND_FILE.LOG, 'Creating Contract Transaction.');
7296: Okl_Trx_Contracts_Pub.create_trx_contracts(
7297: p_api_version => l_api_version,
7298: p_init_msg_list => p_init_msg_list,
7299: x_return_status => x_return_status,

Line 7328: FND_FILE.PUT_LINE ( FND_FILE.LOG, ' -- Creating Distributions. Supplied parameters:');

7324: ------------------------------------------------------------
7325: -- Derive and Insert Distribution Line
7326: ------------------------------------------------------------
7327:
7328: FND_FILE.PUT_LINE ( FND_FILE.LOG, ' -- Creating Distributions. Supplied parameters:');
7329:
7330: ------------------ Accounting Engine Calls --------------------------
7331: --START: Changes by dpsingh for SLA Uptake, Bug #5964482
7332: Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen (

Line 7340: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- Accounting engine called successfully ');

7336: x_return_status => x_return_status);
7337:
7338: print_debug('End Debug OKLRVARB.pls call Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen ');
7339: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
7340: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- Accounting engine called successfully ');
7341: ELSE
7342: FND_FILE.PUT_LINE (FND_FILE.LOG, '*=> ERROR : Calling Accounting engine.');
7343: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
7344: print_error_message('Unexpected error raised in call to Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen');

Line 7342: FND_FILE.PUT_LINE (FND_FILE.LOG, '*=> ERROR : Calling Accounting engine.');

7338: print_debug('End Debug OKLRVARB.pls call Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen ');
7339: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
7340: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- Accounting engine called successfully ');
7341: ELSE
7342: FND_FILE.PUT_LINE (FND_FILE.LOG, '*=> ERROR : Calling Accounting engine.');
7343: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
7344: print_error_message('Unexpected error raised in call to Okl_Acc_Call_Pvt.Okl_Populate_Acc_Gen');
7345: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
7346: ELSIF (x_return_Status = Okl_Api.G_RET_STS_ERROR) THEN

Line 7403: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- Accounting distributions created. ');

7399:
7400: print_debug('End Debug OKLRVARB.pls call Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST ');
7401:
7402: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
7403: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- Accounting distributions created. ');
7404: ELSE
7405: FND_FILE.PUT_LINE (FND_FILE.LOG, '*=> ERROR : Accounting distributions not created.'||x_msg_count || x_msg_data);
7406: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
7407: print_error_message('Unexpected error raised in call to Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST');

Line 7405: FND_FILE.PUT_LINE (FND_FILE.LOG, '*=> ERROR : Accounting distributions not created.'||x_msg_count || x_msg_data);

7401:
7402: IF ( x_return_status = okl_api.g_ret_sts_success) THEN
7403: FND_FILE.PUT_LINE (FND_FILE.LOG, ' -- Accounting distributions created. ');
7404: ELSE
7405: FND_FILE.PUT_LINE (FND_FILE.LOG, '*=> ERROR : Accounting distributions not created.'||x_msg_count || x_msg_data);
7406: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
7407: print_error_message('Unexpected error raised in call to Okl_Account_Dist_Pub.CREATE_ACCOUNTING_DIST');
7408: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
7409: ELSIF (x_return_Status = Okl_Api.G_RET_STS_ERROR) THEN

Line 9501: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Period Diff: '||l_diff_in_periods);

9497: i := i + 1;
9498: l_diff_in_periods := round(months_between(l_reamort_date,
9499: FND_DATE.canonical_to_date(r_pymt_csr.start_date)));
9500: print_debug('Period Diff: '||l_diff_in_periods);
9501: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Period Diff: '||l_diff_in_periods);
9502: If (l_diff_in_periods >= 1 and r_pymt_csr.number_periods > l_diff_in_periods)Then
9503: l_strm_lalevl_tbl(i).Rule_Information3 := l_diff_in_periods;
9504: else
9505: l_strm_lalevl_tbl(i).Rule_Information3 := r_pymt_csr.number_periods;

Line 9575: FND_FILE.PUT_LINE (FND_FILE.LOG,'After mass rebook Stream Table count: '|| x_strm_trx_tbl.count);

9571: );
9572:
9573: print_debug('After Mass Rebook status: '||x_return_status||' Error: '||x_msg_data);
9574: print_debug('After Mass Rebook x_strm_trx_tbl.count: '|| x_strm_trx_tbl.count);
9575: FND_FILE.PUT_LINE (FND_FILE.LOG,'After mass rebook Stream Table count: '|| x_strm_trx_tbl.count);
9576:
9577: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
9578: FOR i in 1..x_msg_count
9579: LOOP

Line 9586: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error: '||to_char(i)||': '||x_msg_data);

9582: p_encoded => FND_API.G_FALSE,
9583: p_data => x_msg_data,
9584: p_msg_index_out => l_msg_index_out
9585: );
9586: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error: '||to_char(i)||': '||x_msg_data);
9587: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
9588: print_debug('Error '||to_char(i)||': '||x_msg_data);
9589: print_debug('Message Index: '||l_msg_index_out);
9590: END LOOP;

Line 9587: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);

9583: p_data => x_msg_data,
9584: p_msg_index_out => l_msg_index_out
9585: );
9586: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error: '||to_char(i)||': '||x_msg_data);
9587: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
9588: print_debug('Error '||to_char(i)||': '||x_msg_data);
9589: print_debug('Message Index: '||l_msg_index_out);
9590: END LOOP;
9591:

Line 10318: FND_FILE.PUT_LINE (FND_FILE.LOG,'Initiating Super Trump Request');

10314:
10315: x_return_status := OKL_API.G_RET_STS_SUCCESS;
10316:
10317: print_debug('****Entering procedure INITIATE_REQUEST****');
10318: FND_FILE.PUT_LINE (FND_FILE.LOG,'Initiating Super Trump Request');
10319:
10320:
10321: OPEN c_chr_id(p_khr_id);
10322: FETCH c_chr_id INTO l_contract_number, l_start_date, G_DEAL_TYPE, G_INTEREST_CALCULATION_BASIS, G_AUTHORING_ORG_ID, l_remaining_term_in_months;

Line 10439: /*FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'From Date: ' || l_start_date);

10435: End if;
10436: End if;
10437: -- End by prasjain bug# 6142095
10438:
10439: /*FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'From Date: ' || l_start_date);
10440: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_start_date);
10441: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Periods: '||l_no_of_periods);
10442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Effective interest rate: '||lx_interest_rec.effective_rate);*/
10443: If l_rebook_flag Then -- Added by prasjian bug# 6142095

Line 10440: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_start_date);

10436: End if;
10437: -- End by prasjain bug# 6142095
10438:
10439: /*FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'From Date: ' || l_start_date);
10440: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_start_date);
10441: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Periods: '||l_no_of_periods);
10442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Effective interest rate: '||lx_interest_rec.effective_rate);*/
10443: If l_rebook_flag Then -- Added by prasjian bug# 6142095
10444: If (G_DEAL_TYPE = 'LOAN') THEN

Line 10441: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Periods: '||l_no_of_periods);

10437: -- End by prasjain bug# 6142095
10438:
10439: /*FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'From Date: ' || l_start_date);
10440: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_start_date);
10441: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Periods: '||l_no_of_periods);
10442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Effective interest rate: '||lx_interest_rec.effective_rate);*/
10443: If l_rebook_flag Then -- Added by prasjian bug# 6142095
10444: If (G_DEAL_TYPE = 'LOAN') THEN
10445: OKL_LA_STREAM_PUB.extract_params_loan_reamort(p_api_version => p_api_version,

Line 10442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Effective interest rate: '||lx_interest_rec.effective_rate);*/

10438:
10439: /*FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'From Date: ' || l_start_date);
10440: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Interest Start Date: '||l_start_date);
10441: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Periods: '||l_no_of_periods);
10442: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Effective interest rate: '||lx_interest_rec.effective_rate);*/
10443: If l_rebook_flag Then -- Added by prasjian bug# 6142095
10444: If (G_DEAL_TYPE = 'LOAN') THEN
10445: OKL_LA_STREAM_PUB.extract_params_loan_reamort(p_api_version => p_api_version,
10446: p_init_msg_list => p_init_msg_list,

Line 10664: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Principal: '||l_csm_loan_levels_tbl_in(l_loan_levels_cntr).amount);

10660: l_line_id_buf := l_csm_loan_levels_tbl_in(l_loan_levels_cntr).kle_loan_id;
10661: --end | 19-May-08 cklee fixed Bug 7043360 |
10662: END IF;
10663: --print_debug('Principal :'||l_csm_loan_levels_tbl_in(l_loan_levels_cntr).amount);
10664: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Principal: '||l_csm_loan_levels_tbl_in(l_loan_levels_cntr).amount);
10665: END IF;
10666:
10667: l_loan_levels_cntr := l_csm_loan_levels_tbl.next(l_loan_levels_cntr);
10668: END LOOP;

Line 10771: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Principal Balance: '||principal_amount);

10767:
10768: --principal_amount := get_tot_principal_amt(p_khr_id, null);
10769: -- CAll Extraction API
10770:
10771: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Principal Balance: '||principal_amount);
10772: --print_debug('Principal Balance: '||principal_amount);
10773:
10774: OKL_LA_STREAM_PUB.EXTRACT_PARAMS_LEASE(
10775: p_api_version => p_api_version,

Line 10796: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);

10792: p_encoded => FND_API.G_FALSE,
10793: p_data => x_msg_data,
10794: p_msg_index_out => l_msg_index_out
10795: );
10796: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
10797: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
10798: print_debug('Error '||to_char(i)||': '||x_msg_data);
10799: print_debug('Message Index: '||l_msg_index_out);
10800: END LOOP;

Line 10797: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);

10793: p_data => x_msg_data,
10794: p_msg_index_out => l_msg_index_out
10795: );
10796: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
10797: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
10798: print_debug('Error '||to_char(i)||': '||x_msg_data);
10799: print_debug('Message Index: '||l_msg_index_out);
10800: END LOOP;
10801:

Line 10957: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Residual amount : ' || l_csm_line_details_tbl(l_csm_line_details_ctr).residual_amount);

10953: print_debug('Asset id: ' || l_csm_line_details_tbl(l_csm_line_details_ctr).kle_asset_id || ' Asset principal balance: ' ||l_csm_line_details_tbl(l_csm_line_details_ctr).asset_cost);
10954: print_debug('Residual amount : ' || l_csm_line_details_tbl(l_csm_line_details_ctr).residual_amount);
10955: print_debug('Date delivery : ' || l_csm_line_details_tbl(l_csm_line_details_ctr).date_delivery);
10956: print_debug('Date funding : ' || l_csm_line_details_tbl(l_csm_line_details_ctr).date_funding);
10957: --FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Residual amount : ' || l_csm_line_details_tbl(l_csm_line_details_ctr).residual_amount);
10958:
10959: /* l_row_counter := l_csm_line_details_tbl.next(l_first_row);
10960: loop
10961: exit when l_row_counter is null;

Line 11004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);

11000: p_encoded => FND_API.G_FALSE,
11001: p_data => x_msg_data,
11002: p_msg_index_out => l_msg_index_out
11003: );
11004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
11005: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
11006: print_error_message('Error '||to_char(i)||': '||x_msg_data);
11007: print_error_message('Message Index: '||l_msg_index_out);
11008: END LOOP;

Line 11005: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);

11001: p_data => x_msg_data,
11002: p_msg_index_out => l_msg_index_out
11003: );
11004: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Error '||to_char(i)||': '||x_msg_data);
11005: FND_FILE.PUT_LINE (FND_FILE.OUTPUT,'Message Index: '||l_msg_index_out);
11006: print_error_message('Error '||to_char(i)||': '||x_msg_data);
11007: print_error_message('Message Index: '||l_msg_index_out);
11008: END LOOP;
11009: END IF;

Line 12996: FND_FILE.PUT_LINE (FND_FILE.LOG, '===============================================================================');

12992: ELSE
12993: EXIT;
12994: END IF;
12995:
12996: FND_FILE.PUT_LINE (FND_FILE.LOG, '===============================================================================');
12997:
12998: UPDATE okl_k_headers khr
12999: SET khr.date_last_interim_interest_cal = l_due_date
13000: WHERE khr.id = G_CONTRACT_ID;