195:
196:
197: cursor c_prof_class_amts is
198: select
199: hz_cust_profile_amts_s.nextval,
200: x_customer_profile_id,
201: currency_code,
202: trx_credit_limit,
203: overall_credit_limit,
403: --
404: -- Delete only the profile_amounts that match the currency that is
405: -- present in the profile_amounts of the new customer profile class.
406: --
407: delete from hz_cust_profile_amts
408: where cust_account_profile_id = x_customer_profile_id
409: and currency_code in ( select currency_code
410: from hz_cust_prof_class_amts
411: where profile_class_id = x_customer_profile_class_id
513: x_return_status => x_return_status,
514: x_msg_count => x_msg_count,
515: x_msg_data => x_msg_data);
516:
517: update hz_cust_profile_amts
518: set site_use_id = null
519: where cust_acct_profile_amt_id = x_cust_acct_profile_amt_id
520: and site_use_id = -1;
521: