1 PACKAGE BODY pay_ca_update_tax_rec_pkg AS
2 /* $Header: pycautxr.pkb 120.0.12010000.1 2008/11/12 09:26:53 sneelapa noship $ */
3 ------------------------------------------------------------------------------
4 /*
5
6 +======================================================================+
7 | Copyright (c) 1997 Oracle Corporation |
8 | Redwood Shores, California, USA |
9 | All rights reserved. |
10 +======================================================================+
11 Package Body Name : PAY_CA_UPDATE_TAX_REC_PKG
12 Package File Name : pycautxr.pkb
13 Description : This package was created to handle the update of the tax
14 records in specific case:
15
16 a) If the employee termination is reversed, the tax records
17 need to be modified to update the Effective End Date to
18 the end of time.
19
20 The following two tables are updated:
21 pay_ca_emp_fed_tax_info_f, pay_ca_emp_prov_tax_info_f.
22
23 Change List:
24 ------------
25
26 Name Date Version Bug Text
27 ----------- ---------- --------- ------- ------------------------------
28 sneelapa 23-APR-08 115.0 Initial Version
29
30 ======================================================================== */
31
32 PROCEDURE reverse_term_emp_tax_records ( p_assignment_id NUMBER
33 ,p_process_date DATE)
34 IS
35 BEGIN
36 --
37 hr_utility.trace('Entered reverse_term_emp_tax_records for assign ' ||
38 p_assignment_id );
39 --
40 hr_utility.set_location
41 ('pay_ca_update_tax_rec_pkg.reverse_term_emp_tax_records',5);
42 UPDATE pay_ca_emp_fed_tax_info_f peft
43 SET peft.effective_end_date =
44 to_date('31/12/4712','DD/MM/YYYY')
45 WHERE peft.assignment_id = p_assignment_id
46 AND peft.effective_end_date = p_process_date;
47 --
48 hr_utility.set_location
49 ('pay_ca_update_tax_rec_pkg.reverse_term_emp_tax_records',6);
50 UPDATE pay_ca_emp_prov_tax_info_f pest
51 SET pest.effective_end_date =
52 to_date('31/12/4712','DD/MM/YYYY')
53 WHERE pest.assignment_id = p_assignment_id
54 AND pest.effective_end_date = p_process_date;
55 --
56 EXCEPTION
57 when NO_DATA_FOUND then
58 NULL;
59
60 END reverse_term_emp_tax_records;
61
62 end pay_ca_update_tax_rec_pkg;