[Home] [Help]
276: --cursor to find out whether subsidies exist on the
277: --contract
278: cursor l_subexist_csr(p_chr_id in number) is
279: select 'Y'
280: from dual
281: where exists (select '1'
282: from okc_k_lines_b cleb,
283: okc_line_styles_b lseb
284: where cleb.dnz_chr_id = p_chr_id
388: --cursor to find out whether subsidies exist on the
389: --contract
390: cursor l_subexist_csr(p_asset_cle_id in number) is
391: select 'Y'
392: from dual
393: where exists (select '1'
394: from okc_k_lines_b cleb,
395: okc_line_styles_b lseb
396: where cleb.cle_id = p_asset_cle_id
787: x_return_status := OKL_API.G_RET_STS_SUCCESS;
788: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
789: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, l_prog_name || 'begin' );
790: END IF;
791: SELECT okl_sif_seq.nextval INTO l_transaction_number FROM DUAL;
792:
793: -- NOTE: UV for Streams inquiry (OKL_ASSET_STREAMS_UV) assumes a denormalized use of KHR_ID
794: l_stmv_rec.khr_id := p_khr_id;
795: l_stmv_rec.kle_id := p_kle_id;
1947: sub_cle.cle_id asset_cle_id,
1948: sub_kle.subsidy_override_amount subsidy_override_amount,
1949: ast_kle.oec asset_oec,
1950: ast_kle.capital_amount asset_capital_amount,
1951: ast_kle.residual_value residual_value,
1952: subb.subsidy_calc_basis subsidy_calc_basis,
1953: subb.amount subsidy_setup_amount,
1954: subb.name subsidy_name,
1955: subb.percent subsidy_setup_percent,
3886: and asst_cle.id = p_asset_cle_id;
3887:
3888: --veramach bug 5600694 start
3889: cursor is_subsidy( p_chr_id in number, p_asset_cle_id in number) is
3890: select 'Y' from dual where exists
3891: (
3892: select null from OKC_LINE_STYLES_B SUB_LSE,
3893: OKC_K_LINES_B SUB_CLE
3894: where SUB_CLE.dnz_chr_id=p_chr_id