p_cust_account_rec hz_cust_account_v2pub.cust_account_rec_type;
--赋值
-- set value
p_cust_account_rec.cust_account_id := cust_info.cust_account_id;
p_cust_account_rec.status :=
'A';
p_object_version_number := cust_info.object_version_number;
--调用API
--Call API
hz_cust_account_v2pub .update_cust_account
(
p_init_msg_list => FND_API.G_TRUE,
p_cust_account_rec => p_cust_account_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
);
--返回消息
--Display message
if x_msg_count>0
if
x_msg_count>0x_msg_count>0
then
fnd_file.put_line(fnd_file.log,
'Record_number = '||to_char(rec_count));
fnd_file.put_line(fnd_file.log,
'Account_number = '||cust_info.account_number);
fnd_file.put_line(fnd_file.log,
'Return_status = '||substr(x_return_status,1,255));
fnd_file.put_line(fnd_file.log,
'Msg_count = ' ||to_char(x_msg_count));
fnd_file.put_line(fnd_file.log,
'Version_Number = ' ||to_char(p_object_version_number));fnd_file.put_line(fnd_file.log,
'Msg_data = '||substr(x_msg_data,1,255 ));endif ;
ifx_msg_count >1then
forIin1..x_msg_countloop
fnd_file.put_line(fnd_file.log,i||
'.'||substr(fnd_msg_pub.get(p_encoded=> fnd_api.g_false ),1,255 ));endloop ;
endif;