[Home] [Help]
222: ) RETURN VARCHAR2;
223:
224: PROCEDURE do_update_party_rel_name(
225: p_party_id IN NUMBER,
226: p_party_name IN HZ_PARTIES.PARTY_NAME%TYPE
227: );
228:
229: PROCEDURE do_process_classification(
230: p_create_update_flag IN VARCHAR2,
368: ) RETURN VARCHAR2 IS
369:
370: CURSOR c_party_exists IS
371: SELECT party_type, party_number
372: FROM hz_parties
373: WHERE party_id = p_party_id;
374:
375: l_party_type VARCHAR2(30);
376: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
372: FROM hz_parties
373: WHERE party_id = p_party_id;
374:
375: l_party_type VARCHAR2(30);
376: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
377: l_debug_prefix VARCHAR2(30) := '';
378: BEGIN
379: -- Debug info.
380:
616: p_person_first_name IN VARCHAR2,
617: p_person_last_name IN VARCHAR2
618: ) RETURN VARCHAR2 IS
619:
620: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
621: l_debug_prefix VARCHAR2(30) := '';
622: BEGIN
623:
624: -- Debug info.
692: */
693:
694: PROCEDURE do_update_party_rel_name(
695: p_party_id IN NUMBER,
696: p_party_name IN HZ_PARTIES.PARTY_NAME%TYPE
697: ) IS
698:
699: l_party_name HZ_PARTIES.party_name%TYPE;
700:
695: p_party_id IN NUMBER,
696: p_party_name IN HZ_PARTIES.PARTY_NAME%TYPE
697: ) IS
698:
699: l_party_name HZ_PARTIES.party_name%TYPE;
700:
701: CURSOR c_party_rels IS
702: SELECT r.party_id, r.object_id, o.party_name, r.subject_id, s.party_name,
703: rel.party_number, rel.party_name
700:
701: CURSOR c_party_rels IS
702: SELECT r.party_id, r.object_id, o.party_name, r.subject_id, s.party_name,
703: rel.party_number, rel.party_name
704: FROM hz_relationships r, hz_parties s, hz_parties o, hz_parties rel
705: WHERE (r.subject_id = p_party_id OR r.object_id = p_party_id)
706: AND r.party_id IS NOT NULL
707: AND r.subject_table_name = 'HZ_PARTIES'
708: AND r.object_table_name = 'HZ_PARTIES'
703: rel.party_number, rel.party_name
704: FROM hz_relationships r, hz_parties s, hz_parties o, hz_parties rel
705: WHERE (r.subject_id = p_party_id OR r.object_id = p_party_id)
706: AND r.party_id IS NOT NULL
707: AND r.subject_table_name = 'HZ_PARTIES'
708: AND r.object_table_name = 'HZ_PARTIES'
709: AND r.directional_flag = 'F'
710: AND r.subject_id = s.party_id
711: AND r.object_id = o.party_id
704: FROM hz_relationships r, hz_parties s, hz_parties o, hz_parties rel
705: WHERE (r.subject_id = p_party_id OR r.object_id = p_party_id)
706: AND r.party_id IS NOT NULL
707: AND r.subject_table_name = 'HZ_PARTIES'
708: AND r.object_table_name = 'HZ_PARTIES'
709: AND r.directional_flag = 'F'
710: AND r.subject_id = s.party_id
711: AND r.object_id = o.party_id
712: AND r.party_id = rel.party_id;
711: AND r.object_id = o.party_id
712: AND r.party_id = rel.party_id;
713:
714: TYPE IDlist IS TABLE OF NUMBER(15);
715: TYPE NAMElist IS TABLE OF HZ_PARTIES.PARTY_NAME%TYPE;
716: TYPE NUMBERlist IS TABLE OF HZ_PARTIES.PARTY_NUMBER%TYPE;
717:
718: i_party_id IDlist;
719: i_object_id IDlist;
712: AND r.party_id = rel.party_id;
713:
714: TYPE IDlist IS TABLE OF NUMBER(15);
715: TYPE NAMElist IS TABLE OF HZ_PARTIES.PARTY_NAME%TYPE;
716: TYPE NUMBERlist IS TABLE OF HZ_PARTIES.PARTY_NUMBER%TYPE;
717:
718: i_party_id IDlist;
719: i_object_id IDlist;
720: i_object_name NAMElist;
753: --check if party is locked by any one else.
754: BEGIN
755: SELECT 'Y'
756: INTO l_dummy
757: FROM hz_parties
758: WHERE PARTY_ID = i_party_id(i)
759: FOR UPDATE NOWAIT;
760: EXCEPTION
761: WHEN OTHERS THEN
759: FOR UPDATE NOWAIT;
760: EXCEPTION
761: WHEN OTHERS THEN
762: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
763: fnd_message.set_token('TABLE', 'HZ_PARTIES');
764: fnd_msg_pub.add;
765: RAISE FND_API.G_EXC_ERROR;
766: END;
767:
764: fnd_msg_pub.add;
765: RAISE FND_API.G_EXC_ERROR;
766: END;
767:
768: UPDATE hz_parties
769: SET party_name = l_party_name
770: WHERE party_id = i_party_id(i);
771: END IF;
772:
1003:
1004: l_code_assignment_id NUMBER;
1005: l_msg_count NUMBER;
1006: l_msg_data VARCHAR2(2000);
1007: l_sic_code HZ_PARTIES.SIC_CODE%TYPE;
1008: l_sic_code_type HZ_PARTIES.SIC_CODE_TYPE%TYPE;
1009: l_data_source_type VARCHAR2(30);
1010: l_party_rec PARTY_REC_TYPE;
1011: l_old_party_rec PARTY_REC_TYPE;
1004: l_code_assignment_id NUMBER;
1005: l_msg_count NUMBER;
1006: l_msg_data VARCHAR2(2000);
1007: l_sic_code HZ_PARTIES.SIC_CODE%TYPE;
1008: l_sic_code_type HZ_PARTIES.SIC_CODE_TYPE%TYPE;
1009: l_data_source_type VARCHAR2(30);
1010: l_party_rec PARTY_REC_TYPE;
1011: l_old_party_rec PARTY_REC_TYPE;
1012:
1094: l_party_rec.category_code <> l_old_party_rec.category_code) AND
1095: l_data_source_type = G_MISS_CONTENT_SOURCE_TYPE
1096: THEN
1097: hz_classification_v2pub.set_primary_code_assignment(
1098: p_owner_table_name => 'HZ_PARTIES',
1099: p_owner_table_id => l_party_rec.party_id,
1100: p_class_category => 'CUSTOMER_CATEGORY',
1101: p_class_code => l_party_rec.category_code,
1102: p_content_source_type => l_data_source_type,
1177: NVL(p_organization_rec.sic_code_type, FND_API.G_MISS_CHAR) <>
1178: p_old_organization_rec.sic_code_type))
1179: THEN
1180: hz_classification_v2pub.set_primary_code_assignment(
1181: p_owner_table_name => 'HZ_PARTIES',
1182: p_owner_table_id => p_organization_rec.party_rec.party_id,
1183: p_class_category => l_sic_code_type,
1184: p_class_code => l_sic_code,
1185: p_content_source_type => l_data_source_type,
1215: l_local_activity_code_type := 'NACE';
1216: end if;
1217:
1218: hz_classification_v2pub.set_primary_code_assignment(
1219: p_owner_table_name => 'HZ_PARTIES',
1220: p_owner_table_id => p_organization_rec.party_rec.party_id,
1221:
1222: -- p_class_category => 'NACE',
1223:
2444: IS
2445: SELECT 'Y'
2446: FROM hz_orig_sys_references
2447: WHERE owner_table_id = p_party_id
2448: AND owner_table_name = 'HZ_PARTIES'
2449: AND orig_system = l_orig_system
2450: AND orig_system_reference = l_orig_system_reference
2451: AND trunc(nvl(end_date_active, sysdate)) >= trunc(sysdate)
2452: AND status = 'A';
2510: fetch c_check_party_mapping into l_exists;
2511: if c_check_party_mapping%NOTFOUND then
2512: l_orig_sys_reference_rec.orig_system := l_orig_system ;
2513: l_orig_sys_reference_rec.orig_system_reference := l_orig_system_reference;
2514: l_orig_sys_reference_rec.owner_table_name := 'HZ_PARTIES';
2515: l_orig_sys_reference_rec.owner_table_id := p_party_id;
2516: l_orig_sys_reference_rec.created_by_module := nvl(l_created_by_module, 'TCA_V2_API');
2517: l_orig_sys_reference_rec.dqm_sync_mode := p_party_create_update_flag;
2518:
2766: l_old_party_rec PARTY_REC_TYPE;
2767: l_party_dup_rec PARTY_DUP_REC_TYPE;
2768: l_person_rec PERSON_REC_TYPE;
2769:
2770: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2771: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2772: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2773: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2774: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2767: l_party_dup_rec PARTY_DUP_REC_TYPE;
2768: l_person_rec PERSON_REC_TYPE;
2769:
2770: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2771: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2772: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2773: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2774: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2775: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2768: l_person_rec PERSON_REC_TYPE;
2769:
2770: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2771: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2772: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2773: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2774: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2775: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2776: l_party_object_version_number NUMBER;
2769:
2770: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2771: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2772: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2773: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2774: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2775: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2776: l_party_object_version_number NUMBER;
2777: l_rowid ROWID := NULL;
2770: db_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2771: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2772: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2773: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2774: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2775: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2776: l_party_object_version_number NUMBER;
2777: l_rowid ROWID := NULL;
2778: l_process_party_name VARCHAR2(1);
2771: db_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
2772: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
2773: l_first_name HZ_PARTIES.PERSON_FIRST_NAME%TYPE;
2774: l_last_name HZ_PARTIES.PERSON_LAST_NAME%TYPE;
2775: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
2776: l_party_object_version_number NUMBER;
2777: l_rowid ROWID := NULL;
2778: l_process_party_name VARCHAR2(1);
2779: l_dummy VARCHAR2(1);
2792:
2793: CURSOR c_party IS
2794: SELECT party_name, object_version_number, rowid,
2795: created_by_module
2796: FROM hz_parties
2797: WHERE party_id = p_party_id
2798: FOR UPDATE NOWAIT;
2799:
2800: CURSOR c_party_number_exists (
2800: CURSOR c_party_number_exists (
2801: p_party_number VARCHAR2
2802: ) IS
2803: SELECT 'Y'
2804: FROM hz_parties
2805: WHERE party_number = p_party_number;
2806:
2807: BEGIN
2808:
2839: and (l_party_rec.party_id = FND_API.G_MISS_NUM or l_party_rec.party_id is null) THEN
2840: hz_orig_system_ref_pub.get_owner_table_id
2841: (p_orig_system => l_party_rec.orig_system,
2842: p_orig_system_reference => l_party_rec.orig_system_reference,
2843: p_owner_table_name => 'HZ_PARTIES',
2844: x_owner_table_id => l_party_rec.party_id,
2845: x_return_status => l_return_status);
2846: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2847: RAISE FND_API.G_EXC_ERROR;
2913: l_party_object_version_number IS NOT NULL AND
2914: p_party_object_version_number = l_party_object_version_number))
2915: THEN
2916: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
2917: fnd_message.set_token('TABLE', 'HZ_PARTIES');
2918: fnd_msg_pub.add;
2919: RAISE fnd_api.g_exc_error;
2920: END IF;
2921: CLOSE c_party;
3160:
3161: -- Debug info.
3162: /*IF g_debug THEN
3163: hz_utility_v2pub.debug (
3164: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3165: END IF;
3166: */
3167: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3168: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3164: 'hz_parties_pkg.Insert_Row (+)',l_debug_prefix);
3165: END IF;
3166: */
3167: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3168: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (+)',
3169: p_msg_level=>fnd_log.level_procedure);
3170: END IF;
3171:
3172: -- this is for handling orig_system_reference defaulting
3173: IF l_party_rec.party_id = FND_API.G_MISS_NUM THEN
3174: l_party_rec.party_id := NULL;
3175: END IF;
3176:
3177: hz_parties_pkg.insert_row (
3178: x_party_id => l_party_rec.party_id,
3179: x_party_number => l_party_rec.party_number,
3180: x_party_name => l_party_name,
3181: x_party_type => p_party_type,
3264:
3265: -- Debug info.
3266: /*IF g_debug THEN
3267: hz_utility_v2pub.debug (
3268: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3269: END IF;
3270: */
3271: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3268: 'hz_parties_pkg.Insert_Row (-)', l_debug_prefix);
3269: END IF;
3270: */
3271: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Insert_Row (-)',
3273: p_msg_level=>fnd_log.level_procedure);
3274: END IF;
3275:
3276: if l_party_rec.orig_system is not null
3279: and p_party_type not in ('PERSON', 'ORGANIZATION')
3280: then
3281: l_orig_sys_reference_rec.orig_system := l_party_rec.orig_system;
3282: l_orig_sys_reference_rec.orig_system_reference := l_party_rec.orig_system_reference;
3283: l_orig_sys_reference_rec.owner_table_name := 'HZ_PARTIES';
3284: l_orig_sys_reference_rec.owner_table_id := l_party_rec.party_id;
3285: l_orig_sys_reference_rec.created_by_module := l_created_by_module;
3286:
3287: hz_orig_system_ref_pub.create_orig_system_reference(
3358:
3359: -- Debug info.
3360: /*IF g_debug THEN
3361: hz_utility_v2pub.debug (
3362: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3363: END IF;
3364: */
3365: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3362: 'hz_parties_pkg.Update_Row (+)',l_debug_prefix);
3363: END IF;
3364: */
3365: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3366: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (+)',
3367: p_msg_level=>fnd_log.level_procedure);
3368: END IF;
3369:
3370: if (l_party_rec.orig_system is not null
3376: -- In mosr, we have bypassed osr nonupdateable validation
3377: -- but we should not update existing osr, set it to null
3378: end if;
3379: -- call table handler to update the record
3380: hz_parties_pkg.update_row (
3381: x_rowid => l_rowid,
3382: x_party_id => l_party_rec.party_id,
3383: x_party_number => l_party_rec.party_number,
3384: x_party_name => l_party_name,
3477:
3478: -- Debug info.
3479: /*IF g_debug THEN
3480: hz_utility_v2pub.debug (
3481: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3482: END IF;
3483: */
3484: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3485: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3481: 'hz_parties_pkg.Update_Row (-)',l_debug_prefix);
3482: END IF;
3483: */
3484: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
3485: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'hz_parties_pkg.Update_Row (-)',
3486: p_msg_level=>fnd_log.level_procedure);
3487: END IF;
3488:
3489: -- Bug 4490715 : If party is PERSON / ORGANIZATION call eTax
3612:
3613: EXCEPTION
3614: WHEN g_resource_busy THEN
3615: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
3616: fnd_message.set_token('TABLE', 'hz_parties');
3617: fnd_msg_pub.add;
3618: RAISE fnd_api.g_exc_error;
3619:
3620: END do_create_update_party_only;
3625: * DESCRIPTION
3626: * Creates party.
3627: *
3628: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
3629: * hz_parties_pkg.Insert_Row
3630: *
3631: * ARGUMENTS
3632: * IN:
3633: * p_party_type
3679: l_sst_organization_rec ORGANIZATION_REC_TYPE;
3680: l_new_sst_organization_rec ORGANIZATION_REC_TYPE;
3681:
3682: l_party_id NUMBER;
3683: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
3684: l_content_source_type VARCHAR2(30);
3685: l_actual_content_source VARCHAR2(30);
3686: l_data_source_type VARCHAR2(30);
3687: l_data_source_from VARCHAR2(30);
4348: * DESCRIPTION
4349: * Updates party.
4350: *
4351: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
4352: * hz_parties_pkg.Update_Row
4353: *
4354: * ARGUMENTS
4355: * IN:
4356: * p_party_type
4400: l_ue_person_rec PERSON_REC_TYPE;
4401: l_ue_organization_rec ORGANIZATION_REC_TYPE;
4402:
4403: l_party_id NUMBER;
4404: l_party_number HZ_PARTIES.PARTY_NUMBER%TYPE;
4405: l_data_source_type VARCHAR2(30);
4406: l_profile_id NUMBER;
4407:
4408: l_user_entered_profile_exists VARCHAR2(1);
4417:
4418: l_debug_prefix VARCHAR2(30);
4419:
4420: --Bug No:2771835----------------
4421: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4422: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4423: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4424: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4425: -------------Bug 4586451
4418: l_debug_prefix VARCHAR2(30);
4419:
4420: --Bug No:2771835----------------
4421: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4422: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4423: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4424: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4425: -------------Bug 4586451
4426: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4419:
4420: --Bug No:2771835----------------
4421: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4422: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4423: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4424: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4425: -------------Bug 4586451
4426: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4427: -------------------------Bug No. 4586451
4420: --Bug No:2771835----------------
4421: l_old_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4422: l_new_party_name HZ_PARTIES.PARTY_NAME%TYPE;
4423: l_old_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4424: l_new_tax_reference HZ_PARTIES.TAX_REFERENCE%TYPE;
4425: -------------Bug 4586451
4426: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4427: -------------------------Bug No. 4586451
4428:
4426: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
4427: -------------------------Bug No. 4586451
4428:
4429: CURSOR c_party_name(p_party_id NUMBER) IS
4430: SELECT party_name,tax_reference FROM HZ_PARTIES
4431: WHERE PARTY_ID=p_party_id;
4432:
4433: ---End of Bug No:2771835---------
4434:
4993: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
4994: l_test_security :=
4995: hz_dss_util_pub.test_instance(
4996: p_operation_code => 'INSERT',
4997: p_db_object_name => 'HZ_PARTIES',
4998: p_instance_pk1_value => x_party_id,
4999: p_user_name => fnd_global.user_name,
5000: x_return_status => dss_return_status,
5001: x_msg_count => dss_msg_count,
5334:
5335: -- make sure PEROSN party has been passed in
5336: BEGIN
5337: SELECT 1 INTO l_count
5338: FROM HZ_PARTIES
5339: WHERE PARTY_ID = p_person_rec.party_rec.party_id
5340: AND PARTY_TYPE = 'PERSON';
5341: EXCEPTION
5342: WHEN NO_DATA_FOUND THEN
5356:
5357: hz_orig_system_ref_pub.get_owner_table_id
5358: (p_orig_system => l_person_rec.party_rec.orig_system,
5359: p_orig_system_reference => l_person_rec.party_rec.orig_system_reference,
5360: p_owner_table_name => 'HZ_PARTIES',
5361: x_owner_table_id => l_person_rec.party_rec.party_id,
5362: x_return_status => x_return_status);
5363:
5364: IF x_return_status <> fnd_api.g_ret_sts_success THEN
5398: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
5399: l_test_security :=
5400: hz_dss_util_pub.test_instance(
5401: p_operation_code => 'UPDATE',
5402: p_db_object_name => 'HZ_PARTIES',
5403: p_instance_pk1_value => l_person_rec.party_rec.party_id,
5404: p_user_name => fnd_global.user_name,
5405: x_return_status => dss_return_status,
5406: x_msg_count => dss_msg_count,
5686: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
5687: l_test_security :=
5688: hz_dss_util_pub.test_instance(
5689: p_operation_code => 'INSERT',
5690: p_db_object_name => 'HZ_PARTIES',
5691: p_instance_pk1_value => x_party_id,
5692: p_user_name => fnd_global.user_name,
5693: x_return_status => dss_return_status,
5694: x_msg_count => dss_msg_count,
5703: -- Bug 3835601: replaced the dss message with a more user friendly message
5704: --
5705: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_INSERT_PRIVILEGE');
5706: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
5707: hz_dss_util_pub.get_display_name('HZ_PARTIES', null));
5708: FND_MSG_PUB.ADD;
5709: RAISE FND_API.G_EXC_ERROR;
5710: end if;
5711: END IF;
5958:
5959: -- make sure GROUP party has been passed in
5960: BEGIN
5961: SELECT 1 INTO l_count
5962: FROM HZ_PARTIES
5963: WHERE PARTY_ID = p_group_rec.party_rec.party_id
5964: AND PARTY_TYPE = 'GROUP';
5965: EXCEPTION
5966: WHEN NO_DATA_FOUND THEN
5980:
5981: hz_orig_system_ref_pub.get_owner_table_id
5982: (p_orig_system => l_group_rec.party_rec.orig_system,
5983: p_orig_system_reference => l_group_rec.party_rec.orig_system_reference,
5984: p_owner_table_name => 'HZ_PARTIES',
5985: x_owner_table_id => l_group_rec.party_rec.party_id,
5986: x_return_status => x_return_status);
5987:
5988: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6010: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
6011: l_test_security :=
6012: hz_dss_util_pub.test_instance(
6013: p_operation_code => 'UPDATE',
6014: p_db_object_name => 'HZ_PARTIES',
6015: p_instance_pk1_value => l_group_rec.party_rec.party_id,
6016: p_user_name => fnd_global.user_name,
6017: x_return_status => dss_return_status,
6018: x_msg_count => dss_msg_count,
6027: -- Bug 3835601: replaced the dss message with a more user friendly message
6028: --
6029: FND_MESSAGE.SET_NAME('AR', 'HZ_DSS_NO_UPDATE_PRIVILEGE');
6030: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',
6031: hz_dss_util_pub.get_display_name('HZ_PARTIES', null));
6032: FND_MSG_PUB.ADD;
6033: RAISE FND_API.G_EXC_ERROR;
6034: end if;
6035: END IF;
6356: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
6357: l_test_security :=
6358: hz_dss_util_pub.test_instance(
6359: p_operation_code => 'INSERT',
6360: p_db_object_name => 'HZ_PARTIES',
6361: p_instance_pk1_value => x_party_id,
6362: p_user_name => fnd_global.user_name,
6363: x_return_status => dss_return_status,
6364: x_msg_count => dss_msg_count,
6657: l_debug_prefix VARCHAR2(30) := '';
6658: /**
6659: CURSOR c_orgchk IS
6660: SELECT 1
6661: FROM hz_parties hp
6662: WHERE hp.party_id = l_organization_rec.party_rec.party_id
6663: AND hp.party_type = 'ORGANIZATION';
6664: **/
6665:
6731:
6732: hz_orig_system_ref_pub.get_owner_table_id
6733: (p_orig_system => l_organization_rec.party_rec.orig_system,
6734: p_orig_system_reference => l_organization_rec.party_rec.orig_system_reference,
6735: p_owner_table_name => 'HZ_PARTIES',
6736: x_owner_table_id => l_organization_rec.party_rec.party_id,
6737: x_return_status => x_return_status);
6738:
6739: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6775: IF NVL(fnd_profile.value('HZ_DSS_ENABLED'), 'N') = 'Y' THEN
6776: l_test_security :=
6777: hz_dss_util_pub.test_instance(
6778: p_operation_code => 'UPDATE',
6779: p_db_object_name => 'HZ_PARTIES',
6780: p_instance_pk1_value => l_organization_rec.party_rec.party_id,
6781: p_user_name => fnd_global.user_name,
6782: x_return_status => dss_return_status,
6783: x_msg_count => dss_msg_count,
7713:
7714: l_api_name CONSTANT VARCHAR2(30) := 'get_group_rec';
7715:
7716: x_party_dup_rec PARTY_DUP_REC_TYPE;
7717: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7718: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7714: l_api_name CONSTANT VARCHAR2(30) := 'get_group_rec';
7715:
7716: x_party_dup_rec PARTY_DUP_REC_TYPE;
7717: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7718: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7715:
7716: x_party_dup_rec PARTY_DUP_REC_TYPE;
7717: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7718: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7716: x_party_dup_rec PARTY_DUP_REC_TYPE;
7717: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7718: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7717: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7718: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7718: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7719: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7720: l_country HZ_PARTIES.COUNTRY%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7721: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7722: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7723: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7731: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7724: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7731: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7732: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7725: l_city HZ_PARTIES.CITY%TYPE;
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7731: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7732: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7733: l_debug_prefix VARCHAR2(30) := '';
7726: l_state HZ_PARTIES.STATE%TYPE;
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7731: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7732: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7733: l_debug_prefix VARCHAR2(30) := '';
7734:
7727: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7731: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7732: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7733: l_debug_prefix VARCHAR2(30) := '';
7734:
7735: CURSOR c_group IS
7728: l_province HZ_PARTIES.PROVINCE%TYPE;
7729: l_county HZ_PARTIES.COUNTY%TYPE;
7730: l_url HZ_PARTIES.URL%TYPE;
7731: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7732: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7733: l_debug_prefix VARCHAR2(30) := '';
7734:
7735: CURSOR c_group IS
7736: SELECT 'Y'
7733: l_debug_prefix VARCHAR2(30) := '';
7734:
7735: CURSOR c_group IS
7736: SELECT 'Y'
7737: FROM hz_parties
7738: WHERE party_id = p_party_id
7739: AND party_type = 'GROUP';
7740:
7741: l_dummy VARCHAR2(1);
7777: END IF;
7778:
7779: x_group_rec.party_rec.party_id := p_party_id;
7780:
7781: hz_parties_pkg.Select_Row (
7782: x_party_id => x_group_rec.party_rec.party_id,
7783: x_party_number => x_group_rec.party_rec.party_number,
7784: x_party_name => x_group_rec.group_name,
7785: x_party_type => l_party_type,
7944:
7945: l_api_name CONSTANT VARCHAR2(30) := 'get_party_rec';
7946:
7947: x_party_dup_rec PARTY_DUP_REC_TYPE;
7948: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7949: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7945: l_api_name CONSTANT VARCHAR2(30) := 'get_party_rec';
7946:
7947: x_party_dup_rec PARTY_DUP_REC_TYPE;
7948: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7949: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7946:
7947: x_party_dup_rec PARTY_DUP_REC_TYPE;
7948: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7949: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7947: x_party_dup_rec PARTY_DUP_REC_TYPE;
7948: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7949: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7948: l_party_name HZ_PARTIES.PARTY_NAME%TYPE;
7949: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7949: l_party_type HZ_PARTIES.PARTY_TYPE%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7950: l_customer_key HZ_PARTIES.CUSTOMER_KEY%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7951: l_group_type HZ_PARTIES.GROUP_TYPE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7952: l_country HZ_PARTIES.COUNTRY%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7953: l_address1 HZ_PARTIES.ADDRESS1%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7954: l_address2 HZ_PARTIES.ADDRESS2%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7955: l_address3 HZ_PARTIES.ADDRESS3%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7956: l_address4 HZ_PARTIES.ADDRESS4%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7964: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7957: l_city HZ_PARTIES.CITY%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7964: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7965: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7958: l_state HZ_PARTIES.STATE%TYPE;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7964: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7965: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7966: l_application_id NUMBER;
7959: l_postal_code HZ_PARTIES.POSTAL_CODE%TYPE;
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7964: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7965: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7966: l_application_id NUMBER;
7967: l_debug_prefix VARCHAR2(30) := '';
7960: l_province HZ_PARTIES.PROVINCE%TYPE;
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7964: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7965: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7966: l_application_id NUMBER;
7967: l_debug_prefix VARCHAR2(30) := '';
7968: BEGIN
7961: l_county HZ_PARTIES.COUNTY%TYPE;
7962: l_url HZ_PARTIES.URL%TYPE;
7963: l_email_address HZ_PARTIES.EMAIL_ADDRESS%TYPE;
7964: l_language_name HZ_PARTIES.LANGUAGE_NAME%TYPE;
7965: l_created_by_module HZ_PARTIES.CREATED_BY_MODULE%TYPE;
7966: l_application_id NUMBER;
7967: l_debug_prefix VARCHAR2(30) := '';
7968: BEGIN
7969:
7986: END IF;
7987:
7988: x_party_rec.party_id := p_party_id;
7989:
7990: hz_parties_pkg.Select_Row (
7991: x_party_id => x_party_rec.party_id,
7992: x_party_number => x_party_rec.party_number,
7993: x_party_name => l_party_name,
7994: x_party_type => l_party_type,
8968: p_new_tax_reference IN VARCHAR2)
8969: IS
8970: CURSOR c_cust_acct_sites(p_party_id NUMBER) IS
8971: SELECT ac.CUST_ACCT_SITE_ID
8972: FROM HZ_PARTIES p, HZ_CUST_ACCOUNTS c,
8973: HZ_CUST_ACCT_SITES_ALL ac
8974: WHERE p.party_id=p_party_id
8975: AND p.party_id = c.party_id
8976: AND c.cust_account_id = ac.cust_account_id;
9040: IS
9041: ---(Party level relationship )
9042: CURSOR c_party_cust_acct_sites(p_party_id NUMBER) IS
9043: SELECT distinct ac.CUST_ACCT_SITE_ID
9044: FROM HZ_PARTIES p, HZ_CUST_ACCOUNT_ROLES ar,
9045: HZ_RELATIONSHIPS rel,HZ_CUST_ACCT_SITES_ALL ac
9046: WHERE rel.subject_id=p_party_id
9047: AND ar.ROLE_TYPE = 'CONTACT'
9048: AND rel.party_id=ar.party_id
9052:
9053: ----(Site Level relationship)
9054: CURSOR c_site_cust_acct_sites(p_party_id NUMBER) IS
9055: SELECT distinct ac.CUST_ACCT_SITE_ID
9056: FROM HZ_PARTIES p, HZ_CUST_ACCOUNT_ROLES ar,
9057: HZ_RELATIONSHIPS rel,HZ_CUST_ACCT_SITES_ALL ac
9058: WHERE rel.subject_id=p_party_id
9059: AND ar.ROLE_TYPE = 'CONTACT'
9060: AND ar.party_id = rel.party_id