The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor c1 is select budget_id
from pqh_budget_versions
where budget_version_id = p_budget_version_id ;
cursor c1 is select budget_detail_id,budget_unit1_value,budget_unit2_value,budget_unit3_value,
budget_unit1_value_type_cd,budget_unit2_value_type_cd,budget_unit3_value_type_cd,
budget_unit1_percent,budget_unit2_percent,budget_unit3_percent,
budget_unit1_available,budget_unit2_available,budget_unit3_available,
object_version_number,gl_status
from pqh_budget_details
where budget_version_id = p_budget_version_id
for update of budget_unit1_value,budget_unit2_value,budget_unit3_value,
budget_unit1_available,budget_unit2_available,budget_unit3_available,
budget_unit1_percent,budget_unit2_percent,budget_unit3_percent ;
update_budget_detail
(
p_budget_detail_id => i.budget_detail_id,
p_budget_unit1_percent => l_budget_unit1_percent,
p_budget_unit1_value => l_budget_unit1_value,
p_budget_unit2_percent => l_budget_unit2_percent,
p_budget_unit2_value => l_budget_unit2_value,
p_budget_unit3_percent => l_budget_unit3_percent,
p_budget_unit3_value => l_budget_unit3_value,
p_budget_unit1_available => l_budget_unit1_available,
p_budget_unit2_available => l_budget_unit2_available,
p_budget_unit3_available => l_budget_unit3_available,
p_gl_status => l_bgd_status,
p_object_version_number => l_object_version_number
);
hr_utility.set_location('budget row updated '||l_proc,120);
cursor c1 is select budget_period_id,budget_unit1_value,budget_unit2_value,budget_unit3_value,
budget_unit1_value_type_cd,budget_unit2_value_type_cd,budget_unit3_value_type_cd,
budget_unit1_percent,budget_unit2_percent,budget_unit3_percent,
budget_unit1_available,budget_unit2_available,budget_unit3_available
from pqh_budget_periods
where budget_detail_id = p_budget_detail_id
for update of budget_unit1_value,budget_unit2_value,budget_unit3_value,
budget_unit1_percent,budget_unit2_percent,budget_unit3_percent,
budget_unit1_available,budget_unit2_available,budget_unit3_available ;
update pqh_budget_periods
set budget_unit1_value = l_period_unit1_value,
budget_unit2_value = l_period_unit2_value,
budget_unit3_value = l_period_unit3_value,
budget_unit1_percent = l_period_unit1_percent,
budget_unit2_percent = l_period_unit2_percent,
budget_unit3_percent = l_period_unit3_percent,
budget_unit1_available = l_period_unit1_available,
budget_unit2_available = l_period_unit2_available,
budget_unit3_available = l_period_unit3_available
where current of c1;
hr_utility.set_location('after period updated '||l_proc,140);
cursor c1 is select budget_unit1_value,budget_unit2_value,budget_unit3_value,
budget_unit1_value_type_cd,budget_unit2_value_type_cd,budget_unit3_value_type_cd,
budget_unit1_percent,budget_unit2_percent,budget_unit3_percent,
budget_unit1_available,budget_unit2_available,budget_unit3_available
from pqh_budget_sets
where budget_period_id = p_budget_period_id
for update of budget_unit1_value,budget_unit2_value,budget_unit3_value,
budget_unit1_percent,budget_unit2_percent,budget_unit3_percent,
budget_unit1_available,budget_unit2_available,budget_unit3_available ;
hr_utility.set_location('before update values passed are '||l_proc,110);
update pqh_budget_sets
set budget_unit1_value = l_budgetset_unit1_value,
budget_unit2_value = l_budgetset_unit2_value,
budget_unit3_value = l_budgetset_unit3_value,
budget_unit1_percent = l_budgetset_unit1_percent,
budget_unit2_percent = l_budgetset_unit2_percent,
budget_unit3_percent = l_budgetset_unit3_percent,
budget_unit1_available = l_budgetset_unit1_available,
budget_unit2_available = l_budgetset_unit2_available,
budget_unit3_available = l_budgetset_unit3_available
where current of c1;
hr_utility.set_location('after update out nocopy values passed are '||l_proc,130);
procedure insert_budget_detail(
p_budget_version_id in number,
p_organization_id in number default null,
p_job_id in number default null,
p_position_id in number default null,
p_grade_id in number default null,
p_budget_unit1_percent in number default null,
p_budget_unit1_value in number default null,
p_budget_unit2_percent in number default null,
p_budget_unit2_value in number default null,
p_budget_unit3_percent in number default null,
p_budget_unit3_value in number default null,
p_budget_unit1_value_type_cd in varchar2 default null,
p_budget_unit2_value_type_cd in varchar2 default null,
p_budget_unit3_value_type_cd in varchar2 default null,
p_gl_status in varchar2 default null,
p_budget_unit1_available in number default null,
p_budget_unit2_available in number default null,
p_budget_unit3_available in number default null,
p_budget_detail_id out nocopy number
) is
l_object_version_number number;
end insert_budget_detail;
Procedure update_budget_detail
(
p_budget_detail_id in number,
p_budget_version_id in number default hr_api.g_number,
p_organization_id in number default hr_api.g_number,
p_job_id in number default hr_api.g_number,
p_position_id in number default hr_api.g_number,
p_grade_id in number default hr_api.g_number,
p_budget_unit1_percent in number default hr_api.g_number,
p_budget_unit1_value in number default hr_api.g_number,
p_budget_unit2_percent in number default hr_api.g_number,
p_budget_unit2_value in number default hr_api.g_number,
p_budget_unit3_percent in number default hr_api.g_number,
p_budget_unit3_value in number default hr_api.g_number,
p_object_version_number in out nocopy number,
p_budget_unit1_value_type_cd in varchar2 default hr_api.g_varchar2,
p_budget_unit2_value_type_cd in varchar2 default hr_api.g_varchar2,
p_budget_unit3_value_type_cd in varchar2 default hr_api.g_varchar2,
p_gl_status in varchar2 default hr_api.g_varchar2,
p_budget_unit1_available in number default hr_api.g_number,
p_budget_unit2_available in number default hr_api.g_number,
p_budget_unit3_available in number default hr_api.g_number
) is
l_proc varchar2(61) := g_package||'Update_bgd';
pqh_budget_details_api.update_budget_detail(
p_validate => FALSE
,p_budget_detail_id => p_budget_detail_id
,p_budget_version_id => p_budget_version_id
,p_organization_id => p_organization_id
,p_position_id => p_position_id
,p_job_id => p_job_id
,p_grade_id => p_grade_id
,p_budget_unit1_value => p_budget_unit1_value
,p_budget_unit1_percent => p_budget_unit1_percent
,p_budget_unit1_available => p_budget_unit1_available
,p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd
,p_budget_unit2_value => p_budget_unit2_value
,p_budget_unit2_percent => p_budget_unit2_percent
,p_budget_unit2_available => p_budget_unit2_available
,p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd
,p_budget_unit3_value => p_budget_unit3_value
,p_budget_unit3_percent => p_budget_unit3_percent
,p_budget_unit3_available => p_budget_unit3_available
,p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd
,p_gl_status => p_gl_status
,p_object_version_number => p_object_version_number
);
end update_budget_detail;
cursor c0 is select max(version_number) from pqh_budget_versions
where budget_id = p_budget_id ;
cursor c1 is select min(version_number) from pqh_budget_versions
where budget_id = p_budget_id ;
cursor c2 is select date_to from pqh_budget_versions
where version_number = l_max_version
and budget_id = p_budget_id;
cursor c5 is select date_from from pqh_budget_versions
where budget_id = p_budget_id
and version_number = (select min(version_number)
from pqh_budget_versions
where budget_id = p_budget_id
and version_number > p_version_number) ;
cursor c6 is select date_to from pqh_budget_versions
where budget_id = p_budget_id
and version_number = (select max(version_number)
from pqh_budget_versions
where budget_id = p_budget_id
and version_number < p_version_number) ;