[Home] [Help]
PACKAGE BODY: APPS.PAY_PAYJPFLI_XMLP_PKG
Source
1 PACKAGE BODY PAY_PAYJPFLI_XMLP_PKG AS
2 /* $Header: PAYJPFLIB.pls 120.1 2007/12/18 18:38:40 amakrish noship $ */
3
4 function cf_li_dummyformula(SALARY_CATEGORY in varchar2, TARGET_MONTH in varchar2, WAI_EE_COUNT in number, WAI_EX_COUNT in number, WAI_TW_COUNT in number, WAI_EE_SAL_AMT in number,
5 WAI_EX_SAL_AMT in number, WAI_TW_SAL_AMT in number, UI_EE_COUNT in number, UI_EX_COUNT in number, UI_EE_SAL_AMT in number, UI_EX_SAL_AMT in number, UI_AGED_COUNT in number) return number is
6 l_date_era_code NUMBER;
7 l_date_year NUMBER;
8 l_date_month NUMBER;
9 l_date_day NUMBER;
10 begin
11 CP_SALARY_CATEGORY := pay_jp_report_pkg.substrb2(hr_general.decode_lookup('JP_SALARY_CATEGORY',SALARY_CATEGORY),1,8);
12
13 pay_jp_report_pkg.to_era( to_date(TARGET_MONTH || '01','YYYYMMDD'),
14 l_date_era_code,
15 l_date_year,
16 l_date_month,
17 l_date_day);
18 l_date_year := l_date_year - trunc(l_date_year,-2);
19 CP_TARGET_YEAR := l_date_year;
20 CP_TARGET_MONTH:= l_date_month;
21
22 CP_WAI_COUNT := WAI_EE_COUNT + WAI_EX_COUNT + WAI_TW_COUNT;
23 CP_WAI_SAL_AMT := WAI_EE_SAL_AMT + WAI_EX_SAL_AMT + WAI_TW_SAL_AMT;
24
25 CP_UI_COUNT := UI_EE_COUNT + UI_EX_COUNT;
26 CP_UI_SAL_AMT := UI_EE_SAL_AMT + UI_EX_SAL_AMT;
27
28 if SALARY_CATEGORY = 'SALARY' then
29 CP_WAI_COUNT_SALARY_SUM := CP_WAI_COUNT_SALARY_SUM + CP_WAI_COUNT;
30 CP_UI_COUNT_SALARY_SUM := CP_UI_COUNT_SALARY_SUM + CP_UI_COUNT;
31 CP_UI_AGED_COUNT_SALARY_SUM := CP_UI_AGED_COUNT_SALARY_SUM + UI_AGED_COUNT;
32 CP_NUM_OF_SALARY_MONTHS := CP_NUM_OF_SALARY_MONTHS + 1;
33 end if;
34 return('');
35 end;
36
37 function BeforeReport return boolean is
38 l_date_era_code NUMBER;
39 l_date_year NUMBER;
40 l_date_month NUMBER;
41 l_date_day NUMBER;
42 l_year_suffix varchar2(100);
43 l_title varchar2(100);
44 begin
45 -- hr_standard.event('BEFORE REPORT');
46 pay_jp_report_pkg.to_era( to_date(lpad(to_char(P_FISCAL_YEAR),4,'0') || '-04-01','YYYY-MM-DD'),
47 l_date_era_code,
48 l_date_year,
49 l_date_month,
50 l_date_day);
51 l_date_year := l_date_year - trunc(l_date_year,-2);
52 hr_utility.set_message(801,'PAY_JP_PAYJPFLI_REPORT_TITLE');
53 l_title := hr_utility.get_message;
54 hr_utility.set_message(801,'PAY_JP_FISCAL_YEAR');
55 l_year_suffix := hr_utility.get_message;
56 CP_REPORT_TITLE := pay_jp_report_pkg.substrb2(
57 hr_general.decode_lookup('JP_ERA',to_char(l_date_era_code)) ||
58 lpad(nvl(to_char(l_date_year),' '),2,' ') ||l_year_suffix||' '||l_title,1,255);
59 return (TRUE);
60 end;
61
62 function cf_report_dummyformula(CS_CP_WAI_SAL_AMT_SUM in number, CS_CP_UI_SAL_AMT_SUM in number, CS_UI_AGED_SAL_AMT_SUM in number) return number is
63 begin
64 if CP_NUM_OF_SALARY_MONTHS > 0 then
65 CP_WAI_COUNT_SALARY_AVG := trunc(CP_WAI_COUNT_SALARY_SUM / CP_NUM_OF_SALARY_MONTHS);
66 CP_UI_COUNT_SALARY_AVG := trunc(CP_UI_COUNT_SALARY_SUM / CP_NUM_OF_SALARY_MONTHS);
67 CP_UI_AGED_COUNT_SALARY_AVG := CP_UI_AGED_COUNT_SALARY_SUM / CP_NUM_OF_SALARY_MONTHS;
68 end if;
69
70 if CP_UI_AGED_COUNT_SALARY_AVG > 0 and CP_UI_AGED_COUNT_SALARY_AVG < 1 then
71 CP_UI_AGED_COUNT_SALARY_AVG := 1;
72 else
73 CP_UI_AGED_COUNT_SALARY_AVG := trunc(CP_UI_AGED_COUNT_SALARY_AVG);
74 end if;
75 CP_WAI_SAL_AMT_SUM := trunc(CS_CP_WAI_SAL_AMT_SUM / 1000);
76 CP_UI_SAL_AMT_SUM := trunc(CS_CP_UI_SAL_AMT_SUM / 1000);
77 CP_UI_AGED_SAL_AMT_SUM := trunc(CS_UI_AGED_SAL_AMT_SUM / 1000);
78 CP_UI_NET_SAL_AMT_SUM := CP_UI_SAL_AMT_SUM - CP_UI_AGED_SAL_AMT_SUM;
79 return('');
80 end;
81
82 function AfterReport return boolean is
83 begin
84 -- hr_standard.event('AFTER REPORT');
85 return (TRUE);
86 end;
87
88 --Functions to refer Oracle report placeholders--
89
90 Function CP_SALARY_CATEGORY_p return varchar2 is
91 Begin
92 return CP_SALARY_CATEGORY;
93 END;
94 Function CP_TARGET_YEAR_p return number is
95 Begin
96 return CP_TARGET_YEAR;
97 END;
98 Function CP_TARGET_MONTH_p return number is
99 Begin
100 return CP_TARGET_MONTH;
101 END;
102 Function CP_WAI_COUNT_p return number is
103 Begin
104 return CP_WAI_COUNT;
105 END;
106 Function CP_WAI_SAL_AMT_p return number is
107 Begin
108 return CP_WAI_SAL_AMT;
109 END;
110 Function CP_UI_COUNT_p return number is
111 Begin
112 return CP_UI_COUNT;
113 END;
114 Function CP_UI_SAL_AMT_p return number is
115 Begin
116 return CP_UI_SAL_AMT;
117 END;
118 Function CP_REPORT_TITLE_p return varchar2 is
119 Begin
120 return CP_REPORT_TITLE;
121 END;
122 Function CP_WAI_SAL_AMT_SUM_p return number is
123 Begin
124 return CP_WAI_SAL_AMT_SUM;
125 END;
126 Function CP_UI_SAL_AMT_SUM_p return number is
127 Begin
128 return CP_UI_SAL_AMT_SUM;
129 END;
130 Function CP_UI_AGED_SAL_AMT_SUM_p return number is
131 Begin
132 return CP_UI_AGED_SAL_AMT_SUM;
133 END;
134 Function CP_UI_NET_SAL_AMT_SUM_p return number is
135 Begin
136 return CP_UI_NET_SAL_AMT_SUM;
137 END;
138 Function CP_WAI_COUNT_SALARY_AVG_p return number is
139 Begin
140 return CP_WAI_COUNT_SALARY_AVG;
141 END;
142 Function CP_UI_COUNT_SALARY_AVG_p return number is
143 Begin
144 return CP_UI_COUNT_SALARY_AVG;
145 END;
146 Function CP_UI_AGED_COUNT_SALARY_AVG_p return number is
147 Begin
148 return CP_UI_AGED_COUNT_SALARY_AVG;
149 END;
150 Function CP_WAI_COUNT_SALARY_SUM_p return number is
151 Begin
152 return CP_WAI_COUNT_SALARY_SUM;
153 END;
154 Function CP_UI_COUNT_SALARY_SUM_p return number is
155 Begin
156 return CP_UI_COUNT_SALARY_SUM;
157 END;
158 Function CP_UI_AGED_COUNT_SALARY_SUM_p return number is
159 Begin
160 return CP_UI_AGED_COUNT_SALARY_SUM;
161 END;
162 Function CP_NUM_OF_SALARY_MONTHS_p return number is
163 Begin
164 return CP_NUM_OF_SALARY_MONTHS;
165 END;
166 END PAY_PAYJPFLI_XMLP_PKG ;