DBA Data[Home] [Help]

APPS.OKL_GENERATE_PV_RENT_PVT dependencies on OKL_GENERATE_PV_RENT_PVT

Line 1: PACKAGE BODY OKL_GENERATE_PV_RENT_PVT AS

1: PACKAGE BODY OKL_GENERATE_PV_RENT_PVT AS
2: /* $Header: OKLRTPVB.pls 120.1 2008/05/22 23:40:31 snizam noship $ */
3:
4: l_debug_level NUMBER :=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_proc_level NUMBER :=FND_LOG.LEVEL_PROCEDURE;

Line 129: FND_LOG.STRING(l_proc_level,'OKL_GENERATE_PV_RENT_PVT','Begin(+)');

125:
126: x_return_status := OKL_API.G_RET_STS_SUCCESS;
127:
128: IF (l_proc_level >= l_debug_level) THEN
129: FND_LOG.STRING(l_proc_level,'OKL_GENERATE_PV_RENT_PVT','Begin(+)');
130: END IF;
131:
132: l_return_status := OKL_API.START_ACTIVITY(
133: p_api_name => l_api_name,

Line 152: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','khr_id:'||to_char(p_khr_id));

148: FETCH c_hdr_csr INTO l_hdr_csr_rec;
149: CLOSE c_hdr_csr;
150:
151: IF l_stat_level >= l_debug_level THEN
152: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','khr_id:'||to_char(p_khr_id));
153: END IF;
154:
155: l_guess_iir := l_hdr_csr_rec.base_rate / 100.0;
156:

Line 189: 'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Month / Year = '||to_char(l_day_convention_month) || '/' || to_char(l_day_convention_year));

185: END IF;
186:
187: IF l_stat_level >= l_debug_level THEN
188: fnd_log.STRING(l_stat_level,
189: 'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Month / Year = '||to_char(l_day_convention_month) || '/' || to_char(l_day_convention_year));
190: END IF;
191:
192: IF l_pricing_engine = 'INTERNAL' THEN
193: OKL_ISG_UTILS_PVT.get_arrears_pay_dates_option(

Line 207: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_arrears_pay_dates_option :'||l_arrears_pay_dates_option);

203: l_arrears_pay_dates_option := 'LAST_DAY_OF_PERIOD';
204: END IF;
205:
206: IF l_stat_level >= l_debug_level THEN
207: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_arrears_pay_dates_option :'||l_arrears_pay_dates_option);
208: END IF;
209:
210: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
211: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 230: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Number of records in l_asset_id_tbl :'||to_char(l_asset_id_tbl.COUNT));

226: OPEN c_asset_id_csr (p_khr_id);
227: FETCH c_asset_id_csr BULK COLLECT INTO l_asset_id_tbl;
228:
229: IF l_stat_level >= l_debug_level THEN
230: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Number of records in l_asset_id_tbl :'||to_char(l_asset_id_tbl.COUNT));
231: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Calling procedure generate_asset_rent.');
232: END IF;
233:
234: --Bug 7015073: Start

Line 231: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Calling procedure generate_asset_rent.');

227: FETCH c_asset_id_csr BULK COLLECT INTO l_asset_id_tbl;
228:
229: IF l_stat_level >= l_debug_level THEN
230: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Number of records in l_asset_id_tbl :'||to_char(l_asset_id_tbl.COUNT));
231: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Calling procedure generate_asset_rent.');
232: END IF;
233:
234: --Bug 7015073: Start
235: IF l_asset_id_tbl.COUNT > 0 THEN

Line 239: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_asset_id_tbl(i).id :'||to_char(l_asset_id_tbl(i).id));

235: IF l_asset_id_tbl.COUNT > 0 THEN
236: FOR a in l_asset_id_tbl.FIRST..l_asset_id_tbl.LAST LOOP
237: i := i + 1;
238: IF l_stat_level >= l_debug_level THEN
239: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_asset_id_tbl(i).id :'||to_char(l_asset_id_tbl(i).id));
240: END IF;
241:
242: -- generating the cash inflows
243: OKL_GENERATE_PV_RENT_PVT.generate_asset_rent

Line 243: OKL_GENERATE_PV_RENT_PVT.generate_asset_rent

239: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_asset_id_tbl(i).id :'||to_char(l_asset_id_tbl(i).id));
240: END IF;
241:
242: -- generating the cash inflows
243: OKL_GENERATE_PV_RENT_PVT.generate_asset_rent
244: (p_api_version => p_api_version,
245: p_init_msg_list => p_init_msg_list,
246: p_khr_id => p_khr_id,
247: p_kle_id => l_asset_id_tbl(i).id,

Line 286: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_residual_value:'||to_char(l_residual_value));

282:
283: l_end_date := (ADD_MONTHS(l_hdr_csr_rec.start_date,l_hdr_csr_rec.term_duration) - 1);
284:
285: IF l_stat_level >= l_debug_level THEN
286: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_residual_value:'||to_char(l_residual_value));
287: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_time_zero_cost:'||to_char(l_time_zero_cost));
288: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_end_date :'||to_char(l_end_date));
289: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_rent_inflow_tbl_count :'||to_char(l_total_rent_inflow_tbl.COUNT));
290: END IF;

Line 287: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_time_zero_cost:'||to_char(l_time_zero_cost));

283: l_end_date := (ADD_MONTHS(l_hdr_csr_rec.start_date,l_hdr_csr_rec.term_duration) - 1);
284:
285: IF l_stat_level >= l_debug_level THEN
286: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_residual_value:'||to_char(l_residual_value));
287: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_time_zero_cost:'||to_char(l_time_zero_cost));
288: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_end_date :'||to_char(l_end_date));
289: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_rent_inflow_tbl_count :'||to_char(l_total_rent_inflow_tbl.COUNT));
290: END IF;
291:

Line 288: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_end_date :'||to_char(l_end_date));

284:
285: IF l_stat_level >= l_debug_level THEN
286: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_residual_value:'||to_char(l_residual_value));
287: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_time_zero_cost:'||to_char(l_time_zero_cost));
288: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_end_date :'||to_char(l_end_date));
289: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_rent_inflow_tbl_count :'||to_char(l_total_rent_inflow_tbl.COUNT));
290: END IF;
291:
292: -- l_total_cash_inflow_tbl = lx_total_rent_inflow_tbl + residual value

Line 289: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_rent_inflow_tbl_count :'||to_char(l_total_rent_inflow_tbl.COUNT));

285: IF l_stat_level >= l_debug_level THEN
286: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_residual_value:'||to_char(l_residual_value));
287: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_time_zero_cost:'||to_char(l_time_zero_cost));
288: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_end_date :'||to_char(l_end_date));
289: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_rent_inflow_tbl_count :'||to_char(l_total_rent_inflow_tbl.COUNT));
290: END IF;
291:
292: -- l_total_cash_inflow_tbl = lx_total_rent_inflow_tbl + residual value
293:

Line 301: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_dpp:'||to_char(l_dpp));

297:
298:
299: IF l_residual_value > 0 THEN
300: IF l_stat_level >= l_debug_level THEN
301: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_dpp:'||to_char(l_dpp));
302: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_ppy:'||to_char(l_ppy));
303: END IF;
304:
305: l_total_cash_inflow_tbl(lx_total_rent_inflow_tbl_count + 1).cf_amount := l_residual_value;

Line 302: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_ppy:'||to_char(l_ppy));

298:
299: IF l_residual_value > 0 THEN
300: IF l_stat_level >= l_debug_level THEN
301: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_dpp:'||to_char(l_dpp));
302: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_ppy:'||to_char(l_ppy));
303: END IF;
304:
305: l_total_cash_inflow_tbl(lx_total_rent_inflow_tbl_count + 1).cf_amount := l_residual_value;
306: l_total_cash_inflow_tbl(lx_total_rent_inflow_tbl_count + 1).cf_number := lx_total_rent_inflow_tbl_count+1; -- TBD

Line 336: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent',

332: IF l_stat_level >= l_debug_level THEN
333: IF l_total_rent_inflow_tbl.COUNT > 0 THEN
334: FOR j IN l_total_rent_inflow_tbl.FIRST .. l_total_rent_inflow_tbl.LAST
335: LOOP
336: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent',
337: TO_CHAR(l_total_rent_inflow_tbl(j).cf_number||' '||l_total_rent_inflow_tbl(j).cf_date || ' ' || l_total_rent_inflow_tbl(j).cf_amount));
338: END LOOP;
339: END IF;
340: END IF;

Line 343: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_cash_inflow_tbl_count:'||to_char(l_total_cash_inflow_tbl.count));

339: END IF;
340: END IF;
341:
342: IF l_stat_level >= l_debug_level THEN
343: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Total_cash_inflow_tbl_count:'||to_char(l_total_cash_inflow_tbl.count));
344: END IF;
345:
346: IF l_stat_level >= l_debug_level THEN
347: IF l_total_cash_inflow_tbl.COUNT > 0 THEN

Line 350: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent',

346: IF l_stat_level >= l_debug_level THEN
347: IF l_total_cash_inflow_tbl.COUNT > 0 THEN
348: FOR j IN l_total_cash_inflow_tbl.FIRST .. l_total_cash_inflow_tbl.LAST
349: LOOP
350: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent',
351: TO_CHAR(l_total_cash_inflow_tbl(j).cf_number||' '||l_total_cash_inflow_tbl(j).cf_date || ' ' || l_total_cash_inflow_tbl(j).cf_amount));
352: END LOOP;
353: END IF;
354: END IF;

Line 359: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Calling procedure compute_iir');

355:
356:
357: -- calculating IIR
358: IF l_stat_level >= l_debug_level THEN
359: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Calling procedure compute_iir');
360: END IF;
361:
362: OKL_GENERATE_PV_RENT_PVT.compute_iir ( p_khr_id => p_khr_id,
363: p_cash_in_flows_tbl => l_total_cash_inflow_tbl,

Line 362: OKL_GENERATE_PV_RENT_PVT.compute_iir ( p_khr_id => p_khr_id,

358: IF l_stat_level >= l_debug_level THEN
359: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','Calling procedure compute_iir');
360: END IF;
361:
362: OKL_GENERATE_PV_RENT_PVT.compute_iir ( p_khr_id => p_khr_id,
363: p_cash_in_flows_tbl => l_total_cash_inflow_tbl,
364: p_cash_out_flows => l_time_zero_cost,
365: p_initial_iir => l_guess_iir,
366: p_precision => l_precision,

Line 380: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_iir: '||TO_CHAR(l_iir));

376: RAISE OKL_API.G_EXCEPTION_ERROR;
377: END IF;
378:
379: IF l_stat_level >= l_debug_level THEN
380: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_iir: '||TO_CHAR(l_iir));
381: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','calculating the PV rent');
382: END IF;
383:
384: -- calculating the PV rent

Line 381: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','calculating the PV rent');

377: END IF;
378:
379: IF l_stat_level >= l_debug_level THEN
380: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','l_iir: '||TO_CHAR(l_iir));
381: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','calculating the PV rent');
382: END IF;
383:
384: -- calculating the PV rent
385:

Line 388: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','calculating the PV of residual value');

384: -- calculating the PV rent
385:
386: IF l_residual_value > 0 THEN
387: IF l_stat_level >= l_debug_level THEN
388: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','calculating the PV of residual value');
389: END IF;
390:
391: l_period_residual_value := l_total_cash_inflow_tbl(lx_total_rent_inflow_tbl_count + 1).cf_days/l_dpp;
392:

Line 396: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent',

392:
393: l_pv_residual_value := l_residual_value / POWER( 1 + (l_iir/(l_ppy)), l_period_residual_value);
394:
395: IF l_stat_level >= l_debug_level THEN
396: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent',
397: 'PV of residual value: '||TO_CHAR(l_pv_residual_value));
398: END IF;
399: END IF;
400:

Line 408: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','x_total_pv_rent: '||TO_CHAR(x_total_pv_rent));

404:
405: x_total_pv_rent := ROUND(l_pv_rent,l_precision);
406:
407: IF l_stat_level >= l_debug_level THEN
408: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_total_pv_rent','x_total_pv_rent: '||TO_CHAR(x_total_pv_rent));
409: END IF;
410:
411:
412: IF (l_proc_level >= l_debug_level) THEN

Line 413: FND_LOG.STRING(l_proc_level,'OKL_GENERATE_PV_RENT_PVT','End(-)');

409: END IF;
410:
411:
412: IF (l_proc_level >= l_debug_level) THEN
413: FND_LOG.STRING(l_proc_level,'OKL_GENERATE_PV_RENT_PVT','End(-)');
414: END IF;
415:
416: okl_api.end_activity(x_msg_count => x_msg_count
417: ,x_msg_data => x_msg_data);

Line 489: ,p_total_rent_inflow_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl

485: ,p_contract_start_date IN DATE
486: ,p_day_convention_month IN VARCHAR2
487: ,p_day_convention_year IN VARCHAR2
488: ,p_arrears_pay_dates_option IN VARCHAR2
489: ,p_total_rent_inflow_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl
490: ,x_total_rent_inflow_tbl OUT NOCOPY OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl
491: ,x_dpp OUT NOCOPY NUMBER
492: ,x_ppy OUT NOCOPY NUMBER
493: ,x_return_status OUT NOCOPY VARCHAR2

Line 490: ,x_total_rent_inflow_tbl OUT NOCOPY OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl

486: ,p_day_convention_month IN VARCHAR2
487: ,p_day_convention_year IN VARCHAR2
488: ,p_arrears_pay_dates_option IN VARCHAR2
489: ,p_total_rent_inflow_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl
490: ,x_total_rent_inflow_tbl OUT NOCOPY OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl
491: ,x_dpp OUT NOCOPY NUMBER
492: ,x_ppy OUT NOCOPY NUMBER
493: ,x_return_status OUT NOCOPY VARCHAR2
494: ,x_msg_count OUT NOCOPY NUMBER

Line 561: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent','Begin(+)');

557:
558: x_return_status := OKL_API.G_RET_STS_SUCCESS;
559:
560: IF l_stat_level >= l_debug_level THEN
561: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent','Begin(+)');
562: END IF;
563:
564: l_return_status := OKL_API.START_ACTIVITY(
565: p_api_name => l_api_name,

Line 608: OKL_GENERATE_PV_RENT_PVT.generate_stream_elements(

604: l_old_cle_id := l_payment_details_csr_rec.cle_id;
605: l_old_sty_id := l_payment_details_csr_rec.sty_id;
606:
607:
608: OKL_GENERATE_PV_RENT_PVT.generate_stream_elements(
609: p_start_date => l_payment_details_csr_rec.start_date,
610: p_periods => l_payment_details_csr_rec.periods,
611: p_frequency => l_payment_details_csr_rec.frequency,
612: p_structure => l_payment_details_csr_rec.structure,

Line 656: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent',

652: x_ppy := l_ppy;
653:
654:
655: IF l_stat_level >= l_debug_level THEN
656: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent',
657: 'x_total_rent_inflow_tbl.count :'||TO_CHAR(x_total_rent_inflow_tbl.count));
658: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent','End(-)');
659: END IF;
660:

Line 658: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent','End(-)');

654:
655: IF l_stat_level >= l_debug_level THEN
656: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent',
657: 'x_total_rent_inflow_tbl.count :'||TO_CHAR(x_total_rent_inflow_tbl.count));
658: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_asset_rent','End(-)');
659: END IF;
660:
661:
662: okl_api.end_activity(x_msg_count => x_msg_count

Line 746: p_rent_inflow_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,

742: p_contract_start_date IN DATE,
743: p_day_convention_month IN VARCHAR2,
744: p_day_convention_year IN VARCHAR2,
745: p_arrears_pay_dates_option IN VARCHAR2,
746: p_rent_inflow_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,
747: x_rent_inflow_tbl OUT NOCOPY OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,
748: x_return_status OUT NOCOPY VARCHAR2,
749: x_msg_count OUT NOCOPY NUMBER,
750: x_msg_data OUT NOCOPY VARCHAR2

Line 747: x_rent_inflow_tbl OUT NOCOPY OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,

743: p_day_convention_month IN VARCHAR2,
744: p_day_convention_year IN VARCHAR2,
745: p_arrears_pay_dates_option IN VARCHAR2,
746: p_rent_inflow_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,
747: x_rent_inflow_tbl OUT NOCOPY OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,
748: x_return_status OUT NOCOPY VARCHAR2,
749: x_msg_count OUT NOCOPY NUMBER,
750: x_msg_data OUT NOCOPY VARCHAR2
751: ) IS

Line 779: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements','Begin(+)');

775: BEGIN
776:
777:
778: IF l_stat_level >= l_debug_level THEN
779: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements','Begin(+)');
780: END IF;
781:
782: x_rent_inflow_tbl := p_rent_inflow_tbl;
783:

Line 834: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',

830:
831:
832: l_element_count := p_periods;
833: IF l_stat_level >= l_debug_level THEN
834: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',
835: 'creating elements:'||TO_CHAR(l_element_count));
836: END IF;
837:
838: FOR i IN (l_rent_inflow_tbl_count+1) .. (l_rent_inflow_tbl_count+l_element_count)

Line 854: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',

850: p_recurrence_date => p_recurrence_date,
851: p_arrears_pay_dates_option => p_arrears_pay_dates_option);
852:
853: IF l_stat_level >= l_debug_level THEN
854: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',
855: 'get_sel_date-p_start_date:'||to_char(p_start_date)||' p_arrears_yn:'||p_arrears_yn||' i:'||i||' p_months_factor:'||p_months_factor||
856: ' cf_date:'|| x_rent_inflow_tbl(i).cf_date||' p_recurrence_date:'||
857: p_recurrence_date||' p_arrears_pay_dates_option:'||p_arrears_pay_dates_option);
858:

Line 896: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',

892: END LOOP;
893: END IF;
894:
895: IF l_stat_level >= l_debug_level THEN
896: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',
897: 'x_rent_inflow_tbl.count :'||TO_CHAR(x_rent_inflow_tbl.count));
898: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements','End(-)');
899: END IF;
900:

Line 898: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements','End(-)');

894:
895: IF l_stat_level >= l_debug_level THEN
896: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements',
897: 'x_rent_inflow_tbl.count :'||TO_CHAR(x_rent_inflow_tbl.count));
898: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.generate_stream_elements','End(-)');
899: END IF;
900:
901:
902:

Line 955: p_cash_in_flows_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,

951: -- End of comments
952:
953:
954: PROCEDURE compute_iir (p_khr_id IN NUMBER,
955: p_cash_in_flows_tbl IN OKL_GENERATE_PV_RENT_PVT.cash_flow_tbl,
956: p_cash_out_flows IN NUMBER,
957: p_initial_iir IN NUMBER,
958: p_precision IN NUMBER,
959: x_iir OUT NOCOPY NUMBER,

Line 1019: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','Begin(+)');

1015:
1016: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1017:
1018: IF l_stat_level >= l_debug_level THEN
1019: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','Begin(+)');
1020: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','Initial iir estimated ' || TO_CHAR(l_iir));
1021: END IF;
1022:
1023:

Line 1020: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','Initial iir estimated ' || TO_CHAR(l_iir));

1016: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1017:
1018: IF l_stat_level >= l_debug_level THEN
1019: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','Begin(+)');
1020: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','Initial iir estimated ' || TO_CHAR(l_iir));
1021: END IF;
1022:
1023:
1024: l_initial_incr := nvl(l_increment, 0);

Line 1031: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','ITERATION # '||i||' IIR Guess '||l_iir||' starting l_npv'||l_npv);

1027: i := i + 1;
1028: l_npv := -(p_cash_out_flows);
1029:
1030: IF l_stat_level >= l_debug_level THEN
1031: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','ITERATION # '||i||' IIR Guess '||l_iir||' starting l_npv'||l_npv);
1032: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','p_cash_in_flows_tbl.count ' || TO_CHAR(p_cash_in_flows_tbl.count));
1033: END IF;
1034:
1035: IF p_cash_in_flows_tbl.count > 0 THEN

Line 1032: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','p_cash_in_flows_tbl.count ' || TO_CHAR(p_cash_in_flows_tbl.count));

1028: l_npv := -(p_cash_out_flows);
1029:
1030: IF l_stat_level >= l_debug_level THEN
1031: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','ITERATION # '||i||' IIR Guess '||l_iir||' starting l_npv'||l_npv);
1032: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','p_cash_in_flows_tbl.count ' || TO_CHAR(p_cash_in_flows_tbl.count));
1033: END IF;
1034:
1035: IF p_cash_in_flows_tbl.count > 0 THEN
1036:

Line 1064: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',

1060: l_npv := l_npv + (l_cf_amount / POWER((1 + l_iir/l_cf_ppy), l_periods));
1061:
1062:
1063: IF l_stat_level >= l_debug_level THEN
1064: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1065: TO_CHAR(a, '99')||' '||TO_CHAR(l_cf_date, 'DD-MON-YYYY')||' '||TO_CHAR(l_days_in_future, '9999')||' '||TO_CHAR(l_periods, '99.999')||' '||TO_CHAR(l_cf_amount, '999.999')||
1066: ' '||TO_CHAR((l_cf_amount / POWER((1 + l_iir/l_cf_ppy), l_periods)), '999.990'));
1067: END IF;
1068:

Line 1074: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','NPV ' || TO_CHAR(L_NPV));

1070:
1071: END IF;
1072:
1073: IF l_stat_level >= l_debug_level THEN
1074: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','NPV ' || TO_CHAR(L_NPV));
1075: END IF;
1076:
1077: IF ROUND(l_npv, p_precision+1) = 0 THEN
1078: x_iir := l_iir; -- LLA API multiples by 100 before updating KHR implicit_interest_rate column

Line 1080: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','final l_iir : ' || TO_CHAR(l_iir));

1076:
1077: IF ROUND(l_npv, p_precision+1) = 0 THEN
1078: x_iir := l_iir; -- LLA API multiples by 100 before updating KHR implicit_interest_rate column
1079: IF l_stat_level >= l_debug_level THEN
1080: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','final l_iir : ' || TO_CHAR(l_iir));
1081: END IF;
1082: RETURN;
1083: END IF;
1084:

Line 1183: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',

1179: l_iir_decided := 'F';
1180: END IF;
1181:
1182: IF l_stat_level >= l_debug_level THEN
1183: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1184: i || '-Loop l_npv ' || to_char(l_npv) );
1185: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1186: i || '-Loop l_increment ' || to_char(l_increment) );
1187: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',

Line 1185: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',

1181:
1182: IF l_stat_level >= l_debug_level THEN
1183: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1184: i || '-Loop l_npv ' || to_char(l_npv) );
1185: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1186: i || '-Loop l_increment ' || to_char(l_increment) );
1187: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1188: i || '-Loop iir ' || to_char(l_iir) );
1189: END IF;

Line 1187: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',

1183: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1184: i || '-Loop l_npv ' || to_char(l_npv) );
1185: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1186: i || '-Loop l_increment ' || to_char(l_increment) );
1187: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir',
1188: i || '-Loop iir ' || to_char(l_iir) );
1189: END IF;
1190:
1191:

Line 1200: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','End(-)');

1196:
1197: END LOOP; -- first
1198:
1199: IF l_stat_level >= l_debug_level THEN
1200: fnd_log.STRING(l_stat_level,'OKL_GENERATE_PV_RENT_PVT.compute_iir','End(-)');
1201: END IF;
1202:
1203:
1204: EXCEPTION

Line 1241: END OKL_GENERATE_PV_RENT_PVT;

1237: p_api_type => '_PVT');
1238: END COMPUTE_IIR;
1239:
1240:
1241: END OKL_GENERATE_PV_RENT_PVT;