[Home] [Help]
263: interest_payment loan_tbl;
264: pre_tax_income loan_tbl;
265: termination_val loan_tbl;
266:
267: l_iir_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IIR_LIMIT')), 1000)/100;
268:
269: l_start_date DATE;
270: l_sll_start_date DATE;
271: l_end_date DATE;
1358: interest_payment loan_tbl;
1359: pre_tax_income loan_tbl;
1360: termination_val loan_tbl;
1361:
1362: l_iir_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IIR_LIMIT')), 1000)/100;
1363:
1364: l_start_date DATE;
1365: l_sll_start_date DATE;
1366: l_end_date DATE;
3242: l_periods NUMBER;
3243: l_irr NUMBER := 0;
3244: l_npv_rate NUMBER;
3245: l_npv_pay NUMBER;
3246: l_irr_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000)/100;
3247: l_prev_npv_pay NUMBER;
3248: l_prev_npv_sign_pay NUMBER;
3249: l_crossed_zero_pay VARCHAR2(1) := 'N';
3250: l_increment_pay NUMBER := 0.1; -- 10% increment
4118: RAISE OKL_API.G_EXCEPTION_ERROR;
4119: END IF;
4120: CLOSE get_curr_code_pre;
4121: -- Setting the IRR limit
4122: l_irr_limit := ROUND(NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000), 0)/100;
4123: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
4124: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, l_api_name || 'l_irr_limit ' ||l_irr_limit);
4125: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, l_api_name || 'b4 getting into the loop '|| x_return_status);
4126: END IF;
4958: i BINARY_INTEGER := 0;
4959: l_irr NUMBER := nvl( p_initial_irr, 0 );
4960: l_npv NUMBER;
4961:
4962: l_irr_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000)/100;
4963:
4964: l_prev_npv NUMBER;
4965: l_prev_npv_sign NUMBER;
4966:
5515:
5516:
5517: l_precision := 4;
5518:
5519: l_irr_limit := ROUND(NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000), 0)/100;
5520:
5521:
5522: -- Added for IRR Approximation
5523: -- Appr. IRR based on Simple Interest Calculation
6301: l_payment_amount NUMBER := 0.1;
6302:
6303: l_investment NUMBER;
6304:
6305: l_iir_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IIR_LIMIT')), 1000)/100;
6306:
6307: l_start_date DATE;
6308: l_end_date DATE;
6309: l_interim_days NUMBER;
6667: l_periods NUMBER;
6668: l_irr NUMBER := 0;
6669: l_npv_rate NUMBER;
6670: l_npv_pay NUMBER;
6671: l_irr_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000)/100;
6672: l_prev_npv_pay NUMBER;
6673: l_prev_npv_sign_pay NUMBER;
6674: l_crossed_zero_pay VARCHAR2(1) := 'N';
6675: l_increment_pay NUMBER := 0.1; -- 10% increment
7114: END IF;
7115: CLOSE get_curr_code_pre;
7116:
7117: -- Setting the IRR limit
7118: l_irr_limit := ROUND(NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000), 0)/100;
7119: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
7120: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, l_api_name || 'l_irr_limit ' || l_irr_limit);
7121: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, l_api_name || 'b4 getting into the loop '|| x_return_status);
7122: END IF;
8892: i BINARY_INTEGER := 0;
8893: l_iir NUMBER := nvl(p_initial_iir, 0);
8894:
8895: l_npv NUMBER;
8896: l_iir_limit NUMBER := NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000)/100;
8897:
8898: l_prev_npv NUMBER;
8899: l_prev_npv_sign NUMBER;
8900:
9348: INTO l_precision
9349: FROM fnd_currencies
9350: WHERE currency_code = l_currency_code;
9351:
9352: l_iir_limit := ROUND(NVL(ABS(fnd_profile.value('OKL_PRE_TAX_IRR_LIMIT')), 1000), 0)/100;
9353: --print( 'Initial iir estimated ' || l_iir );
9354: LOOP
9355: i := i + 1;
9356: l_npv := -(l_time_zero_cost);