DBA Data[Home] [Help]

APPS.OKL_AM_CREATE_QUOTE_PVT dependencies on DUAL

Line 1557: FROM dual WHERE EXISTS (

1553: -- RMUNJULU 10-APR-03 2900178 Changed the query from SELECT 1 to SELECT '1',
1554: -- and removed TO_CHAR conversion to krel.object1_id1
1555: CURSOR l_oks_lines_csr ( p_kle_id IN NUMBER) IS
1556: SELECT '1'
1557: FROM dual WHERE EXISTS (
1558: SELECT '1'
1559: FROM okc_k_headers_b oks_chrb,
1560: okc_line_styles_b oks_cov_pd_lse,
1561: okc_k_lines_b oks_cov_pd_cleb,

Line 1705: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.residual_value : '||p_quot_rec.residual_value );

1701: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.org_id : '||p_quot_rec.org_id );
1702: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_amount : '||p_quot_rec.purchase_amount );
1703: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_formula : '||p_quot_rec.purchase_formula );
1704: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.asset_value : '||p_quot_rec.asset_value );
1705: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.residual_value : '||p_quot_rec.residual_value );
1706: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.unbilled_receivables : '||p_quot_rec.unbilled_receivables );
1707: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.gain_loss : '||p_quot_rec.gain_loss );
1708: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.PERDIEM_AMOUNT : '||p_quot_rec.PERDIEM_AMOUNT );
1709: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.currency_code : '||p_quot_rec.currency_code );

Line 3034: -- unbilled rec and residual value from all the quote lines

3030: -- : SECHAWLA 16-JAN-02 Bug # 2754280 : Changed the call to fn
3031: -- get_user_profile_option_name to refer it from am util
3032: -- : SECHAWLA 14-FEB-03 Bug 2749690 : Added code to update the
3033: -- quote header with total net investment,
3034: -- unbilled rec and residual value from all the quote lines
3035: -- : RMUNJULU 18-FEB-03 2804703 Chngd cursor to get active lines
3036: -- : SECHAWLA 18-FEB-03 2807201 Moved the check_quote_type procedure call from
3037: -- validate quote to the beginning if this procedure.
3038: -- : SECHAWLA 28-FEB-03 2757175 Modified the Manual Quote notification message to

Line 3128: l_total_residual_value NUMBER := 0;

3124:
3125: --SECHAWLA 14-FEB-03 Bug 2749690 : new declarations
3126: l_total_net_investment NUMBER := 0;
3127: l_total_unbilled_rec NUMBER := 0;
3128: l_total_residual_value NUMBER := 0;
3129: lp_empty_quot_rec quot_rec_type;
3130:
3131: -- SECHAWLA 14-APR-03 2902588 : New Declarations
3132: l_contract_number okc_k_headers_b.contract_number%TYPE;

Line 3185: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.residual_value : '||p_quot_rec.residual_value );

3181: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.org_id : '||p_quot_rec.org_id );
3182: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_amount : '||p_quot_rec.purchase_amount );
3183: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_formula : '||p_quot_rec.purchase_formula );
3184: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.asset_value : '||p_quot_rec.asset_value );
3185: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.residual_value : '||p_quot_rec.residual_value );
3186: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.unbilled_receivables : '||p_quot_rec.unbilled_receivables );
3187: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.gain_loss : '||p_quot_rec.gain_loss );
3188: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.PERDIEM_AMOUNT : '||p_quot_rec.PERDIEM_AMOUNT );
3189: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.currency_code : '||p_quot_rec.currency_code );

Line 3237: SELECT SYSDATE INTO l_sys_date FROM DUAL;

3233: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3234: RAISE OKL_API.G_EXCEPTION_ERROR;
3235: END IF;
3236:
3237: SELECT SYSDATE INTO l_sys_date FROM DUAL;
3238:
3239: --+++++++++ rmunjulu 3797384 Future Dated Term Qte -- Start ++++++++++++++++
3240: -- RMUNJULU EDT 3797384 default the date effective from in the beginning
3241: IF lp_quot_rec.date_effective_from IS NULL

Line 3607: -- SECHAWLA 14-FEB-03 2749690 : sum up the net investment, unbilled receivable and residual value amounts for

3603: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3604: RAISE OKL_API.G_EXCEPTION_ERROR;
3605: END IF;
3606:
3607: -- SECHAWLA 14-FEB-03 2749690 : sum up the net investment, unbilled receivable and residual value amounts for
3608: -- the quote lines and store the total amounts at the quote header level
3609: IF lx_tqlv_tbl.COUNT > 0 THEN
3610: i := lx_tqlv_tbl.FIRST;
3611: LOOP

Line 3615: l_total_residual_value := l_total_residual_value + lx_tqlv_tbl(i).residual_value;

3611: LOOP
3612: IF lx_tqlv_tbl(i).qlt_code = 'AMCFIA' THEN
3613: l_total_net_investment := l_total_net_investment + lx_tqlv_tbl(i).asset_value;
3614: l_total_unbilled_rec := l_total_unbilled_rec + lx_tqlv_tbl(i).unbilled_receivables;
3615: l_total_residual_value := l_total_residual_value + lx_tqlv_tbl(i).residual_value;
3616: END IF;
3617:
3618: EXIT WHEN (i = lx_tqlv_tbl.LAST);
3619: i := lx_tqlv_tbl.NEXT(i);

Line 3628: lp_quot_rec.residual_value := l_total_residual_value;

3624: lp_quot_rec := lp_empty_quot_rec;
3625: lp_quot_rec.id := lx_quot_rec.id ;
3626: lp_quot_rec.asset_value := l_total_net_investment;
3627: lp_quot_rec.unbilled_receivables := l_total_unbilled_rec;
3628: lp_quot_rec.residual_value := l_total_residual_value;
3629:
3630: IF (is_debug_statement_on) THEN
3631: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
3632: 'before call to OKL_TRX_QUOTES_PUB.update_trx_quotes :'||l_return_status);