The following lines contain the word 'select', 'insert', 'update' or 'delete':
Select input_value_id
,effective_start_date
,effective_end_date
,element_type_id
,lookup_type
,business_group_id
,legislation_code
,formula_id
,value_set_id
,display_sequence
,generate_db_items_flag
,hot_default_flag
,mandatory_flag
,name
,uom
,default_value
,legislation_subgroup
,max_value
,min_value
,warning_or_error
,object_version_number
From Pay_input_values_f
Where Element_type_id = P_element_Type_id
And P_effective_Date Between Effective_start_date
And Effective_end_date
Order By Display_sequence,Input_value_id ;
SELECT substr(fs.application_column_name,8,2) segment_no,
fs.application_column_name application_column_name,
fs.segment_name application_segment_name,
fs.required_flag required_flag
FROM FND_ID_FLEX_SEGMENTS fs,
FND_SEGMENT_ATTRIBUTE_VALUES sa1
WHERE sa1.id_flex_num = p_cost_id_flex_num
and sa1.id_flex_code = 'COST'
and sa1.attribute_value = 'Y'
and sa1.segment_attribute_type <> 'BALANCING'
and sa1.segment_attribute_type = p_level
and fs.id_flex_num = p_cost_id_flex_num
and fs.id_flex_code = 'COST'
and fs.enabled_flag = 'Y'
and fs.application_id = 801
and fs.application_column_name =
sa1.application_column_name
order by substr(fs.application_column_name,8,2);
select parameter_value
into v_cal_cost_segs
from pay_action_parameters
where parameter_name = 'COST_VAL_SEGS';
select pbg.security_group_id
from per_business_groups pbg
, pay_batch_lines btl
, pay_batch_headers bth
where btl.batch_line_id = p_batch_line_id
and bth.batch_id = btl.batch_id
and pbg.business_group_id = bth.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, pay_batch_lines btl
, pay_batch_headers bth
where btl.batch_line_id = p_batch_line_id
and bth.batch_id = btl.batch_id
and pbg.business_group_id = bth.business_group_id;
Procedure chk_non_updateable_args
(p_rec in pay_btl_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
select 'Y'
from pay_batch_lines pbl
where pbl.batch_line_id = p_batch_line_id
and pbl.batch_line_status = 'T';
select null
from pay_batch_headers bth
where bth.batch_id = p_batch_id;
select bth.batch_status
from pay_batch_headers bth
where bth.batch_id = p_batch_id;
select null
from pay_batch_lines btl
where btl.batch_line_id = p_batch_line_id
and ((btl.assignment_id is null and p_assignment_id is null)
or btl.assignment_id = p_assignment_id)
and ((btl.assignment_number is null and p_assignment_number is null)
or btl.assignment_number = p_assignment_number);
procedure chk_delete
(p_batch_line_id in pay_batch_lines.batch_line_id%TYPE
) is
--
l_proc varchar2(72) := g_package||'chk_delete';
select null
from pay_message_lines pml
where pml.source_id = p_batch_line_id
and pml.source_type = 'L';
end chk_delete;
select pbh.business_group_id
from pay_batch_headers pbh
where pbh.batch_id = c_batch_id;
select cost_allocation_structure
from per_business_groups
where business_group_id= c_business_group_id;
Procedure insert_validate
(p_session_date in date,
p_rec in pay_btl_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_session_date in date,
p_rec in pay_btl_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in pay_btl_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_batch_line_id => p_rec.batch_line_id);
End delete_validate;