The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
information_type,
active_inactive_flag,
description,
multiple_occurences_flag,
legislation_code,
object_version_number
from pqh_ptx_info_types
where information_type = p_information_type;
select information_type,
active_inactive_flag,
description,
multiple_occurences_flag,
legislation_code,
object_version_number
from pqh_ptx_info_types
where information_type = p_information_type
for update nowait;
,p_last_update_date in varchar2
) is
l_created_by number;
l_last_updated_by number;
l_last_update_date date;
l_last_update_login number;
l_updated number := 0;
select pti.* from pqh_ptx_info_types pti
where information_type = p_information_type
for update;
l_last_updated_by := -1;
l_last_updated_by := 0;
l_last_updated_by := fnd_load_util.owner_id(p_owner);
l_creation_date := nvl(to_date(p_last_update_date,'YYYY/MM/DD'),trunc(sysdate));
l_last_update_date := nvl(to_date(p_last_update_date,'YYYY/MM/DD'),trunc(sysdate));
l_last_update_date := trunc(sysdate);
l_last_update_login := 0;
if NVL(r0.last_updated_by,-1) in (l_last_updated_by,1,-1) then
update pqh_ptx_info_types
set
active_inactive_flag = p_active_inactive_flag,
description = p_description,
multiple_occurences_flag = p_multiple_occurences_flag,
legislation_code = p_legislation_code,
last_updated_by = l_last_updated_by,
last_update_date = l_last_update_date,
last_update_login = l_last_update_login
where current of c0;
l_updated := 1;
if l_updated = 0 then
insert into pqh_ptx_info_types(
information_type,
active_inactive_flag,
description,
multiple_occurences_flag,
legislation_code,
object_version_number,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
)
Values(
p_information_type,
p_active_inactive_flag,
p_description,
p_multiple_occurences_flag,
p_legislation_code,
1,
l_last_update_date,
l_last_updated_by,
l_last_update_login,
l_created_by,
l_creation_date
);