472: l_template_yn VARCHAR2(3);
473:
474: CURSOR c_template IS
475: SELECT template_yn
476: FROM okc_k_headers_b
477: WHERE id = p_chr_id;
478:
479: CURSOR invalid_template IS
480: SELECT '1'
477: WHERE id = p_chr_id;
478:
479: CURSOR invalid_template IS
480: SELECT '1'
481: FROM okc_k_headers_b
482: WHERE template_yn = 'Y'
483: AND nvl(end_date, sysdate+1) >= trunc(sysdate)
484: AND id = p_chr_id;
485:
486: /*hkamdar 12-12-2005 Commented as this check is not required for source contract.
487: -- Bug #4693415 28-Nov-2005 hkamdar
488: CURSOR term_cntr IS
489: SELECT '1'
490: FROM okc_k_headers_b
491: WHERE id = p_chr_id
492: AND date_terminated IS NOT NULL
493: AND date_terminated <= SYSDATE;
494:
493: AND date_terminated <= SYSDATE;
494:
495: CURSOR cancel_cntr IS
496: SELECT '1'
497: FROM okc_k_headers_b hdr, okc_statuses_b status
498: WHERE hdr.id = p_chr_id
499: AND hdr.sts_code = status.code
500: AND status.ste_code = 'CANCELLED';
501: */
552: l_code VARCHAR2(100);
553:
554: CURSOR c_chr IS
555: SELECT sts_code,template_yn,scs_code
556: FROM okc_k_headers_b
557: WHERE id = p_chr_id;
558:
559: CURSOR c_sts(p_code IN VARCHAR2) IS
560: SELECT ste_code
2850: SELECT 'x'
2851: FROM FND_LOOKUP_VALUES rgdv,
2852: okc_rule_groups_b rgp,
2853: OKC_SUBCLASS_RG_DEFS srdv,
2854: OKC_K_HEADERS_B chrv
2855: WHERE rgp.id = p_rgp_id
2856: AND rgdv.LOOKUP_CODE = rgp.rgd_code
2857: AND rgdv.lookup_type = 'OKC_RULE_GROUP_DEF'
2858: AND srdv.RGD_CODE = rgp.rgd_code
3501: PROCEDURE Set_Attach_Session_Vars(p_chr_id NUMBER) IS
3502: l_app_id NUMBER;
3503: Cursor l_chr_csr Is
3504: SELECT application_id
3505: FROM okc_k_headers_b
3506: WHERE id = p_chr_id;
3507: BEGIN
3508: If (p_chr_id IS NOT NULL AND
3509: FND_ATTACHMENT_UTIL_PKG.function_name IS NULL
3649: -- cursor to get the contract category
3650:
3651: CURSOR l_Service_Contract_csr IS
3652: SELECT osb.cls_code
3653: FROM okc_subclasses_b osb,okc_k_headers_b okb
3654: WHERE okb.id = p_from_chr_id
3655: AND okb.scs_code = osb.code ;
3656:
3657: -- Added for Bug 3764231
3972: WHERE id = p_to_cle_id;
3973:
3974: CURSOR c_chr IS
3975: SELECT start_date,end_date
3976: FROM okc_k_headers_b
3977: WHERE id = p_to_chr_id;
3978:
3979: BEGIN
3980: IF (p_to_chr_id IS NULL OR p_to_chr_id = OKC_API.G_MISS_NUM) THEN
4947: START WITH id = p_from_cle_id;
4948:
4949: CURSOR c_application_id IS
4950: SELECT chr.application_id
4951: FROM okc_k_headers_b chr,
4952: okc_k_lines_b cle
4953: WHERE chr.id = cle.dnz_chr_id
4954: AND cle.id = p_from_cle_id;
4955: ----------------------------------------------------------------------------
5406: -- /Rules migration/
5407: --FOr other contracts classes, conversion data is now stored at the header level
5408: select CONVERSION_TYPE, CONVERSION_RATE, CONVERSION_rate_DATE
5409: into g_conversion_type, g_conversion_rate, g_conversion_date
5410: from okc_k_headers_b
5411: where id = l_chrv_rec.id;
5412: End If;
5413:
5414:
5642: l_entity_name := 'OKC_K_HEADERS_V';
5643: l_from_entity_name := 'OKC_K_HEADERS_V';
5644: l_to_entity_name := 'OKC_K_HEADERS_V';
5645: ELSE */
5646: l_entity_name := 'OKC_K_HEADERS_B';
5647: l_from_entity_name := 'OKC_K_HEADERS_B';
5648: l_to_entity_name := 'OKC_K_HEADERS_B';
5649: --End If;
5650:
5643: l_from_entity_name := 'OKC_K_HEADERS_V';
5644: l_to_entity_name := 'OKC_K_HEADERS_V';
5645: ELSE */
5646: l_entity_name := 'OKC_K_HEADERS_B';
5647: l_from_entity_name := 'OKC_K_HEADERS_B';
5648: l_to_entity_name := 'OKC_K_HEADERS_B';
5649: --End If;
5650:
5651: If (fnd_attachment_util_pkg.get_atchmt_exists (
5644: l_to_entity_name := 'OKC_K_HEADERS_V';
5645: ELSE */
5646: l_entity_name := 'OKC_K_HEADERS_B';
5647: l_from_entity_name := 'OKC_K_HEADERS_B';
5648: l_to_entity_name := 'OKC_K_HEADERS_B';
5649: --End If;
5650:
5651: If (fnd_attachment_util_pkg.get_atchmt_exists (
5652: l_entity_name => l_entity_name,
6052: -- cursor to get the contract category
6053:
6054: CURSOR l_Service_Contract_csr IS
6055: SELECT osb.cls_code
6056: FROM okc_subclasses_b osb,okc_k_headers_b okb
6057: WHERE okb.id = p_chr_id
6058: AND okb.scs_code = osb.code ;
6059:
6060: CURSOR c_lines IS
8222: l_no_data_found BOOLEAN := TRUE;
8223:
8224: -- Bug 1922121: Compilation errors on ktst115. Problem occurred
8225: -- because application_id is defined as varchar2(240) in
8226: -- okc_k_headers_bh/hv and as NUMBER in okc_k_headers_b/v. This gives
8227: -- problems in the UNION ALL because it tries to combine datatypes
8228: -- Fix: Put a to_char() around application_id in the first cursor
8229:
8230: CURSOR c_chrv_rec IS
10466: -- cursor to get the contract category
10467:
10468: CURSOR l_Service_Contract_csr IS
10469: SELECT osb.cls_code
10470: FROM okc_subclasses_b osb,okc_k_headers_b okb
10471: WHERE okb.id = p_from_chr_id
10472: AND okb.scs_code = osb.code ;
10473:
10474: -- Added for Bug 3764231
11492: CURSOR get_k_num_csr(p_chr_id IN NUMBER)
11493: IS
11494: SELECT
11495: contract_number ||' '|| contract_number_modifier
11496: FROM okc_k_headers_b
11497: WHERE id = p_chr_id;
11498:
11499: l_token VARCHAR2(250);
11500: l_msg_stack VARCHAR2(250);
11789: -- Get Source Contract ID
11790: CURSOR GetSourceContractID(P_To_Chr_ID IN NUMBER) IS
11791: select orig_system_id1
11792: from
11793: okc_k_headers_b
11794: where id = P_To_Chr_ID;
11795:
11796: P_From_Chr_ID NUMBER;
11797:
11812:
11813: -- Get Header start date and rules
11814: CURSOR get_hdr_date_csr(p_chr_id IN NUMBER) IS
11815: SELECT start_date,end_date
11816: FROM OKC_K_HEADERS_B
11817: WHERE id = p_chr_id;
11818:
11819: -- Get all top lines
11820: CURSOR topline_csr(p_chr_id IN NUMBER) IS
11976: --end npalepu
11977:
11978: CURSOR get_hdr_enddate (p_chr_id IN NUMBER) IS
11979: SELECT end_date,inv_rule_id
11980: FROM okc_k_headers_b
11981: WHERE id= p_chr_id;
11982:
11983: CURSOR get_parent_line_enddate (p_cle_id IN NUMBER) IS
11984: SELECT end_date,inv_rule_id