163: l_records varchar2(900);
164:
165:
166: BEGIN
167: --hr_utility.trace_on (null, 'san2');
168: l_report_format := p_input_1;
169: hr_utility.trace('Begin Function'|| gv_package ||'.print_w2c_record_header ');
170: --hr_utility.trace_oFF();
171: IF p_format = 'MMREF2' THEN
165:
166: BEGIN
167: --hr_utility.trace_on (null, 'san2');
168: l_report_format := p_input_1;
169: hr_utility.trace('Begin Function'|| gv_package ||'.print_w2c_record_header ');
170: --hr_utility.trace_oFF();
171: IF p_format = 'MMREF2' THEN
172:
173: IF p_record_name = 'RCW' THEN
166: BEGIN
167: --hr_utility.trace_on (null, 'san2');
168: l_report_format := p_input_1;
169: hr_utility.trace('Begin Function'|| gv_package ||'.print_w2c_record_header ');
170: --hr_utility.trace_oFF();
171: IF p_format = 'MMREF2' THEN
172:
173: IF p_record_name = 'RCW' THEN
174: hr_utility.trace('Formating RCW Record in'|| gv_package ||'.print_w2c_record_header ');
170: --hr_utility.trace_oFF();
171: IF p_format = 'MMREF2' THEN
172:
173: IF p_record_name = 'RCW' THEN
174: hr_utility.trace('Formating RCW Record in'|| gv_package ||'.print_w2c_record_header ');
175: header_string :=
176: pay_us_mmrf_print_rec_header.mmrf2_format_rcw_record_header(
177: p_report_type,
178: p_format,
179: p_report_qualifier,
180: p_record_name
181: );
182: ELSIF p_record_name = 'RCO' THEN
183: hr_utility.trace('Formating RCO Record in'|| gv_package ||'.print_w2c_record_header ');
184: header_string:=
185: pay_us_mmrf_print_rec_header.mmrf2_format_rco_record_header(
186: p_report_type,
187: p_format,
189: p_record_name
190: );
191: END IF; /* p_record_name */
192: END IF; /* p_format */
193: hr_utility.trace('splitting the header string ');
194: return_header_string := substr(header_string,1,200);
195: sp_out_1:=substr(header_string,201,250);
196: sp_out_2:=substr(header_string,451,250);
197: sp_out_3:=substr(header_string,701,250);
203: sp_out_9:=substr(header_string,2201,250);
204: sp_out_10:=substr(header_string,2451);
205:
206: p_exclude_from_output:='N';
207: hr_utility.trace('Length of return_header_string := ' || length(return_header_string)) ;
208: hr_utility.trace('return_header_string = '||return_header_string);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
204: sp_out_10:=substr(header_string,2451);
205:
206: p_exclude_from_output:='N';
207: hr_utility.trace('Length of return_header_string := ' || length(return_header_string)) ;
208: hr_utility.trace('return_header_string = '||return_header_string);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
205:
206: p_exclude_from_output:='N';
207: hr_utility.trace('Length of return_header_string := ' || length(return_header_string)) ;
208: hr_utility.trace('return_header_string = '||return_header_string);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
206: p_exclude_from_output:='N';
207: hr_utility.trace('Length of return_header_string := ' || length(return_header_string)) ;
208: hr_utility.trace('return_header_string = '||return_header_string);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
207: hr_utility.trace('Length of return_header_string := ' || length(return_header_string)) ;
208: hr_utility.trace('return_header_string = '||return_header_string);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
208: hr_utility.trace('return_header_string = '||return_header_string);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
209: hr_utility.trace('sp_out_1:='||sp_out_1);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
210: hr_utility.trace('sp_out_2:='||sp_out_2);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
218: hr_utility.trace('sp_out_10:='||sp_out_10);
211: hr_utility.trace('sp_out_3:='||sp_out_3);
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
218: hr_utility.trace('sp_out_10:='||sp_out_10);
219: hr_utility.trace('Recod Header Formating completed in'|| gv_package
212: hr_utility.trace('sp_out_4:='||sp_out_4);
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
218: hr_utility.trace('sp_out_10:='||sp_out_10);
219: hr_utility.trace('Recod Header Formating completed in'|| gv_package
220: ||'.print_w2c_record_header ');
213: hr_utility.trace('sp_out_5:='||sp_out_5);
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
218: hr_utility.trace('sp_out_10:='||sp_out_10);
219: hr_utility.trace('Recod Header Formating completed in'|| gv_package
220: ||'.print_w2c_record_header ');
221: RETURN return_header_string;
214: hr_utility.trace('sp_out_6:='||sp_out_6);
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
218: hr_utility.trace('sp_out_10:='||sp_out_10);
219: hr_utility.trace('Recod Header Formating completed in'|| gv_package
220: ||'.print_w2c_record_header ');
221: RETURN return_header_string;
222: END print_w2c_record_header;
215: hr_utility.trace('sp_out_7:='||sp_out_7);
216: hr_utility.trace('sp_out_8:='||sp_out_8);
217: hr_utility.trace('sp_out_9:='||sp_out_9);
218: hr_utility.trace('sp_out_10:='||sp_out_10);
219: hr_utility.trace('Recod Header Formating completed in'|| gv_package
220: ||'.print_w2c_record_header ');
221: RETURN return_header_string;
222: END print_w2c_record_header;
223:
295: main_return_string varchar2(300);
296: l_total_rcw_records number := 0;
297: ln_return_value number := 0;
298: BEGIN
299: --hr_utility.set_trace_options('TRACE_DEST:DBMS_OUTPUT');
300: --hr_utility.trace_on;
301:
302: --hr_utility.trace_on (null, 'DEBUG');
303:
296: l_total_rcw_records number := 0;
297: ln_return_value number := 0;
298: BEGIN
299: --hr_utility.set_trace_options('TRACE_DEST:DBMS_OUTPUT');
300: --hr_utility.trace_on;
301:
302: --hr_utility.trace_on (null, 'DEBUG');
303:
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
298: BEGIN
299: --hr_utility.set_trace_options('TRACE_DEST:DBMS_OUTPUT');
300: --hr_utility.trace_on;
301:
302: --hr_utility.trace_on (null, 'DEBUG');
303:
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
300: --hr_utility.trace_on;
301:
302: --hr_utility.trace_on (null, 'DEBUG');
303:
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
301:
302: --hr_utility.trace_on (null, 'DEBUG');
303:
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
302: --hr_utility.trace_on (null, 'DEBUG');
303:
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
303:
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
304: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
305: hr_utility.trace(' p_record_name = ' ||p_record_name);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
306: hr_utility.trace(' p_input_2 = ' ||p_input_2);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
307: hr_utility.trace(' p_input_2 = ' ||p_input_2);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
308: hr_utility.trace(' p_input_3 = ' ||p_input_3);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
309: hr_utility.trace(' p_input_4 = ' ||p_input_4);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
310: hr_utility.trace(' p_input_5 = ' ||p_input_5);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
311: hr_utility.trace(' p_input_6 = ' ||p_input_6);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
312: hr_utility.trace(' p_input_7 = ' ||p_input_7);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
313: hr_utility.trace(' p_input_8 = ' ||p_input_8);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
314: hr_utility.trace(' p_input_9 = ' ||p_input_9);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
315: hr_utility.trace(' p_input_10 = ' ||p_input_10);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
316: hr_utility.trace(' p_input_11 = ' ||p_input_11);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
317: hr_utility.trace(' p_input_12 = ' ||p_input_12);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
318: hr_utility.trace(' p_input_13 = ' ||p_input_13);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
319: hr_utility.trace(' p_input_14 = ' ||p_input_14);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
320: hr_utility.trace(' p_input_15 = ' ||p_input_15);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
321: hr_utility.trace(' p_input_16 = ' ||p_input_16);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
322: hr_utility.trace(' p_input_17 = ' ||p_input_17);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
323: hr_utility.trace(' p_input_18 = ' ||p_input_18);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
324: hr_utility.trace(' p_input_19 = ' ||p_input_19);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
325: hr_utility.trace(' p_input_20 = ' ||p_input_20);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
326: hr_utility.trace(' p_input_21 = ' ||p_input_21);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
327: hr_utility.trace(' p_input_22 = ' ||p_input_22);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
328: hr_utility.trace(' p_input_23 = ' ||p_input_23);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
329: hr_utility.trace(' p_input_24 = ' ||p_input_24);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
330: hr_utility.trace(' p_input_25 = ' ||p_input_25);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
331: hr_utility.trace(' p_input_26 = ' ||p_input_26);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
332: hr_utility.trace(' p_input_27 = ' ||p_input_27);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
333: hr_utility.trace(' p_input_28 = ' ||p_input_28);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
334: hr_utility.trace(' p_input_29 = ' ||p_input_29);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
335: hr_utility.trace(' p_input_30 = ' ||p_input_30);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
336: hr_utility.trace(' p_input_31 = ' ||p_input_31);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
344: hr_utility.trace(' p_input_39 = ' ||p_input_39);
337: hr_utility.trace(' p_input_32 = ' ||p_input_32);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
344: hr_utility.trace(' p_input_39 = ' ||p_input_39);
345: hr_utility.trace(' p_input_40 = ' ||p_input_40);
338: hr_utility.trace(' p_input_33 = ' ||p_input_33);
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
344: hr_utility.trace(' p_input_39 = ' ||p_input_39);
345: hr_utility.trace(' p_input_40 = ' ||p_input_40);
346:
339: hr_utility.trace(' p_input_34 = ' ||p_input_34);
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
344: hr_utility.trace(' p_input_39 = ' ||p_input_39);
345: hr_utility.trace(' p_input_40 = ' ||p_input_40);
346:
347: IF p_format = 'MMREF2' THEN -- p_format
340: hr_utility.trace(' p_input_35 = ' ||p_input_35);
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
344: hr_utility.trace(' p_input_39 = ' ||p_input_39);
345: hr_utility.trace(' p_input_40 = ' ||p_input_40);
346:
347: IF p_format = 'MMREF2' THEN -- p_format
348: --{
341: hr_utility.trace(' p_input_36 = ' ||p_input_36);
342: hr_utility.trace(' p_input_37 = ' ||p_input_37);
343: hr_utility.trace(' p_input_38 = ' ||p_input_38);
344: hr_utility.trace(' p_input_39 = ' ||p_input_39);
345: hr_utility.trace(' p_input_40 = ' ||p_input_40);
346:
347: IF p_format = 'MMREF2' THEN -- p_format
348: --{
349: IF (p_report_type = 'W2C') THEN
348: --{
349: IF (p_report_type = 'W2C') THEN
350: --{
351: IF p_record_name = 'RCA' THEN -- p_record_name
352: hr_utility.set_location( gv_package || '.format_w2c_record',10);
353: return_value := pay_us_mmrf2_w2c_format_record.format_W2C_RCA_record(
354: p_effective_date,
355: p_report_type,
356: p_format,
405: sp_out_5,
406: ret_str_len,
407: l_exclude_from_output_chk
408: );
409: hr_utility.set_location( gv_package || '.format_w2c_record',20);
410: ELSIF p_record_name = 'RCE' THEN
411: hr_utility.set_location( gv_package || '.format_w2c_record',30);
412: --
413: -- Initialize GRE level Totals globally defined
407: l_exclude_from_output_chk
408: );
409: hr_utility.set_location( gv_package || '.format_w2c_record',20);
410: ELSIF p_record_name = 'RCE' THEN
411: hr_utility.set_location( gv_package || '.format_w2c_record',30);
412: --
413: -- Initialize GRE level Totals globally defined
414: --
415: ln_return_value := Initialize_GRE_Level_total;
412: --
413: -- Initialize GRE level Totals globally defined
414: --
415: ln_return_value := Initialize_GRE_Level_total;
416: hr_utility.set_location( gv_package || '.format_w2c_record',40);
417: --
418: -- Format RCE Record for the GRE
419: --
420: return_value :=
473: sp_out_5,
474: ret_str_len,
475: l_exclude_from_output_chk
476: );
477: hr_utility.set_location( gv_package || '.format_w2c_record',50);
478: ELSIF p_record_name = 'RCF' THEN
479: hr_utility.set_location( gv_package || '.format_w2c_record',60);
480: ln_return_value := Initialize_GRE_Level_total;
481: l_total_rcw_records :=
475: l_exclude_from_output_chk
476: );
477: hr_utility.set_location( gv_package || '.format_w2c_record',50);
478: ELSIF p_record_name = 'RCF' THEN
479: hr_utility.set_location( gv_package || '.format_w2c_record',60);
480: ln_return_value := Initialize_GRE_Level_total;
481: l_total_rcw_records :=
482: NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf,0);
483: hr_utility.trace('Total No of RCW processed for File Total ' ||to_char(l_total_rcw_records) );
479: hr_utility.set_location( gv_package || '.format_w2c_record',60);
480: ln_return_value := Initialize_GRE_Level_total;
481: l_total_rcw_records :=
482: NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf,0);
483: hr_utility.trace('Total No of RCW processed for File Total ' ||to_char(l_total_rcw_records) );
484: hr_utility.trace('Formula feed Total No of RCW processed ' ||p_input_2 );
485: return_value :=
486: pay_us_mmrf2_w2c_format_record.format_W2C_RCF_record(
487: p_effective_date,
480: ln_return_value := Initialize_GRE_Level_total;
481: l_total_rcw_records :=
482: NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf,0);
483: hr_utility.trace('Total No of RCW processed for File Total ' ||to_char(l_total_rcw_records) );
484: hr_utility.trace('Formula feed Total No of RCW processed ' ||p_input_2 );
485: return_value :=
486: pay_us_mmrf2_w2c_format_record.format_W2C_RCF_record(
487: p_effective_date,
488: p_report_type,
498: p_exclude_from_output,
499: ret_str_len,
500: l_exclude_from_output_chk
501: );
502: hr_utility.set_location( gv_package || '.format_w2c_record',70);
503:
504: ELSIF p_record_name = 'RCW' then
505: hr_utility.set_location( gv_package || '.format_w2c_record',80);
506: if p_input_40 = 'FLAT' then
501: );
502: hr_utility.set_location( gv_package || '.format_w2c_record',70);
503:
504: ELSIF p_record_name = 'RCW' then
505: hr_utility.set_location( gv_package || '.format_w2c_record',80);
506: if p_input_40 = 'FLAT' then
507: --{
508: return_value := pay_us_w2c_in_mmref2_format.pay_us_w2c_RCW_record (
509: p_effective_date,
540: sp_out_5,
541: ret_str_len,
542: l_exclude_from_output_chk
543: );
544: hr_utility.set_location( gv_package || '.format_w2c_record',90);
545:
546: --Added for Bug 13073358. If any RCW error then employee need to be
547: -- reported on .a02
548:
556: --
557: -- When RCW record is formatted for FLAT format, it also formats CSV and stores
558: -- the value when required it would use the CSV format record for audit purpose
559: --
560: hr_utility.set_location( gv_package || '.format_w2c_record',100);
561: return_value := pay_us_w2c_in_mmref2_format.rcw_csv_record;
562: elsif p_input_40 = 'BLANK' then
563: --
564: -- When RCW record is formatted for FLAT format, it also formats
564: -- When RCW record is formatted for FLAT format, it also formats
565: -- Blank CSV of RCW for audit purpose only. The blank RCW would
566: -- be used for reporting Error on RCO.
567: --
568: hr_utility.set_location( gv_package || '.format_w2c_record',110);
569: return_value := pay_us_w2c_in_mmref2_format.rcw_blank_csv_record;
570: end if;
571: ELSIF p_record_name = 'RCO' then
572: --{
569: return_value := pay_us_w2c_in_mmref2_format.rcw_blank_csv_record;
570: end if;
571: ELSIF p_record_name = 'RCO' then
572: --{
573: hr_utility.set_location( gv_package || '.format_w2c_record',150);
574: if p_input_40 = 'FLAT' then
575: --{
576:
577: hr_utility.trace('Formating RCO for mf file ');
573: hr_utility.set_location( gv_package || '.format_w2c_record',150);
574: if p_input_40 = 'FLAT' then
575: --{
576:
577: hr_utility.trace('Formating RCO for mf file ');
578: hr_utility.trace('RCO Exclude from output Flag '||
579: pay_us_w2c_in_mmref2_format.rco_exclude_flag);
580:
581: return_value := pay_us_w2c_in_mmref2_format.rco_mf_record;
574: if p_input_40 = 'FLAT' then
575: --{
576:
577: hr_utility.trace('Formating RCO for mf file ');
578: hr_utility.trace('RCO Exclude from output Flag '||
579: pay_us_w2c_in_mmref2_format.rco_exclude_flag);
580:
581: return_value := pay_us_w2c_in_mmref2_format.rco_mf_record;
582:
585: l_exclude_from_output_chk := TRUE;
586: else
587: l_exclude_from_output_chk := FALSE;
588: end if;
589: hr_utility.set_location( gv_package || '.format_w2c_record',160);
590: --}
591: elsif p_input_40 = 'CSV' then
592: --
593: -- When RCW record is formatted for FLAT format, it also formats CSV and stores
592: --
593: -- When RCW record is formatted for FLAT format, it also formats CSV and stores
594: -- the value when required it would use the CSV format record for audit purpose
595: --
596: hr_utility.trace('Formating RCO in CSV format for Audit file ');
597: hr_utility.set_location( gv_package || '.format_w2c_record',170);
598: return_value := pay_us_w2c_in_mmref2_format.rco_csv_record;
599: elsif p_input_40 = 'BLANK' then
600: --
593: -- When RCW record is formatted for FLAT format, it also formats CSV and stores
594: -- the value when required it would use the CSV format record for audit purpose
595: --
596: hr_utility.trace('Formating RCO in CSV format for Audit file ');
597: hr_utility.set_location( gv_package || '.format_w2c_record',170);
598: return_value := pay_us_w2c_in_mmref2_format.rco_csv_record;
599: elsif p_input_40 = 'BLANK' then
600: --
601: -- When RCW record is formatted for FLAT format, it also formats
601: -- When RCW record is formatted for FLAT format, it also formats
602: -- Blank CSV of RCW for audit purpose only. The blank RCW would
603: -- be used for reporting Error on RCO.
604: --
605: hr_utility.trace('Formating BLANK RCO in CSV format for Audit file ');
606: hr_utility.set_location( gv_package || '.format_w2c_record',180);
607: return_value := pay_us_w2c_in_mmref2_format.rco_blank_csv_record;
608: ret_str_len := pay_us_w2c_in_mmref2_format.rco_number_of_correction;
609: hr_utility.trace('No of Correction on RCO record '|| to_char(ret_str_len));
602: -- Blank CSV of RCW for audit purpose only. The blank RCW would
603: -- be used for reporting Error on RCO.
604: --
605: hr_utility.trace('Formating BLANK RCO in CSV format for Audit file ');
606: hr_utility.set_location( gv_package || '.format_w2c_record',180);
607: return_value := pay_us_w2c_in_mmref2_format.rco_blank_csv_record;
608: ret_str_len := pay_us_w2c_in_mmref2_format.rco_number_of_correction;
609: hr_utility.trace('No of Correction on RCO record '|| to_char(ret_str_len));
610: end if;
605: hr_utility.trace('Formating BLANK RCO in CSV format for Audit file ');
606: hr_utility.set_location( gv_package || '.format_w2c_record',180);
607: return_value := pay_us_w2c_in_mmref2_format.rco_blank_csv_record;
608: ret_str_len := pay_us_w2c_in_mmref2_format.rco_number_of_correction;
609: hr_utility.trace('No of Correction on RCO record '|| to_char(ret_str_len));
610: end if;
611: --}
612: END IF; --p_record_name
613: --}
618: --
619: -- As formula function out parameter value can't exceed 200 characters
620: -- multiple out prameters are used to return a long varchar2
621: --
622: hr_utility.set_location( gv_package || '.format_w2_record',190);
623: main_return_string := substr(return_value,1,200);
624: sp_out_1:=substr(return_value,201,200);
625: sp_out_2:=substr(return_value,401,200);
626: sp_out_3:=substr(return_value,601,200);
631: p_exclude_from_output := 'Y';
632: ELSE
633: p_exclude_from_output := 'N';
634: END IF;
635: hr_utility.set_location( gv_package || '.format_w2_record',200);
636: hr_utility.trace('main_return_string = '||main_return_string);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
632: ELSE
633: p_exclude_from_output := 'N';
634: END IF;
635: hr_utility.set_location( gv_package || '.format_w2_record',200);
636: hr_utility.trace('main_return_string = '||main_return_string);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
633: p_exclude_from_output := 'N';
634: END IF;
635: hr_utility.set_location( gv_package || '.format_w2_record',200);
636: hr_utility.trace('main_return_string = '||main_return_string);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
634: END IF;
635: hr_utility.set_location( gv_package || '.format_w2_record',200);
636: hr_utility.trace('main_return_string = '||main_return_string);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
635: hr_utility.set_location( gv_package || '.format_w2_record',200);
636: hr_utility.trace('main_return_string = '||main_return_string);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
636: hr_utility.trace('main_return_string = '||main_return_string);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
637: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
638: hr_utility.trace('sp_out_1 = '||sp_out_1);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
639: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
640: hr_utility.trace('sp_out_2 = '||sp_out_2);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
648: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
641: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
648: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
649: hr_utility.set_location( gv_package || '.format_w2_record',210);
642: hr_utility.trace('sp_out_3 = '||sp_out_3);
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
648: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
649: hr_utility.set_location( gv_package || '.format_w2_record',210);
650:
643: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
648: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
649: hr_utility.set_location( gv_package || '.format_w2_record',210);
650:
651: RETURN main_return_string;
644: hr_utility.trace('sp_out_4 = '||sp_out_4);
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
648: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
649: hr_utility.set_location( gv_package || '.format_w2_record',210);
650:
651: RETURN main_return_string;
652: END Format_W2C_Record;
645: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
646: hr_utility.trace('sp_out_5 = '||sp_out_5);
647: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
648: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
649: hr_utility.set_location( gv_package || '.format_w2_record',210);
650:
651: RETURN main_return_string;
652: END Format_W2C_Record;
653: -- End of formatting record for W2C reporting
758: lb_exclude_from_output_chk boolean := FALSE;
759: lv_wage_value_in_cents varchar2(100) := ' ';
760: BEGIN
761:
762: hr_utility.set_location( gv_package || '.format_w2c_total_record',10);
763: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
764: hr_utility.trace(' p_record_name = ' ||p_record_name);
765:
766: IF p_format = 'MMREF2' THEN -- p_format
759: lv_wage_value_in_cents varchar2(100) := ' ';
760: BEGIN
761:
762: hr_utility.set_location( gv_package || '.format_w2c_total_record',10);
763: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
764: hr_utility.trace(' p_record_name = ' ||p_record_name);
765:
766: IF p_format = 'MMREF2' THEN -- p_format
767: --{
760: BEGIN
761:
762: hr_utility.set_location( gv_package || '.format_w2c_total_record',10);
763: hr_utility.trace(' p_report_qualifier = '||p_report_qualifier);
764: hr_utility.trace(' p_record_name = ' ||p_record_name);
765:
766: IF p_format = 'MMREF2' THEN -- p_format
767: --{
768: IF (p_report_type = 'W2C') THEN
768: IF (p_report_type = 'W2C') THEN
769: --{
770: IF p_record_name = 'RCT' THEN -- p_record_name
771: --{
772: hr_utility.set_location( gv_package || '.format_w2c_total_record',20);
773: parameter_record.delete;
774: parameter_record(1).p_parameter_name := 'Wages,Tips And Other Compensation';
775: parameter_record(2).p_parameter_name := 'Federal Income Tax Withheld';
776: parameter_record(3).p_parameter_name := 'Social Security Wages';
800:
801: ln_no_of_rcw_wages := 26; --13255427 /* saurabh */
802:
803:
804: hr_utility.set_location( gv_package || '.format_w2c_total_record',30);
805:
806: FOR i IN 1..ln_no_of_rcw_wages
807: LOOP
808: if (NVL(pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old,0) <>
813: /* Negative Value check For Originally Reported Value on RCT */
814: lv_wage_value_in_cents :=
815: to_char(nvl(pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old,0 ));
816:
817: hr_utility.set_location( gv_package || '.format_w2c_total_record',40);
818:
819: pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old_formated :=
820: pay_us_reporting_utils_pkg.data_validation(
821: p_effective_date,
836: IF p_exclude_from_output = 'Y' THEN
837: lb_exclude_from_output_chk := TRUE;
838: END IF;
839:
840: hr_utility.trace(parameter_record(i).p_parameter_name||'(Old) = '
841: ||pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old);
842:
843: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
844:
839:
840: hr_utility.trace(parameter_record(i).p_parameter_name||'(Old) = '
841: ||pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old);
842:
843: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
844:
845: hr_utility.set_location( gv_package || '.format_w2c_total_record',50);
846: /* Negative Value check For Corrected Value to be reported on RCT */
847:
841: ||pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old);
842:
843: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
844:
845: hr_utility.set_location( gv_package || '.format_w2c_total_record',50);
846: /* Negative Value check For Corrected Value to be reported on RCT */
847:
848: lv_wage_value_in_cents :=
849: to_char(nvl(pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_new,0));
868: IF p_exclude_from_output = 'Y' THEN
869: lb_exclude_from_output_chk := TRUE;
870: END IF;
871:
872: hr_utility.set_location( gv_package || '.format_w2c_total_record',60);
873: hr_utility.trace(parameter_record(i).p_parameter_name||'(New) = '
874: ||pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_new);
875: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
876:
869: lb_exclude_from_output_chk := TRUE;
870: END IF;
871:
872: hr_utility.set_location( gv_package || '.format_w2c_total_record',60);
873: hr_utility.trace(parameter_record(i).p_parameter_name||'(New) = '
874: ||pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_new);
875: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
876:
877: /* Set output parameters when RCT Originally reported value and Corrected values
871:
872: hr_utility.set_location( gv_package || '.format_w2c_total_record',60);
873: hr_utility.trace(parameter_record(i).p_parameter_name||'(New) = '
874: ||pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_new);
875: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
876:
877: /* Set output parameters when RCT Originally reported value and Corrected values
878: are not identical */
879: --{
956: p_output_49 := nvl(pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old,0);
957: p_output_50 := nvl(pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_new,0);
958: end if;
959:
960: hr_utility.set_location( gv_package || '.format_w2c_total_record',70);
961: --}
962: --}
963: else
964: --{
961: --}
962: --}
963: else
964: --{
965: hr_utility.set_location( gv_package || '.format_w2c_total_record',80);
966:
967: pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_identical_flag := 'Y';
968: pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old_formated :=
969: lpad(' ',15);
1052: p_output_50 := '0';
1053: end if;
1054:
1055: --}
1056: hr_utility.set_location( gv_package || '.format_w2c_total_record',90);
1057: --}
1058: end if;
1059:
1060: END LOOP;
1058: end if;
1059:
1060: END LOOP;
1061:
1062: hr_utility.trace('p_output_47 '||p_output_47);
1063: hr_utility.trace('p_output_48 '||p_output_48);
1064:
1065: p_output_41 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct,0),7,'0');
1066: p_output_42 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_error_rcw_rct,0),7,'0');
1059:
1060: END LOOP;
1061:
1062: hr_utility.trace('p_output_47 '||p_output_47);
1063: hr_utility.trace('p_output_48 '||p_output_48);
1064:
1065: p_output_41 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct,0),7,'0');
1066: p_output_42 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_error_rcw_rct,0),7,'0');
1067:
1064:
1065: p_output_41 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct,0),7,'0');
1066: p_output_42 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_error_rcw_rct,0),7,'0');
1067:
1068: hr_utility.set_location( gv_package || '.format_w2c_total_record',100);
1069:
1070: return_value :=
1071: pay_us_mmrf2_w2c_format_record.format_W2C_RCT_record(
1072: p_effective_date,
1084: ret_str_len,
1085: lb_exclude_from_output_chk
1086: );
1087:
1088: hr_utility.set_location( gv_package || '.format_w2c_total_record',110);
1089: -- End of Formating RCT Record
1090: --
1091: --}
1092: ELSIF p_record_name = 'RCU' THEN
1090: --
1091: --}
1092: ELSIF p_record_name = 'RCU' THEN
1093: --{
1094: hr_utility.set_location( gv_package || '.format_w2c_total_record',120);
1095: parameter_record.delete;
1096: ln_no_of_rco_wages := 10; --Increased for the Bug 13255427
1097: parameter_record(1).p_parameter_name:= ' Allocated Tips';
1098: parameter_record(2).p_parameter_name:= 'Uncollected employee tax on tips';
1106: parameter_record(10).p_parameter_name:= 'Desig. Roth Contributions Under 457b Plan'; --13255427
1107: --
1108: -- Compare RCO Wage total for formatting RCU Total Wage Record
1109: --
1110: hr_utility.set_location( gv_package || '.format_w2c_total_record',130);
1111: FOR i IN 1..ln_no_of_rco_wages
1112: LOOP
1113: if (NVL(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old,0) <>
1114: NVL(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new,0)) then
1112: LOOP
1113: if (NVL(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old,0) <>
1114: NVL(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new,0)) then
1115: --{
1116: hr_utility.set_location( gv_package || '.format_w2c_total_record',140);
1117: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_identical_flag := 'N';
1118:
1119: /* Negative Value check For Originally Reported Value on RCT */
1120: lv_wage_value_in_cents :=
1137: sp_out_2);
1138: IF p_exclude_from_output = 'Y' THEN
1139: lb_exclude_from_output_chk := TRUE;
1140: END IF;
1141: hr_utility.set_location( gv_package || '.format_w2c_total_record',150);
1142: hr_utility.trace(parameter_record(i).p_parameter_name||'(Old) = '
1143: ||lv_wage_value_in_cents);
1144: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1145:
1138: IF p_exclude_from_output = 'Y' THEN
1139: lb_exclude_from_output_chk := TRUE;
1140: END IF;
1141: hr_utility.set_location( gv_package || '.format_w2c_total_record',150);
1142: hr_utility.trace(parameter_record(i).p_parameter_name||'(Old) = '
1143: ||lv_wage_value_in_cents);
1144: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1145:
1146: /* Negative Value check For Corrected Value to be reported on RCU */
1140: END IF;
1141: hr_utility.set_location( gv_package || '.format_w2c_total_record',150);
1142: hr_utility.trace(parameter_record(i).p_parameter_name||'(Old) = '
1143: ||lv_wage_value_in_cents);
1144: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1145:
1146: /* Negative Value check For Corrected Value to be reported on RCU */
1147: hr_utility.set_location( gv_package || '.format_w2c_total_record',160);
1148: lv_wage_value_in_cents :=
1143: ||lv_wage_value_in_cents);
1144: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1145:
1146: /* Negative Value check For Corrected Value to be reported on RCU */
1147: hr_utility.set_location( gv_package || '.format_w2c_total_record',160);
1148: lv_wage_value_in_cents :=
1149: to_char(nvl(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new,0));
1150: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new_formated :=
1151: pay_us_reporting_utils_pkg.data_validation(
1165: sp_out_2);
1166: IF p_exclude_from_output = 'Y' THEN
1167: lb_exclude_from_output_chk := TRUE;
1168: END IF;
1169: hr_utility.set_location( gv_package || '.format_w2c_total_record',170);
1170: hr_utility.trace(parameter_record(i).p_parameter_name||'(New) = '
1171: ||lv_wage_value_in_cents);
1172: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1173: /* Set output parameters when RCT Originally reported value and Corrected values
1166: IF p_exclude_from_output = 'Y' THEN
1167: lb_exclude_from_output_chk := TRUE;
1168: END IF;
1169: hr_utility.set_location( gv_package || '.format_w2c_total_record',170);
1170: hr_utility.trace(parameter_record(i).p_parameter_name||'(New) = '
1171: ||lv_wage_value_in_cents);
1172: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1173: /* Set output parameters when RCT Originally reported value and Corrected values
1174: are not identical ch9783383*/
1168: END IF;
1169: hr_utility.set_location( gv_package || '.format_w2c_total_record',170);
1170: hr_utility.trace(parameter_record(i).p_parameter_name||'(New) = '
1171: ||lv_wage_value_in_cents);
1172: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1173: /* Set output parameters when RCT Originally reported value and Corrected values
1174: are not identical ch9783383*/
1175: --{
1176: if i = 1 then
1203: elsif i = 10 then--13255427
1204: p_output_10 := nvl(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old,0);
1205: p_output_30 := nvl(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new,0);
1206: end if;
1207: --hr_utility.trace('p_output_9 '||p_output_9);
1208: --hr_utility.trace('p_output_29 '||p_output_29);
1209:
1210: hr_utility.set_location( gv_package || '.format_w2c_total_record',180);
1211: --}
1204: p_output_10 := nvl(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old,0);
1205: p_output_30 := nvl(pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new,0);
1206: end if;
1207: --hr_utility.trace('p_output_9 '||p_output_9);
1208: --hr_utility.trace('p_output_29 '||p_output_29);
1209:
1210: hr_utility.set_location( gv_package || '.format_w2c_total_record',180);
1211: --}
1212: --}
1206: end if;
1207: --hr_utility.trace('p_output_9 '||p_output_9);
1208: --hr_utility.trace('p_output_29 '||p_output_29);
1209:
1210: hr_utility.set_location( gv_package || '.format_w2c_total_record',180);
1211: --}
1212: --}
1213: else
1214: --{
1211: --}
1212: --}
1213: else
1214: --{
1215: hr_utility.set_location( gv_package || '.format_w2c_total_record',190);
1216: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_identical_flag := 'Y';
1217: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old_formated :=
1218: lpad(' ',15);
1219: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new_formated :=
1251: end if;
1252: --}
1253: end if;
1254: END LOOP;
1255: hr_utility.set_location( gv_package || '.format_w2c_total_record',200);
1256: p_output_41 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_valid_rco_rcu,0),7,'0');
1257: p_output_42 := lpad(NVL(pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu,0),7,'0');
1258: return_value :=
1259: pay_us_mmrf2_w2c_format_record.format_W2C_RCU_record(
1271: p_exclude_from_output,
1272: ret_str_len,
1273: lb_exclude_from_output_chk
1274: );
1275: hr_utility.set_location( gv_package || '.format_w2c_total_record',210);
1276: --}
1277: END IF; --p_record_name
1278: --}
1279: END IF; --p_report_type
1295: p_exclude_from_output := 'Y';
1296: ELSE
1297: p_exclude_from_output := 'N';
1298: END IF;
1299: hr_utility.trace('main_return_string = '||main_return_string);
1300: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1296: ELSE
1297: p_exclude_from_output := 'N';
1298: END IF;
1299: hr_utility.trace('main_return_string = '||main_return_string);
1300: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1297: p_exclude_from_output := 'N';
1298: END IF;
1299: hr_utility.trace('main_return_string = '||main_return_string);
1300: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1298: END IF;
1299: hr_utility.trace('main_return_string = '||main_return_string);
1300: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1299: hr_utility.trace('main_return_string = '||main_return_string);
1300: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1300: hr_utility.trace(' length of main_return_string = '||to_char(length(main_return_string)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1301: hr_utility.trace('sp_out_1 = '||sp_out_1);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1302: hr_utility.trace(' length of sp_out_1 = '||to_char(length(sp_out_1)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1303: hr_utility.trace('sp_out_2 = '||sp_out_2);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1311: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1304: hr_utility.trace(' length of sp_out_2 = '||to_char(length(sp_out_2)));
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1311: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1312: hr_utility.set_location( gv_package || '.format_w2c_total_record',220);
1305: hr_utility.trace('sp_out_3 = '||sp_out_3);
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1311: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1312: hr_utility.set_location( gv_package || '.format_w2c_total_record',220);
1313:
1306: hr_utility.trace(' length of sp_out_3 = '||to_char(length(sp_out_3)));
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1311: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1312: hr_utility.set_location( gv_package || '.format_w2c_total_record',220);
1313:
1314: RETURN main_return_string;
1307: hr_utility.trace('sp_out_4 = '||sp_out_4);
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1311: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1312: hr_utility.set_location( gv_package || '.format_w2c_total_record',220);
1313:
1314: RETURN main_return_string;
1315: END Format_W2C_total_Record;
1308: hr_utility.trace(' length of sp_out_4 = '||to_char(length(sp_out_4)));
1309: hr_utility.trace('sp_out_5 = '||sp_out_5);
1310: hr_utility.trace(' length of sp_out_5 = '||to_char(length(sp_out_5)));
1311: hr_utility.trace('p_exclude_from_output = '||p_exclude_from_output);
1312: hr_utility.set_location( gv_package || '.format_w2c_total_record',220);
1313:
1314: RETURN main_return_string;
1315: END Format_W2C_total_Record;
1316: /* NEW*/
1324: IS
1325: ln_no_of_rcw_wages number := 26; --Bug 13255427 /* saurabh */
1326: ln_no_of_rco_wages number := 10; --13255427
1327: BEGIN
1328: hr_utility.set_location( gv_package || '.Initialize_GRE_Level_total',10);
1329: hr_utility.trace('Entered in pay_us_w2c_in_mmref2_format.Initialize_GRE_Level_total');
1330: hr_utility.trace('Initializing GRE Level Totals');
1331: if pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct > 0 then
1332: pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf :=
1325: ln_no_of_rcw_wages number := 26; --Bug 13255427 /* saurabh */
1326: ln_no_of_rco_wages number := 10; --13255427
1327: BEGIN
1328: hr_utility.set_location( gv_package || '.Initialize_GRE_Level_total',10);
1329: hr_utility.trace('Entered in pay_us_w2c_in_mmref2_format.Initialize_GRE_Level_total');
1330: hr_utility.trace('Initializing GRE Level Totals');
1331: if pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct > 0 then
1332: pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf :=
1333: pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf +
1326: ln_no_of_rco_wages number := 10; --13255427
1327: BEGIN
1328: hr_utility.set_location( gv_package || '.Initialize_GRE_Level_total',10);
1329: hr_utility.trace('Entered in pay_us_w2c_in_mmref2_format.Initialize_GRE_Level_total');
1330: hr_utility.trace('Initializing GRE Level Totals');
1331: if pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct > 0 then
1332: pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf :=
1333: pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rcf +
1334: pay_us_w2c_in_mmref2_format.number_of_valid_rcw_rct ;
1371: pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_old_formated := ' ';
1372: pay_us_w2c_in_mmref2_format.ltr_rct_info(i).rct_wage_new_formated := ' ';
1373: END LOOP;
1374: -- Initialize all the PL/SQL table defined for RCU Wages
1375: hr_utility.set_location( gv_package || '.Initialize_GRE_Level_total',20);
1376: pay_us_w2c_in_mmref2_format.ltr_rcu_info.delete;
1377: ln_no_of_rco_wages := 10;--13255427
1378:
1379: FOR i IN 1..ln_no_of_rco_wages
1382: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new := 0; --200000;
1383: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old_formated := ' ';
1384: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new_formated := ' ';
1385: END LOOP;
1386: hr_utility.set_location( gv_package || '.Initialize_GRE_Level_total',30);
1387: hr_utility.trace('Leaving pay_us_w2c_in_mmref2_format.Initialize_GRE_Level_total');
1388: return(0);
1389: EXCEPTION
1390: when others then
1383: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_old_formated := ' ';
1384: pay_us_w2c_in_mmref2_format.ltr_rcu_info(i).rcu_wage_new_formated := ' ';
1385: END LOOP;
1386: hr_utility.set_location( gv_package || '.Initialize_GRE_Level_total',30);
1387: hr_utility.trace('Leaving pay_us_w2c_in_mmref2_format.Initialize_GRE_Level_total');
1388: return(0);
1389: EXCEPTION
1390: when others then
1391: return(1);
1437: BEGIN
1438: --
1439: -- In PL/SQL table 1st record would be Originally reported arhived value for an Assignment_Action_Id
1440: -- and 2nd record would be Corrected values
1441: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',10);
1442: if p_action_type = 'O'
1443: then
1444: i := 1;
1445: elsif p_action_type = 'C' then
1447: end if;
1448:
1449: if p_record_type = 'RCW' then
1450: --{
1451: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',20);
1452: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).SSN := '';
1453: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).first_name := '';
1454: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).middle_name := '';
1455: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).last_name := '';
1482:
1483: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).statutory_emp_indicator := '';
1484: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).retirement_plan_indicator := '';
1485: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).sick_pay_indicator := '';
1486: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',30);
1487: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).SSN :=
1488: hr_us_w2_rep.get_per_item(p_assignment_action_id,'A_PER_NATIONAL_IDENTIFIER') ;
1489: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).first_name :=
1490: hr_us_w2_rep.get_per_item(p_assignment_action_id,'A_PER_FIRST_NAME') ;
1564: END IF;
1565:
1566: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information1 := ln_gross_wages;
1567:
1568: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',40);
1569: -- FIT withheld
1570: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information2 :=
1571: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1572: ,'A_FIT_WITHHELD_PER_GRE_YTD'
1664: ,0);
1665: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information12 := ln_408k_contribution;
1666:
1667: /*--ln_roth_457b_contribution, Added for the Bug 16545887
1668: hr_utility.trace(' Getting A_W2_ROTH_457B_PER_GRE_YTD ' );
1669: ln_roth_457b_contribution :=
1670: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1671: ,'A_W2_ROTH_457B_PER_GRE_YTD'
1672: ,p_tax_unit_id
1689: ,'00-000-0000'
1690: ,0);
1691: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information14 :=
1692: ln_501c_contribution;
1693: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',50);
1694: -- Deferred compensation contributions
1695: -- This need to be clarified
1696: ln_total_contribution := ln_401k_contribution +
1697: ln_403b_contribution +
1748: ,p_tax_unit_id
1749: ,'00-000-0000'
1750: ,0);
1751: -- Non Combat Pay , for bug 4398606
1752: hr_utility.trace(' Getting Non combat pay ' );
1753: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information22 :=
1754: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1755: ,'A_W2_NONTAX_COMBAT_PER_GRE_YTD'
1756: ,p_tax_unit_id
1755: ,'A_W2_NONTAX_COMBAT_PER_GRE_YTD'
1756: ,p_tax_unit_id
1757: ,'00-000-0000'
1758: ,0);
1759: hr_utility.trace('Nontax Combat ' || pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information22);
1760:
1761:
1762: -- 409A Deferrals , for bug 4398606
1763: hr_utility.trace(' Getting NonQual Def Comp ' );
1759: hr_utility.trace('Nontax Combat ' || pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information22);
1760:
1761:
1762: -- 409A Deferrals , for bug 4398606
1763: hr_utility.trace(' Getting NonQual Def Comp ' );
1764: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information23 :=
1765: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1766: ,'A_W2_NONQUAL_DEF_COMP_PER_GRE_YTD'
1767: ,p_tax_unit_id
1766: ,'A_W2_NONQUAL_DEF_COMP_PER_GRE_YTD'
1767: ,p_tax_unit_id
1768: ,'00-000-0000'
1769: ,0);
1770: hr_utility.trace('NonQual Def Comp ' || pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information23);
1771:
1772: --Added for the Bug 16545887
1773: -- A_W2_PENSION_PLAN_PER_GRE_YTD
1774: hr_utility.trace(' Getting A_W2_PENSION_PLAN_PER_GRE_YTD ' );
1770: hr_utility.trace('NonQual Def Comp ' || pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information23);
1771:
1772: --Added for the Bug 16545887
1773: -- A_W2_PENSION_PLAN_PER_GRE_YTD
1774: hr_utility.trace(' Getting A_W2_PENSION_PLAN_PER_GRE_YTD ' );
1775: l_w2_pension :=
1776: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1777: ,'A_W2_PENSION_PLAN_PER_GRE_YTD'
1778: ,p_tax_unit_id
1777: ,'A_W2_PENSION_PLAN_PER_GRE_YTD'
1778: ,p_tax_unit_id
1779: ,'00-000-0000'
1780: ,0);
1781: hr_utility.trace('A_W2_PENSION_PLAN_PER_GRE_YTD ' || l_w2_pension);
1782:
1783: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',60);
1784: -- Statutory Employee Indicator
1785: lv_statutory_employee :=
1779: ,'00-000-0000'
1780: ,0);
1781: hr_utility.trace('A_W2_PENSION_PLAN_PER_GRE_YTD ' || l_w2_pension);
1782:
1783: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',60);
1784: -- Statutory Employee Indicator
1785: lv_statutory_employee :=
1786: hr_us_w2_rep.get_per_item(p_assignment_action_id,'A_W2_ASG_STATUTORY_EMPLOYEE');
1787: if lv_statutory_employee = 'Y' then
1788: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).statutory_emp_indicator := '1';
1789: else
1790: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).statutory_emp_indicator := '0';
1791: end if;
1792: hr_utility.set_location( gv_package || '.GET_ARCHIVED_VALUES',70);
1793: --
1794: -- Retirement Plan Indicator
1795: -- If any of the contribution is > 0 then retirement plan indicator is set to 1
1796: -- otherwise 0
1829: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).sick_pay_indicator := '1';
1830: else
1831: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).sick_pay_indicator := '0';
1832: end if;
1833: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',80);
1834:
1835: -- Cost of Employer-Sponsored Health Coverage, Bug 13255427
1836: hr_utility.trace(' Getting Cost of Employer-Sponsored Health Coverage ' );
1837: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information26 :=
1832: end if;
1833: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',80);
1834:
1835: -- Cost of Employer-Sponsored Health Coverage, Bug 13255427
1836: hr_utility.trace(' Getting Cost of Employer-Sponsored Health Coverage ' );
1837: pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information26 :=
1838: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1839: ,'A_W2_HEALTH_COVERAGE_PER_GRE_YTD'
1840: ,p_tax_unit_id
1839: ,'A_W2_HEALTH_COVERAGE_PER_GRE_YTD'
1840: ,p_tax_unit_id
1841: ,'00-000-0000'
1842: ,0);
1843: hr_utility.trace('Cost of Employer-Sponsored Health Coverage ' || pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information26);
1844:
1845: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',90);
1846:
1847: ELSIF p_record_type = 'RCO' then
1841: ,'00-000-0000'
1842: ,0);
1843: hr_utility.trace('Cost of Employer-Sponsored Health Coverage ' || pay_us_w2c_in_mmref2_format.ltr_rcw_info(i).action_information26);
1844:
1845: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',90);
1846:
1847: ELSIF p_record_type = 'RCO' then
1848: --{
1849: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',100);
1845: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',90);
1846:
1847: ELSIF p_record_type = 'RCO' then
1848: --{
1849: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',100);
1850: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information1 := 0; -- allocated tips
1851: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information2 := 0; -- uncollected employee tax on tips
1852: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information3 := 0; -- Medical Savings Account
1853: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information4 := 0; -- Simple Retirement Account
1856: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information7 := 0; -- uncollected medicare tax on GTL insurance over $50,000
1857: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information8 := 0; -- uncollected medicare tax on GTL insurance over $50,000
1858: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9 := 0; -- Hire Exempt Wages amd Tips --9783383
1859: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information10 := 0; -- Design. Roth Contributions Under 457b Plan, bug 13255427
1860: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',105);
1861:
1862: -- allocated tips
1863: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information1 :=
1864: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1865: ,'A_W2_BOX_8_PER_GRE_YTD'
1866: ,p_tax_unit_id
1867: ,'00-000-0000'
1868: ,0);
1869: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',110);
1870: -- uncollected employee tax on tips
1871: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information2 :=
1872: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1873: ,'A_W2_UNCOLL_SS_TAX_TIPS_PER_GRE_YTD'
1878: ,'A_W2_UNCOLL_MED_TIPS_PER_GRE_YTD'
1879: ,p_tax_unit_id
1880: ,'00-000-0000'
1881: ,0);
1882: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',120);
1883: -- Medical Savings Account
1884: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information3 :=
1885: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1886: ,'A_W2_MSA_PER_GRE_YTD'
1886: ,'A_W2_MSA_PER_GRE_YTD'
1887: ,p_tax_unit_id
1888: ,'00-000-0000'
1889: ,0);
1890: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',130);
1891: -- Simple Retirement Account
1892: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information4 :=
1893: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1894: ,'A_W2_408P_PER_GRE_YTD'
1894: ,'A_W2_408P_PER_GRE_YTD'
1895: ,p_tax_unit_id
1896: ,'00-000-0000'
1897: ,0);
1898: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',140);
1899: -- Qualified adoption expenses
1900: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information5 :=
1901: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1902: ,'A_W2_ADOPTION_PER_GRE_YTD'
1902: ,'A_W2_ADOPTION_PER_GRE_YTD'
1903: ,p_tax_unit_id
1904: ,'00-000-0000'
1905: ,0);
1906: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',150);
1907: -- uncollected social security or RRTA tax on GTL insurance over $50000
1908: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information6 :=
1909: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1910: ,'A_W2_UNCOLL_SS_GTL_PER_GRE_YTD'
1910: ,'A_W2_UNCOLL_SS_GTL_PER_GRE_YTD'
1911: ,p_tax_unit_id
1912: ,'00-000-0000'
1913: ,0);
1914: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',160);
1915: -- uncollected medicare tax on GTL insurance over $50,000
1916: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information7 :=
1917: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1918: ,'A_W2_UNCOLL_MED_GTL_PER_GRE_YTD'
1925: ,'A_W2_409A_NONQUAL_INCOME_PER_GRE_YTD'
1926: ,p_tax_unit_id
1927: ,'00-000-0000'
1928: ,0);
1929: hr_utility.trace('getting 409A Income for RCO record ' ||pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information8);
1930:
1931: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',170);
1932:
1933: --Hire Exempt Wages and Tips 9783383
1927: ,'00-000-0000'
1928: ,0);
1929: hr_utility.trace('getting 409A Income for RCO record ' ||pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information8);
1930:
1931: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',170);
1932:
1933: --Hire Exempt Wages and Tips 9783383
1934: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9 :=
1935: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1937: ,p_tax_unit_id
1938: ,'00-000-0000'
1939: ,0);
1940:
1941: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',180);
1942:
1943: --Design. Roth Contributions Under 457b Plan, bug 13255427
1944: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information10 :=
1945: hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1947: ,p_tax_unit_id
1948: ,'00-000-0000'
1949: ,0);
1950:
1951: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1952:
1953: /*hr_utility.trace('calling with normal variable');
1954: a:= hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1955: ,'A_SS_ER_W11_TAXABLE_PER_GRE_YTD'
1949: ,0);
1950:
1951: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1952:
1953: /*hr_utility.trace('calling with normal variable');
1954: a:= hr_us_w2_rep.get_w2_arch_bal(p_assignment_action_id
1955: ,'A_SS_ER_W11_TAXABLE_PER_GRE_YTD'
1956: ,p_tax_unit_id
1957: ,'00-000-0000'
1955: ,'A_SS_ER_W11_TAXABLE_PER_GRE_YTD'
1956: ,p_tax_unit_id
1957: ,'00-000-0000'
1958: ,0);
1959: hr_utility.trace('Action Type '||p_action_type);
1960: hr_utility.trace('Action Type '||p_assignment_action_id);
1961: hr_utility.trace('Action Type '||p_tax_unit_id);
1962: begin
1963: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9 :=to_char(a);
1956: ,p_tax_unit_id
1957: ,'00-000-0000'
1958: ,0);
1959: hr_utility.trace('Action Type '||p_action_type);
1960: hr_utility.trace('Action Type '||p_assignment_action_id);
1961: hr_utility.trace('Action Type '||p_tax_unit_id);
1962: begin
1963: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9 :=to_char(a);
1964: EXCEPTION
1957: ,'00-000-0000'
1958: ,0);
1959: hr_utility.trace('Action Type '||p_action_type);
1960: hr_utility.trace('Action Type '||p_assignment_action_id);
1961: hr_utility.trace('Action Type '||p_tax_unit_id);
1962: begin
1963: pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9 :=to_char(a);
1964: EXCEPTION
1965: WHEN OTHERS then
1964: EXCEPTION
1965: WHEN OTHERS then
1966: --dbms_output.PUT_LINE('got it!1');
1967:
1968: hr_utility.trace('Error!');
1969: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1970: tmp:=sqlerrm;
1971: hr_utility.trace('Error: '||tmp);
1972: commit;
1965: WHEN OTHERS then
1966: --dbms_output.PUT_LINE('got it!1');
1967:
1968: hr_utility.trace('Error!');
1969: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1970: tmp:=sqlerrm;
1971: hr_utility.trace('Error: '||tmp);
1972: commit;
1973: --hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1967:
1968: hr_utility.trace('Error!');
1969: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1970: tmp:=sqlerrm;
1971: hr_utility.trace('Error: '||tmp);
1972: commit;
1973: --hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1974: END;
1975: --pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information9 :=21640;
1969: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1970: tmp:=sqlerrm;
1971: hr_utility.trace('Error: '||tmp);
1972: commit;
1973: --hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1974: END;
1975: --pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information9 :=21640;
1976: hr_utility.trace('Hire exmpt value in variable '||a);
1977: hr_utility.trace('GRE ID '||p_tax_unit_id); */
1972: commit;
1973: --hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1974: END;
1975: --pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information9 :=21640;
1976: hr_utility.trace('Hire exmpt value in variable '||a);
1977: hr_utility.trace('GRE ID '||p_tax_unit_id); */
1978:
1979: hr_utility.trace('getting Hire exempt wages for RCO record '||pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9);
1980: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',180);
1973: --hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1974: END;
1975: --pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information9 :=21640;
1976: hr_utility.trace('Hire exmpt value in variable '||a);
1977: hr_utility.trace('GRE ID '||p_tax_unit_id); */
1978:
1979: hr_utility.trace('getting Hire exempt wages for RCO record '||pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9);
1980: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',180);
1981: -- End of fetching Archived values RCO
1975: --pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information9 :=21640;
1976: hr_utility.trace('Hire exmpt value in variable '||a);
1977: hr_utility.trace('GRE ID '||p_tax_unit_id); */
1978:
1979: hr_utility.trace('getting Hire exempt wages for RCO record '||pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9);
1980: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',180);
1981: -- End of fetching Archived values RCO
1982: --}
1983: END IF; -- p_record_type check
1976: hr_utility.trace('Hire exmpt value in variable '||a);
1977: hr_utility.trace('GRE ID '||p_tax_unit_id); */
1978:
1979: hr_utility.trace('getting Hire exempt wages for RCO record '||pay_us_w2c_in_mmref2_format.ltr_rco_info(i).action_information9);
1980: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',180);
1981: -- End of fetching Archived values RCO
1982: --}
1983: END IF; -- p_record_type check
1984: --
1985: EXCEPTION
1986: WHEN OTHERS then
1987: --dbms_output.PUT_LINE('got it!1');
1988:
1989: hr_utility.trace('Error!');
1990: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1991: hr_utility.trace('Error: '||sqlerrm);
1992: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1993: END GET_ARCHIVED_VALUES;
1986: WHEN OTHERS then
1987: --dbms_output.PUT_LINE('got it!1');
1988:
1989: hr_utility.trace('Error!');
1990: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1991: hr_utility.trace('Error: '||sqlerrm);
1992: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1993: END GET_ARCHIVED_VALUES;
1994: -- End of Get_Archived_Values function
1987: --dbms_output.PUT_LINE('got it!1');
1988:
1989: hr_utility.trace('Error!');
1990: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1991: hr_utility.trace('Error: '||sqlerrm);
1992: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1993: END GET_ARCHIVED_VALUES;
1994: -- End of Get_Archived_Values function
1995: --
1988:
1989: hr_utility.trace('Error!');
1990: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
1991: hr_utility.trace('Error: '||sqlerrm);
1992: hr_utility.set_location(gv_package || '.GET_ARCHIVED_VALUES',190);
1993: END GET_ARCHIVED_VALUES;
1994: -- End of Get_Archived_Values function
1995: --
1996:
2073: l_rcw_neg_flag boolean := FALSE;
2074: l_rco_neg_flag boolean := FALSE;
2075:
2076: BEGIN
2077: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 10);
2078: ln_num_corrections_rcw := 0;
2079: ln_num_corrections_rco := 0;
2080: -- Employee Level Global Variables are initialized here
2081:
2096: -- would be stored in 1st row of the Pl/SQL table
2097: lv_action_type := 'O';
2098: lv_record_type := 'RCW';
2099: pay_us_w2c_in_mmref2_format.ltr_rcw_info.delete;
2100: hr_utility.trace('Calling Procedure pay_us_w2c_in_mmref2_format.GET_ARCHIVED_VALUES to set RCW record ');
2101: pay_us_w2c_in_mmref2_format.GET_ARCHIVED_VALUES ( lv_action_type
2102: ,lv_record_type
2103: ,p_orig_assignment_actid
2104: ,p_tax_unit_id
2102: ,lv_record_type
2103: ,p_orig_assignment_actid
2104: ,p_tax_unit_id
2105: );
2106: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 20);
2107: --
2108: -- Set Corrected RCW values in PL/SQL table pay_us_w2c_in_mmref2_format.ltr_rcw_info
2109: -- Corrected value would be stored in 2nd row of the Pl/SQL table
2110: --
2113: ,p_record_name
2114: ,p_correct_assignment_actid
2115: ,p_tax_unit_id
2116: );
2117: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 30);
2118: --
2119: -- Compare Orginally Reported and Corrected values to decide whether RCW record
2120: -- would be written to mf file or moved to .a02.
2121: --
2134: else
2135: lv_ssn_identical_flag := 'Y';
2136: lv_old_ssn := lpad(' ',9);
2137: end if;
2138: hr_utility.trace('SSN Comparision completed ');
2139: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 40);
2140: --
2141: -- Compare Orignally Reported and Corrected
2142: --
2135: lv_ssn_identical_flag := 'Y';
2136: lv_old_ssn := lpad(' ',9);
2137: end if;
2138: hr_utility.trace('SSN Comparision completed ');
2139: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 40);
2140: --
2141: -- Compare Orignally Reported and Corrected
2142: --
2143: lv_first_name_old := ' ';
2154: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).first_name) then
2155: ln_num_corrections := ln_num_corrections + 1;
2156: lv_first_name_old := pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).first_name;
2157: end if;
2158: hr_utility.trace('First Name Comparision completed ');
2159: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 50);
2160: --
2161: -- Compare Orignally Reported and Corrected
2162: --
2155: ln_num_corrections := ln_num_corrections + 1;
2156: lv_first_name_old := pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).first_name;
2157: end if;
2158: hr_utility.trace('First Name Comparision completed ');
2159: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 50);
2160: --
2161: -- Compare Orignally Reported and Corrected
2162: --
2163: lv_middle_name_old := ' ';
2177: pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).middle_name) then
2178: ln_num_corrections := ln_num_corrections + 1;
2179: lv_middle_name_old := pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).middle_name;
2180: end if;
2181: hr_utility.trace('Middle Name Comparision completed ');
2182: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 60);
2183: --
2184: -- Compare Orignally Reported and Corrected
2185: --
2178: ln_num_corrections := ln_num_corrections + 1;
2179: lv_middle_name_old := pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).middle_name;
2180: end if;
2181: hr_utility.trace('Middle Name Comparision completed ');
2182: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 60);
2183: --
2184: -- Compare Orignally Reported and Corrected
2185: --
2186: lv_last_name_old := ' ';
2196: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).last_name) then
2197: ln_num_corrections := ln_num_corrections + 1;
2198: lv_last_name_old := pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).last_name;
2199: end if;
2200: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 70);
2201: hr_utility.trace('Last Name Comparision completed ');
2202: --
2203: -- Compare Orignally Reported and Corrected
2204: --
2197: ln_num_corrections := ln_num_corrections + 1;
2198: lv_last_name_old := pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).last_name;
2199: end if;
2200: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 70);
2201: hr_utility.trace('Last Name Comparision completed ');
2202: --
2203: -- Compare Orignally Reported and Corrected
2204: --
2205: if (pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).statutory_emp_indicator = '0' and
2210: --}
2211: elsif (pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).statutory_emp_indicator <>
2212: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).statutory_emp_indicator) then
2213: --{
2214: hr_utility.trace(' Statutory Employee Indicator Values are not equal ');
2215: ln_num_corrections := ln_num_corrections + 1;
2216: lv_statutory_emp_indicator_old :=
2217: pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).statutory_emp_indicator;
2218: lv_statutory_emp_indicator_new :=
2222: lv_statutory_emp_indicator_old := ' ';
2223: lv_statutory_emp_indicator_new := ' ';
2224: end if;
2225:
2226: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 80);
2227:
2228: -- Compare Orignally Reported and Corrected
2229: if (pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).retirement_plan_indicator ='0' and
2230: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).retirement_plan_indicator ='0') then
2234: --}
2235: elsif (pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).retirement_plan_indicator <>
2236: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).retirement_plan_indicator) then
2237: --{
2238: hr_utility.trace(' Retirement Plan Indicator Values are not equal ');
2239: ln_num_corrections := ln_num_corrections + 1;
2240: lv_retire_plan_indicator_old :=
2241: pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).retirement_plan_indicator;
2242: lv_retire_plan_indicator_new :=
2245: else
2246: lv_retire_plan_indicator_old := ' ';
2247: lv_retire_plan_indicator_new := ' ';
2248: end if;
2249: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 90);
2250:
2251: -- Compare Orignally Reported and Corrected < Third Part SickPay Indicator>
2252: if (pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).sick_pay_indicator = '0' and
2253: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).sick_pay_indicator ='0' ) then
2257: --}
2258: elsif (pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).sick_pay_indicator <>
2259: pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).sick_pay_indicator) then
2260: --{
2261: hr_utility.trace(' Third Party Sick Pay Indicator Values are not equal ');
2262: ln_num_corrections := ln_num_corrections + 1;
2263: lv_sickpay_indicator_old :=
2264: pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).sick_pay_indicator;
2265: lv_sickpay_indicator_new :=
2268: else
2269: lv_sickpay_indicator_old := ' ';
2270: lv_sickpay_indicator_new := ' ';
2271: end if;
2272: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 100);
2273: --
2274: -- Following section is to compare all Wage values of RCW Record
2275: --
2276: parameter_record.delete;
2373:
2374: parameter_record(25).p_parameter_name:= 'Designed Roth Contr. to 403b Plan'; /* saurabh */
2375: parameter_record(25).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).action_information25;
2376: parameter_record(25).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).action_information25;
2377: -- hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 110);
2378:
2379: --Changes for the Bug 13255427, added W2 health Coverage
2380:
2381: parameter_record(26).p_parameter_name:= 'Cost of Employer-Sponsored Health Coverage';
2381: parameter_record(26).p_parameter_name:= 'Cost of Employer-Sponsored Health Coverage';
2382: parameter_record(26).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rcw_info(1).action_information26;
2383: parameter_record(26).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rcw_info(2).action_information26;
2384:
2385: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 110);
2386:
2387: -- Delete all value from PL/SQL table used for storing RCW record wage values
2388: -- after comparision. This table normally stores 20 wage values
2389:
2425: elsif parameter_record(k).p_parameter_value_old <>
2426: parameter_record(k).p_parameter_value_new
2427: then
2428: --{
2429: hr_utility.trace(to_char(k)||'. '||parameter_record(k).p_parameter_name ||'Value are not equal ');
2430:
2431: ln_num_corrections := ln_num_corrections + 1;
2432:
2433: if NOT l_rcw_neg_flag then
2471: */
2472:
2473: end if;
2474: END LOOP;
2475: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 120);
2476: ln_num_corrections_rcw := ln_num_corrections;
2477:
2478: --
2479: -- Set Originally Reported RCO values
2485: lv_record_type := 'RCO';
2486:
2487: pay_us_w2c_in_mmref2_format.ltr_rco_info.delete;
2488:
2489: hr_utility.trace('Calling pay_us_w2c_in_mmref2_format.GET_ARCHIVED_VALUES'
2490: || 'to set Originally reported RCO record values');
2491:
2492: pay_us_w2c_in_mmref2_format.GET_ARCHIVED_VALUES ( lv_action_type
2493: ,lv_record_type
2493: ,lv_record_type
2494: ,p_orig_assignment_actid
2495: ,p_tax_unit_id
2496: );
2497: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 130);
2498: -- Set Corrected RCO values in PL/SQL table
2499: -- pay_us_w2c_in_mmref2_format.ltr_rco_info
2500: -- Corrected value would be stored in 2nd row of the Pl/SQL table
2501: --
2500: -- Corrected value would be stored in 2nd row of the Pl/SQL table
2501: --
2502:
2503: lv_action_type := 'C';
2504: hr_utility.trace('Calling pay_us_w2c_in_mmref2_format.GET_ARCHIVED_VALUES'
2505: || 'to set Corrected RCO record values');
2506:
2507: pay_us_w2c_in_mmref2_format.GET_ARCHIVED_VALUES ( lv_action_type
2508: ,lv_record_type
2508: ,lv_record_type
2509: ,p_correct_assignment_actid
2510: ,p_tax_unit_id
2511: );
2512: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 140);
2513:
2514: --
2515: -- Following section is to compare all Wage values of RCO Record
2516: --
2551: parameter_record(8).p_parameter_name:= 'income under 409A';
2552: parameter_record(8).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rco_info(1).action_information8;
2553: parameter_record(8).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information8;
2554:
2555: hr_utility.trace('Old value of income under 409A '||parameter_record(8).p_parameter_value_old);
2556: hr_utility.trace('New value of income under 409A '||parameter_record(8).p_parameter_value_new);
2557:
2558: --9783383
2559: parameter_record(9).p_parameter_name:= 'Hire Exempt Wages and Tips';
2552: parameter_record(8).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rco_info(1).action_information8;
2553: parameter_record(8).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information8;
2554:
2555: hr_utility.trace('Old value of income under 409A '||parameter_record(8).p_parameter_value_old);
2556: hr_utility.trace('New value of income under 409A '||parameter_record(8).p_parameter_value_new);
2557:
2558: --9783383
2559: parameter_record(9).p_parameter_name:= 'Hire Exempt Wages and Tips';
2560: parameter_record(9).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rco_info(1).action_information9;
2566: parameter_record(10).p_parameter_name:= 'Desig. Roth Contributions Under 457b Plan';
2567: parameter_record(10).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rco_info(1).action_information10;
2568: parameter_record(10).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information10;
2569:
2570: hr_utility.trace('Old Value of Hire exempt'||parameter_record(9).p_parameter_value_old||' '||lv_action_type);
2571: hr_utility.trace('New Value of Hire exempt'||parameter_record(9).p_parameter_value_new||' '||lv_action_type);
2572: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 150);
2573:
2574: -- Delete all value from PL/SQL table used for storing RCO record wage values
2567: parameter_record(10).p_parameter_value_old:=pay_us_w2c_in_mmref2_format.ltr_rco_info(1).action_information10;
2568: parameter_record(10).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information10;
2569:
2570: hr_utility.trace('Old Value of Hire exempt'||parameter_record(9).p_parameter_value_old||' '||lv_action_type);
2571: hr_utility.trace('New Value of Hire exempt'||parameter_record(9).p_parameter_value_new||' '||lv_action_type);
2572: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 150);
2573:
2574: -- Delete all value from PL/SQL table used for storing RCO record wage values
2575: -- after comparision. This table normally stores 7 wage values
2568: parameter_record(10).p_parameter_value_new:=pay_us_w2c_in_mmref2_format.ltr_rco_info(2).action_information10;
2569:
2570: hr_utility.trace('Old Value of Hire exempt'||parameter_record(9).p_parameter_value_old||' '||lv_action_type);
2571: hr_utility.trace('New Value of Hire exempt'||parameter_record(9).p_parameter_value_new||' '||lv_action_type);
2572: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record', 150);
2573:
2574: -- Delete all value from PL/SQL table used for storing RCO record wage values
2575: -- after comparision. This table normally stores 7 wage values
2576:
2592:
2593: --
2594: -- This loop will be used to compare all the wage data associated with RCO
2595: --
2596: hr_utility.trace('Comparing RCO Values of Originally reported and Corrected W2');
2597:
2598: FOR k in 1..10 LOOP --Bug 13255427 -- Increased from 8 to 9 --9783383
2599:
2600: if (parameter_record(k).p_parameter_value_old =
2609: elsif parameter_record(k).p_parameter_value_old <>
2610: parameter_record(k).p_parameter_value_new
2611: then
2612: --{
2613: hr_utility.trace(to_char(k)||'. '||parameter_record(k).p_parameter_name ||'Value are not equal ');
2614:
2615: ln_num_corrections := ln_num_corrections + 1;
2616:
2617: if NOT l_rco_neg_flag then
2656:
2657: end if;
2658: END LOOP;
2659:
2660: hr_utility.trace('Comparision for RCO values completed ');
2661: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',160);
2662:
2663: ln_num_corrections_rco := ln_num_corrections -ln_num_corrections_rcw;
2664:
2657: end if;
2658: END LOOP;
2659:
2660: hr_utility.trace('Comparision for RCO values completed ');
2661: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',160);
2662:
2663: ln_num_corrections_rco := ln_num_corrections -ln_num_corrections_rcw;
2664:
2665: pay_us_w2c_in_mmref2_format.rcw_number_of_correction := ln_num_corrections_rcw;
2665: pay_us_w2c_in_mmref2_format.rcw_number_of_correction := ln_num_corrections_rcw;
2666:
2667: pay_us_w2c_in_mmref2_format.rco_number_of_correction := ln_num_corrections_rco;
2668:
2669: hr_utility.trace('RCW No of Corrections '||to_char(ln_num_corrections_rcw));
2670: hr_utility.trace('RCO No of Corrections '||to_char(ln_num_corrections_rco));
2671: hr_utility.trace('Before RCW Format and Validation p_exclude_from_output '||p_exclude_from_output);
2672:
2673: pay_us_w2c_in_mmref2_format.rcw_number_of_correction := ln_num_corrections_rcw;
2666:
2667: pay_us_w2c_in_mmref2_format.rco_number_of_correction := ln_num_corrections_rco;
2668:
2669: hr_utility.trace('RCW No of Corrections '||to_char(ln_num_corrections_rcw));
2670: hr_utility.trace('RCO No of Corrections '||to_char(ln_num_corrections_rco));
2671: hr_utility.trace('Before RCW Format and Validation p_exclude_from_output '||p_exclude_from_output);
2672:
2673: pay_us_w2c_in_mmref2_format.rcw_number_of_correction := ln_num_corrections_rcw;
2674:
2667: pay_us_w2c_in_mmref2_format.rco_number_of_correction := ln_num_corrections_rco;
2668:
2669: hr_utility.trace('RCW No of Corrections '||to_char(ln_num_corrections_rcw));
2670: hr_utility.trace('RCO No of Corrections '||to_char(ln_num_corrections_rco));
2671: hr_utility.trace('Before RCW Format and Validation p_exclude_from_output '||p_exclude_from_output);
2672:
2673: pay_us_w2c_in_mmref2_format.rcw_number_of_correction := ln_num_corrections_rcw;
2674:
2675: pay_us_w2c_in_mmref2_format.rco_number_of_correction := ln_num_corrections_rco;
2720: p_exclude_from_output,
2721: ret_str_len,
2722: p_error
2723: );
2724: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',165);
2725:
2726: if p_error then
2727: hr_utility.trace('RCW Format and Validation resulted ERROR with p_exclude_from_output '||p_exclude_from_output);
2728: else
2723: );
2724: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',165);
2725:
2726: if p_error then
2727: hr_utility.trace('RCW Format and Validation resulted ERROR with p_exclude_from_output '||p_exclude_from_output);
2728: else
2729: hr_utility.trace('RCW Format and Validation resulted NO Error with p_exclude_from_output '||p_exclude_from_output);
2730: end if;
2731: hr_utility.trace('Before RCO Format and Validation p_exclude_from_output '||lv_rco_exclude_from_output);
2725:
2726: if p_error then
2727: hr_utility.trace('RCW Format and Validation resulted ERROR with p_exclude_from_output '||p_exclude_from_output);
2728: else
2729: hr_utility.trace('RCW Format and Validation resulted NO Error with p_exclude_from_output '||p_exclude_from_output);
2730: end if;
2731: hr_utility.trace('Before RCO Format and Validation p_exclude_from_output '||lv_rco_exclude_from_output);
2732:
2733: -- This section Validates and Formats RCO Record
2727: hr_utility.trace('RCW Format and Validation resulted ERROR with p_exclude_from_output '||p_exclude_from_output);
2728: else
2729: hr_utility.trace('RCW Format and Validation resulted NO Error with p_exclude_from_output '||p_exclude_from_output);
2730: end if;
2731: hr_utility.trace('Before RCO Format and Validation p_exclude_from_output '||lv_rco_exclude_from_output);
2732:
2733: -- This section Validates and Formats RCO Record
2734: -- Call to format_W2C_RCO_record to set Originally reported formattted values for reporting
2735: if ln_num_corrections_rco > 0 then
2758: );
2759:
2760:
2761: if lb_rco_error then
2762: hr_utility.trace('RCO Format and Validation resulted ERROR with p_exclude_from_output '||lv_rco_exclude_from_output);
2763: else
2764: hr_utility.trace('RCO Format and Validation resulted NO Error with p_exclude_from_output '||lv_rco_exclude_from_output);
2765: end if;
2766: else
2760:
2761: if lb_rco_error then
2762: hr_utility.trace('RCO Format and Validation resulted ERROR with p_exclude_from_output '||lv_rco_exclude_from_output);
2763: else
2764: hr_utility.trace('RCO Format and Validation resulted NO Error with p_exclude_from_output '||lv_rco_exclude_from_output);
2765: end if;
2766: else
2767: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',168);
2768: -- Format Blank RCO record in MMREF-2 format
2763: else
2764: hr_utility.trace('RCO Format and Validation resulted NO Error with p_exclude_from_output '||lv_rco_exclude_from_output);
2765: end if;
2766: else
2767: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',168);
2768: -- Format Blank RCO record in MMREF-2 format
2769: -- This Blank record would be used when RCO record is moved to .a02 for error
2770: --{
2771:
2768: -- Format Blank RCO record in MMREF-2 format
2769: -- This Blank record would be used when RCO record is moved to .a02 for error
2770: --{
2771:
2772: hr_utility.trace('Formatting BLANK RCO Record ');
2773: return_value_blank := ','
2774: ||' '
2775: ||','||lpad(' ',9)
2776: ||','||' '
2797: lv_rco_exclude_from_output := 'Y';
2798: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'Y';
2799: end if;
2800:
2801: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',170);
2802: if NOT p_error then
2803: --{
2804: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',180);
2805: hr_utility.trace('RCW formating and Validation was successful');
2800:
2801: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',170);
2802: if NOT p_error then
2803: --{
2804: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',180);
2805: hr_utility.trace('RCW formating and Validation was successful');
2806: --
2807: -- This section increments the counter to be reported in RCT record for Valid
2808: -- or Error Record
2801: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',170);
2802: if NOT p_error then
2803: --{
2804: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',180);
2805: hr_utility.trace('RCW formating and Validation was successful');
2806: --
2807: -- This section increments the counter to be reported in RCT record for Valid
2808: -- or Error Record
2809: -- Valid condtion is atleast one value of RCW is corrected for given employee
2830: end if;
2831: --}
2832: else
2833: --{
2834: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',190);
2835: pay_us_w2c_in_mmref2_format.number_of_error_rcw_rct :=
2836: pay_us_w2c_in_mmref2_format.number_of_error_rcw_rct + 1;
2837: pay_us_w2c_in_mmref2_format.rcw_exclude_flag := 'Y';
2838: -- RCF Error Record Total
2842: end if;
2843:
2844: if NOT lb_rco_error and NOT l_rcw_neg_flag then
2845: --{
2846: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',200);
2847: hr_utility.trace('RCO formating and Validation was successful');
2848: --
2849: -- This section increments the counter to be reported in RCU record for Valid
2850: -- or Error Record
2843:
2844: if NOT lb_rco_error and NOT l_rcw_neg_flag then
2845: --{
2846: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',200);
2847: hr_utility.trace('RCO formating and Validation was successful');
2848: --
2849: -- This section increments the counter to be reported in RCU record for Valid
2850: -- or Error Record
2851: -- Valid condtion is atleast one value of RCO is corrected for given employee
2851: -- Valid condtion is atleast one value of RCO is corrected for given employee
2852: -- Error condition is not even a single value is corrected for the employee
2853: --
2854: if ln_num_corrections_rco > 0 then
2855: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',205);
2856: pay_us_w2c_in_mmref2_format.number_of_valid_rco_rcu :=
2857: pay_us_w2c_in_mmref2_format.number_of_valid_rco_rcu + 1;
2858: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'N';
2859: else
2856: pay_us_w2c_in_mmref2_format.number_of_valid_rco_rcu :=
2857: pay_us_w2c_in_mmref2_format.number_of_valid_rco_rcu + 1;
2858: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'N';
2859: else
2860: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',206);
2861: pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu :=
2862: pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu + 1;
2863: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'Y';
2864: end if;
2864: end if;
2865: --}
2866: else
2867: --{
2868: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',210);
2869: hr_utility.trace('RCO formating and Validation ERROR out');
2870: pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu :=
2871: pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu + 1;
2872: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'Y';
2865: --}
2866: else
2867: --{
2868: hr_utility.set_location(gv_package || '.pay_us_w2c_RCW_record',210);
2869: hr_utility.trace('RCO formating and Validation ERROR out');
2870: pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu :=
2871: pay_us_w2c_in_mmref2_format.number_of_error_rco_rcu + 1;
2872: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'Y';
2873: --}
2878: else
2879: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'N';
2880: end if;
2881: -- return Flat format RCW record
2882: hr_utility.trace('RCW Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rcw_exclude_flag);
2883: hr_utility.trace('RCO Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rco_exclude_flag);
2884: hr_utility.trace('Number of Values corrected '||to_char(ln_num_corrections));
2885: hr_utility.trace(gv_package || '.pay_us_w2c_RCW_record'||' successfully completed');
2886: return (rcw_return_value);
2879: pay_us_w2c_in_mmref2_format.rco_exclude_flag := 'N';
2880: end if;
2881: -- return Flat format RCW record
2882: hr_utility.trace('RCW Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rcw_exclude_flag);
2883: hr_utility.trace('RCO Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rco_exclude_flag);
2884: hr_utility.trace('Number of Values corrected '||to_char(ln_num_corrections));
2885: hr_utility.trace(gv_package || '.pay_us_w2c_RCW_record'||' successfully completed');
2886: return (rcw_return_value);
2887: Exception
2880: end if;
2881: -- return Flat format RCW record
2882: hr_utility.trace('RCW Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rcw_exclude_flag);
2883: hr_utility.trace('RCO Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rco_exclude_flag);
2884: hr_utility.trace('Number of Values corrected '||to_char(ln_num_corrections));
2885: hr_utility.trace(gv_package || '.pay_us_w2c_RCW_record'||' successfully completed');
2886: return (rcw_return_value);
2887: Exception
2888: WHEN OTHERS THEN
2881: -- return Flat format RCW record
2882: hr_utility.trace('RCW Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rcw_exclude_flag);
2883: hr_utility.trace('RCO Exlcude from output Flag '||pay_us_w2c_in_mmref2_format.rco_exclude_flag);
2884: hr_utility.trace('Number of Values corrected '||to_char(ln_num_corrections));
2885: hr_utility.trace(gv_package || '.pay_us_w2c_RCW_record'||' successfully completed');
2886: return (rcw_return_value);
2887: Exception
2888: WHEN OTHERS THEN
2889: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
2885: hr_utility.trace(gv_package || '.pay_us_w2c_RCW_record'||' successfully completed');
2886: return (rcw_return_value);
2887: Exception
2888: WHEN OTHERS THEN
2889: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
2890: hr_utility.trace('Error: '||sqlerrm);
2891: END pay_us_w2c_RCW_record;
2892:
2893: --
2886: return (rcw_return_value);
2887: Exception
2888: WHEN OTHERS THEN
2889: hr_utility.trace('Error encountered in '||gv_package || '.pay_us_w2c_RCW_record');
2890: hr_utility.trace('Error: '||sqlerrm);
2891: END pay_us_w2c_RCW_record;
2892:
2893: --
2894: -- End of Procedure to get the Archived values of RCW/RCO record
2893: --
2894: -- End of Procedure to get the Archived values of RCW/RCO record
2895: --
2896: --BEGIN
2897: --hr_utility.trace_on(null,'W2CGAV');
2898: END pay_us_w2c_in_mmref2_format;