[Home] [Help]
3983: --active_yn = 'N'. So we want to get the active renewals (such as entered/signed status etc) first
3984: CURSOR c_check_hdr_renew (cp_chr_id IN NUMBER) IS
3985: SELECT k.contract_number, k.contract_number_modifier, st.ste_code
3986: FROM okc_operation_lines ol, okc_operation_instances oi, okc_class_operations oo,
3987: okc_statuses_b st, okc_k_headers_all_b k
3988: WHERE oo.cls_code = 'SERVICE' AND oo.opn_code = 'RENEWAL'
3989: AND oo.id = oi.cop_id
3990: AND ol.oie_id = oi.id AND ol.object_chr_id = cp_chr_id
3991: AND ol.subject_chr_id IS NOT NULL AND ol.object_cle_id IS NULL
4025: --we need to do line level checks only if a valid line exists, other wise we get
4026: --redundant error messages
4027: CURSOR c_check_valid_line(cp_chr_id IN NUMBER) IS
4028: SELECT id
4029: FROM okc_k_lines_b kl, okc_statuses_b st
4030: WHERE kl.dnz_chr_id = cp_chr_id AND kl.lse_id IN (7, 8, 9, 10, 11, 13, 25, 35, 46)
4031: AND kl.sts_code = st.ste_code
4032: AND st.ste_code IN ('ACTIVE', 'EXPIRED', 'SIGNED', 'CANCELLED', 'TERMINATED');
4033:
4033:
4034: l_k_app_id okc_k_headers_b.application_id%TYPE;
4035: l_k_num okc_k_headers_b.contract_number%TYPE;
4036: l_k_mod okc_k_headers_b.contract_number_modifier%TYPE;
4037: l_k_ste_code okc_statuses_b.ste_code%TYPE;
4038: l_k_ste_meaning okc_statuses_tl.meaning%TYPE;
4039: l_k_scs_code okc_k_headers_b.scs_code%TYPE;
4040: l_k_template_yn okc_k_headers_b.template_yn%TYPE;
4041: l_k_date_terminated okc_k_headers_b.date_terminated%TYPE;
4052: l_k_ren_type oks_k_defaults.renewal_type%TYPE;
4053:
4054: l_renk_num okc_k_headers_b.contract_number%TYPE;
4055: l_renk_mod okc_k_headers_b.contract_number_modifier%TYPE;
4056: l_renk_ste_code okc_statuses_b.ste_code%TYPE;
4057: l_valid_line_exists BOOLEAN := FALSE;
4058: BEGIN
4059: --log key input parameters
4060: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN