The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT org.home_country
FROM hz_organization_profiles org
WHERE org.party_id = p_bank_id
AND SYSDATE between TRUNC(effective_start_date)
and NVL(TRUNC(effective_end_date), SYSDATE+1);
SELECT hz_bank.party_id AS bank_id,
hz_bankorg.home_country,
hz_bank.party_name,
hz_bankorg.bank_or_branch_number
FROM hz_parties hz_bank,
hz_organization_profiles hz_bankorg,
hz_parties hz_branch,
hz_relationships hz_rel,
hz_code_assignments hz_bankCA,
hz_code_assignments hz_branchCA
WHERE hz_branchCA.owner_table_name = 'HZ_PARTIES'
AND hz_branchCA.owner_table_id = hz_branch.party_id
AND hz_branchCA.class_category = 'BANK_INSTITUTION_TYPE'
AND hz_branchCA.class_code = 'BANK_BRANCH'
AND NVL(hz_branchCA.STATUS, 'A') = 'A'
AND hz_bankCA.CLASS_CATEGORY = 'BANK_INSTITUTION_TYPE'
AND hz_bankCA.CLASS_CODE = 'BANK'
AND hz_bankCA.OWNER_TABLE_NAME = 'HZ_PARTIES'
AND hz_bankCA.OWNER_TABLE_ID = hz_bank.PARTY_ID
AND NVL(hz_bankCA.STATUS, 'A') = 'A'
AND hz_rel.OBJECT_ID = hz_bank.PARTY_ID
And hz_branch.PARTY_ID = hz_rel.SUBJECT_ID
And hz_rel.RELATIONSHIP_TYPE = 'BANK_AND_BRANCH'
And hz_rel.RELATIONSHIP_CODE = 'BRANCH_OF'
And hz_rel.STATUS = 'A'
And hz_rel.SUBJECT_TABLE_NAME = 'HZ_PARTIES'
And hz_rel.SUBJECT_TYPE = 'ORGANIZATION'
And hz_rel.OBJECT_TABLE_NAME = 'HZ_PARTIES'
And hz_rel.OBJECT_TYPE = 'ORGANIZATION'
AND hz_bank.party_id = hz_bankorg.party_id
AND SYSDATE between TRUNC(hz_bankorg.effective_start_date)
and NVL(TRUNC(hz_bankorg.effective_end_date), SYSDATE+1)
AND hz_branch.party_id = p_branch_id;
| PUBLIC PROCEDURE update_bank |
| |
| DESCRIPTION |
| Update a bank organization. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_bank_pub.update_bank |
| |
| 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_id Party ID of the bank to be updated. |
| p_bank_name Bank name. |
| p_bank_number Bank number. |
| p_alternate_bank_name Alternate bank name. |
| p_short_bank_name Short bank name. |
| p_description Description. |
| p_tax_payer_id Tax payer ID. |
| p_tax_registration_number Tax registration number |
| IN/OUT: |
| p_object_version_number Current object version number for the bank|
| 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 |
| 25-AUG-2004 Xin Wang Created. |
+=======================================================================*/
PROCEDURE update_bank (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_bank_id IN NUMBER,
p_bank_name IN VARCHAR2,
p_bank_number IN VARCHAR2 DEFAULT NULL,
p_alternate_bank_name IN VARCHAR2 DEFAULT NULL,
p_short_bank_name IN VARCHAR2 DEFAULT NULL,
p_description IN VARCHAR2 DEFAULT NULL,
p_tax_payer_id IN VARCHAR2 DEFAULT NULL,
p_tax_registration_number IN VARCHAR2 DEFAULT NULL,
p_attribute_category IN VARCHAR2 DEFAULT NULL,
p_attribute1 IN VARCHAR2 DEFAULT NULL,
p_attribute2 IN VARCHAR2 DEFAULT NULL,
p_attribute3 IN VARCHAR2 DEFAULT NULL,
p_attribute4 IN VARCHAR2 DEFAULT NULL,
p_attribute5 IN VARCHAR2 DEFAULT NULL,
p_attribute6 IN VARCHAR2 DEFAULT NULL,
p_attribute7 IN VARCHAR2 DEFAULT NULL,
p_attribute8 IN VARCHAR2 DEFAULT NULL,
p_attribute9 IN VARCHAR2 DEFAULT NULL,
p_attribute10 IN VARCHAR2 DEFAULT NULL,
p_attribute11 IN VARCHAR2 DEFAULT NULL,
p_attribute12 IN VARCHAR2 DEFAULT NULL,
p_attribute13 IN VARCHAR2 DEFAULT NULL,
p_attribute14 IN VARCHAR2 DEFAULT NULL,
p_attribute15 IN VARCHAR2 DEFAULT NULL,
p_attribute16 IN VARCHAR2 DEFAULT NULL,
p_attribute17 IN VARCHAR2 DEFAULT NULL,
p_attribute18 IN VARCHAR2 DEFAULT NULL,
p_attribute19 IN VARCHAR2 DEFAULT NULL,
p_attribute20 IN VARCHAR2 DEFAULT NULL,
p_attribute21 IN VARCHAR2 DEFAULT NULL,
p_attribute22 IN VARCHAR2 DEFAULT NULL,
p_attribute23 IN VARCHAR2 DEFAULT NULL,
p_attribute24 IN VARCHAR2 DEFAULT NULL,
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_bank_rec hz_bank_pub.bank_rec_type;
SAVEPOINT update_bank;
cep_standard.debug('>>CE_EXT_BANK_ACCT_PUB.update_bank.');
SELECT object_version_number
INTO l_ca_object_version_number
FROM hz_code_assignments
WHERE class_category= 'BANK_INSTITUTION_TYPE'
AND owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_bank_id
AND status = 'A';
hz_bank_pub.update_bank(fnd_api.g_false, l_bank_rec,
p_object_version_number, l_ca_object_version_number,
l_profile_id, x_return_status, x_msg_count, x_msg_data);
cep_standard.debug('<
ROLLBACK TO update_bank;
ROLLBACK TO update_bank;
ROLLBACK TO update_bank;
END update_bank;
| hz_bank_pub.update_bank |
| |
| 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_id Party ID of the bank to be updated. |
| p_end_date End date of the bank. |
| IN/OUT: |
| p_object_version_number Current object version number for the code|
| assignment for the bank institution type. |
| 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 |
| 25-AUG-2004 Xin Wang Created. |
+=======================================================================*/
PROCEDURE set_bank_end_date (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_bank_id IN NUMBER,
p_end_date IN DATE,
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
CURSOR c_bank IS
SELECT end_date_active
FROM hz_code_assignments
WHERE owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_bank_id
AND class_category = 'BANK_INSTITUTION_TYPE'
AND class_code = 'BANK';
SELECT subject_id
FROM hz_relationships
WHERE relationship_type = 'BANK_AND_BRANCH'
AND relationship_code = 'BRANCH_OF'
AND subject_table_name = 'HZ_PARTIES'
AND subject_type = 'ORGANIZATION'
AND object_table_name = 'HZ_PARTIES'
AND object_type = 'ORGANIZATION'
AND object_id = p_bank_id;
SELECT end_date_active, object_version_number
FROM hz_code_assignments
WHERE owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_branch_id
AND class_category = 'BANK_INSTITUTION_TYPE'
AND class_code = 'BANK_BRANCH';
SELECT object_version_number
FROM hz_parties
WHERE party_id = p_bank_id;
hz_bank_pub.update_bank(fnd_api.g_false, l_bank_rec,
l_bank_ovn, p_object_version_number,
l_profile_id, x_return_status, x_msg_count, x_msg_data);
SELECT hz_hp.party_id,
hz_ca.end_date_active
FROM hz_parties hz_hp,
hz_organization_profiles hz_org,
hz_code_assignments hz_ca
WHERE hz_ca.owner_table_id = hz_hp.party_id
AND hz_ca.owner_table_name = 'HZ_PARTIES'
AND hz_ca.class_category = 'BANK_INSTITUTION_TYPE'
AND hz_ca.class_code = 'BANK'
AND hz_hp.PARTY_ID = hz_org.PARTY_ID
AND SYSDATE between TRUNC(hz_org.effective_start_date)
and NVL(TRUNC(hz_org.effective_end_date), SYSDATE+1)
AND hz_org.home_country = p_country_code
AND upper(hz_hp.party_name) = upper(p_bank_name);
SELECT hz_hp.party_id,
hz_ca.end_date_active
FROM hz_parties hz_hp,
hz_organization_profiles hz_hop,
hz_code_assignments hz_ca
WHERE hz_hp.party_id = hz_hop.party_id
AND SYSDATE between TRUNC(hz_hop.effective_start_date)
and NVL(TRUNC(hz_hop.effective_end_date), SYSDATE+1)
AND hz_ca.owner_table_id = hz_hp.party_id
AND hz_ca.owner_table_name = 'HZ_PARTIES'
AND hz_ca.class_category = 'BANK_INSTITUTION_TYPE'
AND hz_ca.class_code = 'BANK'
AND hz_hp.country = p_country_code
AND hz_hop.bank_or_branch_number = p_bank_number;
SELECT hz_p.party_name, hz_org.bank_or_branch_number
FROM hz_parties hz_p,
hz_organization_profiles hz_org
WHERE hz_p.party_id = hz_org.party_id
AND SYSDATE between TRUNC(hz_org.effective_start_date)
and NVL(TRUNC(hz_org.effective_end_date), SYSDATE+1)
AND hz_p.party_id = p_bank_id;
| PUBLIC PROCEDURE update_bank_branch |
| |
| DESCRIPTION |
| Update a bank branch organization party in TCA. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| hz_bank_pub.update_bank_branch |
| |
| 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_branch_id Party ID of the branch to be updated. |
| p_branch_name Bank branch name. |
| p_branch_number Bank branch number. |
| p_branch_type Bank branch type. |
| p_alternate_branch_name Alternate bank branch name. |
| p_description Description. |
| p_bic BIC (Bank Identification Code). |
| p_eft_number EFT number. |
| p_rfc_identifier RFC Identifier. |
| IN/OUT: |
| p_bch_object_version_number Current object version number for |
| the bank branch. |
| p_typ_object_version_number Current object version number for |
| bank branch type code assignment. |
| p_rfc_object_version_number Current object version number for |
| RFC code assignment. |
| 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 |
| 25-AUG-2004 Xin Wang Created. |
+=======================================================================*/
PROCEDURE update_bank_branch (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_branch_id IN NUMBER,
p_branch_name IN VARCHAR2,
p_branch_number IN VARCHAR2 DEFAULT NULL,
p_branch_type IN VARCHAR2,
p_alternate_branch_name IN VARCHAR2 DEFAULT NULL,
p_description IN VARCHAR2 DEFAULT NULL,
p_bic IN VARCHAR2 DEFAULT NULL,
p_eft_number IN VARCHAR2 DEFAULT NULL,
p_rfc_identifier IN VARCHAR2 DEFAULT NULL,
p_attribute_category IN VARCHAR2 DEFAULT NULL,
p_attribute1 IN VARCHAR2 DEFAULT NULL,
p_attribute2 IN VARCHAR2 DEFAULT NULL,
p_attribute3 IN VARCHAR2 DEFAULT NULL,
p_attribute4 IN VARCHAR2 DEFAULT NULL,
p_attribute5 IN VARCHAR2 DEFAULT NULL,
p_attribute6 IN VARCHAR2 DEFAULT NULL,
p_attribute7 IN VARCHAR2 DEFAULT NULL,
p_attribute8 IN VARCHAR2 DEFAULT NULL,
p_attribute9 IN VARCHAR2 DEFAULT NULL,
p_attribute10 IN VARCHAR2 DEFAULT NULL,
p_attribute11 IN VARCHAR2 DEFAULT NULL,
p_attribute12 IN VARCHAR2 DEFAULT NULL,
p_attribute13 IN VARCHAR2 DEFAULT NULL,
p_attribute14 IN VARCHAR2 DEFAULT NULL,
p_attribute15 IN VARCHAR2 DEFAULT NULL,
p_attribute16 IN VARCHAR2 DEFAULT NULL,
p_attribute17 IN VARCHAR2 DEFAULT NULL,
p_attribute18 IN VARCHAR2 DEFAULT NULL,
p_attribute19 IN VARCHAR2 DEFAULT NULL,
p_attribute20 IN VARCHAR2 DEFAULT NULL,
p_attribute21 IN VARCHAR2 DEFAULT NULL,
p_attribute22 IN VARCHAR2 DEFAULT NULL,
p_attribute23 IN VARCHAR2 DEFAULT NULL,
p_attribute24 IN VARCHAR2 DEFAULT NULL,
p_bch_object_version_number IN OUT NOCOPY NUMBER,
p_typ_object_version_number IN OUT NOCOPY NUMBER,
p_rfc_object_version_number IN OUT NOCOPY NUMBER,
p_eft_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
CURSOR c_eft IS
SELECT contact_point_id
FROM hz_contact_points
WHERE contact_point_type = 'EFT'
AND owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_branch_id;
SAVEPOINT update_bank_branch;
cep_standard.debug('>>CE_EXT_BANK_ACCT_PUB.update_bank_branch.');
hz_bank_pub.update_bank_branch(fnd_api.g_false, l_branch_rec, null,
l_rel_id,
p_bch_object_version_number, p_typ_object_version_number,
p_rfc_object_version_number,
l_profile_id, l_rel_party_id, l_rel_party_number,
x_return_status, x_msg_count, x_msg_data);
ELSE -- already have, update
l_contact_point_rec.contact_point_id := l_contact_point_id;
hz_contact_point_v2pub.update_eft_contact_point
(fnd_api.g_false, l_contact_point_rec, l_eft_rec,
p_eft_object_version_number,
x_return_status, x_msg_count, x_msg_data);
cep_standard.debug('<
ROLLBACK TO update_bank_branch;
ROLLBACK TO update_bank_branch;
ROLLBACK TO update_bank_branch;
END update_bank_branch;
| hz_bank_pub.update_bank |
| |
| 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_branch_id Party ID of the branch to be inactivated.|
| p_end_date Inactive date of the bank branch. |
| IN/OUT: |
| p_object_version_number Current object version number for the |
| code assignment of the bank institution|
| type for the bank branch. |
| 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 |
| 25-AUG-2004 Xin Wang Created. |
+=======================================================================*/
PROCEDURE set_bank_branch_end_date (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_branch_id IN NUMBER,
p_end_date IN DATE,
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
CURSOR c_bank (p_bank_id NUMBER) IS
SELECT end_date_active, object_version_number
FROM hz_code_assignments
WHERE owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_bank_id
AND class_category = 'BANK_INSTITUTION_TYPE'
AND class_code = 'BANK';
SELECT object_id
FROM hz_relationships
WHERE relationship_type = 'BANK_AND_BRANCH'
AND relationship_code = 'BRANCH_OF'
AND subject_table_name = 'HZ_PARTIES'
AND subject_type = 'ORGANIZATION'
AND object_table_name = 'HZ_PARTIES'
AND object_type = 'ORGANIZATION'
AND subject_id = p_branch_id;
SELECT end_date_active
FROM hz_code_assignments
WHERE owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_branch_id
AND class_category = 'BANK_INSTITUTION_TYPE'
AND class_code = 'BANK_BRANCH';
SELECT object_version_number
FROM hz_parties
WHERE party_id = p_branch_id;
SELECT bank_account_id, start_date, end_date, object_version_number
FROM ce_bank_accounts
WHERE bank_branch_id = p_branch_id;
SELECT object_version_number
FROM hz_code_assignments
WHERE owner_table_name = 'HZ_PARTIES'
AND owner_table_id = p_branch_id
AND class_category = 'RFC_IDENTIFIER';
hz_bank_pub.update_bank_branch(fnd_api.g_false, l_branch_rec, null,
l_rel_id,
l_branch_party_ovn, p_object_version_number,
l_rfc_ovn,
l_profile_id, l_rel_party_id, l_rel_party_number,
x_return_status, x_msg_count, x_msg_data);
SELECT hz_branch.party_id,
hz_branchCA.end_date_active
FROM hz_parties hz_branch,
hz_relationships hz_rel,
hz_code_assignments hz_branchCA
WHERE hz_branchCA.owner_table_name = 'HZ_PARTIES'
AND hz_branchCA.owner_table_id = hz_branch.party_id
AND hz_branchCA.class_category = 'BANK_INSTITUTION_TYPE'
AND hz_branchCA.class_code = 'BANK_BRANCH'
AND NVL(hz_branchCA.STATUS, 'A') = 'A'
AND hz_rel.OBJECT_ID = p_bank_id
And hz_branch.PARTY_ID = hz_rel.SUBJECT_ID
And hz_rel.RELATIONSHIP_TYPE = 'BANK_AND_BRANCH'
And hz_rel.RELATIONSHIP_CODE = 'BRANCH_OF'
And hz_rel.STATUS = 'A'
And hz_rel.SUBJECT_TABLE_NAME = 'HZ_PARTIES'
And hz_rel.SUBJECT_TYPE = 'ORGANIZATION'
And hz_rel.OBJECT_TABLE_NAME = 'HZ_PARTIES'
And hz_rel.OBJECT_TYPE = 'ORGANIZATION'
AND upper(hz_branch.party_name) = upper(p_branch_name);
SELECT hz_branch.party_id,
hz_branchCA.end_date_active
FROM hz_parties hz_branch,
hz_organization_profiles hz_branchProf,
hz_relationships hz_rel,
hz_code_assignments hz_branchCA
WHERE hz_branchCA.owner_table_name = 'HZ_PARTIES'
AND hz_branchCA.owner_table_id = hz_branch.party_id
AND hz_branchCA.class_category = 'BANK_INSTITUTION_TYPE'
AND hz_branchCA.class_code = 'BANK_BRANCH'
AND NVL(hz_branchCA.STATUS, 'A') = 'A'
AND hz_rel.OBJECT_ID = p_bank_id
And hz_branch.PARTY_ID = hz_rel.SUBJECT_ID
And hz_rel.RELATIONSHIP_TYPE = 'BANK_AND_BRANCH'
And hz_rel.RELATIONSHIP_CODE = 'BRANCH_OF'
And hz_rel.STATUS = 'A'
And hz_rel.SUBJECT_TABLE_NAME = 'HZ_PARTIES'
And hz_rel.SUBJECT_TYPE = 'ORGANIZATION'
And hz_rel.OBJECT_TABLE_NAME = 'HZ_PARTIES'
And hz_rel.OBJECT_TYPE = 'ORGANIZATION'
AND hz_branch.party_id = hz_branchProf.party_id
AND SYSDATE between TRUNC(hz_branchProf.effective_start_date)
and NVL(TRUNC(hz_branchProf.effective_end_date), SYSDATE+1)
AND hz_branchProf.bank_or_branch_number = p_branch_number;
SELECT CE_BANK_ACCOUNTS_S.nextval
FROM sys.dual;
SELECT rowid
FROM CE_BANK_ACCOUNTS
WHERE bank_account_id = x_acct_id;
SELECT bank_or_branch_number
FROM hz_organization_profiles
WHERE SYSDATE between TRUNC(effective_start_date)
and NVL(TRUNC(effective_end_date), SYSDATE+1)
AND party_id = p_acct_rec.branch_id;
SELECT object_id
FROM hz_relationships
WHERE RELATIONSHIP_TYPE = 'BANK_AND_BRANCH'
AND RELATIONSHIP_CODE = 'BRANCH_OF'
AND subject_id = p_acct_rec.branch_id;
INSERT INTO CE_BANK_ACCOUNTS (
BANK_ACCOUNT_ID,
BANK_BRANCH_ID,
BANK_ID,
ACCOUNT_OWNER_PARTY_ID,
ACCOUNT_OWNER_ORG_ID,
ACCOUNT_CLASSIFICATION,
BANK_ACCOUNT_NAME,
BANK_ACCOUNT_NUM,
CURRENCY_CODE,
IBAN_NUMBER,
CHECK_DIGITS,
EFT_REQUESTER_IDENTIFIER,
SECONDARY_ACCOUNT_REFERENCE,
MULTI_CURRENCY_ALLOWED_FLAG,
BANK_ACCOUNT_NAME_ALT,
SHORT_ACCOUNT_NAME,
BANK_ACCOUNT_TYPE,
ACCOUNT_SUFFIX,
DESCRIPTION_CODE1,
DESCRIPTION_CODE2,
DESCRIPTION,
AGENCY_LOCATION_CODE,
AP_USE_ALLOWED_FLAG,
AR_USE_ALLOWED_FLAG,
XTR_USE_ALLOWED_FLAG,
PAY_USE_ALLOWED_FLAG,
PAYMENT_MULTI_CURRENCY_FLAG,
RECEIPT_MULTI_CURRENCY_FLAG,
ZERO_AMOUNT_ALLOWED,
MAX_OUTLAY,
MAX_CHECK_AMOUNT,
MIN_CHECK_AMOUNT,
AP_AMOUNT_TOLERANCE,
AR_AMOUNT_TOLERANCE,
XTR_AMOUNT_TOLERANCE,
PAY_AMOUNT_TOLERANCE,
CE_AMOUNT_TOLERANCE,
AP_PERCENT_TOLERANCE,
AR_PERCENT_TOLERANCE,
XTR_PERCENT_TOLERANCE,
PAY_PERCENT_TOLERANCE,
CE_PERCENT_TOLERANCE,
START_DATE,
END_DATE,
ACCOUNT_HOLDER_NAME_ALT,
ACCOUNT_HOLDER_NAME,
CASHFLOW_DISPLAY_ORDER,
POOLED_FLAG,
MIN_TARGET_BALANCE,
MAX_TARGET_BALANCE,
EFT_USER_NUM,
MASKED_ACCOUNT_NUM,
MASKED_IBAN,
INTEREST_SCHEDULE_ID,
ASSET_CODE_COMBINATION_ID,
CASH_CLEARING_CCID,
BANK_CHARGES_CCID,
BANK_ERRORS_CCID,
CASHPOOL_MIN_PAYMENT_AMT,
CASHPOOL_MIN_RECEIPT_AMT,
CASHPOOL_ROUND_FACTOR,
CASHPOOL_ROUND_RULE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
OBJECT_VERSION_NUMBER,
xtr_bank_account_reference)
VALUES (
x_acct_id,
p_acct_rec.branch_id,
l_bank_id,
p_acct_rec.account_owner_party_id,
p_acct_rec.account_owner_org_id,
p_acct_rec.account_classification,
p_acct_rec.bank_account_name,
l_account_number,
p_acct_rec.currency,
l_iban,
p_acct_rec.check_digits,
p_acct_rec.eft_requester_id,
p_acct_rec.secondary_account_reference,
p_acct_rec.multi_currency_allowed_flag,
p_acct_rec.alternate_acct_name,
p_acct_rec.short_account_name,
p_acct_rec.acct_type,
p_acct_rec.acct_suffix,
p_acct_rec.description_code1,
p_acct_rec.description_code2,
p_acct_rec.description,
l_alc,
p_acct_rec.ap_use_allowed_flag,
p_acct_rec.ar_use_allowed_flag,
p_acct_rec.xtr_use_allowed_flag,
p_acct_rec.pay_use_allowed_flag,
p_acct_rec.payment_multi_currency_flag,
p_acct_rec.receipt_multi_currency_flag,
p_acct_rec.zero_amount_allowed,
p_acct_rec.max_outlay,
p_acct_rec.max_check_amount,
p_acct_rec.min_check_amount,
p_acct_rec.ap_amount_tolerance,
p_acct_rec.ar_amount_tolerance,
p_acct_rec.xtr_amount_tolerance,
p_acct_rec.pay_amount_tolerance,
p_acct_rec.ce_amount_tolerance,
p_acct_rec.ap_percent_tolerance,
p_acct_rec.ar_percent_tolerance,
p_acct_rec.xtr_percent_tolerance,
p_acct_rec.pay_percent_tolerance,
p_acct_rec.ce_percent_tolerance,
p_acct_rec.start_date,
p_acct_rec.end_date,
p_acct_rec.account_holder_name_alt,
p_acct_rec.account_holder_name,
p_acct_rec.cashflow_display_order,
p_acct_rec.pooled_flag,
p_acct_rec.min_target_balance,
p_acct_rec.max_target_balance,
p_acct_rec.eft_user_num,
p_acct_rec.masked_account_num,
p_acct_rec.masked_iban,
p_acct_rec.interest_schedule_id,
p_acct_rec.asset_code_combination_id,
p_acct_rec.cash_clearing_ccid,
p_acct_rec.bank_charges_ccid,
p_acct_rec.bank_errors_ccid,
p_acct_rec.cashpool_min_payment_amt,
p_acct_rec.cashpool_min_receipt_amt,
p_acct_rec.cashpool_round_factor,
p_acct_rec.cashpool_round_rule,
p_acct_rec.attribute_category,
p_acct_rec.attribute1,
p_acct_rec.attribute2,
p_acct_rec.attribute3,
p_acct_rec.attribute4,
p_acct_rec.attribute5,
p_acct_rec.attribute6,
p_acct_rec.attribute7,
p_acct_rec.attribute8,
p_acct_rec.attribute9,
p_acct_rec.attribute10,
p_acct_rec.attribute11,
p_acct_rec.attribute12,
p_acct_rec.attribute13,
p_acct_rec.attribute14,
p_acct_rec.attribute15,
sysdate,
NVL(FND_GLOBAL.user_id,-1),
NVL(FND_GLOBAL.login_id, -1),
sysdate,
NVL(FND_GLOBAL.user_id,-1),
1,
p_acct_rec.xtr_bank_account_reference);
| PUBLIC PROCEDURE update_bank_acct |
| |
| DESCRIPTION |
| Update an internal or subsidiary bank account. |
| |
| EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
| |
| 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_acct_rec External bank account record. |
| IN/OUT: |
| p_object_version_number Current object version number for the |
| bank account. |
| 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 |
| 25-AUG-2004 Xin Wang Created. |
+=======================================================================*/
PROCEDURE update_bank_acct (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_acct_rec IN BankAcct_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
CURSOR c_branch_id IS
SELECT bank_branch_id
FROM ce_bank_accounts
WHERE bank_account_id = p_acct_rec.bank_account_id;
SELECT bank_or_branch_number
FROM hz_organization_profiles
WHERE SYSDATE between TRUNC(effective_start_date)
and NVL(TRUNC(effective_end_date), SYSDATE+1)
AND party_id = l_branch_id;
SELECT object_version_number
FROM ce_bank_accounts
WHERE bank_account_id = p_acct_rec.bank_account_id;
SAVEPOINT update_bank_acct;
cep_standard.debug('>>CE_BANK_PUB.update_bank_acct.');
update ce_bank_accounts
set bank_account_name = p_acct_rec.bank_account_name,
bank_account_num = l_account_number,
currency_code = p_acct_rec.currency,
iban_number = l_iban,
check_digits = p_acct_rec.check_digits,
eft_requester_identifier = p_acct_rec.eft_requester_id,
secondary_account_reference = p_acct_rec.secondary_account_reference,
multi_currency_allowed_flag = p_acct_rec.multi_currency_allowed_flag,
bank_account_name_alt = p_acct_rec.alternate_acct_name,
short_account_name = p_acct_rec.short_account_name,
bank_account_type = p_acct_rec.acct_type,
account_suffix = p_acct_rec.acct_suffix,
description_code1 = p_acct_rec.description_code1,
description_code2 = p_acct_rec.description_code2,
description = p_acct_rec.description,
agency_location_code = l_alc,
ap_use_allowed_flag = p_acct_rec.ap_use_allowed_flag,
ar_use_allowed_flag = p_acct_rec.ar_use_allowed_flag,
xtr_use_allowed_flag = p_acct_rec.xtr_use_allowed_flag,
pay_use_allowed_flag = p_acct_rec.pay_use_allowed_flag,
payment_multi_currency_flag = p_acct_rec.payment_multi_currency_flag,
receipt_multi_currency_flag = p_acct_rec.receipt_multi_currency_flag,
zero_amount_allowed = p_acct_rec.zero_amount_allowed,
max_outlay = p_acct_rec.max_outlay,
max_check_amount = p_acct_rec.max_check_amount,
min_check_amount = p_acct_rec.min_check_amount,
ap_amount_tolerance = p_acct_rec.ap_amount_tolerance,
ar_amount_tolerance = p_acct_rec.ar_amount_tolerance,
xtr_amount_tolerance = p_acct_rec.xtr_amount_tolerance,
pay_amount_tolerance = p_acct_rec.pay_amount_tolerance,
ce_amount_tolerance = p_acct_rec.ce_amount_tolerance,
ap_percent_tolerance = p_acct_rec.ap_percent_tolerance,
ar_percent_tolerance = p_acct_rec.ar_percent_tolerance,
xtr_percent_tolerance = p_acct_rec.xtr_percent_tolerance,
pay_percent_tolerance = p_acct_rec.pay_percent_tolerance,
ce_percent_tolerance = p_acct_rec.ce_percent_tolerance,
start_date = p_acct_rec.start_date,
end_date = p_acct_rec.end_date,
account_holder_name_alt = p_acct_rec.account_holder_name_alt,
account_holder_name = p_acct_rec.account_holder_name,
cashflow_display_order = p_acct_rec.cashflow_display_order,
pooled_flag = p_acct_rec.pooled_flag,
min_target_balance = p_acct_rec.min_target_balance,
max_target_balance = p_acct_rec.max_target_balance,
eft_user_num = p_acct_rec.eft_user_num,
masked_account_num = p_acct_rec.masked_account_num,
masked_iban = p_acct_rec.masked_iban,
interest_schedule_id = p_acct_rec.interest_schedule_id,
asset_code_combination_id = p_acct_rec.asset_code_combination_id,
cash_clearing_ccid = p_acct_rec.cash_clearing_ccid,
bank_charges_ccid = p_acct_rec.bank_charges_ccid,
bank_errors_ccid = p_acct_rec.bank_errors_ccid,
cashpool_min_payment_amt = p_acct_rec.cashpool_min_payment_amt,
cashpool_min_receipt_amt = p_acct_rec.cashpool_min_receipt_amt,
cashpool_round_factor = p_acct_rec.cashpool_round_factor,
cashpool_round_rule = p_acct_rec.cashpool_round_rule,
attribute_category = p_acct_rec.attribute_category,
attribute1 = p_acct_rec.attribute1,
attribute2 = p_acct_rec.attribute2,
attribute3 = p_acct_rec.attribute3,
attribute4 = p_acct_rec.attribute4,
attribute5 = p_acct_rec.attribute5,
attribute6 = p_acct_rec.attribute6,
attribute7 = p_acct_rec.attribute7,
attribute8 = p_acct_rec.attribute8,
attribute9 = p_acct_rec.attribute9,
attribute10 = p_acct_rec.attribute10,
attribute11 = p_acct_rec.attribute11,
attribute12 = p_acct_rec.attribute12,
attribute13 = p_acct_rec.attribute13,
attribute14 = p_acct_rec.attribute14,
attribute15 = p_acct_rec.attribute15,
last_update_date = sysdate,
last_update_login = NVL(FND_GLOBAL.login_id,-1),
last_updated_by = NVL(FND_GLOBAL.user_id,-1),
object_version_number = l_old_ovn + 1,
xtr_bank_account_reference = p_acct_rec.xtr_bank_account_reference
WHERE bank_account_id = p_acct_rec.bank_account_id;
cep_standard.debug('<
ROLLBACK TO update_bank_acct;
ROLLBACK TO update_bank_acct;
END update_bank_acct;
SELECT CE_BANK_ACCT_USES_S.nextval
FROM sys.dual;
SELECT rowid
FROM CE_BANK_ACCT_USES_ALL
WHERE bank_acct_use_id = x_acct_use_id;
SELECT rowid
FROM CE_GL_ACCOUNTS_CCID
WHERE bank_acct_use_id = x_acct_use_id;
INSERT INTO CE_BANK_ACCT_USES_ALL (
BANK_ACCT_USE_ID,
BANK_ACCOUNT_ID,
PRIMARY_FLAG,
ORG_ID,
ORG_PARTY_ID,
AP_USE_ENABLE_FLAG,
AR_USE_ENABLE_FLAG,
XTR_USE_ENABLE_FLAG,
PAY_USE_ENABLE_FLAG,
EDISC_RECEIVABLES_TRX_ID,
UNEDISC_RECEIVABLES_TRX_ID,
END_DATE,
BR_STD_RECEIVABLES_TRX_ID,
LEGAL_ENTITY_ID,
INVESTMENT_LIMIT_CODE,
FUNDING_LIMIT_CODE,
AP_DEFAULT_SETTLEMENT_FLAG,
XTR_DEFAULT_SETTLEMENT_FLAG,
PAYROLL_BANK_ACCOUNT_ID,
PRICING_MODEL,
AUTHORIZED_FLAG,
EFT_SCRIPT_NAME,
DEFAULT_ACCOUNT_FLAG,
PORTFOLIO_CODE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
OBJECT_VERSION_NUMBER)
VALUES (
x_acct_use_id,
p_acct_use_rec.bank_account_id,
p_acct_use_rec.primary_flag,
p_acct_use_rec.org_id,
p_acct_use_rec.org_party_id,
p_acct_use_rec.ap_use_enable_flag,
p_acct_use_rec.ar_use_enable_flag,
p_acct_use_rec.xtr_use_enable_flag,
p_acct_use_rec.pay_use_enable_flag,
p_acct_use_rec.edisc_receivables_trx_id,
p_acct_use_rec.unedisc_receivables_trx_id,
p_acct_use_rec.end_date,
p_acct_use_rec.br_std_receivables_trx_id,
p_acct_use_rec.legal_entity_id,
p_acct_use_rec.investment_limit_code,
p_acct_use_rec.funding_limit_code,
p_acct_use_rec.ap_default_settlement_flag,
p_acct_use_rec.xtr_default_settlement_flag,
p_acct_use_rec.payroll_bank_account_id,
p_acct_use_rec.pricing_model,
p_acct_use_rec.authorized_flag,
p_acct_use_rec.eft_script_name,
p_acct_use_rec.default_account_flag,
p_acct_use_rec.portfolio_code,
p_acct_use_rec.attribute_category,
p_acct_use_rec.attribute1,
p_acct_use_rec.attribute2,
p_acct_use_rec.attribute3,
p_acct_use_rec.attribute4,
p_acct_use_rec.attribute5,
p_acct_use_rec.attribute6,
p_acct_use_rec.attribute7,
p_acct_use_rec.attribute8,
p_acct_use_rec.attribute9,
p_acct_use_rec.attribute10,
p_acct_use_rec.attribute11,
p_acct_use_rec.attribute12,
p_acct_use_rec.attribute13,
p_acct_use_rec.attribute14,
p_acct_use_rec.attribute15,
sysdate,
NVL(FND_GLOBAL.user_id,-1),
NVL(FND_GLOBAL.login_id, -1),
sysdate,
NVL(FND_GLOBAL.user_id,-1),
1);
INSERT INTO CE_GL_ACCOUNTS_CCID (
BANK_ACCT_USE_ID,
ASSET_CODE_COMBINATION_ID,
AP_ASSET_CCID,
AR_ASSET_CCID,
CASH_CLEARING_CCID,
BANK_CHARGES_CCID,
BANK_ERRORS_CCID,
GAIN_CODE_COMBINATION_ID,
LOSS_CODE_COMBINATION_ID,
ON_ACCOUNT_CCID,
UNAPPLIED_CCID,
UNIDENTIFIED_CCID,
FACTOR_CCID,
RECEIPT_CLEARING_CCID,
REMITTANCE_CCID,
AR_SHORT_TERM_DEPOSIT_CCID,
BR_SHORT_TERM_DEPOSIT_CCID,
FUTURE_DATED_PAYMENT_CCID,
BR_REMITTANCE_CCID,
BR_FACTOR_CCID,
BANK_INTEREST_EXPENSE_CCID,
BANK_INTEREST_INCOME_CCID,
XTR_ASSET_CCID,
AR_BANK_CHARGES_CCID, -- 7437641
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
OBJECT_VERSION_NUMBER)
VALUES (
x_acct_use_id,
p_acct_use_rec.asset_code_combination_id,
p_acct_use_rec.ap_asset_ccid,
p_acct_use_rec.ar_asset_ccid,
p_acct_use_rec.cash_clearing_ccid,
p_acct_use_rec.bank_charges_ccid,
p_acct_use_rec.bank_errors_ccid,
p_acct_use_rec.gain_code_combination_id,
p_acct_use_rec.loss_code_combination_id,
p_acct_use_rec.on_account_ccid,
p_acct_use_rec.unapplied_ccid,
p_acct_use_rec.unidentified_ccid,
p_acct_use_rec.factor_ccid,
p_acct_use_rec.receipt_clearing_ccid,
p_acct_use_rec.remittance_ccid,
p_acct_use_rec.ar_short_term_deposit_ccid,
p_acct_use_rec.br_short_term_deposit_ccid,
p_acct_use_rec.future_dated_payment_ccid,
p_acct_use_rec.br_remittance_ccid,
p_acct_use_rec.br_factor_ccid,
p_acct_use_rec.bank_interest_expense_ccid,
p_acct_use_rec.bank_interest_income_ccid,
p_acct_use_rec.xtr_asset_ccid,
p_acct_use_rec.ar_bank_charges_ccid, -- 7437641
sysdate,
NVL(FND_GLOBAL.user_id,-1),
NVL(FND_GLOBAL.login_id, -1),
sysdate,
NVL(FND_GLOBAL.user_id,-1),
1);
PROCEDURE update_bank_acct_use (
p_init_msg_list IN VARCHAR2:= fnd_api.g_false,
p_acct_use_rec IN BankAcct_use_rec_type,
p_use_ovn IN OUT NOCOPY NUMBER,
p_ccid_ovn IN OUT NOCOPY NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) IS
CURSOR c_acct_org IS
SELECT bank_account_id,
org_id,
legal_entity_id
FROM ce_bank_acct_uses_all
WHERE bank_acct_use_id = p_acct_use_rec.bank_acct_use_id;
SELECT object_version_number
FROM ce_bank_acct_uses_all
WHERE bank_acct_use_id = p_acct_use_rec.bank_acct_use_id;
SELECT object_version_number
FROM ce_gl_accounts_ccid
WHERE bank_acct_use_id = p_acct_use_rec.bank_acct_use_id;
SAVEPOINT update_bank_acct_use;
cep_standard.debug('>>CE_BANK_PUB.update_bank_acct_use.');
update ce_bank_acct_uses_all
set primary_flag = p_acct_use_rec.primary_flag,
ap_use_enable_flag = p_acct_use_rec.ap_use_enable_flag,
ar_use_enable_flag = p_acct_use_rec.ar_use_enable_flag,
xtr_use_enable_flag = p_acct_use_rec.xtr_use_enable_flag,
pay_use_enable_flag = p_acct_use_rec.pay_use_enable_flag,
edisc_receivables_trx_id = p_acct_use_rec.edisc_receivables_trx_id,
unedisc_receivables_trx_id = p_acct_use_rec.unedisc_receivables_trx_id,
end_date = p_acct_use_rec.end_date,
br_std_receivables_trx_id = p_acct_use_rec.br_std_receivables_trx_id,
investment_limit_code = p_acct_use_rec.investment_limit_code,
funding_limit_code = p_acct_use_rec.funding_limit_code,
ap_default_settlement_flag = p_acct_use_rec.ap_default_settlement_flag,
xtr_default_settlement_flag = p_acct_use_rec.xtr_default_settlement_flag,
payroll_bank_account_id = p_acct_use_rec.payroll_bank_account_id,
pricing_model = p_acct_use_rec.pricing_model,
authorized_flag = p_acct_use_rec.authorized_flag,
eft_script_name = p_acct_use_rec.eft_script_name,
default_account_flag = p_acct_use_rec.default_account_flag,
portfolio_code = p_acct_use_rec.portfolio_code,
attribute_category = p_acct_use_rec.attribute_category,
attribute1 = p_acct_use_rec.attribute1,
attribute2 = p_acct_use_rec.attribute2,
attribute3 = p_acct_use_rec.attribute3,
attribute4 = p_acct_use_rec.attribute4,
attribute5 = p_acct_use_rec.attribute5,
attribute6 = p_acct_use_rec.attribute6,
attribute7 = p_acct_use_rec.attribute7,
attribute8 = p_acct_use_rec.attribute8,
attribute9 = p_acct_use_rec.attribute9,
attribute10 = p_acct_use_rec.attribute10,
attribute11 = p_acct_use_rec.attribute11,
attribute12 = p_acct_use_rec.attribute12,
attribute13 = p_acct_use_rec.attribute13,
attribute14 = p_acct_use_rec.attribute14,
attribute15 = p_acct_use_rec.attribute15,
last_update_date = sysdate,
last_update_login = NVL(FND_GLOBAL.login_id,-1),
last_updated_by = NVL(FND_GLOBAL.user_id,-1),
object_version_number = l_old_use_ovn + 1
WHERE bank_acct_use_id = p_acct_use_rec.bank_acct_use_id;
update ce_gl_accounts_ccid
set asset_code_combination_id = p_acct_use_rec.asset_code_combination_id,
ap_asset_ccid = p_acct_use_rec.ap_asset_ccid,
ar_asset_ccid = p_acct_use_rec.ar_asset_ccid,
cash_clearing_ccid = p_acct_use_rec.cash_clearing_ccid,
bank_charges_ccid = p_acct_use_rec.bank_charges_ccid,
bank_errors_ccid = p_acct_use_rec.bank_errors_ccid,
gain_code_combination_id = p_acct_use_rec.gain_code_combination_id,
loss_code_combination_id = p_acct_use_rec.loss_code_combination_id,
on_account_ccid = p_acct_use_rec.on_account_ccid,
unapplied_ccid = p_acct_use_rec.unapplied_ccid,
unidentified_ccid = p_acct_use_rec.unidentified_ccid,
factor_ccid = p_acct_use_rec.factor_ccid,
receipt_clearing_ccid = p_acct_use_rec.receipt_clearing_ccid,
remittance_ccid = p_acct_use_rec.remittance_ccid,
ar_short_term_deposit_ccid = p_acct_use_rec.ar_short_term_deposit_ccid,
br_short_term_deposit_ccid = p_acct_use_rec.br_short_term_deposit_ccid,
future_dated_payment_ccid = p_acct_use_rec.future_dated_payment_ccid,
br_remittance_ccid = p_acct_use_rec.br_remittance_ccid,
br_factor_ccid = p_acct_use_rec.br_factor_ccid,
bank_interest_expense_ccid = p_acct_use_rec.bank_interest_expense_ccid,
bank_interest_income_ccid = p_acct_use_rec.bank_interest_income_ccid,
xtr_asset_ccid = p_acct_use_rec.xtr_asset_ccid,
ar_bank_charges_ccid = p_acct_use_rec.bank_charges_ccid, -- 7437641
last_update_date = sysdate,
last_update_login = NVL(FND_GLOBAL.login_id,-1),
last_updated_by = NVL(FND_GLOBAL.user_id,-1),
object_version_number = l_old_ccid_ovn + 1
WHERE bank_acct_use_id = p_acct_use_rec.bank_acct_use_id;
cep_standard.debug('<
ROLLBACK TO update_bank_acct_use;
ROLLBACK TO update_bank_acct_use;
END update_bank_acct_use;