The following lines contain the word 'select', 'insert', 'update' or 'delete':
17 May 95 N Simpson Added delete_ownerships,
insert_ownerships and
startup_insert_allowed to
remove all sql from client side and
thus allow library to be made global
06 Sep 95 S Desai Added test_path_to_perbecvd
test_path_to_perbeben
08 Sep 95 D Kerr Changed datatype of parameter
chk_asg_on_payroll from %TYPE to
number. Workaround for forms bug.
11 Mar 96 D Kerr Added checkformat and changeformat
19 Aug 97 Sxshah Banner now on eack line.
21 Aug 97 V Treiger Added procedures per_date_range and
asg_date_range.
21 May 98 D Kerr Added overload for chk_asg_payroll
620733.
06 Apr 99 S Doshi Flexible Dates Conversion
115.4 21 Apr 99 cborrett.uk Multiradix conversion.
*/
g_dummy number;
function startup_insert_allowed (p_session_id number) return boolean is
--
-- Returns TRUE if there is a row in hr_owner_definitions for the users
-- session (ie the first session they open with forms), which indicates
-- that startup data may be inserted by the user.
--
cursor csr_ownership is
select 1
from hr_owner_definitions
where session_id = p_session_id;
l_insert_allowed boolean := FALSE;
l_insert_allowed := csr_ownership%found;
return l_insert_allowed;
end startup_insert_allowed;
procedure insert_ownerships (
--
-- Inserts ownerships for startup data
--
--
p_session_id number,
p_key_name varchar2,
p_key_value number) is
--
cursor csr_definition is
select product_short_name
from hr_owner_definitions
where session_id = p_session_id;
insert into hr_application_ownerships (
--
key_name,
key_value,
product_name)
--
values (
p_key_name,
fnd_number.number_to_canonical(p_key_value),
product.product_short_name);
end insert_ownerships;
procedure delete_ownerships (
--
-- Deletes ownerships for startup data
--
--
p_key_name varchar2,
p_key_value number) is
--
begin
--
delete from hr_application_ownerships
where key_name = p_key_name
and key_value = fnd_number.number_to_canonical(p_key_value);
end delete_ownerships;