The following lines contain the word 'select', 'insert', 'update' or 'delete':
g_insert CONSTANT VARCHAR2(1) := 'I';
g_update CONSTANT VARCHAR2(1) := 'U';
SELECT hca.class_code
FROM hz_code_assignments hca
WHERE hca.owner_table_id = p_party_id
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.class_category = 'BANK_INSTITUTION_TYPE'
AND hca.primary_flag = 'Y'
AND hca.status = 'A';
SELECT hrt.direction_code
FROM hz_relationship_types hrt
WHERE hrt.relationship_type = p_relationship_type
AND hrt.forward_rel_code = p_relationship_code;
| during update by ignoring any |
| party with the given party ID |
| 23-JAN-2004 Rajesh Jose A Clearing House Branch can only |
| have a Clearing House as a parent.|
+=======================================================================*/
PROCEDURE validate_parent_bank (
p_bank_rec IN bank_rec_type,
p_bank_id IN NUMBER,
p_mode IN VARCHAR2,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
CURSOR c_parentinfo IS
SELECT hop.bank_or_branch_number,
hop.organization_name,
hop.home_country
FROM hz_organization_profiles hop,
hz_parties hp
WHERE hop.party_id = p_bank_id
AND SYSDATE BETWEEN TRUNC(hop.effective_start_date)
AND NVL(hop.effective_end_date, SYSDATE+1)
AND hp.party_id = hop.party_id
AND hp.status='A';
SELECT hop.party_id,
hop.bank_or_branch_number,
hop.organization_name,
hop.home_country
FROM hz_organization_profiles hop,
hz_parties hp,
hz_relationships hr
WHERE hr.object_id = p_bank_rec.organization_rec.party_rec.party_id
AND hr.relationship_type = 'BANK_AND_BRANCH'
AND hr.relationship_code = 'HAS_BRANCH'
AND hr.object_type = 'ORGANIZATION'
AND hr.object_table_name = 'HZ_PARTIES'
AND hr.subject_type = 'ORGANIZATION'
AND hr.subject_table_name = 'HZ_PARTIES'
AND SYSDATE BETWEEN hr.start_date AND NVL(hr.end_date, SYSDATE + 1)
AND hr.status = 'A'
AND hop.party_id = hr.subject_id
AND SYSDATE BETWEEN TRUNC(hop.effective_start_date)
AND NVL(hop.effective_end_date, SYSDATE+1)
AND hp.party_id = hop.party_id
AND hp.status = 'A';
SELECT 1
FROM hz_relationships hr,
hz_organization_profiles hopbb
WHERE hr.subject_id = p_parent_id
AND hr.relationship_type = 'BANK_AND_BRANCH'
AND hr.relationship_code = 'HAS_BRANCH'
AND hr.subject_type = 'ORGANIZATION'
AND hr.subject_table_name = 'HZ_PARTIES'
AND hr.object_type = 'ORGANIZATION'
AND hr.object_table_name = 'HZ_PARTIES'
AND hopbb.party_id = hr.object_id
AND hopbb.party_id <>
NVL(p_bank_rec.organization_rec.party_rec.party_id,
-1)
AND SYSDATE BETWEEN TRUNC(hopbb.effective_start_date)
AND NVL(hopbb.effective_end_date, SYSDATE+1)
AND hopbb.bank_or_branch_number = p_bank_rec.bank_or_branch_number;
SELECT 1
FROM hz_relationships hr,
hz_parties hpbb
WHERE hr.subject_id = p_parent_id
AND hr.relationship_type = 'BANK_AND_BRANCH'
AND hr.relationship_code = 'HAS_BRANCH'
AND hr.subject_type = 'ORGANIZATION'
AND hr.subject_table_name = 'HZ_PARTIES'
AND hr.object_type = 'ORGANIZATION'
AND hr.object_table_name = 'HZ_PARTIES'
AND hpbb.party_id = hr.object_id
AND hpbb.party_id <>
NVL(p_bank_rec.organization_rec.party_rec.party_id,
-1)
AND hpbb.party_name = p_bank_rec.organization_rec.organization_name;
IF p_mode = g_insert OR p_bank_id IS NOT NULL THEN
--
-- Parent must be classified as a BANK or CLEARINGHOUSE
-- Bug 2835472
-- If the branch is a ClearingHouse_Branch then parent must be a
-- Clearing House. Added the last OR condition below.
--
OPEN c_codeassign (p_bank_id);
IF (p_mode = g_insert
OR p_bank_rec.organization_rec.home_country IS NOT NULL)
AND NVL(l_parent_country, fnd_api.g_miss_char) <> p_bank_rec.organization_rec.home_country
THEN
fnd_message.set_name('AR', 'HZ_BANK_INVALID_COUNTRY');
| insert the party_id of the |
| concerned bank or branch into the |
| temp table hz_bank_val_gt. |
+=======================================================================*/
PROCEDURE validate_bank_org (
p_bank_rec IN bank_rec_type,
p_intended_type IN VARCHAR2,
p_mode IN VARCHAR2,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
CURSOR orgidcur IS
SELECT hz_parties_s.NEXTVAL -- Bug 3397488
FROM DUAL;
IF (p_mode = g_insert) THEN
OPEN orgidcur;
IF (p_mode = g_update) THEN
l_temp_id := p_bank_rec.organization_rec.party_rec.party_id;
select home_country into l_country
from hz_organization_profiles
where party_id=l_temp_id
and sysdate between trunc(effective_start_date)
and nvl(effective_end_date, sysdate+1);
DELETE FROM hz_bank_val_gt;
INSERT INTO hz_bank_val_gt (
temp_id,
bank_or_branch_number,
bank_code,
branch_code,
institution_type,
branch_type,
rfc_code,
country
) VALUES (
l_temp_id,
p_bank_rec.bank_or_branch_number,
p_bank_rec.bank_code,
p_bank_rec.branch_code,
p_bank_rec.institution_type,
p_bank_rec.branch_type,
p_bank_rec.rfc_code,
-- Bug 3814832
l_country
);
SELECT 1
FROM hz_contact_points hcp,
hz_code_assignments hca
WHERE hcp.edi_id_number = p_edi_rec.edi_id_number
AND NVL(hcp.edi_ece_tp_location_code,
p_edi_rec.edi_ece_tp_location_code) =
p_edi_rec.edi_ece_tp_location_code
AND hcp.contact_point_id <> p_contact_point_rec.contact_point_id
AND hcp.contact_point_type = 'EDI'
AND hcp.status = 'A'
AND hcp.owner_table_name = 'HZ_PARTIES'
AND hcp.owner_table_id = hca.owner_table_id
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.class_category = 'BANK_INSTITUTION_TYPE';
SELECT 1
FROM hz_contact_points hcp,
hz_party_sites hps,
hz_code_assignments hca
WHERE hcp.edi_id_number = p_edi_rec.edi_id_number
AND NVL(hcp.edi_ece_tp_location_code,
p_edi_rec.edi_ece_tp_location_code) =
p_edi_rec.edi_ece_tp_location_code
AND hcp.contact_point_id <> p_contact_point_rec.contact_point_id
AND hcp.contact_point_type = 'EDI'
AND hcp.status = 'A'
AND hcp.owner_table_name = 'HZ_PARTY_SITES'
AND hcp.owner_table_id = hps.party_site_id
AND hps.party_id = hca.owner_table_id
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.class_category = 'BANK_INSTITUTION_TYPE';
SELECT hp.group_type
FROM hz_parties hp
WHERE hp.party_id = p_party_id
AND hp.status = 'A';
IF (p_mode = g_insert OR p_relationship_rec.relationship_type IS NOT NULL)
AND NVL(p_relationship_rec.relationship_type, 'NULL') <> 'BANKING_GROUP'
THEN
fnd_message.set_name('AR', 'HZ_BANK_INVALID_TYPE');
IF p_mode = g_insert THEN
--
-- The banking group party specified by either
-- p_relationship_rec.subject_id or p_relationship_rec.object_id must be
-- a valid Banking Group.
--
-- first check if the group is in the subject node of the relationship.
l_group_type := get_group_type(p_relationship_rec.subject_id,
x_return_status);
IF (p_mode = g_insert OR p_relationship_rec.relationship_type IS NOT NULL)
AND NVL(p_relationship_rec.relationship_type, 'NULL') <>
'CLEARINGHOUSE_BANK'
THEN
fnd_message.set_name('AR', 'HZ_BANK_INVALID_TYPE');
IF p_mode = g_insert THEN
--
-- The bank party specified by p_relationship_rec.subject_id must be a
-- valid Clearinghouse or Bank.
--
OPEN c_codeassign(p_relationship_rec.subject_id);
SELECT hop.home_country
FROM hz_organization_profiles hop, hz_parties hp
WHERE hop.party_id = p_party_id
AND hp.party_id = hop.party_id
AND hp.status = 'A'
AND sysdate between trunc(hop.effective_start_date)
and nvl(hop.effective_end_date, sysdate+1);
SELECT hl.country
FROM hz_locations hl
WHERE hl.location_id = p_location_id;
SELECT hps.party_id,
hps.location_id
FROM hz_party_sites hps
WHERE hps.party_site_id = p_party_site_rec.party_site_id;
IF p_mode = g_insert
OR p_party_site_rec.party_id IS NOT NULL
OR p_party_site_rec.location_id IS NOT NULL
THEN
--
-- set the party and location IDs for validation.
--
l_party_id := p_party_site_rec.party_id;
IF p_mode = g_insert THEN
fnd_message.set_name('AR', 'HZ_API_INVALID_FK');
OR p_mode = g_insert
THEN
OPEN c_codeassign(p_party_site_rec.party_id);
| PRIVATE PROCEDURE update_bank_organization |
| |
| DESCRIPTION |
| Updates the organization profile record's bank organization and |
| party-specific attributes. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_organization_profiles_pkg.update_row |
| |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Created. |
| 25-APR-2002 J. del Callar Bug 2272311: Changed rowid cursor |
| to fail if no BANK classifications|
| are found for the org profile. |
+=======================================================================*/
PROCEDURE update_bank_organization (
p_profile_id IN NUMBER,
p_bank_or_branch_number IN VARCHAR2,
p_bank_code IN VARCHAR2,
p_branch_code IN VARCHAR2
) IS
CURSOR c_orgprof IS
SELECT hop.ROWID
FROM hz_organization_profiles hop
WHERE hop.organization_profile_id = p_profile_id;
hz_utility_v2pub.debug(p_message=>'update_bank_organization (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_organization_profiles_pkg.update_row(
x_rowid => l_orowid,
x_organization_profile_id => NULL,
x_party_id => NULL,
x_organization_name => NULL,
x_attribute_category => NULL,
x_attribute1 => NULL,
x_attribute2 => NULL,
x_attribute3 => NULL,
x_attribute4 => NULL,
x_attribute5 => NULL,
x_attribute6 => NULL,
x_attribute7 => NULL,
x_attribute8 => NULL,
x_attribute9 => NULL,
x_attribute10 => NULL,
x_attribute11 => NULL,
x_attribute12 => NULL,
x_attribute13 => NULL,
x_attribute14 => NULL,
x_attribute15 => NULL,
x_attribute16 => NULL,
x_attribute17 => NULL,
x_attribute18 => NULL,
x_attribute19 => NULL,
x_attribute20 => NULL,
x_enquiry_duns => NULL,
x_ceo_name => NULL,
x_ceo_title => NULL,
x_principal_name => NULL,
x_principal_title => NULL,
x_legal_status => NULL,
x_control_yr => NULL,
x_employees_total => NULL,
x_hq_branch_ind => NULL,
x_branch_flag => NULL,
x_oob_ind => NULL,
x_line_of_business => NULL,
x_cong_dist_code => NULL,
x_sic_code => NULL,
x_import_ind => NULL,
x_export_ind => NULL,
x_labor_surplus_ind => NULL,
x_debarment_ind => NULL,
x_minority_owned_ind => NULL,
x_minority_owned_type => NULL,
x_woman_owned_ind => NULL,
x_disadv_8a_ind => NULL,
x_small_bus_ind => NULL,
x_rent_own_ind => NULL,
x_debarments_count => NULL,
x_debarments_date => NULL,
x_failure_score => NULL,
x_failure_score_override_code => NULL,
x_failure_score_commentary => NULL,
x_global_failure_score => NULL,
x_db_rating => NULL,
x_credit_score => NULL,
x_credit_score_commentary => NULL,
x_paydex_score => NULL,
x_paydex_three_months_ago => NULL,
x_paydex_norm => NULL,
x_best_time_contact_begin => NULL,
x_best_time_contact_end => NULL,
x_organization_name_phonetic => NULL,
x_tax_reference => NULL,
x_gsa_indicator_flag => NULL,
x_jgzz_fiscal_code => NULL,
x_analysis_fy => NULL,
x_fiscal_yearend_month => NULL,
x_curr_fy_potential_revenue => NULL,
x_next_fy_potential_revenue => NULL,
x_year_established => NULL,
x_mission_statement => NULL,
x_organization_type => NULL,
x_business_scope => NULL,
x_corporation_class => NULL,
x_known_as => NULL,
x_local_bus_iden_type => NULL,
x_local_bus_identifier => NULL,
x_pref_functional_currency => NULL,
x_registration_type => NULL,
x_total_employees_text => NULL,
x_total_employees_ind => NULL,
x_total_emp_est_ind => NULL,
x_total_emp_min_ind => NULL,
x_parent_sub_ind => NULL,
x_incorp_year => NULL,
x_content_source_type => NULL,
x_content_source_number => NULL,
x_effective_start_date => NULL,
x_effective_end_date => NULL,
x_sic_code_type => NULL,
x_public_private_ownership => NULL,
x_local_activity_code_type => NULL,
x_local_activity_code => NULL,
x_emp_at_primary_adr => NULL,
x_emp_at_primary_adr_text => NULL,
x_emp_at_primary_adr_est_ind => NULL,
x_emp_at_primary_adr_min_ind => NULL,
x_internal_flag => NULL,
x_high_credit => NULL,
x_avg_high_credit => NULL,
x_total_payments => NULL,
x_known_as2 => NULL,
x_known_as3 => NULL,
x_known_as4 => NULL,
x_known_as5 => NULL,
x_credit_score_class => NULL,
x_credit_score_natl_percentile => NULL,
x_credit_score_incd_default => NULL,
x_credit_score_age => NULL,
x_credit_score_date => NULL,
x_failure_score_class => NULL,
x_failure_score_incd_default => NULL,
x_failure_score_age => NULL,
x_failure_score_date => NULL,
x_failure_score_commentary2 => NULL,
x_failure_score_commentary3 => NULL,
x_failure_score_commentary4 => NULL,
x_failure_score_commentary5 => NULL,
x_failure_score_commentary6 => NULL,
x_failure_score_commentary7 => NULL,
x_failure_score_commentary8 => NULL,
x_failure_score_commentary9 => NULL,
x_failure_score_commentary10 => NULL,
x_credit_score_commentary2 => NULL,
x_credit_score_commentary3 => NULL,
x_credit_score_commentary4 => NULL,
x_credit_score_commentary5 => NULL,
x_credit_score_commentary6 => NULL,
x_credit_score_commentary7 => NULL,
x_credit_score_commentary8 => NULL,
x_credit_score_commentary9 => NULL,
x_credit_score_commentary10 => NULL,
x_maximum_credit_recomm => NULL,
x_maximum_credit_currency_code => NULL,
x_displayed_duns_party_id => NULL,
x_failure_score_natnl_perc => NULL,
x_duns_number_c => NULL,
x_bank_or_branch_number => p_bank_or_branch_number,
x_bank_code => p_bank_code,
x_branch_code => p_branch_code,
x_object_version_number => NULL,
x_created_by_module => NULL,
x_application_id => NULL,
x_version_number => NULL,
x_home_country => NULL
);
hz_utility_v2pub.debug(p_message=>'update_bank_organization (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_bank_organization;
| PRIVATE PROCEDURE update_relationship |
| |
| DESCRIPTION |
| Create a relationship between a bank branch and its parent bank. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_relationship_v2pub.update_relationship |
| |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Created. |
+=======================================================================*/
PROCEDURE update_relationship (
p_relationship_id IN OUT NOCOPY NUMBER,
p_subject_id IN NUMBER,
p_subject_type IN VARCHAR2,
p_subject_table_name IN VARCHAR2,
p_object_id IN NUMBER,
p_object_type IN VARCHAR2,
p_object_table_name IN VARCHAR2,
p_relationship_code IN VARCHAR2,
p_relationship_type IN VARCHAR2,
p_created_by_module IN VARCHAR2,
p_application_id IN NUMBER,
x_rel_party_id OUT NOCOPY NUMBER,
x_rel_party_number OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
CURSOR c_rel IS
SELECT NVL(p_subject_id, hr.subject_id),
NVL(p_object_id, hr.object_id),
hr.object_version_number
FROM hz_relationships hr
WHERE hr.relationship_id = p_relationship_id
AND SYSDATE BETWEEN TRUNC(hr.start_date)
AND NVL(hr.end_date, SYSDATE+1)
AND hr.relationship_type = p_relationship_type
ORDER BY 3 DESC;
hz_utility_v2pub.debug(p_message=>'update_bank_relationship (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_utility_v2pub.debug(p_message=>'update_bank_relationship (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_relationship_v2pub.update_relationship(
p_relationship_rec => l_relationship_rec,
p_object_version_number => l_robject_version_number,
p_party_object_version_number => l_rel_party_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_bank_relationship (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_utility_v2pub.debug(p_message=>'update_bank_relationship (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_relationship;
| PRIVATE PROCEDURE update_code_assignment |
| |
| DESCRIPTION |
| Update a code assignment for the bank organization. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_classification_v2pub.update_code_assignment |
| |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Created. |
| 23-JAN-2004 Rajesh Jose Added parameter for Bug 3397488 |
| 11-OCT-2004 V.Ravichandran Bug 3937348. Modified code |
| such that the inactive_date |
| could be updated in |
| update_bank and update_bank_branch|
| APIs. |
+=======================================================================*/
PROCEDURE update_code_assignment (
p_party_id IN NUMBER,
p_bank_organization_type IN VARCHAR2,
p_class_category IN VARCHAR2,
p_created_by_module IN VARCHAR2,
p_application_id IN NUMBER,
p_end_date_active IN DATE,
p_object_version_number IN OUT NOCOPY NUMBER,
x_return_status IN OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_code_assignment_rec hz_classification_v2pub.code_assignment_rec_type;
SELECT hca.code_assignment_id,
hca.object_version_number
FROM hz_code_assignments hca
WHERE hca.class_category = p_class_category
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.owner_table_id = p_party_id
AND hca.primary_flag='Y'
AND sysdate between start_date_active and nvl(end_date_active,sysdate+1)
AND hca.status = 'A';
SELECT hca.code_assignment_id,
hca.object_version_number
FROM hz_code_assignments hca
WHERE hca.class_category = p_class_category
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.owner_table_id = p_party_id
AND hca.class_code = p_bank_organization_type;
SELECT hca.code_assignment_id,
hca.object_version_number
FROM hz_code_assignments hca
WHERE hca.class_category = p_class_category
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.owner_table_id = p_party_id
AND hca.primary_flag='Y'
AND (p_bank_organization_type is null or
p_bank_organization_type = hca.class_code);
hz_utility_v2pub.debug(p_message=>'update_code_assignment (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_classification_v2pub.update_code_assignment(
p_init_msg_list => fnd_api.g_false,
p_code_assignment_rec => l_code_assignment_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_classification_v2pub.update_code_assignment(
p_init_msg_list => fnd_api.g_false,
p_code_assignment_rec => l_code_assignment_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_classification_v2pub.update_code_assignment(
p_init_msg_list => fnd_api.g_false,
p_code_assignment_rec => l_code_assignment_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_code_assignment (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_code_assignment;
| PRIVATE PROCEDURE update_usage_assignment |
| |
| DESCRIPTION |
| Update a usage assignment. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| |
| MODIFICATION HISTORY |
+=======================================================================*/
PROCEDURE update_usage_assignment (
p_party_id IN NUMBER,
p_end_date_active IN DATE,
x_return_status IN OUT NOCOPY VARCHAR2
) IS
l_party_usg_assignment_rec HZ_PARTY_USG_ASSIGNMENT_PVT.party_usg_assignment_rec_type;
SELECT hca.class_code
FROM hz_code_assignments hca
WHERE hca.class_category = 'BANK_INSTITUTION_TYPE'
AND hca.owner_table_name = 'HZ_PARTIES'
AND hca.owner_table_id = p_party_id
AND hca.status = 'A';
SELECT party_usg_assignment_id,
effective_end_date
FROM hz_party_usg_assignments
WHERE party_id = p_party_id
AND party_usage_code = p_party_usage_code;
HZ_PARTY_USG_ASSIGNMENT_PVT.update_usg_assignment (
p_validation_level => HZ_PARTY_USG_ASSIGNMENT_PVT.G_VALID_LEVEL_NONE,
p_party_usg_assignment_id => l_assignment_id,
p_party_usg_assignment_rec => l_party_usg_assignment_rec,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data
);
END update_usage_assignment;
validate_bank_org(l_bank_rec, 'BANK', g_insert, x_return_status);
select temp_id into l_bank_rec.organization_rec.party_rec.party_id
from hz_bank_val_gt;
update_bank_organization(x_profile_id,
l_bank_rec.bank_or_branch_number,
l_bank_rec.bank_code,
l_bank_rec.branch_code);
| PUBLIC PROCEDURE update_bank |
| |
| DESCRIPTION |
| Update a bank organization and update its type if the type was |
| specified. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_organization |
| hz_organization_profiles_pkg.update_row |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is |
| set to FND_API.G_TRUE. Default is |
| fnd_api.g_false. |
| p_bank_rec Bank record. |
| IN/OUT: |
| x_pobject_version_number New version number for the bank. |
| x_bitobject_version_number New version number for the code |
| assignment for the bank type. |
| OUT: |
| x_profile_id New organization profile ID for |
| the updated bank. |
| x_return_status Return status after the call. The |
| status can be |
| FND_API.G_RET_STS_SUCCESS |
| (success), fnd_api.g_ret_sts_error |
| (error), |
| fnd_api.g_ret_sts_unexp_error |
| (unexpected error). |
| x_msg_count Number of messages in message |
| stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Created. |
| 23-JAN-2004 Rajesh Jose Modified for Bug 3397488 |
| 11-OCT-2004 V.Ravichandran Bug 3937348. Modified code |
| such that the inactive_date |
| could be updated in |
| update_bank and update_bank_branch|
| APIs. |
+=======================================================================*/
PROCEDURE update_bank (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_bank_rec IN bank_rec_type,
p_pobject_version_number IN OUT NOCOPY NUMBER,
p_bitobject_version_number IN OUT NOCOPY NUMBER,
x_profile_id OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_party_id NUMBER(15) := p_bank_rec.organization_rec.party_rec.party_id;
SAVEPOINT update_bank;
hz_utility_v2pub.debug(p_message=>'update_bank (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
validate_bank_org(l_bank_rec, 'BANK', g_update, x_return_status);
hz_party_v2pub.update_organization(
p_organization_rec => l_bank_rec.organization_rec,
p_party_object_version_number => p_pobject_version_number,
x_profile_id => x_profile_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
update_bank_organization(x_profile_id,
l_bank_rec.bank_or_branch_number,
l_bank_rec.bank_code,
l_bank_rec.branch_code);
update_code_assignment(l_party_id,
l_bank_rec.institution_type,
'BANK_INSTITUTION_TYPE',
l_bank_rec.organization_rec.created_by_module,
l_bank_rec.organization_rec.application_id,
l_bank_rec.inactive_date,
p_bitobject_version_number,
x_return_status,
x_msg_count,
x_msg_data);
update_usage_assignment (
p_party_id => l_party_id,
p_end_date_active => l_bank_rec.inactive_date,
x_return_status => x_return_status
);
hz_utility_v2pub.debug(p_message=>'update_bank (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank;
hz_utility_v2pub.debug(p_message=>'update_bank (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank;
hz_utility_v2pub.debug(p_message=>'update_bank (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank;
hz_utility_v2pub.debug(p_message=>'update_bank (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_bank;
g_insert,
x_return_status);
validate_bank_org(l_bank_rec, 'BRANCH', g_insert, x_return_status);
select temp_id into l_bank_rec.organization_rec.party_rec.party_id
from hz_bank_val_gt;
update_bank_organization(x_profile_id,
l_bank_rec.bank_or_branch_number,
l_bank_rec.bank_code,
l_bank_rec.branch_code);
| PUBLIC PROCEDURE update_bank_branch |
| |
| DESCRIPTION |
| Update a bank branch organization. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_organization |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is fnd_api.g_false. |
| p_bank_rec Bank record. |
| p_relationship_id ID for relationship between bank branch and |
| its parent bank. NULL if the parent bank is |
| not going to be reassigned. |
| p_bank_party_id Party ID of the parent bank. NULL if the |
| parent bank is not going to be reassigned. |
| IN/OUT: |
| p_pobject_version_number New version number for the bank |
| branch party. |
| p_bbtobject_version_number New version number for the bank |
| branch type code assignment. |
| p_rfcobject_version_number New version number for the Regional|
| Finance Center code assignment. |
| OUT: |
| x_profile_id Organization profile ID for the bank branch. |
| x_rel_party_id ID for party relationship created. |
| x_rel_party_number Number for the party relationship created. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Created. |
| 06-MAY-2002 J. del Callar Added support for RFCs. |
| 11-OCT-2004 V.Ravichandran Bug 3937348. Modified code |
| such that the inactive_date |
| could be updated in |
| update_bank and update_bank_branch|
| APIs. |
+=======================================================================*/
PROCEDURE update_bank_branch (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_bank_rec IN bank_rec_type,
p_bank_party_id IN NUMBER := NULL,
p_relationship_id IN OUT NOCOPY NUMBER,
p_pobject_version_number IN OUT NOCOPY NUMBER,
p_bbtobject_version_number IN OUT NOCOPY NUMBER,
p_rfcobject_version_number IN OUT NOCOPY NUMBER,
x_profile_id OUT NOCOPY NUMBER,
x_rel_party_id OUT NOCOPY NUMBER,
x_rel_party_number OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_bank_branch;
hz_utility_v2pub.debug(p_message=>'update_bank_branch (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
g_update,
x_return_status);
validate_bank_org(l_bank_rec, 'BRANCH', g_update, x_return_status);
hz_party_v2pub.update_organization(
p_organization_rec => l_bank_rec.organization_rec,
p_party_object_version_number => p_pobject_version_number,
x_profile_id => x_profile_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
update_bank_organization(x_profile_id,
l_bank_rec.bank_or_branch_number,
l_bank_rec.bank_code,
l_bank_rec.branch_code);
update_code_assignment(l_bank_rec.organization_rec.party_rec.party_id,
l_bank_rec.institution_type,
'BANK_INSTITUTION_TYPE',
l_bank_rec.organization_rec.created_by_module,
l_bank_rec.organization_rec.application_id,
l_bank_rec.inactive_date,
p_pobject_version_number,
x_return_status,
x_msg_count,
x_msg_data);
update_code_assignment(l_bank_rec.organization_rec.party_rec.party_id,
l_bank_rec.branch_type,
'BANK_BRANCH_TYPE',
l_bank_rec.organization_rec.created_by_module,
l_bank_rec.organization_rec.application_id,
-- l_bank_rec.inactive_date,
FND_API.G_MISS_DATE,
p_bbtobject_version_number,
x_return_status,
x_msg_count,
x_msg_data);
update_code_assignment(l_bank_rec.organization_rec.party_rec.party_id,
l_bank_rec.rfc_code,
'RFC_IDENTIFIER',
l_bank_rec.organization_rec.created_by_module,
l_bank_rec.organization_rec.application_id,
-- l_bank_rec.inactive_date,
FND_API.G_MISS_DATE,
p_rfcobject_version_number,
x_return_status,
x_msg_count,
x_msg_data);
update_relationship(
p_relationship_id => p_relationship_id,
p_subject_id => p_bank_party_id,
p_subject_type => 'ORGANIZATION',
p_subject_table_name => 'HZ_PARTIES',
p_object_id =>
l_bank_rec.organization_rec.party_rec.party_id,
p_object_type => 'ORGANIZATION',
p_object_table_name => 'HZ_PARTIES',
p_relationship_code => 'HAS_BRANCH',
p_relationship_type => 'BANK_AND_BRANCH',
p_created_by_module =>
l_bank_rec.organization_rec.created_by_module,
p_application_id =>
l_bank_rec.organization_rec.application_id,
x_rel_party_id => x_rel_party_id,
x_rel_party_number => x_rel_party_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
update_usage_assignment (
p_party_id => l_bank_rec.organization_rec.party_rec.party_id,
p_end_date_active => l_bank_rec.inactive_date,
x_return_status => x_return_status
);
hz_utility_v2pub.debug(p_message=>'update_bank_branch (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_branch;
hz_utility_v2pub.debug(p_message=>'update_bank_branch (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_branch;
hz_utility_v2pub.debug(p_message=>'update_bank_branch (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_branch;
hz_utility_v2pub.debug(p_message=>'update_bank_branch (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_bank_branch;
| PUBLIC PROCEDURE update_banking_group |
| |
| DESCRIPTION |
| Update a banking group. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_group |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is fnd_api.g_false. |
| p_group_rec Group record for the banking group. |
| IN/OUT: |
| p_pobject_version_number Version number for the banking group |
| party that was created. |
| OUT: |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Created. |
+=======================================================================*/
PROCEDURE update_banking_group (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_group_rec IN hz_party_v2pub.group_rec_type,
p_pobject_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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_banking_group;
hz_utility_v2pub.debug(p_message=>'update_banking_group (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_party_v2pub.update_group(
p_group_rec => p_group_rec,
p_party_object_version_number => p_pobject_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_banking_group (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_banking_group;
hz_utility_v2pub.debug(p_message=>'update_banking_group (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_banking_group;
hz_utility_v2pub.debug(p_message=>'update_banking_group (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_banking_group;
hz_utility_v2pub.debug(p_message=>'update_banking_group (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_banking_group;
validate_bank_group_member(p_relationship_rec, g_insert, x_return_status);
| PUBLIC PROCEDURE update_bank_group_member |
| |
| DESCRIPTION |
| Update a member relationship for a bank organization to a banking |
| group. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_group |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is fnd_api.g_false. |
| p_relationship_rec Relationship record for the banking group |
| membership. |
| IN/OUT: |
| p_robject_version_number New version number for the banking |
| group membership relationship. |
| p_pobject_version_number New version number for the banking |
| group membership rel party. |
| OUT: |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Updated. |
+=======================================================================*/
PROCEDURE update_bank_group_member (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_relationship_rec IN hz_relationship_v2pub.relationship_rec_type,
p_robject_version_number IN OUT NOCOPY NUMBER,
p_pobject_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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_bank_group_member;
hz_utility_v2pub.debug(p_message=>'update_bank_group_member (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
validate_bank_group_member(p_relationship_rec, g_update, x_return_status);
hz_relationship_v2pub.update_relationship(
p_relationship_rec => p_relationship_rec,
p_object_version_number => p_robject_version_number,
p_party_object_version_number => p_pobject_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_bank_group_member (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_group_member;
hz_utility_v2pub.debug(p_message=>'update_bank_group_member (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_group_member;
hz_utility_v2pub.debug(p_message=>'update_bank_group_member (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_group_member;
hz_utility_v2pub.debug(p_message=>'update_bank_group_member (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_bank_group_member;
g_insert,
x_return_status);
| PUBLIC PROCEDURE update_clearinghouse_assign |
| |
| DESCRIPTION |
| Update a relationship that assigns a bank to a clearinghouse. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_group |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is fnd_api.g_false. |
| p_relationship_rec Relationship record for the clearinghouse |
| assignment. |
| IN/OUT: |
| p_robject_version_number New version number for the banking |
| group membership relationship. |
| p_pobject_version_number New version number for the banking |
| group membership rel party. |
| OUT: |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Updated. |
+=======================================================================*/
PROCEDURE update_clearinghouse_assign (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_relationship_rec IN hz_relationship_v2pub.relationship_rec_type,
p_robject_version_number IN OUT NOCOPY NUMBER,
p_pobject_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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_clearinghouse_assign;
hz_utility_v2pub.debug(p_message=>'update_clearinghouse_assign (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
g_update,
x_return_status);
hz_relationship_v2pub.update_relationship(
p_relationship_rec => p_relationship_rec,
p_object_version_number => p_robject_version_number,
p_party_object_version_number => p_pobject_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_clearinghouse_assign (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_clearinghouse_assign;
hz_utility_v2pub.debug(p_message=>'update_clearinghouse_assign (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_clearinghouse_assign;
hz_utility_v2pub.debug(p_message=>'update_clearinghouse_assign (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_clearinghouse_assign;
hz_utility_v2pub.debug(p_message=>'update_clearinghouse_assign (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_clearinghouse_assign;
validate_bank_site(p_party_site_rec, g_insert, x_return_status);
| PUBLIC PROCEDURE update_bank_site |
| |
| DESCRIPTION |
| Update a party site for a bank-type organization. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_group |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is fnd_api.g_false. |
| p_party_site_rec Party site record for the bank organization. |
| IN/OUT: |
| x_psobject_version_number Party site version number for the |
| updated bank site. |
| OUT: |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-NOV-2001 J. del Callar Updated. |
+=======================================================================*/
PROCEDURE update_bank_site (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_party_site_rec IN hz_party_site_v2pub.party_site_rec_type,
p_psobject_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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_bank_site;
hz_utility_v2pub.debug(p_message=>'update_bank_site (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
validate_bank_site(p_party_site_rec, g_update, x_return_status);
hz_party_site_v2pub.update_party_site(
p_party_site_rec => p_party_site_rec,
p_object_version_number => p_psobject_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_bank_site (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_site;
hz_utility_v2pub.debug(p_message=>'update_bank_site (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_site;
hz_utility_v2pub.debug(p_message=>'update_bank_site (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_bank_site;
hz_utility_v2pub.debug(p_message=>'update_bank_site (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_bank_site;
| PUBLIC PROCEDURE update_edi_contact_point |
| |
| DESCRIPTION |
| Updates an EDI contact point. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_edi_contact_point |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is FND_API.G_FALSE. |
| p_contact_point_rec Contact point record. |
| p_edi_rec EDI record. |
| IN/OUT: |
| p_object_version_number Used to lock the record being updated. |
| OUT: |
| x_party_number Party number for the party created for the |
| relationship. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-APR-2002 J. del Callar Bug 2238144: Created. |
+=======================================================================*/
PROCEDURE update_edi_contact_point (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_contact_point_rec IN hz_contact_point_v2pub.contact_point_rec_type,
p_edi_rec IN hz_contact_point_v2pub.edi_rec_type
:= hz_contact_point_v2pub.g_miss_edi_rec,
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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_edi_contact_point;
hz_utility_v2pub.debug(p_message=>'update_edi_contact_point (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_contact_point_v2pub.update_edi_contact_point(
p_init_msg_list => fnd_api.g_false,
p_contact_point_rec => p_contact_point_rec,
p_edi_rec => p_edi_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_edi_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_edi_contact_point;
hz_utility_v2pub.debug(p_message=>'update_edi_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_edi_contact_point;
hz_utility_v2pub.debug(p_message=>'update_edi_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_edi_contact_point;
hz_utility_v2pub.debug(p_message=>'update_edi_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_edi_contact_point;
| PUBLIC PROCEDURE update_eft_contact_point |
| |
| DESCRIPTION |
| Updates an EFT contact point. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_eft_contact_point |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is FND_API.G_FALSE. |
| p_contact_point_rec Contact point record. |
| p_eft_rec EFT record. |
| IN/OUT: |
| p_object_version_number Used to lock the record being updated. |
| OUT: |
| x_party_number Party number for the party created for the |
| relationship. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-APR-2002 J. del Callar Bug 2238144: Created. |
+=======================================================================*/
PROCEDURE update_eft_contact_point (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_contact_point_rec IN hz_contact_point_v2pub.contact_point_rec_type,
p_eft_rec IN hz_contact_point_v2pub.eft_rec_type
:= hz_contact_point_v2pub.g_miss_eft_rec,
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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_eft_contact_point;
hz_utility_v2pub.debug(p_message=>'update_eft_contact_point (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_contact_point_v2pub.update_eft_contact_point(
p_init_msg_list => fnd_api.g_false,
p_contact_point_rec => p_contact_point_rec,
p_eft_rec => p_eft_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_eft_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_eft_contact_point;
hz_utility_v2pub.debug(p_message=>'update_eft_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_eft_contact_point;
hz_utility_v2pub.debug(p_message=>'update_eft_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_eft_contact_point;
hz_utility_v2pub.debug(p_message=>'update_eft_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_eft_contact_point;
| PUBLIC PROCEDURE update_web_contact_point |
| |
| DESCRIPTION |
| Updates a Web contact point. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_web_contact_point |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is FND_API.G_FALSE. |
| p_contact_point_rec Contact point record. |
| p_web_rec WEB record. |
| IN/OUT: |
| p_object_version_number Used to lock the record being updated. |
| OUT: |
| x_party_number Party number for the party created for the |
| relationship. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-APR-2002 J. del Callar Bug 2238144: Created. |
+=======================================================================*/
PROCEDURE update_web_contact_point (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_contact_point_rec IN hz_contact_point_v2pub.contact_point_rec_type,
p_web_rec IN hz_contact_point_v2pub.web_rec_type
:= hz_contact_point_v2pub.g_miss_web_rec,
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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_web_contact_point;
hz_utility_v2pub.debug(p_message=>'update_web_contact_point (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_contact_point_v2pub.update_web_contact_point(
p_init_msg_list => fnd_api.g_false,
p_contact_point_rec => p_contact_point_rec,
p_web_rec => p_web_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_web_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_web_contact_point;
hz_utility_v2pub.debug(p_message=>'update_web_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_web_contact_point;
hz_utility_v2pub.debug(p_message=>'update_web_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_web_contact_point;
hz_utility_v2pub.debug(p_message=>'update_web_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_web_contact_point;
| PUBLIC PROCEDURE update_phone_contact_point |
| |
| DESCRIPTION |
| Updates a Phone contact point. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_phone_contact_point |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is FND_API.G_FALSE. |
| p_contact_point_rec Contact point record. |
| p_phone_rec PHONE record. |
| IN/OUT: |
| p_object_version_number Used to lock the record being updated. |
| OUT: |
| x_party_number Party number for the party created for the |
| relationship. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-APR-2002 J. del Callar Bug 2238144: Created. |
+=======================================================================*/
PROCEDURE update_phone_contact_point (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_contact_point_rec IN hz_contact_point_v2pub.contact_point_rec_type,
p_phone_rec IN hz_contact_point_v2pub.phone_rec_type
:= hz_contact_point_v2pub.g_miss_phone_rec,
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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_phone_contact_point;
hz_utility_v2pub.debug(p_message=>'update_phone_contact_point (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_contact_point_v2pub.update_phone_contact_point(
p_init_msg_list => fnd_api.g_false,
p_contact_point_rec => p_contact_point_rec,
p_phone_rec => p_phone_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_phone_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_phone_contact_point;
hz_utility_v2pub.debug(p_message=>'update_phone_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_phone_contact_point;
hz_utility_v2pub.debug(p_message=>'update_phone_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_phone_contact_point;
hz_utility_v2pub.debug(p_message=>'update_phone_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_phone_contact_point;
| PUBLIC PROCEDURE update_email_contact_point |
| |
| DESCRIPTION |
| Updates an EMAIL contact point. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_email_contact_point |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is FND_API.G_FALSE. |
| p_contact_point_rec Contact point record. |
| p_email_rec EMAIL record. |
| IN/OUT: |
| p_object_version_number Used to lock the record being updated. |
| OUT: |
| x_party_number Party number for the party created for the |
| relationship. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-APR-2002 J. del Callar Bug 2238144: Created. |
+=======================================================================*/
PROCEDURE update_email_contact_point (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_contact_point_rec IN hz_contact_point_v2pub.contact_point_rec_type,
p_email_rec IN hz_contact_point_v2pub.email_rec_type
:= hz_contact_point_v2pub.g_miss_email_rec,
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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_email_contact_point;
hz_utility_v2pub.debug(p_message=>'update_email_contact_point (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_contact_point_v2pub.update_email_contact_point(
p_init_msg_list => fnd_api.g_false,
p_contact_point_rec => p_contact_point_rec,
p_email_rec => p_email_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_email_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_email_contact_point;
hz_utility_v2pub.debug(p_message=>'update_email_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_email_contact_point;
hz_utility_v2pub.debug(p_message=>'update_email_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_email_contact_point;
hz_utility_v2pub.debug(p_message=>'update_email_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_email_contact_point;
| PUBLIC PROCEDURE update_telex_contact_point |
| |
| DESCRIPTION |
| Updates a Telex contact point. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_utility_v2pub.debug |
| hz_party_v2pub.update_telex_contact_point |
| |
| ARGUMENTS |
| IN: |
| p_init_msg_list Initialize message stack if it is set to |
| FND_API.G_TRUE. Default is FND_API.G_FALSE. |
| p_contact_point_rec Contact point record. |
| p_telex_rec TELEX record. |
| IN/OUT: |
| p_object_version_number Used to lock the record being updated. |
| OUT: |
| x_party_number Party number for the party created for the |
| relationship. |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 27-APR-2002 J. del Callar Bug 2238144: Created. |
+=======================================================================*/
PROCEDURE update_telex_contact_point (
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_contact_point_rec IN hz_contact_point_v2pub.contact_point_rec_type,
p_telex_rec IN hz_contact_point_v2pub.telex_rec_type
:= hz_contact_point_v2pub.g_miss_telex_rec,
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_debug_prefix VARCHAR2(30) := '';
SAVEPOINT update_telex_contact_point;
hz_utility_v2pub.debug(p_message=>'update_telex_contact_point (+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
hz_contact_point_v2pub.update_telex_contact_point(
p_init_msg_list => fnd_api.g_false,
p_contact_point_rec => p_contact_point_rec,
p_telex_rec => p_telex_rec,
p_object_version_number => p_object_version_number,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
hz_utility_v2pub.debug(p_message=>'update_telex_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_telex_contact_point;
hz_utility_v2pub.debug(p_message=>'update_telex_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_telex_contact_point;
hz_utility_v2pub.debug(p_message=>'update_telex_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO update_telex_contact_point;
hz_utility_v2pub.debug(p_message=>'update_telex_contact_point (-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END update_telex_contact_point;
| p_mode 'I' for insert mode. |
| 'U' for update mode. |
| IN/OUT: |
| OUT: |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 14-FEB-2006 Jianying o Bug 4728668: Created. |
+=======================================================================*/
PROCEDURE validate_bank (
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_bank_rec IN bank_rec_type,
p_mode IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_debug_prefix VARCHAR2(30) := '';
| p_mode 'I' for insert mode. |
| 'U' for update mode. |
| IN/OUT: |
| OUT: |
| x_return_status Return status after the call. The status can |
| be FND_API.G_RET_STS_SUCCESS (success), |
| fnd_api.g_ret_sts_error (error), |
| fnd_api.g_ret_sts_unexp_error (unexpected |
| error). |
| x_msg_count Number of messages in message stack. |
| x_msg_data Message text if x_msg_count is 1. |
| MODIFICATION HISTORY |
| 14-FEB-2006 Jianying o Bug 4728668: Created. |
+=======================================================================*/
PROCEDURE validate_bank_branch (
p_init_msg_list IN VARCHAR2 DEFAULT NULL,
p_bank_party_id IN NUMBER,
p_bank_branch_rec IN bank_rec_type,
p_mode IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
l_debug_prefix VARCHAR2(30) := '';