[Home] [Help]
PACKAGE: APPS.PAY_JP_ISDF_SS_PKG
Source
1 package pay_jp_isdf_ss_pkg as
2 /* $Header: pyjpisfs.pkh 120.2.12000000.2 2007/10/05 06:48:58 keyazawa noship $ */
3 --
4 c_life_gen_calc_udt varchar2(80) := 'T_YEA_LIFE_INS_EXM';
5 c_life_pens_calc_udt varchar2(80) := 'T_YEA_INDIVIDUAL_PENSION_INS_EXM';
6 c_nonlife_long_calc_udt varchar2(80) := 'T_YEA_LONG_NONLIFE_INS_EXM';
7 c_nonlife_short_calc_udt varchar2(80) := 'T_YEA_SHORT_NONLIFE_INS_EXM';
8 --
9 c_rate_udtcol varchar2(80) := 'RATE';
10 c_add_adj_udtcol varchar2(80) := 'ADD_AMT';
11 --
12 c_yea_calc_max_udt varchar2(80) := 'T_YEA_MAX_AMT';
13 c_max_udtcol varchar2(80) := 'MAX';
14 c_nonlife_udtrow varchar2(80) := 'NONLIFE_INS_EXM';
15 c_earthquake_udtrow varchar2(80) := 'EARTHQUAKE_INS_EXM';
16 c_sp_emp_income_udtrow varchar2(80) := 'SPOUSE_SP_EXM_EARNER_ANNUAL_INCOME';
17 c_sp_dctable_sp_income_udtrow varchar2(80) := 'SPOUSE_EXM_SPOUSE_ANNUAL_INCOME';
18 c_sp_spouse_income_udtrow varchar2(80) := 'SPOUSE_SP_EXM_SPOUSE_ANNUAL_INCOME';
19 --
20 c_spouse_calc_udt varchar2(80) := 'T_YEA_SPOUSE_SP_EXM_RECKONER';
21 c_dct_udtcol varchar2(80) := 'EXM';
22 --
23 c_nonlife_long_year number := 10;
24 c_sp_calc_unit number := 10000;
25 c_sp_earned_inc_exp number := 650000;
26 c_sp_calc_earned_inc_calc1 number := 0;
27 c_sp_calc_other_inc_calc_rate number := 0.5;
28 --
29 c_nonlife_max number;
30 c_earthquake_max number;
31 c_emp_income_max number;
32 c_inc_spouse_dct_max number;
33 c_spouse_income_max number;
34 --
35 g_life_range1b varchar2(80);
36 g_life_range2a varchar2(80);
37 g_life_range2b varchar2(80);
38 g_life_range3a varchar2(80);
39 g_life_range3b varchar2(80);
40 g_life_range4a varchar2(80);
41 g_life_calc2 varchar2(80);
42 g_life_calc3 varchar2(80);
43 g_life_calc4 varchar2(80);
44 g_life_gen_max varchar2(80);
45 g_life_pens_max varchar2(80);
46 g_life_ins_max varchar2(80);
47 g_earthquake_max varchar2(80);
48 g_lnonlife_range1b varchar2(80);
49 g_lnonlife_calc2 varchar2(80);
50 g_lnonlife_year varchar2(80);
51 g_snonlife_range1b varchar2(80);
52 g_snonlife_calc2 varchar2(80);
53 g_lnonlife_max varchar2(80);
54 g_snonlife_max varchar2(80);
55 g_nonlife_max varchar2(80);
56 g_nonlife_max_2007 varchar2(80);
57 g_sp_emp_inc_max varchar2(80);
58 g_sp_spdct_max varchar2(80);
59 g_sp_spinc_max varchar2(80);
60 g_sp_calc_unit number;
61 g_sp_calc_exp1b number;
62 g_sp_calc_exp1b_fmt varchar2(80);
63 g_sp_calc_cal1 varchar2(80);
64 g_sp_calc_cal6 varchar2(80);
65 g_sp_calc_dct_range1a varchar2(80);
66 g_sp_calc_dct_range1b varchar2(80);
67 g_sp_calc_dct1 varchar2(80);
68 g_sp_calc_dct_range2a varchar2(80);
69 g_sp_calc_dct_range2b varchar2(80);
70 g_sp_calc_dct2 varchar2(80);
71 g_sp_calc_dct_range3a varchar2(80);
72 g_sp_calc_dct_range3b varchar2(80);
73 g_sp_calc_dct3 varchar2(80);
74 g_sp_calc_dct_range4a varchar2(80);
75 g_sp_calc_dct_range4b varchar2(80);
76 g_sp_calc_dct4 varchar2(80);
77 g_sp_calc_dct_range5a varchar2(80);
78 g_sp_calc_dct_range5b varchar2(80);
79 g_sp_calc_dct5 varchar2(80);
80 g_sp_calc_dct_range6a varchar2(80);
81 g_sp_calc_dct_range6b varchar2(80);
82 g_sp_calc_dct6 varchar2(80);
83 g_sp_calc_dct_range7a varchar2(80);
84 g_sp_calc_dct_range7b varchar2(80);
85 g_sp_calc_dct7 varchar2(80);
86 g_sp_calc_dct_range8a varchar2(80);
87 g_sp_calc_dct_range8b varchar2(80);
88 g_sp_calc_dct8 varchar2(80);
89 g_sp_calc_dct_range9a varchar2(80);
90 g_sp_calc_dct_range9b varchar2(80);
91 g_sp_calc_dct9 varchar2(80);
92 --
93 g_msg_life_range1 fnd_new_messages.message_text%type;
94 g_msg_life_range2 fnd_new_messages.message_text%type;
95 g_msg_life_range3 fnd_new_messages.message_text%type;
96 g_msg_life_range4 fnd_new_messages.message_text%type;
97 g_msg_life_calc2 fnd_new_messages.message_text%type;
98 g_msg_life_calc3 fnd_new_messages.message_text%type;
99 g_msg_life_calc4 fnd_new_messages.message_text%type;
100 g_msg_life_gen_max fnd_new_messages.message_text%type;
101 g_msg_life_pens_max fnd_new_messages.message_text%type;
102 g_msg_life_ins_max fnd_new_messages.message_text%type;
103 g_msg_nonlife_2007 fnd_new_messages.message_text%type;
104 g_msg_nonlife_ap_2007 fnd_new_messages.message_text%type;
105 g_msg_eqnonlife_s_2007 fnd_new_messages.message_text%type;
106 g_msg_lnonlife_s_2007 fnd_new_messages.message_text%type;
107 g_msg_lnonlife fnd_new_messages.message_text%type;
108 g_msg_eqnonlife_2007 fnd_new_messages.message_text%type;
109 g_msg_lnonlife_2007 fnd_new_messages.message_text%type;
110 g_msg_lnonlife_dct fnd_new_messages.message_text%type;
111 g_msg_snonlife_dct fnd_new_messages.message_text%type;
112 g_msg_lnonlife_dct_2007 fnd_new_messages.message_text%type;
113 g_msg_earthquake_max fnd_new_messages.message_text%type;
114 g_msg_nonlife_long_max fnd_new_messages.message_text%type;
115 g_msg_nonlife_short_max fnd_new_messages.message_text%type;
116 g_msg_nonlife_ins_max fnd_new_messages.message_text%type;
117 g_msg_nonlife_ins_max_2007 fnd_new_messages.message_text%type;
118 g_msg_sp_emp_inc_max fnd_new_messages.message_text%type;
119 g_msg_sp_sp_inc_max fnd_new_messages.message_text%type;
120 g_msg_sp_calc_cal1 fnd_new_messages.message_text%type;
121 g_msg_sp_calc_cal6 fnd_new_messages.message_text%type;
122 g_msg_sp_calc_dct_range1 fnd_new_messages.message_text%type;
123 g_msg_sp_calc_dct_range2 fnd_new_messages.message_text%type;
124 g_msg_sp_calc_dct_range3 fnd_new_messages.message_text%type;
125 g_msg_sp_calc_dct_range4 fnd_new_messages.message_text%type;
126 g_msg_sp_calc_dct_range5 fnd_new_messages.message_text%type;
127 g_msg_sp_calc_dct_range6 fnd_new_messages.message_text%type;
128 g_msg_sp_calc_dct_range7 fnd_new_messages.message_text%type;
129 g_msg_sp_calc_dct_range8 fnd_new_messages.message_text%type;
130 g_msg_sp_calc_dct_range9 fnd_new_messages.message_text%type;
131 g_msg_sp_calc_dct1 fnd_new_messages.message_text%type;
132 g_msg_sp_calc_dct2 fnd_new_messages.message_text%type;
133 g_msg_sp_calc_dct3 fnd_new_messages.message_text%type;
134 g_msg_sp_calc_dct4 fnd_new_messages.message_text%type;
135 g_msg_sp_calc_dct5 fnd_new_messages.message_text%type;
136 g_msg_sp_calc_dct6 fnd_new_messages.message_text%type;
137 g_msg_sp_calc_dct7 fnd_new_messages.message_text%type;
138 g_msg_sp_calc_dct8 fnd_new_messages.message_text%type;
139 g_msg_sp_calc_dct9 fnd_new_messages.message_text%type;
140 --
141 g_payroll_action_id number;
142 g_business_group_id number;
143 g_effective_date date;
144 --
145 type t_action_info_rec is record(
146 action_information_id pay_action_information.action_information_id%type,
147 action_context_id pay_action_information.action_context_id%type,
148 action_context_type pay_action_information.action_context_type%type,
149 object_version_number pay_action_information.object_version_number%type,
150 action_information_category pay_action_information.action_information_category%type,
151 action_information1 pay_action_information.action_information1%type,
152 action_information2 pay_action_information.action_information2%type,
153 action_information3 pay_action_information.action_information3%type,
154 action_information4 pay_action_information.action_information4%type,
155 action_information5 pay_action_information.action_information5%type,
156 action_information6 pay_action_information.action_information6%type,
157 action_information7 pay_action_information.action_information7%type,
158 action_information8 pay_action_information.action_information8%type,
159 action_information9 pay_action_information.action_information9%type,
160 action_information10 pay_action_information.action_information10%type,
161 action_information11 pay_action_information.action_information11%type,
162 action_information12 pay_action_information.action_information12%type,
163 action_information13 pay_action_information.action_information13%type,
164 action_information14 pay_action_information.action_information14%type,
165 action_information15 pay_action_information.action_information15%type,
166 action_information16 pay_action_information.action_information16%type,
167 action_information17 pay_action_information.action_information17%type,
168 action_information18 pay_action_information.action_information18%type,
169 action_information19 pay_action_information.action_information19%type,
170 action_information20 pay_action_information.action_information20%type,
171 action_information21 pay_action_information.action_information21%type,
172 action_information22 pay_action_information.action_information22%type,
173 action_information23 pay_action_information.action_information23%type,
174 action_information24 pay_action_information.action_information24%type,
175 action_information25 pay_action_information.action_information25%type,
176 action_information26 pay_action_information.action_information26%type,
177 action_information27 pay_action_information.action_information27%type,
178 action_information28 pay_action_information.action_information28%type,
179 action_information29 pay_action_information.action_information29%type,
180 action_information30 pay_action_information.action_information30%type,
181 effective_date pay_action_information.effective_date%type,
182 assignment_id pay_action_information.assignment_id%type);
183 --
184 -- #2243411 bulk collect bug fix is available from 9.2
185 type t_action_info_tbl is table of t_action_info_rec index by binary_integer;
186 --
187 type t_calc_total_rec is record(
188 life_gen number,
189 life_pens number,
190 earthquake number,
191 nonlife_long number,
192 nonlife_short number,
193 national_pens number,
194 social number,
195 mutual_aid_ec number,
196 mutual_aid_p number,
197 mutual_aid_dsc number,
198 sp_emp_inc number,
199 sp_spouse_inc number,
200 sp_sp_type varchar2(60),
201 sp_wid_type varchar2(60),
202 sp_dct_exc varchar2(60),
203 sp_inc_cnt number,
204 sp_earned_inc number,
205 sp_earned_inc_exp number,
206 sp_business_inc number,
207 sp_business_inc_exp number,
208 sp_miscellaneous_inc number,
209 sp_miscellaneous_inc_exp number,
210 sp_dividend_inc number,
211 sp_dividend_inc_exp number,
212 sp_real_estate_inc number,
213 sp_real_estate_inc_exp number,
214 sp_retirement_inc number,
215 sp_retirement_inc_exp number,
216 sp_other_inc number,
217 sp_other_inc_exp number,
218 sp_other_inc_exp_dct number,
219 sp_other_inc_exp_tmp number,
220 sp_other_inc_exp_tmp_exp number);
221 --
222 type t_calc_spouse_inc_rec is record(
223 sp_earned_inc_calc number,
224 sp_business_inc_calc number,
225 sp_miscellaneous_inc_calc number,
226 sp_dividend_inc_calc number,
227 sp_real_estate_inc_calc number,
228 sp_retirement_inc_calc number,
229 sp_other_inc_calc number,
230 sp_inc_calc number);
231 --
232 type t_calc_dct_rec is record(
233 life_gen_ins_prem number,
234 life_pens_ins_prem number,
235 life_gen_ins_calc_prem number,
236 life_pens_ins_calc_prem number,
237 life_ins_deduction number,
238 nonlife_long_ins_prem number,
239 nonlife_short_ins_prem number,
240 earthquake_ins_prem number,
241 nonlife_long_ins_calc_prem number,
242 nonlife_short_ins_calc_prem number,
243 earthquake_ins_calc_prem number,
244 nonlife_ins_deduction number,
245 national_pens_ins_prem number,
246 social_ins_prem number,
247 social_ins_deduction number,
248 mutual_aid_deduction number,
249 sp_earned_inc_calc number,
250 sp_business_inc_calc number,
251 sp_miscellaneous_inc_calc number,
252 sp_dividend_inc_calc number,
253 sp_real_estate_inc_calc number,
254 sp_retirement_inc_calc number,
255 sp_other_inc_calc number,
256 sp_inc_calc number,
257 spouse_inc number,
258 spouse_deduction number);
259 --
260 function get_spouse_type(
261 p_assignment_id in number,
262 p_effective_date in date,
263 p_payroll_id in number)
264 return varchar2;
265 --
266 function get_widow_type(
267 p_assignment_id in number,
268 p_effective_date in date)
269 return varchar2;
270 --
271 procedure set_form_pg_prompt(
272 p_action_information_id in number);
273 --
274 procedure do_new(
275 p_action_information_id in number,
276 p_object_version_number in out nocopy number);
277 --
278 procedure do_apply(
279 p_action_information_id in number,
280 p_object_version_number in out nocopy number);
281 --
282 procedure do_calculate(
283 p_action_information_id in number,
284 p_object_version_number in out nocopy number);
285 --
286 procedure do_finalize(
287 p_action_information_id in number,
288 p_object_version_number in out nocopy number,
289 p_user_comments in varchar2);
290 --
291 procedure do_reject(
292 p_action_information_id in number,
293 p_object_version_number in out nocopy number,
294 p_admin_comments in varchar2);
295 --
296 procedure do_return(
297 p_action_information_id in number,
298 p_object_version_number in out nocopy number,
299 p_admin_comments in varchar2);
300 --
301 procedure do_approve(
302 p_action_information_id in number,
303 p_object_version_number in out nocopy number);
304 --
305 procedure do_transfer(
306 p_action_information_id in number,
307 p_object_version_number in out nocopy number,
308 p_transfer_date in date,
309 p_create_session in boolean default true,
310 p_expire_after_transfer in varchar2 default 'N');
311 --
312 procedure do_expire(
313 p_action_information_id in number,
314 p_object_version_number in out nocopy number,
315 p_expiry_date in date,
316 p_create_session in boolean default true,
317 p_mode in varchar2 default null);
318 --
319 -- internal use only
320 procedure do_finalize(
321 errbuf out nocopy varchar2,
322 retcode out nocopy varchar2,
323 p_payroll_action_id in number,
324 p_user_comments in varchar2);
325 --
326 procedure do_approve(
327 errbuf out nocopy varchar2,
328 retcode out nocopy varchar2,
329 p_payroll_action_id in number);
330 --
331 procedure do_transfer(
332 errbuf out nocopy varchar2,
333 retcode out nocopy varchar2,
334 p_payroll_action_id in number,
335 p_transfer_date in varchar2,
336 p_expire_after_transfer in varchar2 default 'N');
337 --
338 procedure do_expire(
339 errbuf out nocopy varchar2,
340 retcode out nocopy varchar2,
341 p_payroll_action_id in number,
342 p_expiry_date in varchar2,
343 p_mode in varchar2 default null);
344 --
345 end pay_jp_isdf_ss_pkg;