DBA Data[Home] [Help]

PACKAGE: APPS.HR_GB_PROCESS_P11D_ENTRIES_PKG

Source


1 PACKAGE HR_GB_PROCESS_P11D_ENTRIES_PKG as
2 /* $Header: pygbp11d.pkh 120.5.12010000.1 2008/07/27 22:44:58 appldev ship $ */
3    c_ben_start_date_string CONSTANT pay_input_values_f.NAME%TYPE := 'Benefit Start Date';
4    c_ben_end_date_string CONSTANT pay_input_values_f.NAME%TYPE := 'Benefit End Date';
5    c_commit_num         CONSTANT NUMBER := 100000;
6 -- these values will be used in self service code
7    g_payroll_action_id NUMBER(9);
8    g_person_id         NUMBER;
9    g_emp_ref_no        varchar2(150);
10    g_employer_name     varchar2(150);
11    TYPE l_typ_p11d_fields_rec IS RECORD(
12       director_flag                 VARCHAR2(10),
13       full_name                     VARCHAR2(150),
14       sur_name                      VARCHAR2(150), -- P11D changes 07/08
15       fore_name                     VARCHAR2(150), -- P11D changes 07/08
16       employee_number               VARCHAR2(150),
17       national_ins_no               VARCHAR2(150),
18       employers_ref_no              VARCHAR2(150),
19       employers_name                VARCHAR2(150),
20       date_of_birth                 VARCHAR2(15),
21       gender                        VARCHAR2(15),
22       a_desc                        VARCHAR2(150),
23       a_cost                        VARCHAR2(15),
24       a_amg                         VARCHAR2(15),
25       a_ce                          VARCHAR2(15),
26       b_desc                        VARCHAR2(150),
27       b_ce                          VARCHAR2(15),
28       b_tnp                         VARCHAR2(15),
29       c_cost                        VARCHAR2(15),
30       c_amg                         VARCHAR2(15),
31       c_ce                          VARCHAR2(15),
32       d_ce                          VARCHAR2(15),
33       e_ce                          VARCHAR2(15),
34       f1_make                       VARCHAR2(150),
35       f1_dreg                       VARCHAR2(15),
36       f1_efig                       VARCHAR2(15),
37       f1_nfig                       VARCHAR2(15),
38       f1_esize                      VARCHAR2(15),
39       f1_fuel                       VARCHAR2(15),
40       f1_start                      VARCHAR2(15),
41       f1_end                        VARCHAR2(15),
42       f1_lprice                     VARCHAR2(15),
43       f1_oprice                     VARCHAR2(15),
44       f1_aprice                     VARCHAR2(15),
45       f1_cost                       VARCHAR2(15),
46       f1_amg                        VARCHAR2(15),
47       f1_cc                         VARCHAR2(15),
48       f1_fcc                        VARCHAR2(15),
49       f1_date_free                  VARCHAR2(15),
50       f1_rein_yr                    VARCHAR2(15),
51       f2_make                       VARCHAR2(150),
52       f2_dreg                       VARCHAR2(15),
53       f2_efig                       VARCHAR2(15),
54       f2_nfig                       VARCHAR2(15),
55       f2_esize                      VARCHAR2(15),
56       f2_fuel                       VARCHAR2(15),
57       f2_start                      VARCHAR2(15),
58       f2_end                        VARCHAR2(15),
59       f2_lprice                     VARCHAR2(15),
60       f2_oprice                     VARCHAR2(15),
61       f2_aprice                     VARCHAR2(15),
62       f2_cost                       VARCHAR2(15),
63       f2_amg                        VARCHAR2(15),
64       f2_cc                         VARCHAR2(15),
65       f2_fcc                        VARCHAR2(15),
66       f2_date_free                  VARCHAR2(15),
67       f2_rein_yr                    VARCHAR2(15),
68   --  new fields added for 2003-04 report
69       f_date_free                   VARCHAR2(15),
70       f_rein_yr                     VARCHAR2(15),
71       f_tcce                        VARCHAR2(15),
72       f_tfce                        VARCHAR2(15),
73       g_ce                          VARCHAR2(15),
74       g_cef                         VARCHAR2(15), -- P11D changes 07/08
75       h1_njb                        VARCHAR2(15),
76       h1_ayb                        VARCHAR2(15),
77       h1_aye                        VARCHAR2(15),
78       h1_mao                        VARCHAR2(15),
79       h1_ip                         VARCHAR2(15),
80       h1_dlm                        VARCHAR2(15),
81       h1_dld                        VARCHAR2(15),
82       h1_ce                         VARCHAR2(15),
83       h2_njb                        VARCHAR2(15),
84       h2_ayb                        VARCHAR2(15),
85       h2_aye                        VARCHAR2(15),
86       h2_mao                        VARCHAR2(15),
87       h2_ip                         VARCHAR2(15),
88       h2_dlm                        VARCHAR2(15),
89       h2_dld                        VARCHAR2(15),
90       h2_ce                         VARCHAR2(15),
91       i_cost                        VARCHAR2(15),
92       i_amg                         VARCHAR2(15),
93       i_ce                          VARCHAR2(15),
94       j_ce                          VARCHAR2(15),
95       k_cost                        VARCHAR2(15),
96       k_amg                         VARCHAR2(15),
97       k_ce                          VARCHAR2(15),
98       l_desc                        VARCHAR2(150),
99       l_cost                        VARCHAR2(15),
100       l_amg                         VARCHAR2(15),
101       l_ce                          VARCHAR2(15),
102       m_shares                      VARCHAR2(15),
103       n_cost                        VARCHAR2(15),
104       n_amg                         VARCHAR2(15),
105       n_ce                          VARCHAR2(15),
106       n_desc                        VARCHAR2(150),
107       na_cost                       VARCHAR2(15),
108       na_amg                        VARCHAR2(15),
109       na_ce                         VARCHAR2(15),
110       na_desc                       VARCHAR2(150),
111       n_taxpaid                     VARCHAR2(150),
112       o1_cost                       VARCHAR2(15),
113       o1_amg                        VARCHAR2(15),
114       o1_ce                         VARCHAR2(15),
115       o2_cost                       VARCHAR2(15),
116       o2_amg                        VARCHAR2(15),
117       o2_ce                         VARCHAR2(15),
118       o3_cost                       VARCHAR2(15),
119       o3_amg                        VARCHAR2(15),
120       o3_ce                         VARCHAR2(15),
121       o4_cost                       VARCHAR2(15),
122       o4_amg                        VARCHAR2(15),
123       o4_ce                         VARCHAR2(15),
124       o5_cost                       VARCHAR2(15),
125       o5_amg                        VARCHAR2(15),
126       o5_ce                         VARCHAR2(15),
127       o6_cost                       VARCHAR2(15),
128       o6_amg                        VARCHAR2(15),
129       o6_ce                         VARCHAR2(15),
130       o6_desc                       VARCHAR2(150),
131       o_toi                         VARCHAR2(15) );
132   -- this function returns the record because the
133   -- p11d ss process can be later used to
134   -- produce the paper report.
135   -- this was this function can be called in a loop
136   -- and later xml string can be generated using the
137   -- output.
138   TYPE g_typ_act_info_ids  IS TABLE OF Number(15)
139   INDEX BY BINARY_INTEGER;
140   TYPE g_typ_xml_str  IS TABLE OF Clob
141   INDEX BY BINARY_INTEGER;
142   type g_xfdf_str_array is table of varchar2(10000)
143   index by binary_integer;
144   type g_xfdf_blob_array is table of blob
145   index by binary_integer;
146   type ref_cursor_typ is ref cursor;
147    PROCEDURE delete_entries(
148       errbuf                     OUT NOCOPY VARCHAR2,
149       retcode                    OUT NOCOPY NUMBER,
150       p_element_type_id          IN       pay_element_types_f.element_type_id%TYPE,
151       p_start_date               IN       VARCHAR2,
152       p_end_date                 IN       VARCHAR2,
153       p_bus_grp_id               IN       pay_element_types_f.business_group_id%TYPE,
154       p_assignment_set_id        In       Number   );
155    FUNCTION get_global_value(p_global_name IN VARCHAR2, p_benefit_end_date IN VARCHAR2 DEFAULT '0001/01/01 00:00:00')
156       RETURN VARCHAR2;
157    FUNCTION sum_and_set_global_var(p_varable_name IN VARCHAR2, p_variable_value IN VARCHAR2)
158       RETURN NUMBER;
159    FUNCTION check_desc_and_set_global_var(p_varable_name IN VARCHAR2,
160                                           p_variable_value IN VARCHAR2,
161                                           p_lookup_type IN VARCHAR2 DEFAULT NULL,
162                                           p_effective_date IN VARCHAR2 DEFAULT NULL)
163       RETURN NUMBER;
164   Function max_and_set_global_var(p_variable_name IN Varchar2,
165                                   p_variable_datatype IN Varchar2,
166                                   p_variable_value IN Varchar2
167                                   )
168   return varchar2;
169    FUNCTION get_incorrect_val_error(p_token1 IN VARCHAR2, p_token2 IN VARCHAR2, p_token3 IN VARCHAR2)
170       RETURN VARCHAR2;
171    FUNCTION get_null_error(p_token1 IN VARCHAR2, p_token2 IN VARCHAR2, p_token3 IN VARCHAR2)
172       RETURN VARCHAR2;
173    FUNCTION get_error_message(p_applid IN NUMBER, p_message_name IN VARCHAR2)
174       RETURN VARCHAR2;
175    FUNCTION get_loan_amount(
176       p_archive_payroll_action_id IN      VARCHAR2,
177       p_employers_ref_no         IN       VARCHAR2,
178 --      p_employers_name              IN   VARCHAR2,
179       p_person_id                IN       VARCHAR2)
180       RETURN VARCHAR2;
181 /*
182   NAME
183     get_and_push_message
184   DESCRIPTION
185     Gets a translated FND message (supplying up to 5 tokens). Tokens are
186     not translated. It calls the core func and then pushes the message as
187     well
188     p_application  - application short name e.g. 'PAY', 'PER'.
189     p_message      - message name e.g. 'HR_6153_ALL_PROCEDURE_FAIL'
190     p_token_nameN  - name of Nth token.
191     p_token_valueN - (string) value for Nth token.
192   NOTES
193     Returns p_message if the translated message evaluates as null.
194 */
195    FUNCTION get_and_push_message(
196       p_application              IN       VARCHAR2,
197       p_message                  IN       VARCHAR2,
198       p_stack_level              IN       VARCHAR2 DEFAULT 'A',
199       p_token_name1              IN       VARCHAR2 DEFAULT NULL,
200       p_token_value1             IN       VARCHAR2 DEFAULT NULL,
201       p_token_name2              IN       VARCHAR2 DEFAULT NULL,
202       p_token_value2             IN       VARCHAR2 DEFAULT NULL,
203       p_token_name3              IN       VARCHAR2 DEFAULT NULL,
204       p_token_value3             IN       VARCHAR2 DEFAULT NULL,
205       p_token_name4              IN       VARCHAR2 DEFAULT NULL,
206       p_token_value4             IN       VARCHAR2 DEFAULT NULL,
207       p_token_name5              IN       VARCHAR2 DEFAULT NULL,
208       p_token_value5             IN       VARCHAR2 DEFAULT NULL)
209       RETURN VARCHAR2;
210   Function fetch_p11d_rep_data (p_assignment_action_id Number)
211   return l_typ_p11d_fields_rec;
212 /*  Function fetch_p11d_rep_data_xml (p_assignment_action_id Number)
213   return CLOB;*/
214   Function fetch_p11d_rep_data_blob (p_assignment_action_id Number)
215   return BLOB;
216   Function get_p11d_year
217   return varchar2;
218   Function get_ben_start_date
219   return date;
220   Function get_ben_end_date
221   return date;
222   PROCEDURE update_leg_process_status(
223       errbuf                     OUT NOCOPY VARCHAR2,
224       retcode                    OUT NOCOPY NUMBER,
225       p_payroll_action_id        IN  Number,
226       p_new_status               IN  Varchar2
227       );
228   Function fetch_arch_param_details(
229       p_payroll_action_id        IN  Number
230       )
231    return varchar2;
232   Function fetch_leg_process_status(
233       p_payroll_action_id        IN  Number
234       )
235    return varchar2;
236   Function fetch_leg_process_runtype(
237       p_payroll_action_id        IN  Number
238       )
239    return varchar2;
240   Function fetch_leg_process_notes(
241       p_payroll_action_id        IN  Number
242       )
243    return varchar2;
244   function get_lookup_meaning( p_lookup_type varchar2,
245                                p_lookup_code varchar2,
246                                p_effective_date date)
247   return varchar2 ;
248   Function fetch_ws1_ref_cursor (p_assignment_action_id Number,
249                                  p_record_num OUT NOCOPY Number)
250   return ref_cursor_typ;
251   Function fetch_ws2_ref_cursor (p_assignment_action_id Number,
252                                  p_record_num OUT NOCOPY Number)
253   return ref_cursor_typ;
254   Function fetch_ws3_ref_cursor (p_assignment_action_id Number,
255                                  p_record_num OUT NOCOPY Number)
256   return ref_cursor_typ;
257   Function fetch_ws4_ref_cursor (p_assignment_action_id Number,
258                                  p_record_num OUT NOCOPY Number)
259   return ref_cursor_typ;
260   Function fetch_ws6_ref_cursor (p_assignment_action_id Number,
261                                  p_record_num OUT NOCOPY Number)
262   return ref_cursor_typ;
263   Function fetch_summary_xfdf_blob (p_assignment_action_id Number)
264   return blob;
265 /*To create xfdf string for Address report*/
266 /*Bug No. 3201848*/
267   Function fetch_address_xfdf_blob (p_assignment_action_id Number)
268   return blob;
269   Function fetch_ws5_data_blob (p_assignment_action_id Number)
270   return blob;
271   function fetch_numberof_assignments(p_payroll_action_id Number)
272   return number;
273 
274   function write_magtape_records(p_arch_payroll_action_id number,
275                                  p_emp_ref_no varchar2,
276                                  p_person_id varchar2,
277    				 p_assignment_number    OUT NOCOPY VARCHAR2,
278 				 p_int_max_amt_outstanding OUT NOCOPY VARCHAR2)
279   return number;
280 
281 
282 
283   Function rep_assignment_actions(p_payroll_action_id Number,
284                               p_assignment_action_id  Number,
285                               p_organization_id Number,
286                               p_location_code Varchar2,
287                               p_org_hierarchy Number,
288                               p_assignment_set_id Number,
289                               p_sort_order1 Varchar2,
290                               p_sort_order2 Varchar2,
291                               p_chunk_size  Number,
292                               p_chunk_number Number,
293                               p_person_type  Varchar2)
294   Return ref_cursor_typ;
295 end;