[Home] [Help]
89: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_TRX_ASSETS_LINE_DTL';
90: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
91:
92: -- Temp parameters to store cost and currency code
93: l_cost OKL_TXD_ASSETS_B.COST%TYPE;
94: l_currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE;
95: l_asdv_rec advv_rec_type := p_asdv_rec;
96:
97: -- Bug# 3477560
90: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
91:
92: -- Temp parameters to store cost and currency code
93: l_cost OKL_TXD_ASSETS_B.COST%TYPE;
94: l_currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE;
95: l_asdv_rec advv_rec_type := p_asdv_rec;
96:
97: -- Bug# 3477560
98: ln_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
95: l_asdv_rec advv_rec_type := p_asdv_rec;
96:
97: -- Bug# 3477560
98: ln_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
99: CURSOR get_chr_id(p_tal_id OKL_TXD_ASSETS_B.TAL_ID%TYPE)
100: IS
101: SELECT to_char(cle.dnz_chr_id)
102: FROM okc_k_lines_b cle,
103: okl_txl_assets_b tal,
100: IS
101: SELECT to_char(cle.dnz_chr_id)
102: FROM okc_k_lines_b cle,
103: okl_txl_assets_b tal,
104: okl_txd_assets_b txd
105: WHERE tal.kle_id = cle.id
106: AND tal.id = txd.tal_id
107: AND tal.tal_type in ('CFA','CIB','CRB','CRL','CRV','CSP','ALI')
108: AND txd.tal_id = p_tal_id;
125: /*
126: * sjalasut added cursor to derive the contract header id and contract line id. BEGIN
127: *
128: */
129: CURSOR get_chr_and_cle_id(p_tal_id OKL_TXD_ASSETS_B.TAL_ID%TYPE)
130: IS
131: SELECT to_char(cle.dnz_chr_id) chr_id, cle.cle_id cle_id
132: FROM okc_k_lines_b cle,
133: okl_txl_assets_b tal,
130: IS
131: SELECT to_char(cle.dnz_chr_id) chr_id, cle.cle_id cle_id
132: FROM okc_k_lines_b cle,
133: okl_txl_assets_b tal,
134: okl_txd_assets_b txd
135: WHERE tal.kle_id = cle.id
136: AND tal.id = txd.tal_id
137: AND tal.tal_type in ('CFA','CIB','CRB','CRL','CRV','CSP','ALI')
138: AND txd.tal_id = p_tal_id;
574: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_TRX_ASSETS_LINE_DTL';
575: ln_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
576:
577: -- Temp parameters to store cost and currency code
578: l_cost OKL_TXD_ASSETS_B.COST%TYPE;
579: l_currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE;
580:
581: l_asdv_rec advv_rec_type := p_asdv_rec;
582:
575: ln_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
576:
577: -- Temp parameters to store cost and currency code
578: l_cost OKL_TXD_ASSETS_B.COST%TYPE;
579: l_currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE;
580:
581: l_asdv_rec advv_rec_type := p_asdv_rec;
582:
583: CURSOR get_chr_id(p_tal_id OKL_TXD_ASSETS_B.TAL_ID%TYPE)
579: l_currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE;
580:
581: l_asdv_rec advv_rec_type := p_asdv_rec;
582:
583: CURSOR get_chr_id(p_tal_id OKL_TXD_ASSETS_B.TAL_ID%TYPE)
584: IS
585: SELECT to_char(cle.dnz_chr_id)
586: FROM okc_k_lines_b cle,
587: okl_txl_assets_b tal,
584: IS
585: SELECT to_char(cle.dnz_chr_id)
586: FROM okc_k_lines_b cle,
587: okl_txl_assets_b tal,
588: okl_txd_assets_b txd
589: WHERE tal.kle_id = cle.id
590: AND tal.id = txd.tal_id
591: AND tal.tal_type in ('CFA','CIB','CRB','CRL','CRV','CSP','ALI')
592: AND txd.tal_id = p_tal_id;
590: AND tal.id = txd.tal_id
591: AND tal.tal_type in ('CFA','CIB','CRB','CRL','CRV','CSP','ALI')
592: AND txd.tal_id = p_tal_id;
593: /*
594: CURSOR c_get_currency_code(p_id OKL_TXD_ASSETS_B.ID%TYPE) IS
595: SELECT tas.currency_code
596: FROM OKL_TXD_ASSETS_B tas
597: WHERE tas.id = p_id;
598: */
592: AND txd.tal_id = p_tal_id;
593: /*
594: CURSOR c_get_currency_code(p_id OKL_TXD_ASSETS_B.ID%TYPE) IS
595: SELECT tas.currency_code
596: FROM OKL_TXD_ASSETS_B tas
597: WHERE tas.id = p_id;
598: */
599: CURSOR header_curr_csr(p_txd_id OKL_TXD_ASSETS_V.ID%TYPE) IS
600: SELECT h.currency_code,
892: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_TRX_ASSETS_LINE_DTL';
893: ln_chr_id OKC_K_LINES_B.DNZ_CHR_ID%TYPE;
894:
895: -- Bug# 3477560
896: CURSOR get_chr_id(p_txd_id OKL_TXD_ASSETS_B.ID%TYPE)
897: IS
898: SELECT to_char(cle.dnz_chr_id)
899: FROM okc_k_lines_b cle,
900: okl_txl_assets_b tal,
897: IS
898: SELECT to_char(cle.dnz_chr_id)
899: FROM okc_k_lines_b cle,
900: okl_txl_assets_b tal,
901: okl_txd_assets_b txd
902: WHERE tal.kle_id = cle.id
903: AND tal.id = txd.tal_id
904: AND tal.tal_type in ('CFA','CIB','CRB','CRL','CRV','CSP','ALI')
905: AND txd.id = p_txd_id;
907: /*
908: * sjalasut added cursor to derive the contract header id and contract line id. BEGIN
909: *
910: */
911: CURSOR get_chr_and_cle_id(p_id OKL_TXD_ASSETS_B.ID%TYPE)
912: IS
913: SELECT to_char(cle.dnz_chr_id) chr_id, cle.cle_id cle_id
914: FROM okc_k_lines_b cle,
915: okl_txl_assets_b tal,
912: IS
913: SELECT to_char(cle.dnz_chr_id) chr_id, cle.cle_id cle_id
914: FROM okc_k_lines_b cle,
915: okl_txl_assets_b tal,
916: okl_txd_assets_b txd
917: WHERE tal.kle_id = cle.id
918: AND tal.id = txd.tal_id
919: AND tal.tal_type in ('CFA','CIB','CRB','CRL','CRV','CSP','ALI')
920: AND txd.id = p_id;
930: --Bug# 4959361
931: CURSOR l_tal_csr(p_txd_id IN NUMBER) IS
932: SELECT tal.kle_id
933: FROM okl_txl_assets_b tal,
934: okl_txd_assets_b txd
935: WHERE tal.id = txd.tal_id
936: AND txd.id = p_txd_id;
937:
938: l_tal_rec l_tal_csr%ROWTYPE;