The following lines contain the word 'select', 'insert', 'update' or 'delete':
delete_reporting_rows procedure.
26-DEC-02 rpillay 115.11 NOCOPY changes
02-Aug-04 nhunur 115.12 3805304 - Added code to handle null request_id
rows in ben_benefit_actions.
03-Dec-04 ikasire 115.13 Bug 4046914
28-Dec-07 nhunur 115.14 Bug 6075014 - perf changes
*/
--------------------------------------------------------------------------------
--
g_package varchar2(80) := 'ben_benmngle_purge';
buff => 'Benefit Action ID Deleted = '||p_benefit_action_id);
buff => 'Benefit Action Rows Deleted = '||p_benefit_action_rows);
buff => 'Batch Range Rows Deleted = '||p_batch_range_rows);
buff => 'Person Action Rows Deleted = '||p_person_action_rows);
buff => 'Dependent Information Rows Deleted = '||p_dpnt_rows);
buff => 'Electable Choice Information Rows Deleted = '||p_elctbl_chc_rows);
buff => 'Eligibility Rows Deleted = '||p_elig_rows);
buff => 'Process Information Rows Deleted = '||p_proc_rows);
buff => 'Rate Information Rows Deleted = '||p_rate_rows);
buff => 'Life Event Information Rows Deleted = '||p_ler_rows);
buff => 'Reporting Rows Deleted = '||p_reporting_rows);
procedure delete_reporting_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_reporting_rows';
l_records_to_be_deleted number := 5000; /* Deleting 5000 records at a time */
delete from ben_reporting
where benefit_action_id = p_benefit_action_id
and rownum <=l_records_to_be_deleted;
end delete_reporting_rows;
procedure delete_batch_range_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_range_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_ranges
where benefit_action_id = p_benefit_action_id
and rownum <=l_records_to_be_deleted;
end delete_batch_range_rows;
procedure delete_batch_ler_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_ler_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_ler_info
where benefit_action_id = p_benefit_action_id
and rownum <=l_records_to_be_deleted;
end delete_batch_ler_rows;
procedure delete_batch_dpnt_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_dpnt_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_dpnt_info
where benefit_action_id = p_benefit_action_id
and rownum <=l_records_to_be_deleted;
end delete_batch_dpnt_rows;
procedure delete_batch_elctbl_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_elctbl_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_elctbl_chc_info
where benefit_action_id = p_benefit_action_id
and rownum <= l_records_to_be_deleted ;
end delete_batch_elctbl_rows;
procedure delete_batch_elig_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_elig_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_elig_info
where benefit_action_id = p_benefit_action_id
and rownum <= l_records_to_be_deleted ;
end delete_batch_elig_rows;
procedure delete_batch_proc_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_proc_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_proc_info
where benefit_action_id = p_benefit_action_id
and rownum <= l_records_to_be_deleted ;
end delete_batch_proc_rows;
procedure delete_batch_rate_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_batch_rate_rows';
l_records_to_be_deleted number := 5000;
delete from ben_batch_rate_info
where benefit_action_id = p_benefit_action_id
and rownum <= l_records_to_be_deleted ;
end delete_batch_rate_rows;
procedure delete_person_action_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_person_action_rows';
l_records_to_be_deleted number := 5000;
delete from ben_person_actions
where benefit_action_id = p_benefit_action_id
and rownum <= l_records_to_be_deleted;
end delete_person_action_rows;
procedure delete_benefit_action_rows(p_benefit_action_id in number,
p_rows out nocopy number) is
--
l_package varchar2(80) := g_package||'.delete_benefit_action_rows';
delete from ben_benefit_actions
where benefit_action_id = p_benefit_action_id;
end delete_benefit_action_rows;
delete_reporting_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_reporting_rows);
delete_batch_range_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_batch_range_rows);
delete_person_action_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_person_action_rows);
delete_batch_dpnt_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_dpnt_rows);
delete_batch_elctbl_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_elctbl_chc_rows);
delete_batch_elig_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_elig_rows);
delete_batch_proc_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_proc_rows);
delete_batch_rate_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_rate_rows);
delete_batch_ler_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_ler_rows);
delete_benefit_action_rows(p_benefit_action_id => p_benefit_action_id,
p_rows => l_benefit_action_rows);
select bft.benefit_action_id
from ben_benefit_actions bft,
fnd_concurrent_requests fnd
where bft.business_group_id = nvl(p_business_group_id,bft.business_group_id)
and nvl(bft.request_id,-1) = nvl(p_concurrent_request_id,nvl(bft.request_id,-1))
and bft.process_date = nvl(l_effective_date,bft.process_date)
/* Outer join to provide backwards compatability, for all cases where request id is blank */
and fnd.request_id(+) = bft.request_id
and nvl(fnd.phase_code,'C') = 'C';