The following lines contain the word 'select', 'insert', 'update' or 'delete':
select credit_hold
from hz_customer_profiles
where CUST_ACCOUNT_ID = p_customer_id
and site_use_id is null;
select credit_hold
from hz_customer_profiles
where CUST_ACCOUNT_ID = p_customer_id
and site_use_id = p_site_use_id;
PROCEDURE update_send_dunning_letters ( p_send_dunning_letters IN varchar2,
p_customer_id IN number,
p_site_use_id IN number
) is
begin
if p_site_use_id is not null then
--
-- UPDATE THE SITE LEVEL PROFILE
--
update hz_customer_profiles
set dunning_letters = p_send_dunning_letters
where CUST_ACCOUNT_ID = p_customer_id
and site_use_id = p_site_use_id;
update hz_customer_profiles
set dunning_letters = p_send_dunning_letters
where CUST_ACCOUNT_ID = p_customer_id
and site_use_id is null;
update hz_customer_profiles
set dunning_letters = p_send_dunning_letters
where CUST_ACCOUNT_ID = p_customer_id
and site_use_id is null;
app_exception.invalid_argument('arp_cprof_pkg.update_send_dunning_letters',
'p_customer_id', p_customer_id);
end update_send_dunning_letters;
FUNCTION update_credit_hold(p_customer_id IN number,
p_site_use_id IN number,
p_credit_hold IN varchar2) RETURN BOOLEAN AS
BEGIN
if (p_site_use_id is null) then
update hz_customer_profiles
set credit_hold = p_credit_hold
where CUST_ACCOUNT_ID= p_customer_id
and site_use_id is null;
update hz_customer_profiles
set credit_hold = p_credit_hold
where CUST_ACCOUNT_ID = p_customer_id
and site_use_id = p_site_use_id;
END update_credit_hold;