DBA Data[Home] [Help]

PACKAGE: APPS.PAY_US_ARCHIVE

Source


1 package pay_us_archive as
2 /* $Header: pyusarch.pkh 120.1.12000000.3 2007/09/18 09:17:06 sudedas noship $ */
3 
4 /*
5 /*
6    ******************************************************************
7    *                                                                *
8    *  Copyright (C) 1992 Oracle Corporation UK Ltd.,                *
9    *                   Chertsey, England.                           *
10    *                                                                *
11    *  All rights reserved.                                          *
12    *                                                                *
13    *  This material has been provided pursuant to an agreement      *
14    *  containing restrictions on its use.  The material is also     *
15    *  protected by copyright law.  No part of this material may     *
16    *  be copied or distributed, transmitted or transcribed, in      *
17    *  any form or by any means, electronic, mechanical, magnetic,   *
18    *  manual, or otherwise, or disclosed to third parties without   *
19    *  the express written permission of Oracle Corporation UK Ltd,  *
20    *  Oracle Park, Bittams Lane, Guildford Road, Chertsey, Surrey,  *
21    *  England.                                                      *
22    *                                                                *
23    ******************************************************************
24 
25    Change List
26    -----------
27    Date         Name        Vers   Bug No   Description
28    -----------  ----------  -----  -------  -----------------------------------
29    06-MAY-1998  nbristow    40.0            Created.
30    08-AUG-98    achauhan    40.1            Added routines for the Year End Pre-Process.
31    04-DEC-98    vmehta      40.3            Changed definition for check_residence_state
32    27-OCT-99    rpotnuru    110.9           Added two global variables g_sqwl_state and
33                                             g_sqwl_jursd to fix NY burroughs problem
34    03-AUG-00    ssarma      40.10           Removed the SQWL procedures and functions
35                                             as they are now stored in pyussqwl.pkh.
36    31-AUG-01    ssarma     115.5            Added 2 parameters to eoy_archive_gre_data
37                                             for re-archiving purposes.
38    30-NOV-01   jgoswami    115.6            added dbdrv command.
39    22-JAN-2002 jgoswami    115.7            added checkfile command.
40    19-AUG-2002 ppanda      115.8            Added OSERROR Check
41    20-AUG-2002 asasthan    115.9            Added global variables for storing
42                                             'PR' and 1099R GREs.
43    20-AUG-2002 asasthan    115.10           Added global variables for storing
44                                             report_type
45    27-AUG-2002 asasthan    115.12           Added get_parameter function
46    28-AUG-2002 asasthan    115.13           Added feed_info to plsql table
47    23-SEP-2002 asasthan    115.14           Added business_group_id for box 12 function
48    02-DEC-2002 asasthan    115.15           Changes for nocopy gscc comp
49    04-AUG-2004 meshah      115.16           defined some global variables.
50    05-AUG-2004 meshah      115.18           moved plsql tables l_jd_done_tab and
51                                             l_jd_name_done_tab from body to the
52                                             header.
53                                             Added new procedure deinit.
54    11-AUG-2004 meshah      115.19           added g_archive_date.
55    18-AUG-2004 meshah      115.20           changed l_jd_name_done_tab to be
56                                             of type record.
57    08-AUG-2005 rsethupa    115.21           Removed get_parameter()
58    28-AUG-2006 sodhingr    115.22           added g_view_online_w2 and g_w2_corrected
59 */
60 --
61 TYPE char240_data_type_table IS TABLE OF VARCHAR2(240)
62                                   INDEX BY BINARY_INTEGER;
63 TYPE number_data_type_table IS TABLE OF NUMBER
64                                   INDEX BY BINARY_INTEGER;
65 g_min_chunk              number:= -1;
66 g_archive_flag           varchar2(1) := 'N';
67 g_bal_act_id             number:= -1;
68 g_1099R_transmitter_code varchar2(5):= null ;
69 g_pre_tax_info           varchar2(1):= null ;
70 g_puerto_rico_gre        varchar2(1):= 'N' ;
71 g_report_type            varchar2(50) := null ;
72 g_govt_employer          varchar2(1) := 'N';
73 g_view_online_w2         varchar2(10);
74 g_w2_corrected           number;
75 
76 g_jursd_context_id              number;
77 g_tax_unit_context_id           number;
78 g_state_uei                     number;
79 g_county_uei                    number;
80 g_city_uei                      number;
81 g_county_sd_uei                 number;
82 g_city_sd_uei                   number;
83 g_per_marital_status            number;
84 g_con_national_identifier       number;
85 g_taxable_amount_unknown        number;
86 g_total_distributions           number;
87 g_emp_distribution_percent      number;
88 g_total_distribution_percent    number;
89 g_distribution_code_for_1099r   number;
90 g_first_yr_roth_contrib         number; -- Added For Bug# 5517938
91 g_disability_plan_id            varchar2(200);
92 g_archive_date                  number;
93 
94 l_jd_done_tab              pay_us_archive.char240_data_type_table;
95 --l_jd_name_done_tab         pay_us_archive.char240_data_type_table;
96 
97 TYPE jd_name_rec IS RECORD
98      (jd_name   pay_us_city_names.city_name%TYPE);
99 
100  TYPE jd_name_tab IS TABLE OF jd_name_rec INDEX BY BINARY_INTEGER;
101 
102  l_jd_name_done_tab         jd_name_tab;
103 
104   TYPE pre_tax_rec_info IS RECORD
105      ( balance_name   varchar2(80),
106        defined_balance  number,
107        user_entity_id   number,
108        feed_info        varchar2(1)
109      );
110 
111   TYPE pre_tax_tab_info IS TABLE OF
112        pre_tax_rec_info
113  INDEX BY BINARY_INTEGER;
114 
115   ltr_pre_tax_bal     pre_tax_tab_info;
116   ltr_pr_balances     pre_tax_tab_info;
117   ltr_1099_bal        pre_tax_tab_info;
118 
119 procedure eoy_range_cursor(pactid in  number,
120                            sqlstr out nocopy varchar2);
121 
122 procedure eoy_action_creation(pactid in number,
123                               stperson in number,
124                               endperson in number,
125                               chunk in number);
126 
127 procedure eoy_archive_data(p_assactid in number,
128                            p_effective_date in date);
129 
130 procedure eoy_archive_gre_data(p_payroll_action_id in number,
131                                p_tax_unit_id       in number,
132                                p_jd_type           in varchar2 default 'ALL',
133                                p_state_code        in varchar2 default 'ALL');
134 
135 procedure eoy_archinit(p_payroll_action_id in number);
136 
137 function  get_puerto_rico_info(p_tax_unit_id  number) return varchar2;
138 function  get_1099r_info(p_tax_unit_id  number) return varchar2;
139 function  get_pre_tax_info(p_tax_unit_id  number,
140                            p_business_group_id number) return varchar2;
141 
142 function  get_report_type(p_payroll_action_id  number) return varchar2;
143 
144 PROCEDURE eoy_deinit( p_payroll_action_id in number);
145 
146 end pay_us_archive;