[Home] [Help]
317: BEGIN
318: IF p_contact_flag = 'P' THEN
319: select 'x'
320: into l_dummy
321: from csi_ipa_relation_types
322: where ipa_relation_type_code = UPPER(p_party_rel_type_code)
323: and party_use_flag = 'Y';
324:
325: ELSIF p_contact_flag = 'A' THEN
324:
325: ELSIF p_contact_flag = 'A' THEN
326: select 'x'
327: into l_dummy
328: from csi_ipa_relation_types
329: where ipa_relation_type_code = UPPER(p_party_rel_type_code)
330: and account_use_flag = 'Y';
331:
332: ELSIF p_contact_flag = 'C' THEN
331:
332: ELSIF p_contact_flag = 'C' THEN
333: select 'x'
334: into l_dummy
335: from csi_ipa_relation_types
336: where ipa_relation_type_code = UPPER(p_party_rel_type_code)
337: and contact_use_flag = 'Y';
338: END IF;
339: RETURN l_return_value;
1124: l_return_value BOOLEAN := TRUE;
1125:
1126: CURSOR c1 IS
1127: select 'x'
1128: from csi_ipa_relation_types
1129: where ipa_relation_type_code = UPPER(p_acct_rel_type_code)
1130: and account_use_flag = 'Y';
1131:
1132: BEGIN