The following lines contain the word 'select', 'insert', 'update' or 'delete':
select 1
from hr_lookups
where lookup_type = 'PATTERN_PURPOSE'
and lookup_code = p_pattern_purpose;
select 1
from hr_patterns
where pattern_id = p_pattern_id
and pattern_start_time <> '00:00'
--
-- Find, for construction rows based directly on pattern bits, any
-- row which is not based on whole multiples of a day or which is
-- not a qualifying or non-qualifying day.
--
union all
select 1
from hr_pattern_bits BIT,
hr_pattern_constructions CON
where con.pattern_bit_id = bit.pattern_bit_id
and con.pattern_id = p_pattern_id
and (bit.time_unit_multiplier <> ceil (bit.time_unit_multiplier)
or bit.base_time_unit <> 'DAYS'
or con.availability is null
or con.availability not in ('QUALIFYING','NON QUALIFYING'))
--
-- Find, for construction rows based on other patterns , any
-- row which is not based on whole multiples of a day or which is
-- not a qualifying or non-qualifying day.
--
union all
select 1
from hr_pattern_bits BIT,
hr_pattern_constructions CON,
hr_pattern_constructions CON2
where bit.pattern_bit_id = con2.pattern_bit_id
and con.pattern_id = p_pattern_id
and con.component_pattern_id = con2.pattern_id
and (bit.time_unit_multiplier <> ceil (bit.time_unit_multiplier)
or bit.base_time_unit <> 'DAYS'
or con2.availability not in ('QUALIFYING','NON QUALIFYING'));
Procedure insert_validate(p_rec in hr_pap_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in hr_pap_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_validate';
End update_validate;
Procedure delete_validate(p_rec in hr_pap_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;