PACKAGE BODY: APPS.PQH_PQIPED3_XMLP_PKG

Source

1 PACKAGE BODY PQH_PQIPED3_XMLP_PKG AS
2 /* $Header: PQIPED3B.pls 120.2 2007/12/21 17:23:03 vjaganat noship $ */
3 
4 function lineFormula return Number is
5 temp_num number;
6 begin
7   temp_num := line_num;
8   line_num:= line_num + 1;
9    if line_num = 7 then
10      line_num := 8;
11    end if;
12   return temp_num;
13 end;
14 
15 function CF_GroupTotTitleFormula(genCode in varchar2) return char is
16 l_total_title	VARCHAR2(200)	:= '';
17  l_gen_code	VARCHAR2(9)	:= genCode;
18 begin
19   IF 	l_gen_code =  'M' THEN
20 	l_total_title	:= '7  Total Men';
21   ELSIF l_gen_code 	= 'F' THEN
22 	l_total_title	:= '14 Total Women';
23   END IF;
24 
25   return l_total_title;
26 
27 
28 end;
29 
30 function BeforeReport return boolean is
31 l_query_text	varchar2(2000);
32 
33 l_fr	varchar2(2000);
34 l_ft	varchar2(2000);
35 l_pr	varchar2(2000);
36 l_pt	varchar2(2000);
37 
38 
39 begin
40    --hr_standard.event('BEFORE REPORT');
41    CP_REPORT_DATE := to_char(P_REPORT_DATE,'DD-MON-YYYY');
42 line_num :=1;
43    pqh_employment_category.fetch_empl_categories(p_business_group_id,l_fr,l_ft,l_pr,l_pt);
44 
45    	cp_fr  := l_fr;
46 	cp_ft	:= l_ft;
47 	cp_pr	:= l_pr;
48 	cp_pt	:= l_pt;
49 
50   return TRUE;
51 
52 end;
53 
54 function AfterReport return boolean is
55 begin
56   --hr_standard.event('AFTER REPORT');
57 
58   return (TRUE);
59 end;
60 
61 --Functions to refer Oracle report placeholders--
62 
63  Function line_num_p return number is
64 	Begin
65 	 return line_num;
66 	 END;
67  Function CP_TotTitlePerReport_p return varchar2 is
68 	Begin
69 	 return CP_TotTitlePerReport;
70 	 END;
71  Function CP_PT_p return varchar2 is
72 	Begin
73 	 return CP_PT;
74 	 END;
75  Function CP_PR_p return varchar2 is
76 	Begin
77 	 return CP_PR;
78 	 END;
79  Function CP_FT_p return varchar2 is
80 	Begin
81 	 return CP_FT;
82 	 END;
83  Function CP_FR_p return varchar2 is
84 	Begin
85 	 return CP_FR;
86 	 END;
87  Function ReportTotLineNo_p return number is
88 	Begin
89 	 return ReportTotLineNo;
90 	 END;
91 END PQH_PQIPED3_XMLP_PKG ;