149: if nvl(g_business_group_id,-1) <> p_business_group_id then
150: hr_utility.set_location('pay_jp_custom_pkg.set_globals',20);
151:
152: -- Name Translation
153: g_name_tl.salary := fnd_message.get_string('PAY','PAY_JP_SALARY');
154: g_name_tl.bonus := fnd_message.get_string('PAY','PAY_JP_BONUS');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
150: hr_utility.set_location('pay_jp_custom_pkg.set_globals',20);
151:
152: -- Name Translation
153: g_name_tl.salary := fnd_message.get_string('PAY','PAY_JP_SALARY');
154: g_name_tl.bonus := fnd_message.get_string('PAY','PAY_JP_BONUS');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
151:
152: -- Name Translation
153: g_name_tl.salary := fnd_message.get_string('PAY','PAY_JP_SALARY');
154: g_name_tl.bonus := fnd_message.get_string('PAY','PAY_JP_BONUS');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
152: -- Name Translation
153: g_name_tl.salary := fnd_message.get_string('PAY','PAY_JP_SALARY');
154: g_name_tl.bonus := fnd_message.get_string('PAY','PAY_JP_BONUS');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
153: g_name_tl.salary := fnd_message.get_string('PAY','PAY_JP_SALARY');
154: g_name_tl.bonus := fnd_message.get_string('PAY','PAY_JP_BONUS');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
154: g_name_tl.bonus := fnd_message.get_string('PAY','PAY_JP_BONUS');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
155: g_name_tl.sp_bonus := fnd_message.get_string('PAY','PAY_JP_SP_BONUS');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
156: g_name_tl.sp_bonus2 := fnd_message.get_string('PAY','PAY_JP_SP_BON');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
164: g_name_tl.na := fnd_message.get_string('PAY','PAY_JP_AMBIGUOUS');
157: g_name_tl.yea := fnd_message.get_string('PAY','PAY_JP_YEAR_END_ADJ');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
164: g_name_tl.na := fnd_message.get_string('PAY','PAY_JP_AMBIGUOUS');
165: g_name_tl.bal_init_prefix := fnd_message.get_string('PAY','PAY_JP_INIT_PREFIX');
158: g_name_tl.yea2 := fnd_message.get_string('PAY','PAY_JP_YEA');
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
164: g_name_tl.na := fnd_message.get_string('PAY','PAY_JP_AMBIGUOUS');
165: g_name_tl.bal_init_prefix := fnd_message.get_string('PAY','PAY_JP_INIT_PREFIX');
166: g_name_tl.itax_category := 'ITX_TYPE';
159: g_name_tl.re_yea := fnd_message.get_string('PAY','PAY_JP_RE_YEAR_END_ADJ');
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
164: g_name_tl.na := fnd_message.get_string('PAY','PAY_JP_AMBIGUOUS');
165: g_name_tl.bal_init_prefix := fnd_message.get_string('PAY','PAY_JP_INIT_PREFIX');
166: g_name_tl.itax_category := 'ITX_TYPE';
167: g_name_tl.yea_category := 'INCLUDE_FLAG';
160: g_name_tl.term := fnd_message.get_string('PAY','PAY_JP_TERM_PAY');
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
164: g_name_tl.na := fnd_message.get_string('PAY','PAY_JP_AMBIGUOUS');
165: g_name_tl.bal_init_prefix := fnd_message.get_string('PAY','PAY_JP_INIT_PREFIX');
166: g_name_tl.itax_category := 'ITX_TYPE';
167: g_name_tl.yea_category := 'INCLUDE_FLAG';
168: g_name_tl.yea_category2 := 'INCLUDE_FLAG';
161: g_name_tl.term2 := fnd_message.get_string('PAY','PAY_JP_TERM');
162: g_name_tl.santei := fnd_message.get_string('PAY','PAY_JP_SANTEI');
163: g_name_tl.geppen := fnd_message.get_string('PAY','PAY_JP_GEPPEN');
164: g_name_tl.na := fnd_message.get_string('PAY','PAY_JP_AMBIGUOUS');
165: g_name_tl.bal_init_prefix := fnd_message.get_string('PAY','PAY_JP_INIT_PREFIX');
166: g_name_tl.itax_category := 'ITX_TYPE';
167: g_name_tl.yea_category := 'INCLUDE_FLAG';
168: g_name_tl.yea_category2 := 'INCLUDE_FLAG';
169: g_name_tl.non_res := 'NRES_FLAG';
171: g_name_tl.reyea_element := 'REY_ITX';
172:
173: l_legislation_code := hr_jp_id_pkg.legislation_code(p_business_group_id);
174: if l_legislation_code is NULL then
175: fnd_message.set_name(800,'HR_51255_PYP_INVALID_BUS_GROUP');
176: fnd_message.raise_error;
177: end if;
178:
179: g_business_group_id := p_business_group_id;
172:
173: l_legislation_code := hr_jp_id_pkg.legislation_code(p_business_group_id);
174: if l_legislation_code is NULL then
175: fnd_message.set_name(800,'HR_51255_PYP_INVALID_BUS_GROUP');
176: fnd_message.raise_error;
177: end if;
178:
179: g_business_group_id := p_business_group_id;
180: g_legislation_code := l_legislation_code;
309: -- Write your own validation here.
310: -- 1) Health Insurance Premium Validation
311: if not(p_value.hi_prem_ee = 0 or p_value.hi_prem_er = 0 or p_value.ci_prem_ee = 0 or p_value.ci_prem_er = 0) and (p_value.hi_org_id is NULL) then
312: p_action_status := 'I';
313: fnd_message.set_name('PAY','PAY_JP_INVALID_HI_UNION');
314: p_message := fnd_message.get;
315: return;
316: end if;
317:
310: -- 1) Health Insurance Premium Validation
311: if not(p_value.hi_prem_ee = 0 or p_value.hi_prem_er = 0 or p_value.ci_prem_ee = 0 or p_value.ci_prem_er = 0) and (p_value.hi_org_id is NULL) then
312: p_action_status := 'I';
313: fnd_message.set_name('PAY','PAY_JP_INVALID_HI_UNION');
314: p_message := fnd_message.get;
315: return;
316: end if;
317:
318: -- 2) Welfare Pension Insurance Premium Validation
317:
318: -- 2) Welfare Pension Insurance Premium Validation
319: if not(p_value.wp_prem_ee = 0 or p_value.wp_prem_er = 0) and (p_value.wp_org_id is NULL) then
320: p_action_status := 'I';
321: fnd_message.set_name('PAY','PAY_JP_INVALID_WP_UNION');
322: p_message := fnd_message.get;
323: return;
324: end if;
325:
318: -- 2) Welfare Pension Insurance Premium Validation
319: if not(p_value.wp_prem_ee = 0 or p_value.wp_prem_er = 0) and (p_value.wp_org_id is NULL) then
320: p_action_status := 'I';
321: fnd_message.set_name('PAY','PAY_JP_INVALID_WP_UNION');
322: p_message := fnd_message.get;
323: return;
324: end if;
325:
326: -- 3) Welfare Pension Fund Premium Validation
325:
326: -- 3) Welfare Pension Fund Premium Validation
327: if not(p_value.wpf_prem_ee = 0 or p_value.wpf_prem_er = 0) and (p_value.wpf_org_id is NULL) then
328: p_action_status := 'I';
329: fnd_message.set_name('PAY','PAY_JP_INVALID_WP_FUND');
330: p_message := fnd_message.get;
331: return;
332: end if;
333:
326: -- 3) Welfare Pension Fund Premium Validation
327: if not(p_value.wpf_prem_ee = 0 or p_value.wpf_prem_er = 0) and (p_value.wpf_org_id is NULL) then
328: p_action_status := 'I';
329: fnd_message.set_name('PAY','PAY_JP_INVALID_WP_FUND');
330: p_message := fnd_message.get;
331: return;
332: end if;
333:
334: -- 4) Unemployment Insurance Premium Validation
333:
334: -- 4) Unemployment Insurance Premium Validation
335: if not(p_value.ui_prem_ee = 0) and (nvl(p_value.ui_category,'E') = 'E' or p_value.ui_org_id is NULL) then
336: p_action_status := 'I';
337: fnd_message.set_name('PAY','PAY_JP_INVALID_UI_UNION');
338: p_message := fnd_message.get;
339: return;
340: end if;
341:
334: -- 4) Unemployment Insurance Premium Validation
335: if not(p_value.ui_prem_ee = 0) and (nvl(p_value.ui_category,'E') = 'E' or p_value.ui_org_id is NULL) then
336: p_action_status := 'I';
337: fnd_message.set_name('PAY','PAY_JP_INVALID_UI_UNION');
338: p_message := fnd_message.get;
339: return;
340: end if;
341:
342: -- 5) Income Tax Validation
342: -- 5) Income Tax Validation
343: if not(p_value.taxable_sal_amt = 0 and p_value.taxable_mat_amt = 0 and p_value.itax = 0 and p_value.itax_adjustment = 0)
344: and (p_value.itax_org_id is NULL or nvl(p_value.itax_category,'E') = 'E') then
345: p_action_status := 'I';
346: fnd_message.set_name('PAY','PAY_JP_INVALID_ITAX_SWOT');
347: p_message := fnd_message.get;
348: return;
349: end if;
350:
343: if not(p_value.taxable_sal_amt = 0 and p_value.taxable_mat_amt = 0 and p_value.itax = 0 and p_value.itax_adjustment = 0)
344: and (p_value.itax_org_id is NULL or nvl(p_value.itax_category,'E') = 'E') then
345: p_action_status := 'I';
346: fnd_message.set_name('PAY','PAY_JP_INVALID_ITAX_SWOT');
347: p_message := fnd_message.get;
348: return;
349: end if;
350:
351: -- 6) Local Tax Validation
359: or (p_value.ltax_lumpsum <> 0 and p_value.ltax_district_code is NULL))) then
360: --if not(p_value.ltax = 0 and p_value.ltax_lumpsum = 0 and p_value.sp_ltax = 0)
361: --and (p_value.itax_org_id is NULL or p_value.ltax_district_code is NULL) then
362: p_action_status := 'I';
363: fnd_message.set_name('PAY','PAY_JP_INVALID_LTAX_SWOT');
364: p_message := fnd_message.get;
365: return;
366: end if;
367:
360: --if not(p_value.ltax = 0 and p_value.ltax_lumpsum = 0 and p_value.sp_ltax = 0)
361: --and (p_value.itax_org_id is NULL or p_value.ltax_district_code is NULL) then
362: p_action_status := 'I';
363: fnd_message.set_name('PAY','PAY_JP_INVALID_LTAX_SWOT');
364: p_message := fnd_message.get;
365: return;
366: end if;
367:
368: hr_utility.set_location('pay_jp_custom_pkg.validate_record',20);