[Home] [Help]
215: ) RETURN VARCHAR2;
216:
217: PROCEDURE do_update_party_rel_name(
218: p_party_id IN NUMBER,
219: p_party_name IN HZ_PARTIES.PARTY_NAME%TYPE
220: );
221:
222: PROCEDURE do_process_classification(
223: p_create_update_flag IN VARCHAR2,
361: ) RETURN VARCHAR2 IS
362:
363: CURSOR c_party_exists IS
364: SELECT party_type, party_number
365: FROM hz_parties
366: WHERE party_id = p_party_id;
367:
368: l_party_type VARCHAR2(30);
369: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
365: FROM hz_parties
366: WHERE party_id = p_party_id;
367:
368: l_party_type VARCHAR2(30);
369: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
370: l_debug_prefix VARCHAR2(30) := '';
371: BEGIN
372: -- Debug info.
373:
609: p_person_first_name IN VARCHAR2,
610: p_person_last_name IN VARCHAR2
611: ) RETURN VARCHAR2 IS
612:
613: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
614: l_debug_prefix VARCHAR2(30) := '';
615: BEGIN
616:
617: -- Debug info.
685: */
686:
687: PROCEDURE do_update_party_rel_name(
688: p_party_id IN NUMBER,
689: p_party_name IN HZ_PARTIES.PARTY_NAME%TYPE
690: ) IS
691:
692: l_party_name HZ_PARTIES.party_name%TYPE;
693:
688: p_party_id IN NUMBER,
689: p_party_name IN HZ_PARTIES.PARTY_NAME%TYPE
690: ) IS
691:
692: l_party_name HZ_PARTIES.party_name%TYPE;
693:
694: CURSOR c_party_rels IS
695: SELECT r.party_id, r.object_id, o.party_name, r.subject_id, s.party_name,
696: rel.party_number, rel.party_name
693:
694: CURSOR c_party_rels IS
695: SELECT r.party_id, r.object_id, o.party_name, r.subject_id, s.party_name,
696: rel.party_number, rel.party_name
697: FROM hz_relationships r, hz_parties s, hz_parties o, hz_parties rel
698: WHERE (r.subject_id = p_party_id OR r.object_id = p_party_id)
699: AND r.party_id IS NOT NULL
700: AND r.subject_table_name = 'HZ_PARTIES'
701: AND r.object_table_name = 'HZ_PARTIES'
696: rel.party_number, rel.party_name
697: FROM hz_relationships r, hz_parties s, hz_parties o, hz_parties rel
698: WHERE (r.subject_id = p_party_id OR r.object_id = p_party_id)
699: AND r.party_id IS NOT NULL
700: AND r.subject_table_name = 'HZ_PARTIES'
701: AND r.object_table_name = 'HZ_PARTIES'
702: AND r.directional_flag = 'F'
703: AND r.subject_id = s.party_id
704: AND r.object_id = o.party_id
697: FROM hz_relationships r, hz_parties s, hz_parties o, hz_parties rel
698: WHERE (r.subject_id = p_party_id OR r.object_id = p_party_id)
699: AND r.party_id IS NOT NULL
700: AND r.subject_table_name = 'HZ_PARTIES'
701: AND r.object_table_name = 'HZ_PARTIES'
702: AND r.directional_flag = 'F'
703: AND r.subject_id = s.party_id
704: AND r.object_id = o.party_id
705: AND r.party_id = rel.party_id;
704: AND r.object_id = o.party_id
705: AND r.party_id = rel.party_id;
706:
707: TYPE IDlist IS TABLE OF NUMBER(15);
708: TYPE NAMElist IS TABLE OF HZ_PARTIES.PARTY_NAME%TYPE;
709: TYPE NUMBERlist IS TABLE OF HZ_PARTIES.PARTY_NUMBER%TYPE;
710:
711: i_party_id IDlist;
712: i_object_id IDlist;
705: AND r.party_id = rel.party_id;
706:
707: TYPE IDlist IS TABLE OF NUMBER(15);
708: TYPE NAMElist IS TABLE OF HZ_PARTIES.PARTY_NAME%TYPE;
709: TYPE NUMBERlist IS TABLE OF HZ_PARTIES.PARTY_NUMBER%TYPE;
710:
711: i_party_id IDlist;
712: i_object_id IDlist;
713: i_object_name NAMElist;
746: --check if party is locked by any one else.
747: BEGIN
748: SELECT 'Y'
749: INTO l_dummy
750: FROM hz_parties
751: WHERE PARTY_ID = i_party_id(i)
752: FOR UPDATE NOWAIT;
753: EXCEPTION
754: WHEN OTHERS THEN
752: FOR UPDATE NOWAIT;
753: EXCEPTION
754: WHEN OTHERS THEN
755: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
756: fnd_message.set_token('TABLE', 'HZ_PARTIES');
757: fnd_msg_pub.add;
758: RAISE FND_API.G_EXC_ERROR;
759: END;
760:
757: fnd_msg_pub.add;
758: RAISE FND_API.G_EXC_ERROR;
759: END;
760:
761: UPDATE hz_parties
762: SET party_name = l_party_name
763: WHERE party_id = i_party_id(i);
764: END IF;
765:
996:
997: l_code_assignment_id NUMBER;
998: l_msg_count NUMBER;
999: l_msg_data VARCHAR2(2000);
1000: l_sic_code HZ_PARTIES.SIC_CODE%TYPE;
1001: l_sic_code_type HZ_PARTIES.SIC_CODE_TYPE%TYPE;
1002: l_data_source_type VARCHAR2(30);
1003: l_party_rec PARTY_REC_TYPE;
1004: l_old_party_rec PARTY_REC_TYPE;
997: l_code_assignment_id NUMBER;
998: l_msg_count NUMBER;
999: l_msg_data VARCHAR2(2000);
1000: l_sic_code HZ_PARTIES.SIC_CODE%TYPE;
1001: l_sic_code_type HZ_PARTIES.SIC_CODE_TYPE%TYPE;
1002: l_data_source_type VARCHAR2(30);
1003: l_party_rec PARTY_REC_TYPE;
1004: l_old_party_rec PARTY_REC_TYPE;
1005:
1087: l_party_rec.category_code <> l_old_party_rec.category_code) AND
1088: l_data_source_type = G_MISS_CONTENT_SOURCE_TYPE
1089: THEN
1090: hz_classification_v2pub.set_primary_code_assignment(
1091: p_owner_table_name => 'HZ_PARTIES',
1092: p_owner_table_id => l_party_rec.party_id,
1093: p_class_category => 'CUSTOMER_CATEGORY',
1094: p_class_code => l_party_rec.category_code,
1095: p_content_source_type => l_data_source_type,
1170: NVL(p_organization_rec.sic_code_type, FND_API.G_MISS_CHAR) <>
1171: p_old_organization_rec.sic_code_type))
1172: THEN
1173: hz_classification_v2pub.set_primary_code_assignment(
1174: p_owner_table_name => 'HZ_PARTIES',
1175: p_owner_table_id => p_organization_rec.party_rec.party_id,
1176: p_class_category => l_sic_code_type,
1177: p_class_code => l_sic_code,
1178: p_content_source_type => l_data_source_type,
1208: l_local_activity_code_type := 'NACE';
1209: end if;
1210:
1211: hz_classification_v2pub.set_primary_code_assignment(
1212: p_owner_table_name => 'HZ_PARTIES',
1213: p_owner_table_id => p_organization_rec.party_rec.party_id,
1214:
1215: -- p_class_category => 'NACE',
1216:
2398: IS
2399: SELECT 'Y'
2400: FROM hz_orig_sys_references
2401: WHERE owner_table_id = p_party_id
2402: AND owner_table_name = 'HZ_PARTIES'
2403: AND orig_system = l_orig_system
2404: AND orig_system_reference = l_orig_system_reference
2405: AND trunc(nvl(end_date_active, sysdate)) >= trunc(sysdate)
2406: AND status = 'A';
2464: fetch c_check_party_mapping into l_exists;
2465: if c_check_party_mapping%NOTFOUND then
2466: l_orig_sys_reference_rec.orig_system := l_orig_system ;
2467: l_orig_sys_reference_rec.orig_system_reference := l_orig_system_reference;
2468: l_orig_sys_reference_rec.owner_table_name := 'HZ_PARTIES';
2469: l_orig_sys_reference_rec.owner_table_id := p_party_id;
2470: l_orig_sys_reference_rec.created_by_module := nvl(l_created_by_module, 'TCA_V2_API');
2471:
2472: hz_orig_system_ref_pub.create_orig_system_reference(
2715: l_old_party_rec PARTY_REC_TYPE;
2716: l_party_dup_rec PARTY_DUP_REC_TYPE;
2717: l_person_rec PERSON_REC_TYPE;
2718:
2719: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2720: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2721: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2722: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2723: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2716: l_party_dup_rec PARTY_DUP_REC_TYPE;
2717: l_person_rec PERSON_REC_TYPE;
2718:
2719: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2720: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2721: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2722: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2723: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2724: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2717: l_person_rec PERSON_REC_TYPE;
2718:
2719: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2720: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2721: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2722: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2723: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2724: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2725: l_party_object_version_number NUMBER;
2718:
2719: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2720: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2721: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2722: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2723: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2724: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2725: l_party_object_version_number NUMBER;
2726: l_rowid ROWID := NULL;
2719: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2720: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2721: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2722: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2723: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2724: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2725: l_party_object_version_number NUMBER;
2726: l_rowid ROWID := NULL;
2727: l_process_party_name VARCHAR2(1);
2720: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2721: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2722: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2723: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2724: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2725: l_party_object_version_number NUMBER;
2726: l_rowid ROWID := NULL;
2727: l_process_party_name VARCHAR2(1);
2728: l_dummy VARCHAR2(1);
2741:
2742: CURSOR c_party IS
2743: SELECT party_name, object_version_number, rowid,
2744: created_by_module
2745: FROM hz_parties
2746: WHERE party_id = p_party_id
2747: FOR UPDATE NOWAIT;
2748:
2749: CURSOR c_party_number_exists (
2749: CURSOR c_party_number_exists (
2750: p_party_number VARCHAR2
2751: ) IS
2752: SELECT 'Y'
2753: FROM hz_parties
2754: WHERE party_number = p_party_number;
2755:
2756: BEGIN
2757:
2788: and (l_party_rec.party_id = FND_API.G_MISS_NUM or l_party_rec.party_id is null) THEN
2789: hz_orig_system_ref_pub.get_owner_table_id
2790: (p_orig_system => l_party_rec.orig_system,
2791: p_orig_system_reference => l_party_rec.orig_system_reference,
2792: p_owner_table_name => 'HZ_PARTIES',
2793: x_owner_table_id => l_party_rec.party_id,
2794: x_return_status => l_return_status);
2795: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2796: RAISE FND_API.G_EXC_ERROR;
2862: l_party_object_version_number IS NOT NULL AND
2863: p_party_object_version_number = l_party_object_version_number))
2864: THEN
2865: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
2866: fnd_message.set_token('TABLE', 'HZ_PARTIES');
2867: fnd_msg_pub.add;
2868: RAISE fnd_api.g_exc_error;
2869: END IF;
2870: CLOSE c_party;
3109:
3110: -- Debug info.
3111: /*IF g_debug THEN
3112: hz_utility_v2pub.debug (
3113: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3114: END IF;
3115: */
3116: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3117: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3113: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3114: END IF;
3115: */
3116: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3117: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3118: p_msg_level=>fnd_log.level_procedure);
3119: END IF;
3120:
3121: -- this is for handling orig_system_reference defaulting
3122: IF l_party_rec.party_id = FND_API.G_MISS_NUM THEN
3123: l_party_rec.party_id := NULL;
3124: END IF;
3125:
3126: hz_parties_pkg.insert_row (
3127: x_party_id => l_party_rec.party_id,
3128: x_party_number => l_party_rec.party_number,
3129: x_party_name => l_party_name,
3130: x_party_type => p_party_type,
3213:
3214: -- Debug info.
3215: /*IF g_debug THEN
3216: hz_utility_v2pub.debug (
3217: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3218: END IF;
3219: */
3220: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3221: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3217: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3218: END IF;
3219: */
3220: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3221: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3222: p_msg_level=>fnd_log.level_procedure);
3223: END IF;
3224:
3225: if l_party_rec.orig_system is not null
3228: and p_party_type not in ('PERSON', 'ORGANIZATION')
3229: then
3230: l_orig_sys_reference_rec.orig_system := l_party_rec.orig_system;
3231: l_orig_sys_reference_rec.orig_system_reference := l_party_rec.orig_system_reference;
3232: l_orig_sys_reference_rec.owner_table_name := 'HZ_PARTIES';
3233: l_orig_sys_reference_rec.owner_table_id := l_party_rec.party_id;
3234: l_orig_sys_reference_rec.created_by_module := l_created_by_module;
3235:
3236: hz_orig_system_ref_pub.create_orig_system_reference(
3307:
3308: -- Debug info.
3309: /*IF g_debug THEN
3310: hz_utility_v2pub.debug (
3311: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3312: END IF;
3313: */
3314: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3315: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3311: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3312: END IF;
3313: */
3314: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3315: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3316: p_msg_level=>fnd_log.level_procedure);
3317: END IF;
3318:
3319: if (l_party_rec.orig_system is not null
3325: -- In mosr, we have bypassed osr nonupdateable validation
3326: -- but we should not update existing osr, set it to null
3327: end if;
3328: -- call table handler to update the record
3329: hz_parties_pkg.update_row (
3330: x_rowid => l_rowid,
3331: x_party_id => l_party_rec.party_id,
3332: x_party_number => l_party_rec.party_number,
3333: x_party_name => l_party_name,
3426:
3427: -- Debug info.
3428: /*IF g_debug THEN
3429: hz_utility_v2pub.debug (
3430: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3431: END IF;
3432: */
3433: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3434: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3430: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3431: END IF;
3432: */
3433: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3434: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3435: p_msg_level=>fnd_log.level_procedure);
3436: END IF;
3437:
3438: -- Bug 4490715 : If party is PERSON / ORGANIZATION call eTax
3561:
3562: EXCEPTION
3563: WHEN g_resource_busy THEN
3564: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
3565: fnd_message.set_token('TABLE', 'hz_parties');
3566: fnd_msg_pub.add;
3567: RAISE fnd_api.g_exc_error;
3568:
3569: END do_create_update_party_only;
3574: * DESCRIPTION
3575: * Creates party.
3576: *
3577: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
3578: * hz_parties_pkg.Insert_Row
3579: *
3580: * ARGUMENTS
3581: * IN:
3582: * p_party_type
3625: l_sst_organization_rec ORGANIZATION_REC_TYPE;
3626: l_new_sst_organization_rec ORGANIZATION_REC_TYPE;
3627:
3628: l_party_id NUMBER;
3629: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
3630: l_content_source_type VARCHAR2(30);
3631: l_actual_content_source VARCHAR2(30);
3632: l_data_source_type VARCHAR2(30);
3633: l_data_source_from VARCHAR2(30);
4289: * DESCRIPTION
4290: * Updates party.
4291: *
4292: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
4293: * hz_parties_pkg.Update_Row
4294: *
4295: * ARGUMENTS
4296: * IN:
4297: * p_party_type
4341: l_ue_person_rec PERSON_REC_TYPE;
4342: l_ue_organization_rec ORGANIZATION_REC_TYPE;
4343:
4344: l_party_id NUMBER;
4345: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
4346: l_data_source_type VARCHAR2(30);
4347: l_profile_id NUMBER;
4348:
4349: l_user_entered_profile_exists VARCHAR2(1);
4358:
4359: l_debug_prefix VARCHAR2(30);
4360:
4361: --Bug No:2771835----------------
4362: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4363: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4364: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4365: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4366: -------------Bug 4586451
4359: l_debug_prefix VARCHAR2(30);
4360:
4361: --Bug No:2771835----------------
4362: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4363: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4364: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4365: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4366: -------------Bug 4586451
4367: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4360:
4361: --Bug No:2771835----------------
4362: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4363: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4364: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4365: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4366: -------------Bug 4586451
4367: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4368: -------------------------Bug No. 4586451
4361: --Bug No:2771835----------------
4362: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4363: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4364: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4365: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4366: -------------Bug 4586451
4367: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4368: -------------------------Bug No. 4586451
4369:
4367: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4368: -------------------------Bug No. 4586451
4369:
4370: CURSOR c_party_name(p_party_id NUMBER) IS
4371: SELECT party_name,tax_reference FROM HZ_PARTIES
4372: WHERE PARTY_ID=p_party_id;
4373:
4374: ---End of Bug No:2771835---------
4375:
4933: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
4934: l_test_security :=
4935: hz_dss_util_pub.test_instance(
4936: p_operation_code => 'INSERT',
4937: p_db_object_name => 'HZ_PARTIES',
4938: p_instance_pk1_value => x_party_id,
4939: p_user_name => fnd_global.user_name,
4940: x_return_status => dss_return_status,
4941: x_msg_count => dss_msg_count,
5263:
5264: -- make sure PEROSN party has been passed in
5265: BEGIN
5266: SELECT 1 INTO l_count
5267: FROM HZ_PARTIES
5268: WHERE PARTY_ID = p_person_rec.party_rec.party_id
5269: AND PARTY_TYPE = 'PERSON';
5270: EXCEPTION
5271: WHEN NO_DATA_FOUND THEN
5285:
5286: hz_orig_system_ref_pub.get_owner_table_id
5287: (p_orig_system => l_person_rec.party_rec.orig_system,
5288: p_orig_system_reference => l_person_rec.party_rec.orig_system_reference,
5289: p_owner_table_name => 'HZ_PARTIES',
5290: x_owner_table_id => l_person_rec.party_rec.party_id,
5291: x_return_status => x_return_status);
5292:
5293: IF x_return_status <> fnd_api.g_ret_sts_success THEN
5327: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
5328: l_test_security :=
5329: hz_dss_util_pub.test_instance(
5330: p_operation_code => 'UPDATE',
5331: p_db_object_name => 'HZ_PARTIES',
5332: p_instance_pk1_value => l_person_rec.party_rec.party_id,
5333: p_user_name => fnd_global.user_name,
5334: x_return_status => dss_return_status,
5335: x_msg_count => dss_msg_count,
5615: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
5616: l_test_security :=
5617: hz_dss_util_pub.test_instance(
5618: p_operation_code => 'INSERT',
5619: p_db_object_name => 'HZ_PARTIES',
5620: p_instance_pk1_value => x_party_id,
5621: p_user_name => fnd_global.user_name,
5622: x_return_status => dss_return_status,
5623: x_msg_count => dss_msg_count,
5632: -- Bug 3835601: replaced the dss message with a more user friendly message
5633: --
5634: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_INSERT_PRIVILEGE');
5635: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
5636: hz_dss_util_pub.get_display_name('HZ_PARTIES', null));
5637: FND_MSG_PUB.ADD;
5638: RAISE FND_API.G_EXC_ERROR;
5639: end if;
5640: END IF;
5887:
5888: -- make sure GROUP party has been passed in
5889: BEGIN
5890: SELECT 1 INTO l_count
5891: FROM HZ_PARTIES
5892: WHERE PARTY_ID = p_group_rec.party_rec.party_id
5893: AND PARTY_TYPE = 'GROUP';
5894: EXCEPTION
5895: WHEN NO_DATA_FOUND THEN
5909:
5910: hz_orig_system_ref_pub.get_owner_table_id
5911: (p_orig_system => l_group_rec.party_rec.orig_system,
5912: p_orig_system_reference => l_group_rec.party_rec.orig_system_reference,
5913: p_owner_table_name => 'HZ_PARTIES',
5914: x_owner_table_id => l_group_rec.party_rec.party_id,
5915: x_return_status => x_return_status);
5916:
5917: IF x_return_status <> fnd_api.g_ret_sts_success THEN
5939: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
5940: l_test_security :=
5941: hz_dss_util_pub.test_instance(
5942: p_operation_code => 'UPDATE',
5943: p_db_object_name => 'HZ_PARTIES',
5944: p_instance_pk1_value => l_group_rec.party_rec.party_id,
5945: p_user_name => fnd_global.user_name,
5946: x_return_status => dss_return_status,
5947: x_msg_count => dss_msg_count,
5956: -- Bug 3835601: replaced the dss message with a more user friendly message
5957: --
5958: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_UPDATE_PRIVILEGE');
5959: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
5960: hz_dss_util_pub.get_display_name('HZ_PARTIES', null));
5961: FND_MSG_PUB.ADD;
5962: RAISE FND_API.G_EXC_ERROR;
5963: end if;
5964: END IF;
6285: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
6286: l_test_security :=
6287: hz_dss_util_pub.test_instance(
6288: p_operation_code => 'INSERT',
6289: p_db_object_name => 'HZ_PARTIES',
6290: p_instance_pk1_value => x_party_id,
6291: p_user_name => fnd_global.user_name,
6292: x_return_status => dss_return_status,
6293: x_msg_count => dss_msg_count,
6584: l_debug_prefix VARCHAR2(30) := '';
6585: /**
6586: CURSOR c_orgchk IS
6587: SELECT 1
6588: FROM hz_parties hp
6589: WHERE hp.party_id = l_organization_rec.party_rec.party_id
6590: AND hp.party_type = 'ORGANIZATION';
6591: **/
6592:
6650:
6651: hz_orig_system_ref_pub.get_owner_table_id
6652: (p_orig_system => l_organization_rec.party_rec.orig_system,
6653: p_orig_system_reference => l_organization_rec.party_rec.orig_system_reference,
6654: p_owner_table_name => 'HZ_PARTIES',
6655: x_owner_table_id => l_organization_rec.party_rec.party_id,
6656: x_return_status => x_return_status);
6657:
6658: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6694: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
6695: l_test_security :=
6696: hz_dss_util_pub.test_instance(
6697: p_operation_code => 'UPDATE',
6698: p_db_object_name => 'HZ_PARTIES',
6699: p_instance_pk1_value => l_organization_rec.party_rec.party_id,
6700: p_user_name => fnd_global.user_name,
6701: x_return_status => dss_return_status,
6702: x_msg_count => dss_msg_count,
7601:
7602: l_api_name CONSTANT VARCHAR2(30) := 'get_group_rec';
7603:
7604: x_party_dup_rec PARTY_DUP_REC_TYPE;
7605: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7606: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7602: l_api_name CONSTANT VARCHAR2(30) := 'get_group_rec';
7603:
7604: x_party_dup_rec PARTY_DUP_REC_TYPE;
7605: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7606: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7603:
7604: x_party_dup_rec PARTY_DUP_REC_TYPE;
7605: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7606: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7604: x_party_dup_rec PARTY_DUP_REC_TYPE;
7605: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7606: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7605: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7606: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7606: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7607: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7608: l_country HZ_PARTIES.COUNTRY%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7609: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7610: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7611: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7619: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7612: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7619: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7620: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7613: l_city HZ_PARTIES.CITY%TYPE;
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7619: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7620: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7621: l_debug_prefix VARCHAR2(30) := '';
7614: l_state HZ_PARTIES.STATE%TYPE;
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7619: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7620: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7621: l_debug_prefix VARCHAR2(30) := '';
7622:
7615: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7619: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7620: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7621: l_debug_prefix VARCHAR2(30) := '';
7622:
7623: CURSOR c_group IS
7616: l_province HZ_PARTIES.PROVINCE%TYPE;
7617: l_county HZ_PARTIES.COUNTY%TYPE;
7618: l_url HZ_PARTIES.URL%TYPE;
7619: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7620: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7621: l_debug_prefix VARCHAR2(30) := '';
7622:
7623: CURSOR c_group IS
7624: SELECT 'Y'
7621: l_debug_prefix VARCHAR2(30) := '';
7622:
7623: CURSOR c_group IS
7624: SELECT 'Y'
7625: FROM hz_parties
7626: WHERE party_id = p_party_id
7627: AND party_type = 'GROUP';
7628:
7629: l_dummy VARCHAR2(1);
7665: END IF;
7666:
7667: x_group_rec.party_rec.party_id := p_party_id;
7668:
7669: hz_parties_pkg.Select_Row (
7670: x_party_id => x_group_rec.party_rec.party_id,
7671: x_party_number => x_group_rec.party_rec.party_number,
7672: x_party_name => x_group_rec.group_name,
7673: x_party_type => l_party_type,
7832:
7833: l_api_name CONSTANT VARCHAR2(30) := 'get_party_rec';
7834:
7835: x_party_dup_rec PARTY_DUP_REC_TYPE;
7836: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7837: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7833: l_api_name CONSTANT VARCHAR2(30) := 'get_party_rec';
7834:
7835: x_party_dup_rec PARTY_DUP_REC_TYPE;
7836: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7837: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7834:
7835: x_party_dup_rec PARTY_DUP_REC_TYPE;
7836: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7837: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7835: x_party_dup_rec PARTY_DUP_REC_TYPE;
7836: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7837: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7836: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7837: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7837: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7838: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7839: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7840: l_country HZ_PARTIES.COUNTRY%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7841: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7842: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7843: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7844: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7852: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7845: l_city HZ_PARTIES.CITY%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7852: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7853: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7846: l_state HZ_PARTIES.STATE%TYPE;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7852: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7853: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7854: l_application_id NUMBER;
7847: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7852: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7853: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7854: l_application_id NUMBER;
7855: l_debug_prefix VARCHAR2(30) := '';
7848: l_province HZ_PARTIES.PROVINCE%TYPE;
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7852: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7853: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7854: l_application_id NUMBER;
7855: l_debug_prefix VARCHAR2(30) := '';
7856: BEGIN
7849: l_county HZ_PARTIES.COUNTY%TYPE;
7850: l_url HZ_PARTIES.URL%TYPE;
7851: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7852: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7853: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7854: l_application_id NUMBER;
7855: l_debug_prefix VARCHAR2(30) := '';
7856: BEGIN
7857:
7874: END IF;
7875:
7876: x_party_rec.party_id := p_party_id;
7877:
7878: hz_parties_pkg.Select_Row (
7879: x_party_id => x_party_rec.party_id,
7880: x_party_number => x_party_rec.party_number,
7881: x_party_name => l_party_name,
7882: x_party_type => l_party_type,
8856: p_new_tax_reference IN VARCHAR2)
8857: IS
8858: CURSOR c_cust_acct_sites(p_party_id NUMBER) IS
8859: SELECT ac.CUST_ACCT_SITE_ID
8860: FROM HZ_PARTIES p, HZ_CUST_ACCOUNTS c,
8861: HZ_CUST_ACCT_SITES_ALL ac
8862: WHERE p.party_id=p_party_id
8863: AND p.party_id = c.party_id
8864: AND c.cust_account_id = ac.cust_account_id;
8928: IS
8929: ---(Party level relationship )
8930: CURSOR c_party_cust_acct_sites(p_party_id NUMBER) IS
8931: SELECT distinct ac.CUST_ACCT_SITE_ID
8932: FROM HZ_PARTIES p, HZ_CUST_ACCOUNT_ROLES ar,
8933: HZ_RELATIONSHIPS rel,HZ_CUST_ACCT_SITES_ALL ac
8934: WHERE rel.subject_id=p_party_id
8935: AND ar.ROLE_TYPE = 'CONTACT'
8936: AND rel.party_id=ar.party_id
8940:
8941: ----(Site Level relationship)
8942: CURSOR c_site_cust_acct_sites(p_party_id NUMBER) IS
8943: SELECT distinct ac.CUST_ACCT_SITE_ID
8944: FROM HZ_PARTIES p, HZ_CUST_ACCOUNT_ROLES ar,
8945: HZ_RELATIONSHIPS rel,HZ_CUST_ACCT_SITES_ALL ac
8946: WHERE rel.subject_id=p_party_id
8947: AND ar.ROLE_TYPE = 'CONTACT'
8948: AND ar.party_id = rel.party_id