PACKAGE BODY: APPS.PAY_PYGBNSEX_XMLP_PKG

Source

1 PACKAGE BODY PAY_PYGBNSEX_XMLP_PKG AS
2 /* $Header: PYGBNSEXB.pls 120.3 2007/12/27 11:26:43 srikrish noship $ */
3 
4 function BeforeReport return boolean is
5 begin
6 
7 /* added as fix */
8 
9 P_EFFECTIVE_DATE_T := P_EFFECTIVE_DATE;
10 /* fix ends */
11 declare
12 
13 begin
14  /*srw.user_exit('FND SRWINIT');*/null;
15 
16  insert into fnd_sessions (session_id, effective_date)
17  select userenv('sessionid'),trunc(sysdate)
18  from dual
19  where not exists
20      (select 1
21       from fnd_sessions fs
22       where fs.session_id = userenv('sessionid'));
23  /*if p_effective_date is null then
24  p_effective_date := sysdate;
25  end if;*/
26  /* replaced the above code with this code */
27  if p_effective_date_t is null then
28   p_effective_date_t := sysdate;
29  end if;
30  c_business_group_name := hr_reports.get_business_group(p_business_group_id);
31   if p_payroll_id is not null then
32   --c_payroll_name := hr_reports.get_payroll_name(p_effective_date,p_payroll_id);
33   c_payroll_name := hr_reports.get_payroll_name(p_effective_date_t,p_payroll_id);
34   else
35   c_payroll_name:= 'All Payrolls';
36   end if;
37 
38 
39   /*added as fix */
40   CP_EFFECTIVE_DATE_T := to_date(P_EFFECTIVE_DATE_T,'DD-MM-YYYY');
41   CP_STARTERS_FROM := to_date(P_STARTERS_FROM,'DD-MM-YYYY');
42 end;  return (TRUE);
43 end;
44 
45 function AfterReport return boolean is
46 begin
47   /*srw.user_exit('FND SRWEXIT');*/null;
48    return (TRUE);
49 end;
50 
51 --Functions to refer Oracle report placeholders--
52 
53  Function C_BUSINESS_GROUP_NAME_p return varchar2 is
54 	Begin
55 	 return C_BUSINESS_GROUP_NAME;
56 	 END;
57  Function C_ORDER_BY_p return varchar2 is
58 	Begin
59 	 return C_ORDER_BY;
60 	 END;
61  Function C_HEAD_ORDER_BY_p return varchar2 is
62 	Begin
63 	 return C_HEAD_ORDER_BY;
64 	 END;
65  Function C_PAYROLL_NAME_p return varchar2 is
66 	Begin
67 	 return C_PAYROLL_NAME;
68 	 END;
69 END PAY_PYGBNSEX_XMLP_PKG ;