PACKAGE BODY: APPS.PAY_PAYRPHTS_XMLP_PKG

Source

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