[Home] [Help]
1343: END IF;
1344: RETURN(x_return_status);
1345: END get_rec_itiv;
1346: -----------------------------------------------------------------------------------------------------
1347: FUNCTION get_rec_cplv(p_cplv_id IN OKC_K_PARTY_ROLES_B.ID%TYPE,
1348: x_cplv_rec OUT NOCOPY cplv_rec_type)
1349: RETURN VARCHAR2 IS
1350: CURSOR okc_cplv_pk_csr (p_cplv_id OKC_K_PARTY_ROLES_B.ID%TYPE) IS
1351: SELECT ID,
1346: -----------------------------------------------------------------------------------------------------
1347: FUNCTION get_rec_cplv(p_cplv_id IN OKC_K_PARTY_ROLES_B.ID%TYPE,
1348: x_cplv_rec OUT NOCOPY cplv_rec_type)
1349: RETURN VARCHAR2 IS
1350: CURSOR okc_cplv_pk_csr (p_cplv_id OKC_K_PARTY_ROLES_B.ID%TYPE) IS
1351: SELECT ID,
1352: OBJECT_VERSION_NUMBER,
1353: SFWT_FLAG,
1354: CPL_ID,
11863: l_cplv_rec.chr_id := null;
11864: -- Creation of Party Item Record for the above record information
11865: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api
11866: -- to create records in tables
11867: -- okc_k_party_roles_b and okl_k_party_roles
11868: /*
11869: OKL_OKC_MIGRATION_PVT.create_k_party_role(p_api_version => p_api_version,
11870: p_init_msg_list => p_init_msg_list,
11871: x_return_status => x_return_status,
12054: l_cplv_rec.object1_id2 := p_cplv_rec.object1_id2;
12055: -- Creation of Party Item Record for the above record information
12056: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api
12057: -- to update records in tables
12058: -- okc_k_party_roles_b and okl_k_party_roles
12059: /*
12060: OKL_OKC_MIGRATION_PVT.update_k_party_role(p_api_version => p_api_version,
12061: p_init_msg_list => p_init_msg_list,
12062: x_return_status => x_return_status,
12676: --cursor to get party roles attached to copied line
12677: CURSOR l_cpl_csr (p_cle_id in number,
12678: p_chr_id in number) IS
12679: select cplb.id
12680: from okc_k_party_roles_b cplb
12681: where cle_id = p_cle_id
12682: and dnz_chr_id = p_chr_id;
12683:
12684: l_cpl_id OKC_K_PARTY_ROLES_B.ID%TYPE;
12680: from okc_k_party_roles_b cplb
12681: where cle_id = p_cle_id
12682: and dnz_chr_id = p_chr_id;
12683:
12684: l_cpl_id OKC_K_PARTY_ROLES_B.ID%TYPE;
12685: l_cplv_rec OKL_OKC_MIGRATION_PVT.cplv_rec_type;
12686:
12687:
12688: --cursor to get supplier invoice details
13207: --delete cplv rec
13208: l_cplv_rec.id := l_cpl_id;
13209: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api
13210: -- to delete records in tables
13211: -- okc_k_party_roles_b and okl_k_party_roles
13212: /*
13213: OKL_OKC_MIGRATION_PVT.delete_k_party_role
13214: ( p_api_version => p_api_version,
13215: p_init_msg_list => p_init_msg_list,
13661: CURSOR l_cpl_csr (p_orig_cle_id in number,
13662: p_chr_id in number) is
13663: SELECT cplb.id,
13664: cplb.rle_code
13665: FROM okc_k_party_roles_b cplb
13666: WHERE cplb.cle_id = p_orig_cle_id
13667: AND cplb.dnz_chr_id = p_chr_id;
13668:
13669: l_cpl_rec l_cpl_csr%ROWTYPE;
13666: WHERE cplb.cle_id = p_orig_cle_id
13667: AND cplb.dnz_chr_id = p_chr_id;
13668:
13669: l_cpl_rec l_cpl_csr%ROWTYPE;
13670: lx_cpl_id OKC_K_PARTY_ROLES_B.ID%TYPE;
13671:
13672: --cursor to get any covered asset lines where old line was referenced
13673: CURSOR l_lnk_ast_csr (p_orig_cle_id in NUMBER,
13674: p_chr_id in NUMBER) is
13753: from
13754: okl_subsidies_b subb,
13755: okl_subsidies_tl subt,
13756: po_vendors pov,
13757: okc_k_party_roles_b sub_cplb,
13758: okl_k_lines sub_kle,
13759: okc_k_lines_b sub_cleb,
13760: okc_line_styles_b sub_lseb
13761: where subt.id = subb.id