[Home] [Help]
7: IS PRAGMA AUTONOMOUS_TRANSACTION;
8: CURSOR l_cur IS
9: SELECT 1
10: FROM hz_code_assignments
11: WHERE owner_table_name = 'HZ_PARTIES'
12: AND owner_table_id = p_party_id
13: AND class_category = 'POS_PARTICIPANT_TYPE'
14: AND class_code = 'ENTERPRISE'
15: AND status = 'A'
165: x_party_name OUT nocopy VARCHAR2)
166: IS
167: CURSOR l_cur IS
168: SELECT party_type, party_name
169: FROM hz_parties
170: WHERE party_id = p_party_id;
171: BEGIN
172: OPEN l_cur;
173: FETCH l_cur INTO x_party_type, x_party_name;
188: (p_party_id IN NUMBER,
189: p_is_from_party IN VARCHAR2,
190: x_return_status OUT nocopy VARCHAR2)
191: IS
192: l_party_type hz_parties.party_type%TYPE;
193: l_party_name hz_parties.party_name%TYPE;
194: l_found BOOLEAN;
195: BEGIN
196: get_party_info(p_party_id, l_found, l_party_type, l_party_name);
189: p_is_from_party IN VARCHAR2,
190: x_return_status OUT nocopy VARCHAR2)
191: IS
192: l_party_type hz_parties.party_type%TYPE;
193: l_party_name hz_parties.party_name%TYPE;
194: l_found BOOLEAN;
195: BEGIN
196: get_party_info(p_party_id, l_found, l_party_type, l_party_name);
197:
293: WHERE party_site_id = p_party_site_id;
294:
295: CURSOR l_party_cur(p_party_id NUMBER) IS
296: SELECT party_id
297: FROM hz_parties
298: WHERE party_id = p_party_id;
299: BEGIN
300:
301: l_module := g_log_module || 'PARTY_MERGE_ROUTINE';
337: RETURN;
338:
339: END IF;
340:
341: IF p_parent_entity_name NOT IN ('HZ_PARTIES', 'HZ_PARTY_SITES') THEN
342: fnd_message.set_name('POS','POS_PTYM_BAD_PARENT_ENTITY');
343: fnd_message.set_token('PARENT_ENTITY_NAME', p_parent_entity_name);
344: fnd_msg_pub.ADD;
345: x_return_status := fnd_api.g_ret_sts_unexp_error;
346: RETURN;
347: END IF;
348:
349: -- validate p_from_fk_id and p_to_fk_id
350: IF p_parent_entity_name = 'HZ_PARTIES' THEN
351:
352: IF p_from_fk_id IS NULL THEN
353: fnd_message.set_name('POS','POS_PTYM_BAD_PARTY_ID');
354: fnd_message.set_token('PARTY_ID', p_from_fk_id);