629: l_id1 VARCHAR2(40);
630: l_id2 VARCHAR2(200);
631: l_rule_value VARCHAR2(2000);
632: l_days_allowed NUMBER :=0;
633: l_program_id okl_k_headers.khr_id%TYPE;
634: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
635:
636: cursor c_program_id (p_contract_id IN NUMBER ) IS
637: select khr_id from okl_k_headers
633: l_program_id okl_k_headers.khr_id%TYPE;
634: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
635:
636: cursor c_program_id (p_contract_id IN NUMBER ) IS
637: select khr_id from okl_k_headers
638: where id= p_contract_id;
639:
640:
641:
1736: CURSOR curr_csr (l_khr_id NUMBER) IS
1737: SELECT currency_conversion_type,
1738: currency_conversion_rate,
1739: currency_conversion_date
1740: FROM okl_k_headers
1741: WHERE id = l_khr_id;
1742:
1743:
1744: l_functional_currency okl_trx_contracts.currency_code%TYPE;
1741: WHERE id = l_khr_id;
1742:
1743:
1744: l_functional_currency okl_trx_contracts.currency_code%TYPE;
1745: l_currency_conversion_type okl_k_headers.currency_conversion_type%TYPE;
1746: l_currency_conversion_rate okl_k_headers.currency_conversion_rate%TYPE;
1747: l_currency_conversion_date okl_k_headers.currency_conversion_date%TYPE;
1748: l_contract_currency OKC_K_HEADERS_b.currency_code%TYPE;
1749:
1742:
1743:
1744: l_functional_currency okl_trx_contracts.currency_code%TYPE;
1745: l_currency_conversion_type okl_k_headers.currency_conversion_type%TYPE;
1746: l_currency_conversion_rate okl_k_headers.currency_conversion_rate%TYPE;
1747: l_currency_conversion_date okl_k_headers.currency_conversion_date%TYPE;
1748: l_contract_currency OKC_K_HEADERS_b.currency_code%TYPE;
1749:
1750: next_row integer;
1743:
1744: l_functional_currency okl_trx_contracts.currency_code%TYPE;
1745: l_currency_conversion_type okl_k_headers.currency_conversion_type%TYPE;
1746: l_currency_conversion_rate okl_k_headers.currency_conversion_rate%TYPE;
1747: l_currency_conversion_date okl_k_headers.currency_conversion_date%TYPE;
1748: l_contract_currency OKC_K_HEADERS_b.currency_code%TYPE;
1749:
1750: next_row integer;
1751:
1801:
1802: CURSOR product_csr (p_chr_id IN NUMBER) IS
1803: SELECT khr.pdt_id,
1804: chr.scs_code --Bug# 4622198
1805: FROM okl_k_headers khr,
1806: okc_k_headers_b chr --Bug# 4622198
1807: WHERE chr.id = khr.id --Bug# 4622198
1808: and khr.id = p_chr_id;
1809:
2219:
2220:
2221: CURSOR product_csr (p_chr_id IN NUMBER) IS
2222: SELECT khr.pdt_id
2223: FROM okl_k_headers khr
2224: WHERE khr.id = p_chr_id;
2225:
2226: /*---New Code start ---*/
2227: CURSOR curr_csr (l_khr_id NUMBER) IS
2227: CURSOR curr_csr (l_khr_id NUMBER) IS
2228: SELECT currency_conversion_type,
2229: currency_conversion_rate,
2230: currency_conversion_date
2231: FROM okl_k_headers
2232: WHERE id = l_khr_id;
2233:
2234: cursor c_get_contract_currency (l_khr_id IN NUMBER) IS
2235: select currency_code from OKC_K_HEADERS_b
2235: select currency_code from OKC_K_HEADERS_b
2236: where id =l_khr_id;
2237:
2238: l_functional_currency okl_trx_contracts.currency_code%TYPE;
2239: l_currency_conversion_type okl_k_headers.currency_conversion_type%TYPE;
2240: l_currency_conversion_rate okl_k_headers.currency_conversion_rate%TYPE;
2241: l_currency_conversion_date okl_k_headers.currency_conversion_date%TYPE;
2242: l_contract_currency OKC_K_HEADERS_b.currency_code%TYPE;
2243: /*---New Code end ---*/
2236: where id =l_khr_id;
2237:
2238: l_functional_currency okl_trx_contracts.currency_code%TYPE;
2239: l_currency_conversion_type okl_k_headers.currency_conversion_type%TYPE;
2240: l_currency_conversion_rate okl_k_headers.currency_conversion_rate%TYPE;
2241: l_currency_conversion_date okl_k_headers.currency_conversion_date%TYPE;
2242: l_contract_currency OKC_K_HEADERS_b.currency_code%TYPE;
2243: /*---New Code end ---*/
2244:
2237:
2238: l_functional_currency okl_trx_contracts.currency_code%TYPE;
2239: l_currency_conversion_type okl_k_headers.currency_conversion_type%TYPE;
2240: l_currency_conversion_rate okl_k_headers.currency_conversion_rate%TYPE;
2241: l_currency_conversion_date okl_k_headers.currency_conversion_date%TYPE;
2242: l_contract_currency OKC_K_HEADERS_b.currency_code%TYPE;
2243: /*---New Code end ---*/
2244:
2245: BEGIN
3385: AND c2.site_use_id = cp_site_use_id);
3386:
3387:
3388: cursor c_program_id (p_contract_id IN NUMBER ) IS
3389: select khr_id from okl_k_headers where id= p_contract_id;
3390:
3391:
3392: l_program_id okl_k_headers.khr_id%TYPE;
3393:
3388: cursor c_program_id (p_contract_id IN NUMBER ) IS
3389: select khr_id from okl_k_headers where id= p_contract_id;
3390:
3391:
3392: l_program_id okl_k_headers.khr_id%TYPE;
3393:
3394: l_id1 VARCHAR2(40) :=NULL;
3395: l_id2 VARCHAR2(200) :=NULL;
3396: l_rule_value VARCHAR2(2000):=NULL;
3969: and crh.cure_refund_header_id =crf.cure_refund_header_id;
3970:
3971: CURSOR product_csr (p_chr_id IN NUMBER) IS
3972: SELECT khr.pdt_id
3973: FROM okl_k_headers khr
3974: WHERE khr.id = p_chr_id;
3975:
3976:
3977: CURSOR org_id_csr ( p_khr_id NUMBER ) IS