PACKAGE BODY: APPS.PAY_PAYRPTMD_XMLP_PKG

Source

1 PACKAGE BODY PAY_PAYRPTMD_XMLP_PKG AS
2 /* $Header: PAYRPTMDB.pls 120.0 2008/01/11 07:08:32 srikrish noship $ */
3 
4 function BeforeReport return boolean is
5  l_trace_value varchar2(10);
6 begin
7 
8    P_ENABLED_FLAG_1 := NVL(P_ENABLED_FLAG,'Y');
9  --hr_standard.event('BEFORE REPORT');
10 
11  insert into fnd_sessions (session_id,
12                           effective_date)
13  select userenv('sessionid'),
14               trunc(sysdate)
15  from sys.dual
16  where not exists
17       (select 1
18        from   fnd_sessions fs
19        where  fs.session_id = userenv('sessionid'));
20 BEGIN
21 	SELECT parameter_value
22 	INTO l_trace_value
23 	FROM pay_action_parameters
24 	WHERE parameter_name = 'TRACE';
25 
26 	IF l_trace_value = 'Y' THEN
27 		/*srw.do_sql('ALTER SESSION SET SQL_TRACE TRUE');*/null;
28 
29 	END IF;
30 
31 	EXCEPTION
32 		WHEN NO_DATA_FOUND THEN
33 			null;
34 END;
35   return (TRUE);
36 end;
37 
38 function AfterReport return boolean is
39 begin
40   --hr_standard.event('AFTER REPORT');
41   return (TRUE);
42 end;
43 
44 function cf_count_table_nameformula(CS_COUNT_TABLE_NAME in number) return number is
45 begin
46  CP_COUNT_TABLE_NAME := CS_COUNT_TABLE_NAME;
47   return 1;
48 
49 end;
50 
51 function CF_ENABLED_FLAGFormula return Char is
52 begin
53 declare
54 v_meaning VARCHAR2(80);
55 begin
56 select meaning
57 into v_meaning
58 from hr_lookups
59 where lookup_type = 'YES_NO'
60 and lookup_code = P_enabled_flag;
61 
62 CP_ENABLED_FLAG := v_meaning;
63 
64 return CP_ENABLED_FLAG;
65 end;
66 end;
67 
68 --Functions to refer Oracle report placeholders--
69 
70  Function CP_COUNT_TABLE_NAME_p return number is
71 	Begin
72 	 return CP_COUNT_TABLE_NAME;
73 	 END;
74  Function CP_ENABLED_FLAG_p return varchar2 is
75 	Begin
76 	 return CP_ENABLED_FLAG;
77 	 END;
78 END PAY_PAYRPTMD_XMLP_PKG ;