DBA Data[Home] [Help]

APPS.OKL_AM_CREATE_QUOTE_PVT dependencies on DUAL

Line 1556: FROM dual WHERE EXISTS (

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

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

1697: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.org_id : '||p_quot_rec.org_id );
1698: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_amount : '||p_quot_rec.purchase_amount );
1699: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_formula : '||p_quot_rec.purchase_formula );
1700: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.asset_value : '||p_quot_rec.asset_value );
1701: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.residual_value : '||p_quot_rec.residual_value );
1702: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.unbilled_receivables : '||p_quot_rec.unbilled_receivables );
1703: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.gain_loss : '||p_quot_rec.gain_loss );
1704: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.PERDIEM_AMOUNT : '||p_quot_rec.PERDIEM_AMOUNT );
1705: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.currency_code : '||p_quot_rec.currency_code );

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

2976: -- : SECHAWLA 16-JAN-02 Bug # 2754280 : Changed the call to fn
2977: -- get_user_profile_option_name to refer it from am util
2978: -- : SECHAWLA 14-FEB-03 Bug 2749690 : Added code to update the
2979: -- quote header with total net investment,
2980: -- unbilled rec and residual value from all the quote lines
2981: -- : RMUNJULU 18-FEB-03 2804703 Chngd cursor to get active lines
2982: -- : SECHAWLA 18-FEB-03 2807201 Moved the check_quote_type procedure call from
2983: -- validate quote to the beginning if this procedure.
2984: -- : SECHAWLA 28-FEB-03 2757175 Modified the Manual Quote notification message to

Line 3072: l_total_residual_value NUMBER := 0;

3068:
3069: --SECHAWLA 14-FEB-03 Bug 2749690 : new declarations
3070: l_total_net_investment NUMBER := 0;
3071: l_total_unbilled_rec NUMBER := 0;
3072: l_total_residual_value NUMBER := 0;
3073: lp_empty_quot_rec quot_rec_type;
3074:
3075: -- SECHAWLA 14-APR-03 2902588 : New Declarations
3076: l_contract_number okc_k_headers_b.contract_number%TYPE;

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

3125: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.org_id : '||p_quot_rec.org_id );
3126: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_amount : '||p_quot_rec.purchase_amount );
3127: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.purchase_formula : '||p_quot_rec.purchase_formula );
3128: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.asset_value : '||p_quot_rec.asset_value );
3129: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.residual_value : '||p_quot_rec.residual_value );
3130: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.unbilled_receivables : '||p_quot_rec.unbilled_receivables );
3131: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.gain_loss : '||p_quot_rec.gain_loss );
3132: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.PERDIEM_AMOUNT : '||p_quot_rec.PERDIEM_AMOUNT );
3133: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_PROCEDURE,L_MODULE_NAME,'p_quot_rec.currency_code : '||p_quot_rec.currency_code );

Line 3181: SELECT SYSDATE INTO l_sys_date FROM DUAL;

3177: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3178: RAISE OKL_API.G_EXCEPTION_ERROR;
3179: END IF;
3180:
3181: SELECT SYSDATE INTO l_sys_date FROM DUAL;
3182:
3183: --+++++++++ rmunjulu 3797384 Future Dated Term Qte -- Start ++++++++++++++++
3184: -- RMUNJULU EDT 3797384 default the date effective from in the beginning
3185: IF lp_quot_rec.date_effective_from IS NULL

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

3547: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3548: RAISE OKL_API.G_EXCEPTION_ERROR;
3549: END IF;
3550:
3551: -- SECHAWLA 14-FEB-03 2749690 : sum up the net investment, unbilled receivable and residual value amounts for
3552: -- the quote lines and store the total amounts at the quote header level
3553: IF lx_tqlv_tbl.COUNT > 0 THEN
3554: i := lx_tqlv_tbl.FIRST;
3555: LOOP

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

3555: LOOP
3556: IF lx_tqlv_tbl(i).qlt_code = 'AMCFIA' THEN
3557: l_total_net_investment := l_total_net_investment + lx_tqlv_tbl(i).asset_value;
3558: l_total_unbilled_rec := l_total_unbilled_rec + lx_tqlv_tbl(i).unbilled_receivables;
3559: l_total_residual_value := l_total_residual_value + lx_tqlv_tbl(i).residual_value;
3560: END IF;
3561:
3562: EXIT WHEN (i = lx_tqlv_tbl.LAST);
3563: i := lx_tqlv_tbl.NEXT(i);

Line 3572: lp_quot_rec.residual_value := l_total_residual_value;

3568: lp_quot_rec := lp_empty_quot_rec;
3569: lp_quot_rec.id := lx_quot_rec.id ;
3570: lp_quot_rec.asset_value := l_total_net_investment;
3571: lp_quot_rec.unbilled_receivables := l_total_unbilled_rec;
3572: lp_quot_rec.residual_value := l_total_residual_value;
3573:
3574: IF (is_debug_statement_on) THEN
3575: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,L_MODULE_NAME,
3576: 'before call to OKL_TRX_QUOTES_PUB.update_trx_quotes :'||l_return_status);