PACKAGE BODY: APPS.BEN_BENHIPAA_XMLP_PKG

Source

1 PACKAGE BODY BEN_BENHIPAA_XMLP_PKG AS
2 /* $Header: BENHIPAAB.pls 120.1.12010000.3 2009/02/04 15:02:14 sagnanas ship $ */
3 
4 function CF_STANDARD_HEADERFormula return Number is
5 begin
6 
7 
8   return 1;
9 end;
10 
11 function cf_wait_start_dtformula(coverage_end_date in date, orgnl_enrt_dt in date, wait_perd_strt_dt in date, per_cm_prvdd_id in number) return char is
12   l_date  varchar(20)  := 'N/A' ;
13 begin
14    begin
15      update_pcd_sent_dt(p_per_cm_prvdd_id  => per_cm_prvdd_id
16                ,p_effective_Date   => p_effective_Date );
17 
18    if (coverage_end_date - orgnl_enrt_dt) < 365 then
19        l_date := to_char(wait_perd_strt_dt,'MM/DD/RR') ;
20    end if ;
21    Return l_date ;
22    end;
23 end;
24 
25 function cf_wait_perd_cmpltn_dtformula(coverage_end_date in date, orgnl_enrt_dt in date, wait_ped_cmpln_dt in date) return char is
26  l_date  varchar2(20) ;
27 begin
28    if (coverage_end_date - orgnl_enrt_dt) < 365 then
29        l_date := to_char(wait_ped_cmpln_dt,'MM/DD/RR') ;
30    end if ;
31    Return l_date ;
32 end;
33 
34 PROCEDURE update_pcd_sent_dt(p_per_cm_prvdd_id in number
35                              ,p_effective_Date in date ) IS
36 PRAGMA AUTONOMOUS_TRANSACTION;
37 BEGIN
38    update ben_per_cm_prvdd_f
39      set sent_Dt = p_effective_Date
40       where per_cm_prvdd_id = p_per_cm_prvdd_id
41         and  sent_dt is null
42         and   p_effective_Date between
43               effective_Start_date and
44               effective_end_Date  ;
45    commit;
46 END;
47 
48 function AfterReport return boolean is
49 begin
50    -- hr_standard.event('AFTER REPORT');
51    return (TRUE);
52 end;
53 
54 function BeforeReport return boolean is
55 begin
56    -- hr_standard.event('BEFORE REPORT');
57   return (TRUE);
58 end;
59 
60 --Functions to refer Oracle report placeholders--
61 
62 END BEN_BENHIPAA_XMLP_PKG ;