DBA Data[Home] [Help]

PACKAGE BODY: APPS.PAY_CA_UPDATE_TAX_REC_PKG

Source


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;