157: */
158:
159: cursor csr_contacts is
160: select c.jtot_object1_code, c.object1_id1, c.object1_id2
161: from okc_contacts c, okc_k_party_roles_b p
162: where c.cpl_id = p.id
163: and p.dnz_chr_id = p_chr_id
164: and p.cle_id is null;
165:
275: and c.dnz_chr_id = p_chr_id;
276:
277: cursor csr_rle is
278: select id
279: from okc_k_party_roles_b
280: where rle_code = p_rle_code
281: and dnz_chr_id = p_chr_id
282: and cle_id is null;
283:
282: and cle_id is null;
283:
284: /* cursor csr_con_exist is
285: select 'X'
286: from okc_contacts c, okc_k_party_roles_b p
287: where p.id = c.cpl_id
288: and p.dnz_chr_id = p_chr_id
289: and p.rle_code = p_rle_code; */
290:
287: where p.id = c.cpl_id
288: and p.dnz_chr_id = p_chr_id
289: and p.rle_code = p_rle_code; */
290:
291: l_cpl_id okc_k_party_roles_b.id%TYPE;
292: l_jtot_object1_code VARCHAR2(200);
293: l_object1_id1 VARCHAR2(200);
294: l_object1_id2 VARCHAR2(200);
295: