The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_create_or_update IN VARCHAR2 := 'C',
px_cust_acct_rec IN OUT NOCOPY HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE
);
p_create_or_update IN VARCHAR2 := 'C',
px_cust_acct_rec IN OUT NOCOPY HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE
) IS
BEGIN
px_cust_acct_rec.cust_account_id := p_cust_acct_id;
px_cust_acct_rec.status_update_date := p_cust_acct_obj.status_update_date;
IF(p_create_or_update = 'C') THEN
px_cust_acct_rec.orig_system := p_cust_acct_os;
SELECT PROFILE_CLASS_AMOUNT_ID
FROM HZ_CUST_PROF_CLASS_AMTS
WHERE PROFILE_CLASS_ID = l_default_profile_class_id;
HZ_CUST_PROF_CLASS_AMTS_PKG.Select_Row (
X_PROFILE_CLASS_AMOUNT_ID => l_profile_class_amount_id,
X_PROFILE_CLASS_ID => l_default_profile_class_id,
X_CURRENCY_CODE => x_cpa_objs(i).currency_code,
X_TRX_CREDIT_LIMIT => x_cpa_objs(i).trx_credit_limit,
X_OVERALL_CREDIT_LIMIT => x_cpa_objs(i).overall_credit_limit,
X_MIN_DUNNING_AMOUNT => x_cpa_objs(i).min_dunning_amount,
X_MAX_INTEREST_CHARGE => x_cpa_objs(i).max_interest_charge,
X_MIN_STATEMENT_AMOUNT => x_cpa_objs(i).min_statement_amount,
X_AUTO_REC_MIN_RECEIPT_AMOUNT => x_cpa_objs(i).auto_rec_min_receipt_amount,
X_ATTRIBUTE_CATEGORY => x_cpa_objs(i).attribute_category,
X_ATTRIBUTE1 => x_cpa_objs(i).attribute1,
X_ATTRIBUTE2 => x_cpa_objs(i).attribute2,
X_ATTRIBUTE3 => x_cpa_objs(i).attribute3,
X_ATTRIBUTE4 => x_cpa_objs(i).attribute4,
X_ATTRIBUTE5 => x_cpa_objs(i).attribute5,
X_ATTRIBUTE6 => x_cpa_objs(i).attribute6,
X_ATTRIBUTE7 => x_cpa_objs(i).attribute7,
X_ATTRIBUTE8 => x_cpa_objs(i).attribute8,
X_ATTRIBUTE9 => x_cpa_objs(i).attribute9,
X_ATTRIBUTE10 => x_cpa_objs(i).attribute10,
X_ATTRIBUTE11 => x_cpa_objs(i).attribute11,
X_ATTRIBUTE12 => x_cpa_objs(i).attribute12,
X_ATTRIBUTE13 => x_cpa_objs(i).attribute13,
X_ATTRIBUTE14 => x_cpa_objs(i).attribute14,
X_ATTRIBUTE15 => x_cpa_objs(i).attribute15,
X_INTEREST_RATE => x_cpa_objs(i).interest_rate,
X_MIN_FC_BALANCE_AMOUNT => x_cpa_objs(i).min_fc_balance_amount,
X_MIN_FC_INVOICE_AMOUNT => x_cpa_objs(i).min_fc_invoice_amount,
X_MIN_DUNNING_INVOICE_AMOUNT => x_cpa_objs(i).min_dunning_invoice_amount,
X_EXPIRATION_DATE => x_cpa_objs(i).expiration_date,
X_JGZZ_ATTRIBUTE_CATEGORY => x_cpa_objs(i).jgzz_attribute_category,
X_JGZZ_ATTRIBUTE1 => x_cpa_objs(i).jgzz_attribute1,
X_JGZZ_ATTRIBUTE2 => x_cpa_objs(i).jgzz_attribute2,
X_JGZZ_ATTRIBUTE3 => x_cpa_objs(i).jgzz_attribute3,
X_JGZZ_ATTRIBUTE4 => x_cpa_objs(i).jgzz_attribute4,
X_JGZZ_ATTRIBUTE5 => x_cpa_objs(i).jgzz_attribute5,
X_JGZZ_ATTRIBUTE6 => x_cpa_objs(i).jgzz_attribute6,
X_JGZZ_ATTRIBUTE7 => x_cpa_objs(i).jgzz_attribute7,
X_JGZZ_ATTRIBUTE8 => x_cpa_objs(i).jgzz_attribute8,
X_JGZZ_ATTRIBUTE9 => x_cpa_objs(i).jgzz_attribute9,
X_JGZZ_ATTRIBUTE10 => x_cpa_objs(i).jgzz_attribute10,
X_JGZZ_ATTRIBUTE11 => x_cpa_objs(i).jgzz_attribute11,
X_JGZZ_ATTRIBUTE12 => x_cpa_objs(i).jgzz_attribute12,
X_JGZZ_ATTRIBUTE13 => x_cpa_objs(i).jgzz_attribute13,
X_JGZZ_ATTRIBUTE14 => x_cpa_objs(i).jgzz_attribute14,
X_JGZZ_ATTRIBUTE15 => x_cpa_objs(i).jgzz_attribute15,
X_GLOBAL_ATTRIBUTE1 => x_cpa_objs(i).global_attribute1,
X_GLOBAL_ATTRIBUTE2 => x_cpa_objs(i).global_attribute2,
X_GLOBAL_ATTRIBUTE3 => x_cpa_objs(i).global_attribute3,
X_GLOBAL_ATTRIBUTE4 => x_cpa_objs(i).global_attribute4,
X_GLOBAL_ATTRIBUTE5 => x_cpa_objs(i).global_attribute5,
X_GLOBAL_ATTRIBUTE6 => x_cpa_objs(i).global_attribute6,
X_GLOBAL_ATTRIBUTE7 => x_cpa_objs(i).global_attribute7,
X_GLOBAL_ATTRIBUTE8 => x_cpa_objs(i).global_attribute8,
X_GLOBAL_ATTRIBUTE9 => x_cpa_objs(i).global_attribute9,
X_GLOBAL_ATTRIBUTE10 => x_cpa_objs(i).global_attribute10,
X_GLOBAL_ATTRIBUTE11 => x_cpa_objs(i).global_attribute11,
X_GLOBAL_ATTRIBUTE12 => x_cpa_objs(i).global_attribute12,
X_GLOBAL_ATTRIBUTE13 => x_cpa_objs(i).global_attribute13,
X_GLOBAL_ATTRIBUTE14 => x_cpa_objs(i).global_attribute14,
X_GLOBAL_ATTRIBUTE15 => x_cpa_objs(i).global_attribute15,
X_GLOBAL_ATTRIBUTE16 => x_cpa_objs(i).global_attribute16,
X_GLOBAL_ATTRIBUTE17 => x_cpa_objs(i).global_attribute17,
X_GLOBAL_ATTRIBUTE18 => x_cpa_objs(i).global_attribute18,
X_GLOBAL_ATTRIBUTE19 => x_cpa_objs(i).global_attribute19,
X_GLOBAL_ATTRIBUTE20 => x_cpa_objs(i).global_attribute20,
X_GLOBAL_ATTRIBUTE_CATEGORY => x_cpa_objs(i).global_attribute_category,
X_EXCHANGE_RATE_TYPE => x_cpa_objs(i).exchange_rate_type,
X_MIN_FC_INVOICE_OVERDUE_TYPE => x_cpa_objs(i).min_fc_invoice_overdue_type,
X_MIN_FC_INVOICE_PERCENT => x_cpa_objs(i).min_fc_invoice_percent,
X_MIN_FC_BALANCE_OVERDUE_TYPE => x_cpa_objs(i).min_fc_balance_overdue_type,
X_MIN_FC_BALANCE_PERCENT => x_cpa_objs(i).min_fc_balance_percent,
X_INTEREST_TYPE => x_cpa_objs(i).interest_type,
X_INTEREST_FIXED_AMOUNT => x_cpa_objs(i).interest_fixed_amount,
X_INTEREST_SCHEDULE_ID => x_cpa_objs(i).interest_schedule_id,
X_PENALTY_TYPE => x_cpa_objs(i).penalty_type,
X_PENALTY_RATE => x_cpa_objs(i).penalty_rate,
X_MIN_INTEREST_CHARGE => x_cpa_objs(i).min_interest_charge,
X_PENALTY_FIXED_AMOUNT => x_cpa_objs(i).penalty_fixed_amount,
X_PENALTY_SCHEDULE_ID => x_cpa_objs(i).penalty_schedule_id
);
SELECT cust_account_profile_id
FROM HZ_CUSTOMER_PROFILES
WHERE cust_account_id = p_cust_acct_id;
p_create_or_update => 'C',
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
p_create_update_flag => 'C',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_id => x_cust_acct_id,
p_parent_os => x_cust_acct_os,
p_parent_osr => x_cust_acct_osr,
p_parent_obj_type => 'CUST_ACCT'
);
p_create_update_flag => 'C',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_acct_id => x_cust_acct_id,
p_parent_acct_os => x_cust_acct_os,
p_parent_acct_osr => x_cust_acct_osr
);
PROCEDURE update_cust_acct_bo(
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_cust_acct_obj IN HZ_CUST_ACCT_BO,
p_created_by_module IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
x_cust_acct_id OUT NOCOPY NUMBER,
x_cust_acct_os OUT NOCOPY VARCHAR2,
x_cust_acct_osr OUT NOCOPY VARCHAR2
)IS
l_ca_obj HZ_CUST_ACCT_BO;
do_update_cust_acct_bo(
p_init_msg_list => p_init_msg_list,
p_cust_acct_obj => l_ca_obj,
p_created_by_module => p_created_by_module,
p_obj_source => null,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
p_parent_os => NULL
);
END update_cust_acct_bo;
PROCEDURE update_cust_acct_bo(
p_cust_acct_obj IN HZ_CUST_ACCT_BO,
p_created_by_module IN VARCHAR2,
p_obj_source IN VARCHAR2 := null,
p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
x_return_status OUT NOCOPY VARCHAR2,
x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
x_return_obj OUT NOCOPY HZ_CUST_ACCT_BO,
x_cust_acct_id OUT NOCOPY NUMBER,
x_cust_acct_os OUT NOCOPY VARCHAR2,
x_cust_acct_osr OUT NOCOPY VARCHAR2
)IS
l_msg_data VARCHAR2(2000);
do_update_cust_acct_bo(
p_init_msg_list => fnd_api.g_true,
p_cust_acct_obj => l_ca_obj,
p_created_by_module => p_created_by_module,
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
p_parent_os => NULL
);
END update_cust_acct_bo;
PROCEDURE do_update_cust_acct_bo(
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
p_cust_acct_obj IN OUT NOCOPY HZ_CUST_ACCT_BO,
p_created_by_module IN VARCHAR2,
p_obj_source IN VARCHAR2 := null,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
x_cust_acct_id OUT NOCOPY NUMBER,
x_cust_acct_os OUT NOCOPY VARCHAR2,
x_cust_acct_osr OUT NOCOPY VARCHAR2,
p_parent_os IN VARCHAR2
)IS
l_debug_prefix VARCHAR2(30) := '';
l_create_update_flag VARCHAR2(1);
SELECT a.object_version_number, a.party_id
FROM HZ_CUST_ACCOUNTS a
WHERE a.cust_account_id = l_ca_id;
SAVEPOINT do_update_cust_acct_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_bo_pub(+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
p_create_or_update => 'U',
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
p_create_or_update => 'U',
px_cust_acct_rec => l_cust_acct_rec
);
HZ_CUST_ACCOUNT_V2PUB.update_cust_account(
p_cust_account_rec => l_cust_acct_rec,
p_object_version_number => l_ovn,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
HZ_CUST_ACCT_BO_PVT.update_cust_profile(
p_cp_obj => p_cust_acct_obj.cust_profile_obj,
p_ca_id => x_cust_acct_id,
p_casu_id => NULL,
x_cp_id => l_cust_acct_profile_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
p_create_update_flag => 'U',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_id => x_cust_acct_id,
p_parent_os => x_cust_acct_os,
p_parent_osr => x_cust_acct_osr,
p_parent_obj_type => 'CUST_ACCT'
);
p_create_update_flag => 'U',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_acct_id => x_cust_acct_id,
p_parent_acct_os => x_cust_acct_os,
p_parent_acct_osr => x_cust_acct_osr
);
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO do_update_cust_acct_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO do_update_cust_acct_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO do_update_cust_acct_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END do_update_cust_acct_bo;
l_create_update_flag VARCHAR2(1);
l_create_update_flag := HZ_REGISTRY_VALIDATE_BO_PVT.check_bo_op(
p_entity_id => x_cust_acct_id,
p_entity_os => x_cust_acct_os,
p_entity_osr => x_cust_acct_osr,
p_entity_type => 'HZ_CUST_ACCOUNTS',
p_parent_id => px_parent_id,
p_parent_obj_type => px_parent_obj_type
);
IF(l_create_update_flag = 'E') THEN
FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
IF(l_create_update_flag = 'C') THEN
do_create_cust_acct_bo(
p_validate_bo_flag => p_validate_bo_flag,
p_cust_acct_obj => p_cust_acct_obj,
p_created_by_module => p_created_by_module,
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
px_parent_id => px_parent_id,
px_parent_os => px_parent_os,
px_parent_osr => px_parent_osr,
px_parent_obj_type => px_parent_obj_type
);
ELSIF(l_create_update_flag = 'U') THEN
do_update_cust_acct_bo(
p_cust_acct_obj => p_cust_acct_obj,
p_created_by_module => p_created_by_module,
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
p_parent_os => px_parent_os
);
-- extraction validation logic is same as update
l_cust_acct_id := p_cust_acct_id;
p_create_or_update IN VARCHAR2 := 'C',
px_cust_acct_rec IN OUT NOCOPY HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE
);
p_create_or_update IN VARCHAR2 := 'C',
px_cust_acct_rec IN OUT NOCOPY HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE
) IS
BEGIN
px_cust_acct_rec.cust_account_id := p_cust_acct_id;
px_cust_acct_rec.status_update_date := p_cust_acct_v2_obj.status_update_date;
IF(p_create_or_update = 'C') THEN
px_cust_acct_rec.orig_system := p_cust_acct_os;
SELECT cust_account_profile_id
FROM HZ_CUSTOMER_PROFILES
WHERE cust_account_id = p_cust_acct_id;
p_create_or_update => 'C',
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
p_create_update_flag => 'C',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_id => x_cust_acct_id,
p_parent_os => x_cust_acct_os,
p_parent_osr => x_cust_acct_osr,
p_parent_obj_type => 'CUST_ACCT'
);
p_create_update_flag => 'C',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_acct_id => x_cust_acct_id,
p_parent_acct_os => x_cust_acct_os,
p_parent_acct_osr => x_cust_acct_osr
);
PROCEDURE update_cust_acct_v2_bo(
p_cust_acct_v2_obj IN HZ_CUST_ACCT_V2_BO,
p_created_by_module IN VARCHAR2,
p_obj_source IN VARCHAR2 := null,
p_return_obj_flag IN VARCHAR2 := fnd_api.g_true,
x_return_status OUT NOCOPY VARCHAR2,
x_messages OUT NOCOPY HZ_MESSAGE_OBJ_TBL,
x_return_obj OUT NOCOPY HZ_CUST_ACCT_V2_BO,
x_cust_acct_id OUT NOCOPY NUMBER,
x_cust_acct_os OUT NOCOPY VARCHAR2,
x_cust_acct_osr OUT NOCOPY VARCHAR2
)IS
l_msg_data VARCHAR2(2000);
do_update_cust_acct_v2_bo(
p_init_msg_list => fnd_api.g_true,
p_cust_acct_v2_obj => l_ca_obj,
p_created_by_module => p_created_by_module,
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
p_parent_os => NULL
);
END update_cust_acct_v2_bo;
PROCEDURE do_update_cust_acct_v2_bo(
p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
p_validate_bo_flag IN VARCHAR2 := fnd_api.g_true,
p_cust_acct_v2_obj IN OUT NOCOPY HZ_CUST_ACCT_V2_BO,
p_created_by_module IN VARCHAR2,
p_obj_source IN VARCHAR2 := null,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
x_cust_acct_id OUT NOCOPY NUMBER,
x_cust_acct_os OUT NOCOPY VARCHAR2,
x_cust_acct_osr OUT NOCOPY VARCHAR2,
p_parent_os IN VARCHAR2
)IS
l_debug_prefix VARCHAR2(30) := '';
l_create_update_flag VARCHAR2(1);
SELECT a.object_version_number, a.party_id
FROM HZ_CUST_ACCOUNTS a
WHERE a.cust_account_id = l_ca_id;
SAVEPOINT do_update_cust_acct_v2_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_v2_bo_pub(+)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
p_create_or_update => 'U',
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
p_create_or_update => 'U',
px_cust_acct_rec => l_cust_acct_rec
);
HZ_CUST_ACCOUNT_V2PUB.update_cust_account(
p_cust_account_rec => l_cust_acct_rec,
p_object_version_number => l_ovn,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
HZ_CUST_ACCT_BO_PVT.update_cust_profile(
p_cp_obj => p_cust_acct_v2_obj.cust_profile_obj,
p_ca_id => x_cust_acct_id,
p_casu_id => NULL,
x_cp_id => l_cust_acct_profile_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
p_create_update_flag => 'U',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_id => x_cust_acct_id,
p_parent_os => x_cust_acct_os,
p_parent_osr => x_cust_acct_osr,
p_parent_obj_type => 'CUST_ACCT'
);
p_create_update_flag => 'U',
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_parent_acct_id => x_cust_acct_id,
p_parent_acct_os => x_cust_acct_os,
p_parent_acct_osr => x_cust_acct_osr
);
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_v2_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO do_update_cust_acct_v2_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_v2_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO do_update_cust_acct_v2_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_v2_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
ROLLBACK TO do_update_cust_acct_v2_bo_pub;
hz_utility_v2pub.debug(p_message=>'do_update_cust_acct_v2_bo(-)',
p_prefix=>l_debug_prefix,
p_msg_level=>fnd_log.level_procedure);
END do_update_cust_acct_v2_bo;
l_create_update_flag VARCHAR2(1);
l_create_update_flag := HZ_REGISTRY_VALIDATE_BO_PVT.check_bo_op(
p_entity_id => x_cust_acct_id,
p_entity_os => x_cust_acct_os,
p_entity_osr => x_cust_acct_osr,
p_entity_type => 'HZ_CUST_ACCOUNTS',
p_parent_id => px_parent_id,
p_parent_obj_type => px_parent_obj_type
);
IF(l_create_update_flag = 'E') THEN
FND_MESSAGE.SET_NAME('AR', 'HZ_API_PROPAGATE_OBJECT_ERROR');
IF(l_create_update_flag = 'C') THEN
do_create_cust_acct_v2_bo(
p_validate_bo_flag => p_validate_bo_flag,
p_cust_acct_v2_obj => p_cust_acct_v2_obj,
p_created_by_module => p_created_by_module,
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
px_parent_id => px_parent_id,
px_parent_os => px_parent_os,
px_parent_osr => px_parent_osr,
px_parent_obj_type => px_parent_obj_type
);
ELSIF(l_create_update_flag = 'U') THEN
do_update_cust_acct_v2_bo(
p_cust_acct_v2_obj => p_cust_acct_v2_obj,
p_created_by_module => p_created_by_module,
p_obj_source => p_obj_source,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_cust_acct_id => x_cust_acct_id,
x_cust_acct_os => x_cust_acct_os,
x_cust_acct_osr => x_cust_acct_osr,
p_parent_os => px_parent_os
);
-- extraction validation logic is same as update
l_cust_acct_id := p_cust_acct_id;