The following lines contain the word 'select', 'insert', 'update' or 'delete':
select object_version_number
from ben_bnft_prvdd_ldgr_f bpl
where bnft_prvdd_ldgr_id = l_bnft_prvdd_ldgr_id
and p_effective_date between bpl.effective_start_date
and bpl.effective_end_date;
select bpp.pgm_id
from ben_bnft_prvdr_pool_f bpp
where bpp.bnft_prvdr_pool_id = p_bnft_prvdr_pool_id
and p_effective_date between bpp.effective_start_date
and bpp.effective_end_date;
ben_update_ledgers.get_cmcd_ann_values
(p_bnft_prvdd_ldgr_id => null,
p_acty_base_rt_id => p_acty_base_rt_id,
p_prtt_enrt_rslt_id => l_prtt_enrt_rslt_id,
p_business_group_id => p_business_group_id,
p_effective_start_date => p_effective_date,
p_per_in_ler_id => p_per_in_ler_id,
p_frftd_val => p_frftd_val,
p_used_val => p_used_val,
p_prvdd_val => p_prvdd_val,
p_cash_recd_val => p_cash_recd_val,
p_rld_up_val => p_rld_up_val,
p_acty_ref_perd_cd => l_acty_ref_perd_cd,
p_cmcd_ref_perd_cd => l_cmcd_ref_perd_cd,
p_cmcd_frftd_val => l_cmcd_frftd_val,
p_cmcd_prvdd_val => l_cmcd_prvdd_val,
p_cmcd_rld_up_val => l_cmcd_rld_up_val,
p_cmcd_used_val => l_cmcd_used_val,
p_cmcd_cash_recd_val => l_cmcd_cash_recd_val,
p_ann_frftd_val => l_ann_frftd_val,
p_ann_prvdd_val => l_ann_prvdd_val,
p_ann_rld_up_val => l_ann_rld_up_val,
p_ann_used_val => l_ann_used_val,
p_ann_cash_recd_val => l_ann_cash_recd_val);
p_datetrack_mode => hr_api.g_update,
p_acty_base_rt_id => p_acty_base_rt_id,
p_rlovr_amt => p_used_val,
p_old_rlovr_amt => 0, -- Creation so old value is 0.
p_business_group_id => p_business_group_id,
p_enrt_mthd_cd => p_enrt_mthd_cd
);
ben_update_ledgers.get_cmcd_ann_values
(p_bnft_prvdd_ldgr_id => null,
p_acty_base_rt_id => p_acty_base_rt_id,
p_prtt_enrt_rslt_id => l_prtt_enrt_rslt_id,
p_business_group_id => p_business_group_id,
p_effective_start_date => p_effective_date,
p_per_in_ler_id => p_per_in_ler_id,
p_frftd_val => p_frftd_val,
p_used_val => p_used_val,
p_prvdd_val => p_prvdd_val,
p_cash_recd_val => p_cash_recd_val,
p_rld_up_val => p_rld_up_val,
p_acty_ref_perd_cd => l_acty_ref_perd_cd,
p_cmcd_ref_perd_cd => l_cmcd_ref_perd_cd,
p_cmcd_frftd_val => l_cmcd_frftd_val,
p_cmcd_prvdd_val => l_cmcd_prvdd_val,
p_cmcd_rld_up_val => l_cmcd_rld_up_val,
p_cmcd_used_val => l_cmcd_used_val,
p_cmcd_cash_recd_val => l_cmcd_cash_recd_val,
p_ann_frftd_val => l_ann_frftd_val,
p_ann_prvdd_val => l_ann_prvdd_val,
p_ann_rld_up_val => l_ann_rld_up_val,
p_ann_used_val => l_ann_used_val,
p_ann_cash_recd_val => l_ann_cash_recd_val);
ben_Benefit_Prvdd_Ledger_api.update_Benefit_Prvdd_Ledger (
p_bnft_prvdd_ldgr_id => l_bnft_prvdd_ldgr_id
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_acty_ref_perd_cd => l_acty_ref_perd_cd
,p_cmcd_frftd_val => l_cmcd_frftd_val
,p_cmcd_prvdd_val => l_cmcd_prvdd_val
,p_cmcd_rld_up_val => l_cmcd_rld_up_val
,p_cmcd_used_val => l_cmcd_used_val
,p_cmcd_cash_recd_val => l_cmcd_cash_recd_val
,p_cmcd_ref_perd_cd => l_cmcd_ref_perd_cd
,p_ann_frftd_val => l_ann_frftd_val
,p_ann_prvdd_val => l_ann_prvdd_val
,p_ann_rld_up_val => l_ann_rld_up_val
,p_ann_used_val => l_ann_used_val
,p_ann_cash_recd_val => l_ann_cash_recd_val
,p_object_version_number => l_object_version_number
,p_effective_date => trunc(p_effective_date)
,p_datetrack_mode => 'CORRECTION');
procedure update_Benefit_Prvdd_Ledger
(p_validate in boolean default false
,p_bnft_prvdd_ldgr_id in number
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
,p_prtt_ro_of_unusd_amt_flag in varchar2 default hr_api.g_varchar2
,p_frftd_val in number default hr_api.g_number
,p_prvdd_val in number default hr_api.g_number
,p_used_val in number default hr_api.g_number
,p_bnft_prvdr_pool_id in number default hr_api.g_number
,p_acty_base_rt_id in number default hr_api.g_number
,p_per_in_ler_id in number default hr_api.g_number
,p_prtt_enrt_rslt_id in number default hr_api.g_number
,p_business_group_id in number default hr_api.g_number
,p_bpl_attribute_category in varchar2 default hr_api.g_varchar2
,p_bpl_attribute1 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute2 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute3 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute4 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute5 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute6 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute7 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute8 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute9 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute10 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute11 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute12 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute13 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute14 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute15 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute16 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute17 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute18 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute19 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute20 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute21 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute22 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute23 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute24 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute25 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute26 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute27 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute28 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute29 in varchar2 default hr_api.g_varchar2
,p_bpl_attribute30 in varchar2 default hr_api.g_varchar2
,p_cash_recd_val in number default hr_api.g_number
,p_rld_up_val in number default hr_api.g_number
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_process_enrt_flag in varchar2 default 'Y'
,p_from_reinstate_enrt_flag in varchar2 default 'N',
p_acty_ref_perd_cd in varchar2 default hr_api.g_varchar2,
p_cmcd_frftd_val in number default hr_api.g_number,
p_cmcd_prvdd_val in number default hr_api.g_number,
p_cmcd_rld_up_val in number default hr_api.g_number,
p_cmcd_used_val in number default hr_api.g_number,
p_cmcd_cash_recd_val in number default hr_api.g_number,
p_cmcd_ref_perd_cd in varchar2 default hr_api.g_varchar2,
p_ann_frftd_val in number default hr_api.g_number,
p_ann_prvdd_val in number default hr_api.g_number,
p_ann_rld_up_val in number default hr_api.g_number,
p_ann_used_val in number default hr_api.g_number,
p_ann_cash_recd_val in number default hr_api.g_number,
p_object_version_number in out nocopy number
) is
--
-- Declare cursors and local variables
--
l_proc varchar2(72) := g_package||'update_Benefit_Prvdd_Ledger';
select bpl.bnft_prvdr_pool_id,
pen.person_id,
bpl.acty_base_rt_id,
bpl.per_in_ler_id,
bpl.used_val,
pen.enrt_mthd_cd
from ben_bnft_prvdd_ldgr_f bpl,
ben_prtt_enrt_rslt_f pen,
-- Bug : 1634870 : UK changes
ben_per_in_ler pil
where bpl.bnft_prvdd_ldgr_id=p_bnft_prvdd_ldgr_id and
bpl.object_version_number=p_object_version_number and
bpl.business_group_id=p_business_group_id and
pen.prtt_enrt_rslt_id=bpl.prtt_enrt_rslt_id and
pen.business_group_id=p_business_group_id and
pen.prtt_enrt_rslt_stat_cd is null and
-- Bug : 1634870 : UK changes
pil.per_in_ler_id=bpl.per_in_ler_id and
pil.business_group_id=bpl.business_group_id and
pil.per_in_ler_stat_cd not in ('VOIDD','BCKDT') and
p_effective_date between
pen.effective_start_date and pen.effective_end_date;
select object_version_number
from ben_bnft_prvdd_ldgr_f bpl
where bnft_prvdd_ldgr_id = p_bnft_prvdd_ldgr_id
and p_effective_date between bpl.effective_start_date
and bpl.effective_end_date;
l_bnft_prvdd_ldgr_updated boolean := FALSE;
savepoint update_Benefit_Prvdd_Ledger;
l_bnft_prvdd_ldgr_updated := TRUE;
ben_update_ledgers.get_cmcd_ann_values
(p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id,
p_acty_base_rt_id => p_acty_base_rt_id,
p_prtt_enrt_rslt_id => p_prtt_enrt_rslt_id,
p_business_group_id => p_business_group_id,
p_effective_start_date => p_effective_date,
p_per_in_ler_id => p_per_in_ler_id,
p_frftd_val => p_frftd_val,
p_used_val => p_used_val,
p_prvdd_val => p_prvdd_val,
p_cash_recd_val => p_cash_recd_val,
p_rld_up_val => p_rld_up_val,
p_acty_ref_perd_cd => l_acty_ref_perd_cd,
p_cmcd_ref_perd_cd => l_cmcd_ref_perd_cd,
p_cmcd_frftd_val => l_cmcd_frftd_val,
p_cmcd_prvdd_val => l_cmcd_prvdd_val,
p_cmcd_rld_up_val => l_cmcd_rld_up_val,
p_cmcd_used_val => l_cmcd_used_val,
p_cmcd_cash_recd_val => l_cmcd_cash_recd_val,
p_ann_frftd_val => l_ann_frftd_val,
p_ann_prvdd_val => l_ann_prvdd_val,
p_ann_rld_up_val => l_ann_rld_up_val,
p_ann_used_val => l_ann_used_val,
p_ann_cash_recd_val => l_ann_cash_recd_val);
if (NOT l_bnft_prvdd_ldgr_updated) then -- Bug: 3611160/4169180 Added this condition
--
begin
-- Start of API User Hook for the before hook of update_Benefit_Prvdd_Ledger
--
ben_Benefit_Prvdd_Ledger_bk2.update_Benefit_Prvdd_Ledger_b
(
p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id
,p_prtt_ro_of_unusd_amt_flag => p_prtt_ro_of_unusd_amt_flag
,p_frftd_val => p_frftd_val
,p_prvdd_val => p_prvdd_val
,p_used_val => p_used_val
,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
,p_acty_base_rt_id => p_acty_base_rt_id
,p_per_in_ler_id => p_per_in_ler_id
,p_prtt_enrt_rslt_id => p_prtt_enrt_rslt_id
,p_business_group_id => p_business_group_id
,p_bpl_attribute_category => p_bpl_attribute_category
,p_bpl_attribute1 => p_bpl_attribute1
,p_bpl_attribute2 => p_bpl_attribute2
,p_bpl_attribute3 => p_bpl_attribute3
,p_bpl_attribute4 => p_bpl_attribute4
,p_bpl_attribute5 => p_bpl_attribute5
,p_bpl_attribute6 => p_bpl_attribute6
,p_bpl_attribute7 => p_bpl_attribute7
,p_bpl_attribute8 => p_bpl_attribute8
,p_bpl_attribute9 => p_bpl_attribute9
,p_bpl_attribute10 => p_bpl_attribute10
,p_bpl_attribute11 => p_bpl_attribute11
,p_bpl_attribute12 => p_bpl_attribute12
,p_bpl_attribute13 => p_bpl_attribute13
,p_bpl_attribute14 => p_bpl_attribute14
,p_bpl_attribute15 => p_bpl_attribute15
,p_bpl_attribute16 => p_bpl_attribute16
,p_bpl_attribute17 => p_bpl_attribute17
,p_bpl_attribute18 => p_bpl_attribute18
,p_bpl_attribute19 => p_bpl_attribute19
,p_bpl_attribute20 => p_bpl_attribute20
,p_bpl_attribute21 => p_bpl_attribute21
,p_bpl_attribute22 => p_bpl_attribute22
,p_bpl_attribute23 => p_bpl_attribute23
,p_bpl_attribute24 => p_bpl_attribute24
,p_bpl_attribute25 => p_bpl_attribute25
,p_bpl_attribute26 => p_bpl_attribute26
,p_bpl_attribute27 => p_bpl_attribute27
,p_bpl_attribute28 => p_bpl_attribute28
,p_bpl_attribute29 => p_bpl_attribute29
,p_bpl_attribute30 => p_bpl_attribute30
,p_object_version_number => p_object_version_number
,p_cash_recd_val => p_cash_recd_val
,p_rld_up_val => p_rld_up_val
,p_effective_date => trunc(p_effective_date)
,p_datetrack_mode => p_datetrack_mode,
p_acty_ref_perd_cd => l_acty_ref_perd_cd,
p_cmcd_frftd_val => l_cmcd_frftd_val,
p_cmcd_prvdd_val => l_cmcd_prvdd_val,
p_cmcd_rld_up_val => l_cmcd_rld_up_val,
p_cmcd_used_val => l_cmcd_used_val,
p_cmcd_cash_recd_val => l_cmcd_cash_recd_val,
p_cmcd_ref_perd_cd => l_cmcd_ref_perd_cd,
p_ann_frftd_val => l_ann_frftd_val,
p_ann_prvdd_val => l_ann_prvdd_val,
p_ann_rld_up_val => l_ann_rld_up_val,
p_ann_used_val => l_ann_used_val,
p_ann_cash_recd_val => l_ann_cash_recd_val
);
(p_module_name => 'UPDATE_Benefit_Prvdd_Ledger'
,p_hook_type => 'BP'
);
ben_Benefit_Prvdd_Ledger_bk2.update_Benefit_Prvdd_Ledger_a
(
p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_prtt_ro_of_unusd_amt_flag => p_prtt_ro_of_unusd_amt_flag
,p_frftd_val => p_frftd_val
,p_prvdd_val => p_prvdd_val
,p_used_val => p_used_val
,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
,p_acty_base_rt_id => p_acty_base_rt_id
,p_per_in_ler_id => p_per_in_ler_id
,p_prtt_enrt_rslt_id => p_prtt_enrt_rslt_id
,p_business_group_id => p_business_group_id
,p_bpl_attribute_category => p_bpl_attribute_category
,p_bpl_attribute1 => p_bpl_attribute1
,p_bpl_attribute2 => p_bpl_attribute2
,p_bpl_attribute3 => p_bpl_attribute3
,p_bpl_attribute4 => p_bpl_attribute4
,p_bpl_attribute5 => p_bpl_attribute5
,p_bpl_attribute6 => p_bpl_attribute6
,p_bpl_attribute7 => p_bpl_attribute7
,p_bpl_attribute8 => p_bpl_attribute8
,p_bpl_attribute9 => p_bpl_attribute9
,p_bpl_attribute10 => p_bpl_attribute10
,p_bpl_attribute11 => p_bpl_attribute11
,p_bpl_attribute12 => p_bpl_attribute12
,p_bpl_attribute13 => p_bpl_attribute13
,p_bpl_attribute14 => p_bpl_attribute14
,p_bpl_attribute15 => p_bpl_attribute15
,p_bpl_attribute16 => p_bpl_attribute16
,p_bpl_attribute17 => p_bpl_attribute17
,p_bpl_attribute18 => p_bpl_attribute18
,p_bpl_attribute19 => p_bpl_attribute19
,p_bpl_attribute20 => p_bpl_attribute20
,p_bpl_attribute21 => p_bpl_attribute21
,p_bpl_attribute22 => p_bpl_attribute22
,p_bpl_attribute23 => p_bpl_attribute23
,p_bpl_attribute24 => p_bpl_attribute24
,p_bpl_attribute25 => p_bpl_attribute25
,p_bpl_attribute26 => p_bpl_attribute26
,p_bpl_attribute27 => p_bpl_attribute27
,p_bpl_attribute28 => p_bpl_attribute28
,p_bpl_attribute29 => p_bpl_attribute29
,p_bpl_attribute30 => p_bpl_attribute30
,p_object_version_number => l_object_version_number
,p_cash_recd_val => p_cash_recd_val
,p_rld_up_val => p_rld_up_val
,p_effective_date => trunc(p_effective_date)
,p_datetrack_mode => p_datetrack_mode,
p_acty_ref_perd_cd => p_acty_ref_perd_cd,
p_cmcd_frftd_val => l_cmcd_frftd_val,
p_cmcd_prvdd_val => l_cmcd_prvdd_val,
p_cmcd_rld_up_val => l_cmcd_rld_up_val,
p_cmcd_used_val => l_cmcd_used_val,
p_cmcd_cash_recd_val => l_cmcd_cash_recd_val,
p_cmcd_ref_perd_cd => l_cmcd_ref_perd_cd,
p_ann_frftd_val => l_ann_frftd_val,
p_ann_prvdd_val => l_ann_prvdd_val,
p_ann_rld_up_val => l_ann_rld_up_val,
p_ann_used_val => l_ann_used_val,
p_ann_cash_recd_val => l_ann_cash_recd_val
);
(p_module_name => 'UPDATE_Benefit_Prvdd_Ledger'
,p_hook_type => 'AP'
);
ROLLBACK TO update_Benefit_Prvdd_Ledger;
ROLLBACK TO update_Benefit_Prvdd_Ledger;
end update_Benefit_Prvdd_Ledger;
procedure update_Benefit_Prvdd_Ledger_w
(p_validate in varchar2 default 'FALSE'
,p_bnft_prvdd_ldgr_id in number
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
,p_prtt_ro_of_unusd_amt_flag in varchar2 default hr_api.g_varchar2
,p_frftd_val in number default hr_api.g_number
,p_prvdd_val in number default hr_api.g_number
,p_used_val in number default hr_api.g_number
,p_bnft_prvdr_pool_id in number default hr_api.g_number
,p_acty_base_rt_id in number default hr_api.g_number
,p_per_in_ler_id in number default hr_api.g_number
,p_prtt_enrt_rslt_id in number default hr_api.g_number
,p_business_group_id in number default hr_api.g_number
,p_cash_recd_val in number default hr_api.g_number
,p_rld_up_val in number default hr_api.g_number
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_process_enrt_flag in varchar2 default 'Y'
,p_from_reinstate_enrt_flag in varchar2 default 'N',
p_acty_ref_perd_cd in varchar2 default hr_api.g_varchar2,
p_cmcd_frftd_val in number default hr_api.g_number,
p_cmcd_prvdd_val in number default hr_api.g_number,
p_cmcd_rld_up_val in number default hr_api.g_number,
p_cmcd_used_val in number default hr_api.g_number,
p_cmcd_cash_recd_val in number default hr_api.g_number,
p_cmcd_ref_perd_cd in varchar2 default hr_api.g_varchar2,
p_ann_frftd_val in number default hr_api.g_number,
p_ann_prvdd_val in number default hr_api.g_number,
p_ann_rld_up_val in number default hr_api.g_number,
p_ann_used_val in number default hr_api.g_number,
p_ann_cash_recd_val in number default hr_api.g_number,
p_object_version_number in out nocopy number
) is
--
-- Declare cursors and local variables
--
l_object_version_number ben_bnft_prvdd_ldgr_f.object_version_number%TYPE;
l_proc varchar2(72) := g_package||'update_Benefit_Prvdd_Ledger_w';
ben_Benefit_Prvdd_Ledger_api.update_Benefit_Prvdd_Ledger
(
p_validate => l_validate
,p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_prtt_ro_of_unusd_amt_flag => p_prtt_ro_of_unusd_amt_flag
,p_frftd_val => p_frftd_val
,p_prvdd_val => p_prvdd_val
,p_used_val => p_used_val
,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
,p_acty_base_rt_id => p_acty_base_rt_id
,p_per_in_ler_id => p_per_in_ler_id
,p_prtt_enrt_rslt_id => p_prtt_enrt_rslt_id
,p_business_group_id => p_business_group_id
,p_object_version_number => l_object_version_number
,p_cash_recd_val => p_cash_recd_val
,p_rld_up_val => p_rld_up_val
,p_effective_date => trunc(p_effective_date)
,p_datetrack_mode => p_datetrack_mode
,p_process_enrt_flag => p_process_enrt_flag
,p_from_reinstate_enrt_flag => p_from_reinstate_enrt_flag,
p_acty_ref_perd_cd => p_acty_ref_perd_cd,
p_cmcd_frftd_val => p_cmcd_frftd_val,
p_cmcd_prvdd_val => p_cmcd_prvdd_val,
p_cmcd_rld_up_val => p_cmcd_rld_up_val,
p_cmcd_used_val => p_cmcd_used_val,
p_cmcd_cash_recd_val => p_cmcd_cash_recd_val,
p_cmcd_ref_perd_cd => p_cmcd_ref_perd_cd,
p_ann_frftd_val => p_ann_frftd_val,
p_ann_prvdd_val => p_ann_prvdd_val,
p_ann_rld_up_val => p_ann_rld_up_val,
p_ann_used_val => p_ann_used_val,
p_ann_cash_recd_val => p_ann_cash_recd_val
);
end update_Benefit_Prvdd_Ledger_w;
procedure delete_Benefit_Prvdd_Ledger
(p_validate in boolean default false
,p_bnft_prvdd_ldgr_id in number
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
,p_object_version_number in out nocopy number
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_business_group_id in number
,p_process_enrt_flag in varchar2 default 'Y'
,p_from_reinstate_enrt_flag in varchar2 default 'N'
) is
--
-- Declare cursors and local variables
--
l_proc varchar2(72) := g_package||'delete_Benefit_Prvdd_Ledger';
select bpl.bnft_prvdr_pool_id,
pen.person_id,
bpl.acty_base_rt_id,
bpl.per_in_ler_id,
bpl.used_val,
pen.enrt_mthd_cd,
bpl.prtt_ro_of_unusd_amt_flag
from ben_bnft_prvdd_ldgr_f bpl,
ben_prtt_enrt_rslt_f pen,
-- UK Changes.
ben_per_in_ler pil
where bpl.bnft_prvdd_ldgr_id=p_bnft_prvdd_ldgr_id and
bpl.object_version_number=p_object_version_number and
pen.prtt_enrt_rslt_id=bpl.prtt_enrt_rslt_id and
pen.business_group_id=bpl.business_group_id and
pen.prtt_enrt_rslt_stat_cd is null and
-- UK Changes.
pil.per_in_ler_id=bpl.per_in_ler_id and
pil.business_group_id=bpl.business_group_id and
pil.per_in_ler_stat_cd not in ('VOIDD','BCKDT') and
p_effective_date between pen.effective_start_date and pen.effective_end_date
;
SELECT pil.per_in_ler_id
FROM ben_per_in_ler pil, ben_ler_f ler
WHERE pil.person_id = l_person_id
and pil.ler_id = ler.ler_id
AND pil.per_in_ler_stat_cd = 'STRTD'
and p_effective_date between ler.effective_start_date
and ler.effective_end_date
and ler.typ_cd not in ('GSP','COMP','ABS','IREC', 'CHECKLIST');
savepoint delete_Benefit_Prvdd_Ledger;
ben_Benefit_Prvdd_Ledger_bk3.delete_Benefit_Prvdd_Ledger_b
(
p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id
,p_object_version_number => p_object_version_number
,p_effective_date => trunc(p_effective_date)
,p_datetrack_mode => p_datetrack_mode
);
(p_module_name => 'DELETE_Benefit_Prvdd_Ledger'
,p_hook_type => 'BP'
);
hr_utility.set_location('Delete Ledger Row ' || p_bnft_prvdd_ldgr_id, 10);
ben_Benefit_Prvdd_Ledger_bk3.delete_Benefit_Prvdd_Ledger_a
(
p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_object_version_number => l_object_version_number
,p_effective_date => trunc(p_effective_date)
,p_datetrack_mode => p_datetrack_mode
);
(p_module_name => 'DELETE_Benefit_Prvdd_Ledger'
,p_hook_type => 'AP'
);
ROLLBACK TO delete_Benefit_Prvdd_Ledger;
ROLLBACK TO delete_Benefit_Prvdd_Ledger;
end delete_Benefit_Prvdd_Ledger;
procedure delete_Benefit_Prvdd_Ledger_w
(p_validate in varchar2 default 'FALSE'
,p_bnft_prvdd_ldgr_id in number
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
,p_object_version_number in out nocopy number
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_business_group_id in number
,p_process_enrt_flag in varchar2 default 'Y'
,p_from_reinstate_enrt_flag in varchar2 default 'N'
) is
--
-- Declare cursors and local variables
--
l_object_version_number ben_bnft_prvdd_ldgr_f.object_version_number%TYPE;
l_proc varchar2(72) := g_package||'delete_Benefit_Prvdd_Ledger';
ben_Benefit_Prvdd_Ledger_api.delete_Benefit_Prvdd_Ledger
(
p_validate => l_validate
,p_bnft_prvdd_ldgr_id => p_bnft_prvdd_ldgr_id
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
,p_object_version_number => l_object_version_number
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_business_group_id => p_business_group_id
,p_process_enrt_flag => p_process_enrt_flag
,p_from_reinstate_enrt_flag => p_from_reinstate_enrt_flag
);
end delete_Benefit_Prvdd_Ledger_w;