617: p_cgpv_rec IN cgpv_rec_type) IS
618: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
619: l_dummy VARCHAR2(1);
620: l_row_found BOOLEAN;
621: cursor c1 (p_cgp_parent_id okc_k_grpings_v.cgp_parent_id%TYPE) is
622: select 'x'
623: from okc_k_groups_v a,
624: okc_k_grpings_v b
625: where a.public_yn = 'N'
620: l_row_found BOOLEAN;
621: cursor c1 (p_cgp_parent_id okc_k_grpings_v.cgp_parent_id%TYPE) is
622: select 'x'
623: from okc_k_groups_v a,
624: okc_k_grpings_v b
625: where a.public_yn = 'N'
626: and a.id = b.included_cgp_id
627: and b.cgp_parent_id = p_cgp_parent_id;
628: cursor c2 (p_included_cgp_id okc_k_grpings_v.included_cgp_id%TYPE) is
624: okc_k_grpings_v b
625: where a.public_yn = 'N'
626: and a.id = b.included_cgp_id
627: and b.cgp_parent_id = p_cgp_parent_id;
628: cursor c2 (p_included_cgp_id okc_k_grpings_v.included_cgp_id%TYPE) is
629: select 'x'
630: from okc_k_groups_v a,
631: okc_k_grpings_v b
632: where a.public_yn = 'Y'
627: and b.cgp_parent_id = p_cgp_parent_id;
628: cursor c2 (p_included_cgp_id okc_k_grpings_v.included_cgp_id%TYPE) is
629: select 'x'
630: from okc_k_groups_v a,
631: okc_k_grpings_v b
632: where a.public_yn = 'Y'
633: and a.id = b.cgp_parent_id
634: and b.included_cgp_id = p_included_cgp_id;
635: BEGIN