[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE do_update_org_contact(
p_org_contact_rec IN OUT NOCOPY ORG_CONTACT_REC_TYPE,
p_cont_object_version_number IN OUT NOCOPY NUMBER,
p_rel_object_version_number IN OUT NOCOPY NUMBER,
p_party_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
);
PROCEDURE do_update_org_contact_role(
p_org_contact_role_rec IN OUT NOCOPY ORG_CONTACT_ROLE_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
);
p_create_update_flag IN VARCHAR2,
p_org_contact_rec IN org_contact_rec_type,
p_old_org_contact_rec IN org_contact_rec_type DEFAULT NULL,
x_return_status IN OUT NOCOPY VARCHAR2
);
SELECT BACKWARD_REL_CODE
FROM HZ_RELATIONSHIP_TYPES
WHERE RELATIONSHIP_TYPE = p_org_contact_rec.party_rel_rec.relationship_type
AND FORWARD_REL_CODE = p_org_contact_rec.party_rel_rec.relationship_code
AND SUBJECT_TYPE = p_org_contact_rec.party_rel_rec.subject_type
AND OBJECT_TYPE = p_org_contact_rec.party_rel_rec.object_type
AND STATUS = 'A';
SELECT 'Y'
INTO l_dummy
FROM HZ_ORG_CONTACTS
WHERE ORG_CONTACT_ID = l_org_contact_id;
SELECT to_char(hz_contact_numbers_s.nextval)
INTO l_contact_number FROM dual;
SELECT 1
INTO l_count
FROM HZ_ORG_CONTACTS
WHERE CONTACT_NUMBER = l_contact_number;
SELECT person_pre_name_adjunct
INTO l_person_pre_name
FROM hz_parties
WHERE party_id = p_org_contact_rec.party_rel_rec.subject_id
AND party_type = 'PERSON'
FOR UPDATE NOWAIT;
UPDATE hz_parties
SET person_pre_name_adjunct = p_org_contact_rec.title
WHERE party_id = p_org_contact_rec.party_rel_rec.subject_id
AND party_type = 'PERSON';
SELECT 'Y'
INTO l_dummy
FROM hz_person_profiles
WHERE party_id = p_org_contact_rec.party_rel_rec.subject_id
AND effective_end_date IS NULL
FOR UPDATE NOWAIT;
UPDATE hz_person_profiles
SET person_pre_name_adjunct = p_org_contact_rec.title
WHERE party_id = p_org_contact_rec.party_rel_rec.subject_id
AND effective_end_date IS NULL;
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACTS_PKG.Insert_Row (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
HZ_ORG_CONTACTS_PKG.Insert_Row (
X_ORG_CONTACT_ID => p_org_contact_rec.org_contact_id,
X_PARTY_RELATIONSHIP_ID => x_party_rel_id,
X_COMMENTS => p_org_contact_rec.comments,
X_CONTACT_NUMBER => l_contact_number,
X_DEPARTMENT_CODE => p_org_contact_rec.department_code,
X_DEPARTMENT => p_org_contact_rec.department,
X_TITLE => p_org_contact_rec.title,
X_JOB_TITLE => p_org_contact_rec.job_title,
X_DECISION_MAKER_FLAG => p_org_contact_rec.decision_maker_flag,
X_JOB_TITLE_CODE => p_org_contact_rec.job_title_code,
X_REFERENCE_USE_FLAG => p_org_contact_rec.reference_use_flag,
X_RANK => p_org_contact_rec.rank,
X_ORIG_SYSTEM_REFERENCE => p_org_contact_rec.orig_system_reference,
X_ATTRIBUTE_CATEGORY => p_org_contact_rec.attribute_category,
X_ATTRIBUTE1 => p_org_contact_rec.attribute1,
X_ATTRIBUTE2 => p_org_contact_rec.attribute2,
X_ATTRIBUTE3 => p_org_contact_rec.attribute3,
X_ATTRIBUTE4 => p_org_contact_rec.attribute4,
X_ATTRIBUTE5 => p_org_contact_rec.attribute5,
X_ATTRIBUTE6 => p_org_contact_rec.attribute6,
X_ATTRIBUTE7 => p_org_contact_rec.attribute7,
X_ATTRIBUTE8 => p_org_contact_rec.attribute8,
X_ATTRIBUTE9 => p_org_contact_rec.attribute9,
X_ATTRIBUTE10 => p_org_contact_rec.attribute10,
X_ATTRIBUTE11 => p_org_contact_rec.attribute11,
X_ATTRIBUTE12 => p_org_contact_rec.attribute12,
X_ATTRIBUTE13 => p_org_contact_rec.attribute13,
X_ATTRIBUTE14 => p_org_contact_rec.attribute14,
X_ATTRIBUTE15 => p_org_contact_rec.attribute15,
X_ATTRIBUTE16 => p_org_contact_rec.attribute16,
X_ATTRIBUTE17 => p_org_contact_rec.attribute17,
X_ATTRIBUTE18 => p_org_contact_rec.attribute18,
X_ATTRIBUTE19 => p_org_contact_rec.attribute19,
X_ATTRIBUTE20 => p_org_contact_rec.attribute20,
X_ATTRIBUTE21 => p_org_contact_rec.attribute21,
X_ATTRIBUTE22 => p_org_contact_rec.attribute22,
X_ATTRIBUTE23 => p_org_contact_rec.attribute23,
X_ATTRIBUTE24 => p_org_contact_rec.attribute24,
X_PARTY_SITE_ID => p_org_contact_rec.party_site_id,
X_OBJECT_VERSION_NUMBER => 1,
X_CREATED_BY_MODULE => p_org_contact_rec.created_by_module,
X_APPLICATION_ID => p_org_contact_rec.application_id,
X_STATUS => l_org_status
);
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACTS_PKG.Insert_Row (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
| do_update_org_contact
|
| DESCRIPTION
| Updates org_contact, party relationship and party.
|
| SCOPE - PRIVATE
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| OUT:
| IN/ OUT:
| p_org_contact_rec
| p_org_contact_last_update_date
| p_party_rel_last_update_date
| p_party_last_update_date
| x_return_status
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
| 28-SEP-2007 Neeraj Shinde BUG# 6335274:1.relationship_id is non-updatable field.
| If relationship_id is not supplied,
| do not fetch it from HZ_ORG_CONTACTS.
| 2.If update_relationship API results
| in error, Error has to be raised.
+===========================================================================*/
PROCEDURE do_update_org_contact(
p_org_contact_rec IN OUT NOCOPY ORG_CONTACT_REC_TYPE,
p_cont_object_version_number IN OUT NOCOPY NUMBER,
p_rel_object_version_number IN OUT NOCOPY NUMBER,
p_party_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_rowid ROWID;
hz_utility_v2pub.debug(p_message=>'do_update_org_contact (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
SELECT ROWID,
OBJECT_VERSION_NUMBER
INTO l_rowid,
l_object_version_number
FROM HZ_ORG_CONTACTS
WHERE ORG_CONTACT_ID = p_org_contact_rec.org_contact_id
FOR UPDATE OF ORG_CONTACT_ID NOWAIT;
SELECT OBJECT_ID
INTO l_object_id
FROM HZ_RELATIONSHIPS
WHERE RELATIONSHIP_ID = p_org_contact_rec.party_rel_rec.relationship_id
AND DIRECTIONAL_FLAG = 'F';
SELECT ROWID,
PARTY_RELATIONSHIP_ID
INTO l_rowid, l_party_relationship_id
FROM HZ_ORG_CONTACTS
WHERE ORG_CONTACT_ID = p_org_contact_rec.org_contact_id;*/
SELECT ROWID,
PARTY_RELATIONSHIP_ID
INTO l_rowid, l_party_relationship_id
FROM HZ_ORG_CONTACTS
WHERE ORG_CONTACT_ID = p_org_contact_rec.org_contact_id;
SELECT P.PERSON_PRE_NAME_ADJUNCT,P.PARTY_ID INTO
l_person_pre_name,l_party_id
FROM HZ_PARTIES P, HZ_RELATIONSHIPS R, HZ_ORG_CONTACTS C
WHERE
C.ORG_CONTACT_ID = p_org_contact_rec.org_contact_id
AND R.RELATIONSHIP_ID = C.PARTY_RELATIONSHIP_ID
AND R.DIRECTIONAL_FLAG = 'F'
AND R.SUBJECT_ID = P.PARTY_ID
AND P.PARTY_TYPE = 'PERSON';
UPDATE HZ_PARTIES
SET PERSON_PRE_NAME_ADJUNCT = p_org_contact_rec.title
WHERE PARTY_ID = l_party_id;
UPDATE HZ_PERSON_PROFILES
SET PERSON_PRE_NAME_ADJUNCT = p_org_contact_rec.title
WHERE PARTY_ID = l_party_id
AND EFFECTIVE_END_DATE IS NULL;
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACTS_PKG.Update_Row (+) ',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
HZ_ORG_CONTACTS_PKG.Update_Row (
X_Rowid => l_rowid,
X_ORG_CONTACT_ID => p_org_contact_rec.org_contact_id,
X_PARTY_RELATIONSHIP_ID => p_org_contact_rec.party_rel_rec.relationship_id,
X_COMMENTS => p_org_contact_rec.comments,
X_CONTACT_NUMBER => p_org_contact_rec.contact_number,
X_DEPARTMENT_CODE => p_org_contact_rec.department_code,
X_DEPARTMENT => p_org_contact_rec.department,
X_TITLE => p_org_contact_rec.title,
X_JOB_TITLE => p_org_contact_rec.job_title,
X_DECISION_MAKER_FLAG => p_org_contact_rec.decision_maker_flag,
X_JOB_TITLE_CODE => p_org_contact_rec.job_title_code,
X_REFERENCE_USE_FLAG => p_org_contact_rec.reference_use_flag,
X_RANK => p_org_contact_rec.rank,
X_ORIG_SYSTEM_REFERENCE => p_org_contact_rec.orig_system_reference,
X_ATTRIBUTE_CATEGORY => p_org_contact_rec.attribute_category,
X_ATTRIBUTE1 => p_org_contact_rec.attribute1,
X_ATTRIBUTE2 => p_org_contact_rec.attribute2,
X_ATTRIBUTE3 => p_org_contact_rec.attribute3,
X_ATTRIBUTE4 => p_org_contact_rec.attribute4,
X_ATTRIBUTE5 => p_org_contact_rec.attribute5,
X_ATTRIBUTE6 => p_org_contact_rec.attribute6,
X_ATTRIBUTE7 => p_org_contact_rec.attribute7,
X_ATTRIBUTE8 => p_org_contact_rec.attribute8,
X_ATTRIBUTE9 => p_org_contact_rec.attribute9,
X_ATTRIBUTE10 => p_org_contact_rec.attribute10,
X_ATTRIBUTE11 => p_org_contact_rec.attribute11,
X_ATTRIBUTE12 => p_org_contact_rec.attribute12,
X_ATTRIBUTE13 => p_org_contact_rec.attribute13,
X_ATTRIBUTE14 => p_org_contact_rec.attribute14,
X_ATTRIBUTE15 => p_org_contact_rec.attribute15,
X_ATTRIBUTE16 => p_org_contact_rec.attribute16,
X_ATTRIBUTE17 => p_org_contact_rec.attribute17,
X_ATTRIBUTE18 => p_org_contact_rec.attribute18,
X_ATTRIBUTE19 => p_org_contact_rec.attribute19,
X_ATTRIBUTE20 => p_org_contact_rec.attribute20,
X_ATTRIBUTE21 => p_org_contact_rec.attribute21,
X_ATTRIBUTE22 => p_org_contact_rec.attribute22,
X_ATTRIBUTE23 => p_org_contact_rec.attribute23,
X_ATTRIBUTE24 => p_org_contact_rec.attribute24,
X_PARTY_SITE_ID => p_org_contact_rec.party_site_id,
X_OBJECT_VERSION_NUMBER => p_cont_object_version_number,
X_CREATED_BY_MODULE => p_org_contact_rec.created_by_module,
X_APPLICATION_ID => p_org_contact_rec.application_id,
X_STATUS => l_org_status
);
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACTS_PKG.Update_Row (-) ',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
SELECT SUBJECT_ID,OBJECT_ID
INTO p_org_contact_rec.party_rel_rec.object_id,
p_org_contact_rec.party_rel_rec.subject_id
FROM HZ_RELATIONSHIPS
WHERE RELATIONSHIP_ID = p_org_contact_rec.party_rel_rec.relationship_id
AND DIRECTIONAL_FLAG = 'F';
HZ_RELATIONSHIP_V2PUB.update_relationship (
p_relationship_rec => p_org_contact_rec.party_rel_rec,
p_object_version_number => p_rel_object_version_number,
p_party_object_version_number => p_party_object_version_number,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
hz_utility_v2pub.debug(p_message=>'do_update_org_contact (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END do_update_org_contact;
SELECT 'Y'
INTO l_dummy
FROM HZ_ORG_CONTACT_ROLES
WHERE ORG_CONTACT_ROLE_ID = l_org_contact_role_id;
record exists in Inactive status. This record needs to be updated to Active. */
-- If the record exist, update status = 'Active', Else continue with Insert
IF (p_org_contact_role_rec.org_contact_id IS NOT NULL AND
p_org_contact_role_rec.role_type IS NOT NULL) THEN
BEGIN
SELECT ORG_CONTACT_ROLE_ID,
OBJECT_VERSION_NUMBER,
ROWID
INTO l_org_contact_role_id,
l_object_version_number,
l_rowid
FROM HZ_ORG_CONTACT_ROLES
WHERE ORG_CONTACT_ID = p_org_contact_role_rec.org_contact_id
AND ROLE_TYPE = p_org_contact_role_rec.role_type
AND STATUS = 'I';
HZ_ORG_CONTACT_ROLES_PKG.Update_Row (
X_Rowid => l_rowid,
X_ORG_CONTACT_ROLE_ID => l_org_contact_role_id,
X_ORG_CONTACT_ID => p_org_contact_role_rec.org_contact_id,
X_ROLE_TYPE => p_org_contact_role_rec.role_type,
X_ROLE_LEVEL => p_org_contact_role_rec.role_level,
X_PRIMARY_FLAG => p_org_contact_role_rec.primary_flag,
X_ORIG_SYSTEM_REFERENCE => p_org_contact_role_rec.orig_system_reference,
X_PRIMARY_CON_PER_ROLE_TYPE => p_org_contact_role_rec.primary_contact_per_role_type,
X_STATUS => 'A',
X_OBJECT_VERSION_NUMBER => l_object_version_number,
X_CREATED_BY_MODULE => p_org_contact_role_rec.created_by_module,
X_APPLICATION_ID => p_org_contact_role_rec.application_id
);
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACT_ROLES_PKG.Insert_Row (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
HZ_ORG_CONTACT_ROLES_PKG.Insert_Row (
X_ORG_CONTACT_ROLE_ID => p_org_contact_role_rec.org_contact_role_id,
X_ORG_CONTACT_ID => p_org_contact_role_rec.org_contact_id,
X_ROLE_TYPE => p_org_contact_role_rec.role_type,
X_ROLE_LEVEL => p_org_contact_role_rec.role_level,
X_PRIMARY_FLAG => p_org_contact_role_rec.primary_flag,
X_ORIG_SYSTEM_REFERENCE => p_org_contact_role_rec.orig_system_reference,
X_PRIMARY_CON_PER_ROLE_TYPE => p_org_contact_role_rec.primary_contact_per_role_type,
X_STATUS => p_org_contact_role_rec.status,
X_OBJECT_VERSION_NUMBER => 1,
X_CREATED_BY_MODULE => p_org_contact_role_rec.created_by_module,
X_APPLICATION_ID => p_org_contact_role_rec.application_id
);
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACT_ROLES_PKG.Insert_Row (-) ' ||
'x_org_contact_role_id = ' || x_org_contact_role_id,
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
| do_update_org_contact_role
|
| DESCRIPTION
| Updates org_contact_role.
|
| SCOPE - PRIVATE
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| OUT:
| IN/ OUT:
| p_org_contact_role_rec
| p_last_update_date
| x_return_status
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
|
+===========================================================================*/
PROCEDURE do_update_org_contact_role(
p_org_contact_role_rec IN OUT NOCOPY ORG_CONTACT_ROLE_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_object_version_number NUMBER;
hz_utility_v2pub.debug(p_message=>'do_update_org_contact_role (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
SELECT OBJECT_VERSION_NUMBER,
ROWID
INTO l_object_version_number,
l_rowid
FROM HZ_ORG_CONTACT_ROLES
WHERE ORG_CONTACT_ROLE_ID = p_org_contact_role_rec.org_contact_role_id
FOR UPDATE OF ORG_CONTACT_ROLE_ID NOWAIT;
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACT_ROLES_PKG.Update_Row (+) ',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
HZ_ORG_CONTACT_ROLES_PKG.Update_Row (
X_Rowid => l_rowid,
X_ORG_CONTACT_ROLE_ID => p_org_contact_role_rec.org_contact_role_id,
X_ORG_CONTACT_ID => p_org_contact_role_rec.org_contact_id,
X_ROLE_TYPE => p_org_contact_role_rec.role_type,
X_ROLE_LEVEL => p_org_contact_role_rec.role_level,
X_PRIMARY_FLAG => p_org_contact_role_rec.primary_flag,
X_ORIG_SYSTEM_REFERENCE => p_org_contact_role_rec.orig_system_reference,
X_PRIMARY_CON_PER_ROLE_TYPE => p_org_contact_role_rec.primary_contact_per_role_type,
X_STATUS => p_org_contact_role_rec.status,
X_OBJECT_VERSION_NUMBER => p_object_version_number,
X_CREATED_BY_MODULE => p_org_contact_role_rec.created_by_module,
X_APPLICATION_ID => p_org_contact_role_rec.application_id
);
hz_utility_v2pub.debug(p_message=>'HZ_ORG_CONTACT_ROLES_PKG.Update_Row (-) ',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_utility_v2pub.debug(p_message=>'do_update_org_contact_role (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END do_update_org_contact_role;
p_create_update_flag => 'C',
p_org_contact_rec => l_org_contact_rec,
x_return_status => x_return_status
);
| update_org_contact
|
| DESCRIPTION
| Updates org_contact, party relationship for org_contact and
| party for party relationship.
|
| SCOPE - PUBLIC
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| p_init_msg_list
| p_org_contact_rec
| OUT:
| x_return_status
| x_msg_count
| x_msg_data
| IN/ OUT:
| p_org_contact_last_update_date
| p_party_rel_last_update_date
| p_party_last_update_date
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
|
+===========================================================================*/
PROCEDURE update_org_contact (
p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
p_org_contact_rec IN ORG_CONTACT_REC_TYPE,
p_cont_object_version_number IN OUT NOCOPY NUMBER,
p_rel_object_version_number IN OUT NOCOPY NUMBER,
p_party_object_version_number IN OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'update_org_contact';
SAVEPOINT update_org_contact;
hz_utility_v2pub.debug(p_message=>'update_org_contact (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
p_create_update_flag => 'U',
p_org_contact_rec => l_org_contact_rec,
p_old_org_contact_rec => l_old_org_contact_rec,
x_return_status => x_return_status
);
do_update_org_contact(
l_org_contact_rec,
p_cont_object_version_number,
p_rel_object_version_number,
p_party_object_version_number,
x_return_status
);
HZ_BUSINESS_EVENT_V2PVT.update_org_contact_event (
l_org_contact_rec,
l_old_org_contact_rec );
hz_utility_v2pub.debug(p_message=>'update_org_contact (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_org_contact;
hz_utility_v2pub.debug(p_message=>'update_org_contact (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_org_contact;
hz_utility_v2pub.debug(p_message=>'update_org_contact (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_org_contact;
hz_utility_v2pub.debug(p_message=>'update_org_contact (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_org_contact;
| update_org_contact_role
|
| DESCRIPTION
| Updates org_contact_role.
|
| SCOPE - PUBLIC
|
| EXETERNAL PROCEDURES/FUNCTIONS ACCESSED
|
| ARGUMENTS : IN:
| p_init_msg_list
| p_org_contact_role_rec
| OUT:
| x_return_status
| x_msg_count
| x_msg_data
| IN/ OUT:
| p_last_update_date
|
| RETURNS : NONE
|
| NOTES
|
| MODIFICATION HISTORY
|
+===========================================================================*/
PROCEDURE update_org_contact_role (
p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
p_org_contact_role_rec IN ORG_CONTACT_ROLE_REC_TYPE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'update_org_contact_role';
SAVEPOINT update_org_contact_role;
hz_utility_v2pub.debug(p_message=>'update_org_contact_role (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
do_update_org_contact_role(
l_org_contact_role_rec,
p_object_version_number,
x_return_status
);
HZ_BUSINESS_EVENT_V2PVT.update_org_contact_role_event (
l_org_contact_role_rec , l_old_org_contact_role_rec );
hz_utility_v2pub.debug(p_message=>'update_org_contact_role (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_org_contact_role;
hz_utility_v2pub.debug(p_message=>'update_org_contact_role (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_org_contact_role;
hz_utility_v2pub.debug(p_message=>'update_org_contact_role (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_org_contact_role;
hz_utility_v2pub.debug(p_message=>'update_org_contact_role (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_org_contact_role;
HZ_ORG_CONTACTS_PKG.Select_Row (
X_ORG_CONTACT_ID => x_org_contact_rec.org_contact_id,
X_PARTY_RELATIONSHIP_ID => l_party_relationship_id,
X_COMMENTS => x_org_contact_rec.comments,
X_CONTACT_NUMBER => x_org_contact_rec.contact_number,
X_DEPARTMENT_CODE => x_org_contact_rec.department_code,
X_DEPARTMENT => x_org_contact_rec.department,
X_TITLE => x_org_contact_rec.title,
X_JOB_TITLE => x_org_contact_rec.job_title,
X_DECISION_MAKER_FLAG => x_org_contact_rec.decision_maker_flag,
X_JOB_TITLE_CODE => x_org_contact_rec.job_title_code,
X_REFERENCE_USE_FLAG => x_org_contact_rec.reference_use_flag,
X_RANK => x_org_contact_rec.rank,
X_ORIG_SYSTEM_REFERENCE => x_org_contact_rec.orig_system_reference,
X_ATTRIBUTE_CATEGORY => x_org_contact_rec.attribute_category,
X_ATTRIBUTE1 => x_org_contact_rec.attribute1,
X_ATTRIBUTE2 => x_org_contact_rec.attribute2,
X_ATTRIBUTE3 => x_org_contact_rec.attribute3,
X_ATTRIBUTE4 => x_org_contact_rec.attribute4,
X_ATTRIBUTE5 => x_org_contact_rec.attribute5,
X_ATTRIBUTE6 => x_org_contact_rec.attribute6,
X_ATTRIBUTE7 => x_org_contact_rec.attribute7,
X_ATTRIBUTE8 => x_org_contact_rec.attribute8,
X_ATTRIBUTE9 => x_org_contact_rec.attribute9,
X_ATTRIBUTE10 => x_org_contact_rec.attribute10,
X_ATTRIBUTE11 => x_org_contact_rec.attribute11,
X_ATTRIBUTE12 => x_org_contact_rec.attribute12,
X_ATTRIBUTE13 => x_org_contact_rec.attribute13,
X_ATTRIBUTE14 => x_org_contact_rec.attribute14,
X_ATTRIBUTE15 => x_org_contact_rec.attribute15,
X_ATTRIBUTE16 => x_org_contact_rec.attribute16,
X_ATTRIBUTE17 => x_org_contact_rec.attribute17,
X_ATTRIBUTE18 => x_org_contact_rec.attribute18,
X_ATTRIBUTE19 => x_org_contact_rec.attribute19,
X_ATTRIBUTE20 => x_org_contact_rec.attribute20,
X_ATTRIBUTE21 => x_org_contact_rec.attribute21,
X_ATTRIBUTE22 => x_org_contact_rec.attribute22,
X_ATTRIBUTE23 => x_org_contact_rec.attribute23,
X_ATTRIBUTE24 => x_org_contact_rec.attribute24,
X_PARTY_SITE_ID => x_org_contact_rec.party_site_id,
X_CREATED_BY_MODULE => x_org_contact_rec.created_by_module,
X_APPLICATION_ID => x_org_contact_rec.application_id
);
HZ_ORG_CONTACT_ROLES_PKG.Select_Row (
X_ORG_CONTACT_ROLE_ID => x_org_contact_role_rec.org_contact_role_id,
X_ORG_CONTACT_ID => x_org_contact_role_rec.org_contact_id,
X_ROLE_TYPE => x_org_contact_role_rec.role_type,
X_ROLE_LEVEL => x_org_contact_role_rec.role_level,
X_PRIMARY_FLAG => x_org_contact_role_rec.primary_flag,
X_ORIG_SYSTEM_REFERENCE => x_org_contact_role_rec.orig_system_reference,
X_PRIMARY_CON_PER_ROLE_TYPE => x_org_contact_role_rec.primary_contact_per_role_type,
X_STATUS => x_org_contact_role_rec.status,
X_CREATED_BY_MODULE => x_org_contact_role_rec.created_by_module,
X_APPLICATION_ID => x_org_contact_role_rec.application_id
);
p_create_update_flag IN VARCHAR2,
p_org_contact_rec IN org_contact_rec_type,
p_old_org_contact_rec IN org_contact_rec_type DEFAULT NULL,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
BEGIN
-- check title
IF (p_create_update_flag = 'C' AND
p_org_contact_rec.title IS NOT NULL AND
p_org_contact_rec.title <> FND_API.G_MISS_CHAR) OR
(p_create_update_flag = 'U' AND
p_org_contact_rec.title IS NOT NULL AND
p_org_contact_rec.title <> p_old_org_contact_rec.title)
THEN
FND_MESSAGE.SET_NAME('AR', 'HZ_API_OBSOLETE_COLUMN');