[Home] [Help]
PACKAGE BODY: APPS.PYSQDATA
Source
1 package body pysqdata as
2 /* $Header: pysqdata.pkb 115.1 99/07/17 06:33:12 porting ship $ */
3 /*===========================================================================+
4 | Copyright (c) 1995 Oracle Corporation |
5 | Redwood Shores, California, USA |
6 | All rights reserved. |
7 +============================================================================+
8 Name
9 pysqdata
10 Purpose
11 Sets up the data to provide State Quarterly Wage Reporting.
12 Notes
13 This data is US specific.
14 History
15 ****************************************************************************
16 18-Feb-1999 VMehta 110.0 Created this file from pyw2data.pkb
17 by moving the SQWL specific stuff
18 to reduce the original program size.
19 For changes made before 18-Feb-1999
20 please look at pyw2data.pkb
21 02-Mar-1999 VMehta 40.2 Added Diskette/FTP report format mappings
22 for states(1 Qtr. 1999).
23
24 04-MAR-1999 Asasthan 40.3 Added dummy employer formula for Florida Diskette.
25 meshah contd. Inserted the formula definition for Iowa Tape(ICESA).
26 12-mar-1999 VMehta 40.4 Removed the Diskette formats for CA, FL, TX
27 ID, OK, NJ and MS. Will be provided at a
28 later date
29 Modified format for Connecticut.
30 16-mar-1999 VMehta 40.5(110.1) Added FTP format for Illinois
31 ***************************************************************************
32
33 ============================================================================*/
34 --
35 -- Date constants representing the start and end of time.sqlk
36 --
37 START_OF_TIME constant date := to_date('01/01/0001','DD/MM/YYYY');
38 END_OF_TIME constant date := to_date('31/12/4712','DD/MM/YYYY');
39 --
40 -----------------------------------------------------------------------------
41 -- Name
42 -- lookup_formula
43 -- Purpose
44 -- Given a formula name it returns its id.
45 -- Arguments
46 -- Notes
47 -----------------------------------------------------------------------------
48 --
49 function lookup_formula
50 (
51 p_session_date date,
52 p_business_group_id number,
53 p_legislation_code varchar2,
54 p_formula_name varchar2
55 ) return number is
56 --
57 -- Local variable to hold formula_id from cursor fetch.
58 --
59 formula_id number;
60 --
61 -- Get the formula id for the specified formula.
62 --
63 cursor csr_formula is
64 select FM.formula_id
65 from ff_formulas_f FM
66 where FM.legislation_code = p_legislation_code
67 and FM.formula_name = upper(p_formula_name)
68 and p_session_date between FM.effective_start_date
69 and FM.effective_end_date;
70 --
71 begin
72 --
73 open csr_formula;
74 fetch csr_formula into formula_id;
75 if csr_formula%notfound then
76 close csr_formula;
77 raise NO_DATA_FOUND;
78 end if;
79 close csr_formula;
80 --
81 return (formula_id);
82 --
83 end lookup_formula;
84 --
85 -----------------------------------------------------------------------------
86 -- Name
87 -- setup
88 -- Purpose
89 -- Sets up data to provide W2 and State Quarterly Wage reporting.
90 -- Arguments
91 -- None
92 -- Notes
93 -----------------------------------------------------------------------------
94 --
95 procedure setup is
96 --
97 -- Holds the name of the report format.
98 --
99 L_REPORT_FORMAT varchar2(30);
100 --
101 -- Holds the ID's of created blocks.
102 --
103 L_BLOCK1 number;
104 L_BLOCK2 number;
105 L_BLOCK3 number;
106 L_BLOCK4 number;
107 L_BLOCK5 number;
108 --
109 -- Holds the ID of a formula.
110 --
111 L_FORMULA_ID number;
112 --
113 begin
114 --
115 --------------------------------------------------------------------------
116 -- ICESA format -
117 --------------------------------------------------------------------------
118 --
119 -- Set up report format to be maintained.
120 --
121 L_REPORT_FORMAT := 'ICESA';
122 --
123 -- Clear down current format definition and its mappings.
124 --
125 delete from pay_magnetic_records MGR
126 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
127 from pay_magnetic_blocks MGB
128 where MGB.report_format = L_REPORT_FORMAT);
129 --
130 delete from pay_magnetic_blocks MGB
131 where MGB.report_format = L_REPORT_FORMAT;
132 --
133 delete from pay_report_format_mappings_f RFM
134 where RFM.report_format = L_REPORT_FORMAT;
135 --
136 -- Report to format definitions.
137 --
138 -- 17-Jan-1995 The Current List of ICESA States
139
140 insert into pay_report_format_mappings_f
141 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
142 RANGE_CODE,
143 ASSIGNMENT_ACTION_CODE,
144 INITIALIZATION_CODE,
145 ARCHIVE_CODE,
146 MAGNETIC_CODE,
147 REPORT_FORMAT, EFFECTIVE_START_DATE,
148 EFFECTIVE_END_DATE )
149 values ('SQWL' , 'AL', 'RT',
150 'pay_us_archive.range_cursor',
151 'pay_us_archive.action_creation',
152 'pay_us_archive.archinit',
153 'pay_us_archive.archive_data',
154 'pay_magtape_generic.new_formula',
155 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
156
157 insert into pay_report_format_mappings_f
158 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
159 RANGE_CODE,
160 ASSIGNMENT_ACTION_CODE,
161 INITIALIZATION_CODE,
162 ARCHIVE_CODE,
163 MAGNETIC_CODE,
164 REPORT_FORMAT, EFFECTIVE_START_DATE,
165 EFFECTIVE_END_DATE )
166 values ('SQWL' , 'AZ', 'RT',
167 'pay_us_archive.range_cursor',
168 'pay_us_archive.action_creation',
169 'pay_us_archive.archinit',
170 'pay_us_archive.archive_data',
171 'pay_magtape_generic.new_formula',
172 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
173
174 insert into pay_report_format_mappings_f
175 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
176 RANGE_CODE,
177 ASSIGNMENT_ACTION_CODE,
178 INITIALIZATION_CODE,
179 ARCHIVE_CODE,
180 MAGNETIC_CODE,
181 REPORT_FORMAT, EFFECTIVE_START_DATE,
182 EFFECTIVE_END_DATE )
183 values ('SQWL' , 'CA', 'RT',
184 'pay_us_archive.range_cursor',
185 'pay_us_archive.action_creation',
186 'pay_us_archive.archinit',
187 'pay_us_archive.archive_data',
188 'pay_magtape_generic.new_formula',
189 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
190
191 insert into pay_report_format_mappings_f
192 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
193 RANGE_CODE,
194 ASSIGNMENT_ACTION_CODE,
195 INITIALIZATION_CODE,
196 ARCHIVE_CODE,
197 MAGNETIC_CODE,
198 REPORT_FORMAT, EFFECTIVE_START_DATE,
199 EFFECTIVE_END_DATE )
200 values ('SQWL' , 'CO', 'RT',
201 'pay_us_archive.range_cursor',
202 'pay_us_archive.action_creation',
203 'pay_us_archive.archinit',
204 'pay_us_archive.archive_data',
205 'pay_magtape_generic.new_formula',
206 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
207
208 insert into pay_report_format_mappings_f
209 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
210 RANGE_CODE,
211 ASSIGNMENT_ACTION_CODE,
212 INITIALIZATION_CODE,
213 ARCHIVE_CODE,
214 MAGNETIC_CODE,
215 REPORT_FORMAT, EFFECTIVE_START_DATE,
216 EFFECTIVE_END_DATE )
217 values ('SQWL' , 'IA', 'RT',
218 'pay_us_archive.range_cursor',
219 'pay_us_archive.action_creation',
220 'pay_us_archive.archinit',
221 'pay_us_archive.archive_data',
222 'pay_magtape_generic.new_formula',
223 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
224
225 insert into pay_report_format_mappings_f
226 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
227 RANGE_CODE,
228 ASSIGNMENT_ACTION_CODE,
229 INITIALIZATION_CODE,
230 ARCHIVE_CODE,
231 MAGNETIC_CODE,
232 REPORT_FORMAT, EFFECTIVE_START_DATE,
233 EFFECTIVE_END_DATE )
234 values ('SQWL' , 'IL', 'RT',
235 'pay_us_archive.range_cursor',
236 'pay_us_archive.action_creation',
237 'pay_us_archive.archinit',
238 'pay_us_archive.archive_data',
239 'pay_magtape_generic.new_formula',
240 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
241
242 insert into pay_report_format_mappings_f
243 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
244 RANGE_CODE,
245 ASSIGNMENT_ACTION_CODE,
246 INITIALIZATION_CODE,
247 ARCHIVE_CODE,
248 MAGNETIC_CODE,
249 REPORT_FORMAT, EFFECTIVE_START_DATE,
250 EFFECTIVE_END_DATE )
251 values ('SQWL' , 'IN', 'RT',
252 'pay_us_archive.range_cursor',
253 'pay_us_archive.action_creation',
254 'pay_us_archive.archinit',
255 'pay_us_archive.archive_data',
256 'pay_magtape_generic.new_formula',
257 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
258
259 insert into pay_report_format_mappings_f
260 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
261 RANGE_CODE,
262 ASSIGNMENT_ACTION_CODE,
263 INITIALIZATION_CODE,
264 ARCHIVE_CODE,
265 MAGNETIC_CODE,
266 REPORT_FORMAT, EFFECTIVE_START_DATE,
267 EFFECTIVE_END_DATE )
268 values ('SQWL' , 'KS', 'RT',
269 'pay_us_archive.range_cursor',
270 'pay_us_archive.action_creation',
271 'pay_us_archive.archinit',
272 'pay_us_archive.archive_data',
273 'pay_magtape_generic.new_formula',
274 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
275
276 insert into pay_report_format_mappings_f
277 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
278 RANGE_CODE,
279 ASSIGNMENT_ACTION_CODE,
280 INITIALIZATION_CODE,
281 ARCHIVE_CODE,
282 MAGNETIC_CODE,
283 REPORT_FORMAT, EFFECTIVE_START_DATE,
284 EFFECTIVE_END_DATE )
285 values ('SQWL' , 'ME', 'RT',
286 'pay_us_archive.range_cursor',
287 'pay_us_archive.action_creation',
288 'pay_us_archive.archinit',
289 'pay_us_archive.archive_data',
290 'pay_magtape_generic.new_formula',
291 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
292
293 insert into pay_report_format_mappings_f
294 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
295 RANGE_CODE,
296 ASSIGNMENT_ACTION_CODE,
297 INITIALIZATION_CODE,
298 ARCHIVE_CODE,
299 MAGNETIC_CODE,
300 REPORT_FORMAT, EFFECTIVE_START_DATE,
301 EFFECTIVE_END_DATE )
302 values ('SQWL' , 'KY', 'RT',
303 'pay_us_archive.range_cursor',
304 'pay_us_archive.action_creation',
305 'pay_us_archive.archinit',
306 'pay_us_archive.archive_data',
307 'pay_magtape_generic.new_formula',
308 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
309
310 insert into pay_report_format_mappings_f
311 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
312 RANGE_CODE,
313 ASSIGNMENT_ACTION_CODE,
314 INITIALIZATION_CODE,
315 ARCHIVE_CODE,
316 MAGNETIC_CODE,
317 REPORT_FORMAT, EFFECTIVE_START_DATE,
318 EFFECTIVE_END_DATE )
319 values ('SQWL' , 'MD', 'RT',
320 'pay_us_archive.range_cursor',
321 'pay_us_archive.action_creation',
322 'pay_us_archive.archinit',
323 'pay_us_archive.archive_data',
324 'pay_magtape_generic.new_formula',
325 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
326
327 insert into pay_report_format_mappings_f
328 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
329 RANGE_CODE,
330 ASSIGNMENT_ACTION_CODE,
331 INITIALIZATION_CODE,
332 ARCHIVE_CODE,
333 MAGNETIC_CODE,
334 REPORT_FORMAT, EFFECTIVE_START_DATE,
335 EFFECTIVE_END_DATE )
336 values ('SQWL' , 'MA', 'RT',
337 'pay_us_archive.range_cursor',
338 'pay_us_archive.action_creation',
339 'pay_us_archive.archinit',
340 'pay_us_archive.archive_data',
341 'pay_magtape_generic.new_formula',
342 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
343
344 insert into pay_report_format_mappings_f
345 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
346 RANGE_CODE,
347 ASSIGNMENT_ACTION_CODE,
348 INITIALIZATION_CODE,
349 ARCHIVE_CODE,
350 MAGNETIC_CODE,
351 REPORT_FORMAT, EFFECTIVE_START_DATE,
352 EFFECTIVE_END_DATE )
353 values ('SQWL' , 'MN', 'RT',
354 'pay_us_archive.range_cursor',
355 'pay_us_archive.action_creation',
356 'pay_us_archive.archinit',
357 'pay_us_archive.archive_data',
358 'pay_magtape_generic.new_formula',
359 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
360
361 insert into pay_report_format_mappings_f
362 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
363 RANGE_CODE,
364 ASSIGNMENT_ACTION_CODE,
365 INITIALIZATION_CODE,
366 ARCHIVE_CODE,
367 MAGNETIC_CODE,
368 REPORT_FORMAT, EFFECTIVE_START_DATE,
369 EFFECTIVE_END_DATE )
370 values ('SQWL' , 'MO', 'RT',
371 'pay_us_archive.range_cursor',
372 'pay_us_archive.action_creation',
373 'pay_us_archive.archinit',
374 'pay_us_archive.archive_data',
375 'pay_magtape_generic.new_formula',
376 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
377
378 insert into pay_report_format_mappings_f
379 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
380 RANGE_CODE,
381 ASSIGNMENT_ACTION_CODE,
382 INITIALIZATION_CODE,
383 ARCHIVE_CODE,
384 MAGNETIC_CODE,
385 REPORT_FORMAT, EFFECTIVE_START_DATE,
386 EFFECTIVE_END_DATE )
387 values ('SQWL' , 'MT', 'RT',
388 'pay_us_archive.range_cursor',
389 'pay_us_archive.action_creation',
390 'pay_us_archive.archinit',
391 'pay_us_archive.archive_data',
392 'pay_magtape_generic.new_formula',
393 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
394
395 insert into pay_report_format_mappings_f
396 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
397 RANGE_CODE,
398 ASSIGNMENT_ACTION_CODE,
399 INITIALIZATION_CODE,
400 ARCHIVE_CODE,
401 MAGNETIC_CODE,
402 REPORT_FORMAT, EFFECTIVE_START_DATE,
403 EFFECTIVE_END_DATE )
404 values ('SQWL' , 'NV', 'RT',
405 'pay_us_archive.range_cursor',
406 'pay_us_archive.action_creation',
407 'pay_us_archive.archinit',
408 'pay_us_archive.archive_data',
409 'pay_magtape_generic.new_formula',
410 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
411
412 insert into pay_report_format_mappings_f
413 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
414 RANGE_CODE,
415 ASSIGNMENT_ACTION_CODE,
416 INITIALIZATION_CODE,
417 ARCHIVE_CODE,
418 MAGNETIC_CODE,
419 REPORT_FORMAT, EFFECTIVE_START_DATE,
420 EFFECTIVE_END_DATE )
421 values ('SQWL' , 'NC', 'RT',
422 'pay_us_archive.range_cursor',
423 'pay_us_archive.action_creation',
424 'pay_us_archive.archinit',
425 'pay_us_archive.archive_data',
426 'pay_magtape_generic.new_formula',
427 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
428
429 insert into pay_report_format_mappings_f
430 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
431 RANGE_CODE,
432 ASSIGNMENT_ACTION_CODE,
433 INITIALIZATION_CODE,
434 ARCHIVE_CODE,
435 MAGNETIC_CODE,
436 REPORT_FORMAT, EFFECTIVE_START_DATE,
437 EFFECTIVE_END_DATE )
438 values ('SQWL' , 'OK', 'RT',
439 'pay_us_archive.range_cursor',
440 'pay_us_archive.action_creation',
441 'pay_us_archive.archinit',
442 'pay_us_archive.archive_data',
443 'pay_magtape_generic.new_formula',
444 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
445
446 insert into pay_report_format_mappings_f
447 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
448 RANGE_CODE,
449 ASSIGNMENT_ACTION_CODE,
450 INITIALIZATION_CODE,
451 ARCHIVE_CODE,
452 MAGNETIC_CODE,
453 REPORT_FORMAT, EFFECTIVE_START_DATE,
454 EFFECTIVE_END_DATE )
455 values ('SQWL' , 'PA', 'RT',
456 'pay_us_archive.range_cursor',
457 'pay_us_archive.action_creation',
458 'pay_us_archive.archinit',
459 'pay_us_archive.archive_data',
460 'pay_magtape_generic.new_formula',
461 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
462
463 insert into pay_report_format_mappings_f
464 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
465 RANGE_CODE,
466 ASSIGNMENT_ACTION_CODE,
467 INITIALIZATION_CODE,
468 ARCHIVE_CODE,
469 MAGNETIC_CODE,
470 REPORT_FORMAT, EFFECTIVE_START_DATE,
471 EFFECTIVE_END_DATE )
472 values ('SQWL' , 'SC', 'RT',
473 'pay_us_archive.range_cursor',
474 'pay_us_archive.action_creation',
475 'pay_us_archive.archinit',
476 'pay_us_archive.archive_data',
477 'pay_magtape_generic.new_formula',
478 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
479
480 insert into pay_report_format_mappings_f
481 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
482 RANGE_CODE,
483 ASSIGNMENT_ACTION_CODE,
484 INITIALIZATION_CODE,
485 ARCHIVE_CODE,
486 MAGNETIC_CODE,
487 REPORT_FORMAT, EFFECTIVE_START_DATE,
488 EFFECTIVE_END_DATE )
489 values ('SQWL' , 'SD', 'RT',
490 'pay_us_archive.range_cursor',
491 'pay_us_archive.action_creation',
492 'pay_us_archive.archinit',
493 'pay_us_archive.archive_data',
494 'pay_magtape_generic.new_formula',
495 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
496
497 insert into pay_report_format_mappings_f
498 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
499 RANGE_CODE,
500 ASSIGNMENT_ACTION_CODE,
501 INITIALIZATION_CODE,
502 ARCHIVE_CODE,
503 MAGNETIC_CODE,
504 REPORT_FORMAT, EFFECTIVE_START_DATE,
505 EFFECTIVE_END_DATE )
506 values ('SQWL' , 'TN', 'RT',
507 'pay_us_archive.range_cursor',
508 'pay_us_archive.action_creation',
509 'pay_us_archive.archinit',
510 'pay_us_archive.archive_data',
511 'pay_magtape_generic.new_formula',
512 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
513
514 insert into pay_report_format_mappings_f
515 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
516 RANGE_CODE,
517 ASSIGNMENT_ACTION_CODE,
518 INITIALIZATION_CODE,
519 ARCHIVE_CODE,
520 MAGNETIC_CODE,
521 REPORT_FORMAT, EFFECTIVE_START_DATE,
522 EFFECTIVE_END_DATE )
523 values ('SQWL' , 'TX', 'RT',
524 'pay_us_archive.range_cursor',
525 'pay_us_archive.action_creation',
526 'pay_us_archive.archinit',
527 'pay_us_archive.archive_data',
528 'pay_magtape_generic.new_formula',
529 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
530
531 insert into pay_report_format_mappings_f
532 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
533 RANGE_CODE,
534 ASSIGNMENT_ACTION_CODE,
535 INITIALIZATION_CODE,
536 ARCHIVE_CODE,
537 MAGNETIC_CODE,
538 REPORT_FORMAT, EFFECTIVE_START_DATE,
539 EFFECTIVE_END_DATE )
540 values ('SQWL' , 'VT', 'RT',
541 'pay_us_archive.range_cursor',
542 'pay_us_archive.action_creation',
543 'pay_us_archive.archinit',
544 'pay_us_archive.archive_data',
545 'pay_magtape_generic.new_formula',
546 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
547
548 insert into pay_report_format_mappings_f
549 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
550 RANGE_CODE,
551 ASSIGNMENT_ACTION_CODE,
552 INITIALIZATION_CODE,
553 ARCHIVE_CODE,
554 MAGNETIC_CODE,
555 REPORT_FORMAT, EFFECTIVE_START_DATE,
556 EFFECTIVE_END_DATE )
557 values ('SQWL' , 'WV', 'RT',
558 'pay_us_archive.range_cursor',
559 'pay_us_archive.action_creation',
560 'pay_us_archive.archinit',
561 'pay_us_archive.archive_data',
562 'pay_magtape_generic.new_formula',
563 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
564
565 -- End ICESA Data
566
567 --
568 -- Block definitions.
569 --
570 pay_mgb_ins.ins
571 (p_magnetic_block_id => L_BLOCK1
572 ,p_block_name => 'TRANSMITTER'
573 ,p_main_block_flag => 'Y'
574 ,p_report_format => L_REPORT_FORMAT
575 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
576 ,p_no_column_returned => 6
577 ,p_validate => false);
578 --
579 pay_mgb_ins.ins
580 (p_magnetic_block_id => L_BLOCK2
581 ,p_block_name => 'EMPLOYER'
582 ,p_main_block_flag => 'N'
583 ,p_report_format => L_REPORT_FORMAT
584 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
585 ,p_no_column_returned => 12
586 ,p_validate => false);
587 --
588 pay_mgb_ins.ins
589 (p_magnetic_block_id => L_BLOCK3
590 ,p_block_name => 'EMPLOYEE'
591 ,p_main_block_flag => 'N'
592 ,p_report_format => L_REPORT_FORMAT
593 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
594 ,p_no_column_returned => 8
595 ,p_validate => false);
596 --
597 -- Record definitions.
598 --
599
600 pay_mgr_ins.ins
601 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
602 'ICESA_TRANSMITTER')
603 ,p_magnetic_block_id => L_BLOCK1
604 ,p_next_block_id => NULL
605 ,p_last_run_executed_mode => 'N'
606 ,p_overflow_mode => 'N'
607 ,p_sequence => 1
608 ,p_frequency => NULL
609 ,p_validate => false);
610
611 --
612 pay_mgr_ins.ins
613 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
614 'ICESA_BINFO')
615 ,p_magnetic_block_id => L_BLOCK1
616 ,p_next_block_id => L_BLOCK2
617 ,p_last_run_executed_mode => 'N'
618 ,p_overflow_mode => 'N'
619 ,p_sequence => 2
620 ,p_frequency => NULL
621 ,p_validate => false);
622 --
623 pay_mgr_ins.ins
624 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
625 'ICESA_FINAL')
626 ,p_magnetic_block_id => L_BLOCK1
627 ,p_next_block_id => NULL
628 ,p_last_run_executed_mode => 'N'
629 ,p_overflow_mode => 'N'
630 ,p_sequence => 3
631 ,p_frequency => NULL
632 ,p_validate => false);
633 --
634 pay_mgr_ins.ins
635 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
636 'ICESA_EMPLOYER')
637 ,p_magnetic_block_id => L_BLOCK2
638 ,p_next_block_id => L_BLOCK3
639 ,p_last_run_executed_mode => 'N'
640 ,p_overflow_mode => 'N'
641 ,p_sequence => 1
642 ,p_frequency => NULL
643 ,p_validate => false);
644 --
645 pay_mgr_ins.ins
646 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
647 'ICESA_TOTAL')
648 ,p_magnetic_block_id => L_BLOCK2
649 ,p_next_block_id => NULL
650 ,p_last_run_executed_mode => 'N'
651 ,p_overflow_mode => 'N'
652 ,p_sequence => 2
653 ,p_frequency => NULL
654 ,p_validate => false);
655 --
656 pay_mgr_ins.ins
657 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
658 'ICESA_TOTAL2')
659 ,p_magnetic_block_id => L_BLOCK2
660 ,p_next_block_id => NULL
661 ,p_last_run_executed_mode => 'N'
662 ,p_overflow_mode => 'N'
663 ,p_sequence => 3
664 ,p_frequency => NULL
665 ,p_validate => false);
666 --
667
668 pay_mgr_ins.ins
669 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
670 'ICESA_SUPPLEMENTAL')
671 ,p_magnetic_block_id => L_BLOCK3
672 ,p_next_block_id => NULL
673 ,p_last_run_executed_mode => 'N'
674 ,p_overflow_mode => 'N'
675 ,p_sequence => 1
676 ,p_frequency => NULL
677 ,p_validate => false);
678 --
679
680 --
681 --------------------------------------------------------------------------
682 -- SSA_SQWL format -
683 --------------------------------------------------------------------------
684 --
685 -- Set up report format to be maintained.
686 --
687 L_REPORT_FORMAT := 'SSA_SQWL';
688 --
689 -- Clear down current format definition and its mappings.
690 --
691 delete from pay_magnetic_records MGR
692 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
693 from pay_magnetic_blocks MGB
694 where MGB.report_format = L_REPORT_FORMAT);
695 --
696 delete from pay_magnetic_blocks MGB
697 where MGB.report_format = L_REPORT_FORMAT;
698 --
699 delete from pay_report_format_mappings_f RFM
700 where RFM.report_format = L_REPORT_FORMAT;
701 --
702 -- Report to format definitions.
703 --
704 -- 17-Jan-1996 The Current List of SSA_SQWL States
705
706
707 insert into pay_report_format_mappings_f
708 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
709 RANGE_CODE,
710 ASSIGNMENT_ACTION_CODE,
711 INITIALIZATION_CODE,
712 ARCHIVE_CODE,
713 MAGNETIC_CODE,
714 REPORT_FORMAT, EFFECTIVE_START_DATE,
715 EFFECTIVE_END_DATE )
716 values ('SQWL' , 'AR', 'RT',
717 'pay_us_archive.range_cursor',
718 'pay_us_archive.action_creation',
719 'pay_us_archive.archinit',
720 'pay_us_archive.archive_data',
721 'pay_magtape_generic.new_formula',
722 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
723
724 insert into pay_report_format_mappings_f
725 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
726 RANGE_CODE,
727 ASSIGNMENT_ACTION_CODE,
728 INITIALIZATION_CODE,
729 ARCHIVE_CODE,
730 MAGNETIC_CODE,
731 REPORT_FORMAT, EFFECTIVE_START_DATE,
732 EFFECTIVE_END_DATE )
733 values ('SQWL' , 'DE', 'RT',
734 'pay_us_archive.range_cursor',
735 'pay_us_archive.action_creation',
736 'pay_us_archive.archinit',
737 'pay_us_archive.archive_data',
738 'pay_magtape_generic.new_formula',
739 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
740
741 insert into pay_report_format_mappings_f
742 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
743 RANGE_CODE,
744 ASSIGNMENT_ACTION_CODE,
745 INITIALIZATION_CODE,
746 ARCHIVE_CODE,
747 MAGNETIC_CODE,
748 REPORT_FORMAT, EFFECTIVE_START_DATE,
749 EFFECTIVE_END_DATE )
750 values ('SQWL' , 'LA', 'RT',
751 'pay_us_archive.range_cursor',
752 'pay_us_archive.action_creation',
753 'pay_us_archive.archinit',
754 'pay_us_archive.archive_data',
755 'pay_magtape_generic.new_formula',
756 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
757
758 insert into pay_report_format_mappings_f
759 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
760 RANGE_CODE,
761 ASSIGNMENT_ACTION_CODE,
762 INITIALIZATION_CODE,
763 ARCHIVE_CODE,
764 MAGNETIC_CODE,
765 REPORT_FORMAT, EFFECTIVE_START_DATE,
766 EFFECTIVE_END_DATE )
767 values ('SQWL' , 'NE', 'RT',
768 'pay_us_archive.range_cursor',
769 'pay_us_archive.action_creation',
770 'pay_us_archive.archinit',
771 'pay_us_archive.archive_data',
772 'pay_magtape_generic.new_formula',
773 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
774
775 insert into pay_report_format_mappings_f
776 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
777 RANGE_CODE,
778 ASSIGNMENT_ACTION_CODE,
779 INITIALIZATION_CODE,
780 ARCHIVE_CODE,
781 MAGNETIC_CODE,
782 REPORT_FORMAT, EFFECTIVE_START_DATE,
783 EFFECTIVE_END_DATE )
784 values ('SQWL' , 'NH', 'RT',
785 'pay_us_archive.range_cursor',
786 'pay_us_archive.action_creation',
787 'pay_us_archive.archinit',
788 'pay_us_archive.archive_data',
789 'pay_magtape_generic.new_formula',
790 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
791
792 insert into pay_report_format_mappings_f
793 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
794 RANGE_CODE,
795 ASSIGNMENT_ACTION_CODE,
796 INITIALIZATION_CODE,
797 ARCHIVE_CODE,
798 MAGNETIC_CODE,
799 REPORT_FORMAT, EFFECTIVE_START_DATE,
800 EFFECTIVE_END_DATE )
801 values ('SQWL' , 'OR', 'RT',
802 'pay_us_archive.range_cursor',
803 'pay_us_archive.action_creation',
804 'pay_us_archive.archinit',
805 'pay_us_archive.archive_data',
806 'pay_magtape_generic.new_formula',
807 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
808
809
810 insert into pay_report_format_mappings_f
811 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
812 RANGE_CODE,
813 ASSIGNMENT_ACTION_CODE,
814 INITIALIZATION_CODE,
815 ARCHIVE_CODE,
816 MAGNETIC_CODE,
817 REPORT_FORMAT, EFFECTIVE_START_DATE,
818 EFFECTIVE_END_DATE )
819 values ('SQWL' , 'UT', 'RT',
820 'pay_us_archive.range_cursor',
821 'pay_us_archive.action_creation',
822 'pay_us_archive.archinit',
823 'pay_us_archive.archive_data',
824 'pay_magtape_generic.new_formula',
825 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
826
827 insert into pay_report_format_mappings_f
828 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
829 RANGE_CODE,
830 ASSIGNMENT_ACTION_CODE,
831 INITIALIZATION_CODE,
832 ARCHIVE_CODE,
833 MAGNETIC_CODE,
834 REPORT_FORMAT, EFFECTIVE_START_DATE,
835 EFFECTIVE_END_DATE )
836 values ('SQWL' , 'VA', 'RT',
837 'pay_us_archive.range_cursor',
838 'pay_us_archive.action_creation',
839 'pay_us_archive.archinit',
840 'pay_us_archive.archive_data',
841 'pay_magtape_generic.new_formula',
842 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
843
844 insert into pay_report_format_mappings_f
845 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
846 RANGE_CODE,
847 ASSIGNMENT_ACTION_CODE,
848 INITIALIZATION_CODE,
849 ARCHIVE_CODE,
850 MAGNETIC_CODE,
851 REPORT_FORMAT, EFFECTIVE_START_DATE,
852 EFFECTIVE_END_DATE )
853 values ('SQWL' , 'WI', 'RT',
854 'pay_us_archive.range_cursor',
855 'pay_us_archive.action_creation',
856 'pay_us_archive.archinit',
857 'pay_us_archive.archive_data',
858 'pay_magtape_generic.new_formula',
859 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
860
861
862 -- End Test Data
863
864 -- End finished SSA_SQWL Data
865
866 --
867 -- Block definitions.
868 --
869 pay_mgb_ins.ins
870 (p_magnetic_block_id => L_BLOCK1
871 ,p_block_name => 'TRANSMITTER'
872 ,p_main_block_flag => 'Y'
873 ,p_report_format => L_REPORT_FORMAT
874 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
875 ,p_no_column_returned => 6
876 ,p_validate => false);
877 --
878 pay_mgb_ins.ins
879 (p_magnetic_block_id => L_BLOCK2
880 ,p_block_name => 'EMPLOYER'
881 ,p_main_block_flag => 'N'
882 ,p_report_format => L_REPORT_FORMAT
883 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
884 ,p_no_column_returned => 12
885 ,p_validate => false);
886 --
887 pay_mgb_ins.ins
888 (p_magnetic_block_id => L_BLOCK3
889 ,p_block_name => 'EMPLOYEE'
890 ,p_main_block_flag => 'N'
891 ,p_report_format => L_REPORT_FORMAT
892 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
893 ,p_no_column_returned => 8
894 ,p_validate => false);
895 --
896 -- Record definitions.
897 --
898
899 pay_mgr_ins.ins
900 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
901 'SSA_SQWL_TRANSMITTER')
902 ,p_magnetic_block_id => L_BLOCK1
903 ,p_next_block_id => NULL
904 ,p_last_run_executed_mode => 'N'
905 ,p_overflow_mode => 'N'
906 ,p_sequence => 1
907 ,p_frequency => NULL
908 ,p_validate => false);
909
910 --
911 pay_mgr_ins.ins
912 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
913 'SSA_SQWL_BINFO')
914 ,p_magnetic_block_id => L_BLOCK1
915 ,p_next_block_id => L_BLOCK2
916 ,p_last_run_executed_mode => 'N'
917 ,p_overflow_mode => 'N'
918 ,p_sequence => 2
919 ,p_frequency => NULL
920 ,p_validate => false);
921 --
922 pay_mgr_ins.ins
923 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
924 'SSA_SQWL_FINAL')
925 ,p_magnetic_block_id => L_BLOCK1
926 ,p_next_block_id => NULL
927 ,p_last_run_executed_mode => 'N'
928 ,p_overflow_mode => 'N'
929 ,p_sequence => 3
930 ,p_frequency => NULL
931 ,p_validate => false);
932 --
933 pay_mgr_ins.ins
934 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
935 'SSA_SQWL_EMPLOYER')
936 ,p_magnetic_block_id => L_BLOCK2
937 ,p_next_block_id => L_BLOCK3
938 ,p_last_run_executed_mode => 'N'
939 ,p_overflow_mode => 'N'
940 ,p_sequence => 1
941 ,p_frequency => NULL
942 ,p_validate => false);
943 --
944 pay_mgr_ins.ins
945 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
946 'SSA_SQWL_TOTAL')
947 ,p_magnetic_block_id => L_BLOCK2
948 ,p_next_block_id => NULL
949 ,p_last_run_executed_mode => 'N'
950 ,p_overflow_mode => 'N'
951 ,p_sequence => 2
952 ,p_frequency => NULL
953 ,p_validate => false);
954 --
955
956 pay_mgr_ins.ins
957 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
958 'SSA_SQWL_SUPPLEMENTAL')
959 ,p_magnetic_block_id => L_BLOCK3
960 ,p_next_block_id => NULL
961 ,p_last_run_executed_mode => 'N'
962 ,p_overflow_mode => 'N'
963 ,p_sequence => 1
964 ,p_frequency => NULL
965 ,p_validate => false);
966 --
967
968 --
969 --------------------------------------------------------------------------
970 -- North Dakota SQWL format -
971 --------------------------------------------------------------------------
972 --
973 -- Set up report format to be maintained.
974 --
975 L_REPORT_FORMAT := 'NDSQWL';
976 --
977 -- Clear down current format definition and its mappings.
978 --
979 delete from pay_magnetic_records MGR
980 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
981 from pay_magnetic_blocks MGB
982 where MGB.report_format = L_REPORT_FORMAT);
983
984 delete from pay_magnetic_blocks MGB
985 where MGB.report_format = L_REPORT_FORMAT;
986 --
987 delete from pay_report_format_mappings_f RFM
988 where RFM.report_format = L_REPORT_FORMAT;
989 --
990 -- Report to format definitions.
991
992 insert into pay_report_format_mappings_f
993 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
994 RANGE_CODE,
995 ASSIGNMENT_ACTION_CODE,
996 INITIALIZATION_CODE,
997 ARCHIVE_CODE,
998 MAGNETIC_CODE,
999 REPORT_FORMAT, EFFECTIVE_START_DATE,
1000 EFFECTIVE_END_DATE )
1001 values ('SQWL' , 'ND', 'RT',
1002 'pay_us_archive.range_cursor',
1003 'pay_us_archive.action_creation',
1004 'pay_us_archive.archinit',
1005 'pay_us_archive.archive_data',
1006 'pay_magtape_generic.new_formula',
1007 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1008
1009 --
1010 -- Block definitions.
1011 --
1012 pay_mgb_ins.ins
1013 (p_magnetic_block_id => L_BLOCK1
1014 ,p_block_name => 'TRANSMITTER'
1015 ,p_main_block_flag => 'Y'
1016 ,p_report_format => L_REPORT_FORMAT
1017 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1018 ,p_no_column_returned => 6
1019 ,p_validate => false);
1020 --
1021 pay_mgb_ins.ins
1022 (p_magnetic_block_id => L_BLOCK2
1023 ,p_block_name => 'EMPLOYER'
1024 ,p_main_block_flag => 'N'
1025 ,p_report_format => L_REPORT_FORMAT
1026 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1027 ,p_no_column_returned => 12
1028 ,p_validate => false);
1029 --
1030 pay_mgb_ins.ins
1031 (p_magnetic_block_id => L_BLOCK3
1032 ,p_block_name => 'EMPLOYEE'
1033 ,p_main_block_flag => 'N'
1034 ,p_report_format => L_REPORT_FORMAT
1035 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1036 ,p_no_column_returned => 8
1037 ,p_validate => false);
1038 --
1039 -- Record definitions.
1040 --
1041
1042 pay_mgr_ins.ins
1043 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1044 'DUMMY_SQWL_TRANSMITTER')
1045 ,p_magnetic_block_id => L_BLOCK1
1046 ,p_next_block_id => L_BLOCK2
1047 ,p_last_run_executed_mode => 'N'
1048 ,p_overflow_mode => 'N'
1049 ,p_sequence => 1
1050 ,p_frequency => NULL
1051 ,p_validate => false);
1052
1053 --
1054 pay_mgr_ins.ins
1055 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1056 'DUMMY_SQWL_FINAL')
1057 ,p_magnetic_block_id => L_BLOCK1
1058 ,p_next_block_id => NULL
1059 ,p_last_run_executed_mode => 'N'
1060 ,p_overflow_mode => 'N'
1061 ,p_sequence => 2
1062 ,p_frequency => NULL
1063 ,p_validate => false);
1064 --
1065 pay_mgr_ins.ins
1066 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1067 'ICESA_EMPLOYER')
1068 ,p_magnetic_block_id => L_BLOCK2
1069 ,p_next_block_id => L_BLOCK3
1070 ,p_last_run_executed_mode => 'N'
1071 ,p_overflow_mode => 'N'
1072 ,p_sequence => 1
1073 ,p_frequency => NULL
1074 ,p_validate => false);
1075 --
1076 pay_mgr_ins.ins
1077 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1078 'ICESA_TOTAL')
1079 ,p_magnetic_block_id => L_BLOCK2
1080 ,p_next_block_id => NULL
1081 ,p_last_run_executed_mode => 'N'
1082 ,p_overflow_mode => 'N'
1083 ,p_sequence => 2
1084 ,p_frequency => NULL
1085 ,p_validate => false);
1086 --
1087 pay_mgr_ins.ins
1088 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1089 'ICESA_TOTAL2')
1090 ,p_magnetic_block_id => L_BLOCK2
1091 ,p_next_block_id => NULL
1092 ,p_last_run_executed_mode => 'N'
1093 ,p_overflow_mode => 'N'
1094 ,p_sequence => 3
1095 ,p_frequency => NULL
1096 ,p_validate => false);
1097 --
1098 pay_mgr_ins.ins
1099 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1100 'ICESA_SUPPLEMENTAL')
1101 ,p_magnetic_block_id => L_BLOCK3
1102 ,p_next_block_id => NULL
1103 ,p_last_run_executed_mode => 'N'
1104 ,p_overflow_mode => 'N'
1105 ,p_sequence => 1
1106 ,p_frequency => NULL
1107 ,p_validate => false);
1108 --
1109 --
1110 --------------------------------------------------------------------------
1111 -- Alaska SQWL format -
1112 --------------------------------------------------------------------------
1113 --
1114 -- Set up report format to be maintained.
1115 --
1116 L_REPORT_FORMAT := 'AKSQWL';
1117 --
1118 -- Clear down current format definition and its mappings.
1119 --
1120 delete from pay_magnetic_records MGR
1121 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1122 from pay_magnetic_blocks MGB
1123 where MGB.report_format = L_REPORT_FORMAT);
1124 --
1125 delete from pay_magnetic_blocks MGB
1126 where MGB.report_format = L_REPORT_FORMAT;
1127 --
1128 delete from pay_report_format_mappings_f RFM
1129 where RFM.report_format = L_REPORT_FORMAT;
1130 --
1131 -- Report to format definitions.
1132
1133 insert into pay_report_format_mappings_f
1134 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1135 RANGE_CODE,
1136 ASSIGNMENT_ACTION_CODE,
1137 INITIALIZATION_CODE,
1138 ARCHIVE_CODE,
1139 MAGNETIC_CODE,
1140 REPORT_FORMAT, EFFECTIVE_START_DATE,
1141 EFFECTIVE_END_DATE )
1142 values ('SQWL' , 'AK', 'RT',
1143 'pay_us_archive.range_cursor',
1144 'pay_us_archive.action_creation',
1145 'pay_us_archive.archinit',
1146 'pay_us_archive.archive_data',
1147 'pay_magtape_generic.new_formula',
1148 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1149
1150
1151 --
1152 -- Block definitions.
1153 --
1154 pay_mgb_ins.ins
1155 (p_magnetic_block_id => L_BLOCK1
1156 ,p_block_name => 'TRANSMITTER'
1157 ,p_main_block_flag => 'Y'
1158 ,p_report_format => L_REPORT_FORMAT
1159 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1160 ,p_no_column_returned => 6
1161 ,p_validate => false);
1162 --
1163 pay_mgb_ins.ins
1164 (p_magnetic_block_id => L_BLOCK2
1165 ,p_block_name => 'EMPLOYER'
1166 ,p_main_block_flag => 'N'
1167 ,p_report_format => L_REPORT_FORMAT
1168 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1169 ,p_no_column_returned => 12
1170 ,p_validate => false);
1171 --
1172 pay_mgb_ins.ins
1173 (p_magnetic_block_id => L_BLOCK3
1174 ,p_block_name => 'EMPLOYEE'
1175 ,p_main_block_flag => 'N'
1176 ,p_report_format => L_REPORT_FORMAT
1177 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1178 ,p_no_column_returned => 8
1179 ,p_validate => false);
1180 --
1181 -- Record definitions.
1182 --
1183 pay_mgr_ins.ins
1184 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1185 'DUMMY_SQWL_TRANSMITTER')
1186 ,p_magnetic_block_id => L_BLOCK1
1187 ,p_next_block_id => L_BLOCK2
1188 ,p_last_run_executed_mode => 'N'
1189 ,p_overflow_mode => 'N'
1190 ,p_sequence => 1
1191 ,p_frequency => NULL
1192 ,p_validate => false);
1193 --
1194 pay_mgr_ins.ins
1195 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1196 'DUMMY_SQWL_FINAL')
1197 ,p_magnetic_block_id => L_BLOCK1
1198 ,p_next_block_id => NULL
1199 ,p_last_run_executed_mode => 'N'
1200 ,p_overflow_mode => 'N'
1201 ,p_sequence => 2
1202 ,p_frequency => NULL
1203 ,p_validate => false);
1204 --
1205 pay_mgr_ins.ins
1206 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1207 'DUMMY_SQWL_EMPLOYER')
1208 ,p_magnetic_block_id => L_BLOCK2
1209 ,p_next_block_id => L_BLOCK3
1210 ,p_last_run_executed_mode => 'N'
1211 ,p_overflow_mode => 'N'
1212 ,p_sequence => 1
1213 ,p_frequency => NULL
1214 ,p_validate => false);
1215 --
1216 pay_mgr_ins.ins
1217 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1218 'AKSQWL_TOTAL')
1219 ,p_magnetic_block_id => L_BLOCK2
1220 ,p_next_block_id => NULL
1221 ,p_last_run_executed_mode => 'N'
1222 ,p_overflow_mode => 'N'
1223 ,p_sequence => 2
1224 ,p_frequency => NULL
1225 ,p_validate => false);
1226 --
1227 pay_mgr_ins.ins
1228 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1229 'AKSQWL_EMPLOYEE')
1230 ,p_magnetic_block_id => L_BLOCK3
1231 ,p_next_block_id => NULL
1232 ,p_last_run_executed_mode => 'N'
1233 ,p_overflow_mode => 'N'
1234 ,p_sequence => 1
1235 ,p_frequency => NULL
1236 ,p_validate => false);
1237 --
1238 --
1239 --------------------------------------------------------------------------
1240 -- Idaho SQWL format -
1241 --------------------------------------------------------------------------
1242 --
1243 -- Set up report format to be maintained.
1244 --
1245 L_REPORT_FORMAT := 'IDSQWL';
1246 --
1247 -- Clear down current format definition and its mappings.
1248 --
1249 delete from pay_magnetic_records MGR
1250 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1251 from pay_magnetic_blocks MGB
1252 where MGB.report_format = L_REPORT_FORMAT);
1253 --
1254 delete from pay_magnetic_blocks MGB
1255 where MGB.report_format = L_REPORT_FORMAT;
1256 --
1257 delete from pay_report_format_mappings_f RFM
1258 where RFM.report_format = L_REPORT_FORMAT;
1259 --
1260 -- Report to format definitions.
1261
1262 insert into pay_report_format_mappings_f
1263 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1264 RANGE_CODE,
1265 ASSIGNMENT_ACTION_CODE,
1266 INITIALIZATION_CODE,
1267 ARCHIVE_CODE,
1268 MAGNETIC_CODE,
1269 REPORT_FORMAT, EFFECTIVE_START_DATE,
1270 EFFECTIVE_END_DATE )
1271 values ('SQWL' , 'ID', 'RT',
1272 'pay_us_archive.range_cursor',
1273 'pay_us_archive.action_creation',
1274 'pay_us_archive.archinit',
1275 'pay_us_archive.archive_data',
1276 'pay_magtape_generic.new_formula',
1277 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1278
1279
1280 --
1281 -- Block definitions.
1282 --
1283 pay_mgb_ins.ins
1284 (p_magnetic_block_id => L_BLOCK1
1285 ,p_block_name => 'TRANSMITTER'
1286 ,p_main_block_flag => 'Y'
1287 ,p_report_format => L_REPORT_FORMAT
1288 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1289 ,p_no_column_returned => 6
1290 ,p_validate => false);
1291 --
1292 pay_mgb_ins.ins
1293 (p_magnetic_block_id => L_BLOCK2
1294 ,p_block_name => 'EMPLOYER'
1295 ,p_main_block_flag => 'N'
1296 ,p_report_format => L_REPORT_FORMAT
1297 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1298 ,p_no_column_returned => 12
1299 ,p_validate => false);
1300 --
1301 pay_mgb_ins.ins
1302 (p_magnetic_block_id => L_BLOCK3
1303 ,p_block_name => 'EMPLOYEE'
1304 ,p_main_block_flag => 'N'
1305 ,p_report_format => L_REPORT_FORMAT
1306 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1307 ,p_no_column_returned => 8
1308 ,p_validate => false);
1309 --
1310 -- Record definitions.
1311 --
1312 pay_mgr_ins.ins
1313 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1314 'DUMMY_SQWL_TRANSMITTER')
1315 ,p_magnetic_block_id => L_BLOCK1
1316 ,p_next_block_id => L_BLOCK2
1317 ,p_last_run_executed_mode => 'N'
1318 ,p_overflow_mode => 'N'
1319 ,p_sequence => 1
1320 ,p_frequency => NULL
1321 ,p_validate => false);
1322 --
1323 pay_mgr_ins.ins
1324 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1325 'DUMMY_SQWL_FINAL')
1326 ,p_magnetic_block_id => L_BLOCK1
1327 ,p_next_block_id => NULL
1328 ,p_last_run_executed_mode => 'N'
1329 ,p_overflow_mode => 'N'
1330 ,p_sequence => 2
1331 ,p_frequency => NULL
1332 ,p_validate => false);
1333 --
1334 pay_mgr_ins.ins
1335 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1336 'DUMMY_SQWL_EMPLOYER')
1337 ,p_magnetic_block_id => L_BLOCK2
1338 ,p_next_block_id => L_BLOCK3
1339 ,p_last_run_executed_mode => 'N'
1340 ,p_overflow_mode => 'N'
1341 ,p_sequence => 1
1342 ,p_frequency => NULL
1343 ,p_validate => false);
1344 --
1345 pay_mgr_ins.ins
1346 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1347 'DUMMY_SQWL_TOTAL')
1348 ,p_magnetic_block_id => L_BLOCK2
1349 ,p_next_block_id => NULL
1350 ,p_last_run_executed_mode => 'N'
1351 ,p_overflow_mode => 'N'
1352 ,p_sequence => 2
1353 ,p_frequency => NULL
1354 ,p_validate => false);
1355 --
1356 pay_mgr_ins.ins
1357 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1358 'IDSQWL_SUPPLEMENTAL')
1359 ,p_magnetic_block_id => L_BLOCK3
1360 ,p_next_block_id => NULL
1361 ,p_last_run_executed_mode => 'N'
1362 ,p_overflow_mode => 'N'
1363 ,p_sequence => 1
1364 ,p_frequency => NULL
1365 ,p_validate => false);
1366 --
1367 --------------------------------------------------------------------------
1368 -- District of Columbia SQWL format -
1369 --------------------------------------------------------------------------
1370 --
1371 -- Set up report format to be maintained.
1372 --
1373 L_REPORT_FORMAT := 'DCSQWL';
1374 --
1375 -- Clear down current format definition and its mappings.
1376 --
1377 delete from pay_magnetic_records MGR
1378 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1379 from pay_magnetic_blocks MGB
1380 where MGB.report_format = L_REPORT_FORMAT);
1381 --
1382 delete from pay_magnetic_blocks MGB
1383 where MGB.report_format = L_REPORT_FORMAT;
1384 --
1385 delete from pay_report_format_mappings_f RFM
1386 where RFM.report_format = L_REPORT_FORMAT;
1387 --
1388 -- Report to format definitions.
1389
1390 insert into pay_report_format_mappings_f
1391 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1392 RANGE_CODE,
1393 ASSIGNMENT_ACTION_CODE,
1394 INITIALIZATION_CODE,
1395 ARCHIVE_CODE,
1396 MAGNETIC_CODE,
1397 REPORT_FORMAT, EFFECTIVE_START_DATE,
1398 EFFECTIVE_END_DATE )
1399 values ('SQWL' , 'DC', 'RT',
1400 'pay_us_archive.range_cursor',
1401 'pay_us_archive.action_creation',
1402 'pay_us_archive.archinit',
1403 'pay_us_archive.archive_data',
1404 'pay_magtape_generic.new_formula',
1405 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1406
1407
1408 --
1409 -- Block definitions.
1410 --
1411 pay_mgb_ins.ins
1412 (p_magnetic_block_id => L_BLOCK1
1413 ,p_block_name => 'TRANSMITTER'
1414 ,p_main_block_flag => 'Y'
1415 ,p_report_format => L_REPORT_FORMAT
1416 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1417 ,p_no_column_returned => 6
1418 ,p_validate => false);
1419 --
1420 pay_mgb_ins.ins
1421 (p_magnetic_block_id => L_BLOCK2
1422 ,p_block_name => 'EMPLOYER'
1423 ,p_main_block_flag => 'N'
1424 ,p_report_format => L_REPORT_FORMAT
1425 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1426 ,p_no_column_returned => 12
1427 ,p_validate => false);
1428 --
1429 pay_mgb_ins.ins
1430 (p_magnetic_block_id => L_BLOCK3
1431 ,p_block_name => 'EMPLOYEE'
1432 ,p_main_block_flag => 'N'
1433 ,p_report_format => L_REPORT_FORMAT
1434 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1435 ,p_no_column_returned => 8
1436 ,p_validate => false);
1437 --
1438 -- Record definitions.
1439 --
1440 pay_mgr_ins.ins
1441 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1442 'DUMMY_SQWL_TRANSMITTER')
1443 ,p_magnetic_block_id => L_BLOCK1
1444 ,p_next_block_id => L_BLOCK2
1445 ,p_last_run_executed_mode => 'N'
1446 ,p_overflow_mode => 'N'
1447 ,p_sequence => 1
1448 ,p_frequency => NULL
1449 ,p_validate => false);
1450 --
1451 pay_mgr_ins.ins
1452 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1453 'DUMMY_SQWL_FINAL')
1454 ,p_magnetic_block_id => L_BLOCK1
1455 ,p_next_block_id => NULL
1456 ,p_last_run_executed_mode => 'N'
1457 ,p_overflow_mode => 'N'
1458 ,p_sequence => 2
1459 ,p_frequency => NULL
1460 ,p_validate => false);
1461 --
1462 pay_mgr_ins.ins
1463 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1464 'DUMMY_SQWL_EMPLOYER')
1465 ,p_magnetic_block_id => L_BLOCK2
1466 ,p_next_block_id => L_BLOCK3
1467 ,p_last_run_executed_mode => 'N'
1468 ,p_overflow_mode => 'N'
1469 ,p_sequence => 1
1470 ,p_frequency => NULL
1471 ,p_validate => false);
1472 --
1473 pay_mgr_ins.ins
1474 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1475 'DUMMY_SQWL_TOTAL')
1476 ,p_magnetic_block_id => L_BLOCK2
1477 ,p_next_block_id => NULL
1478 ,p_last_run_executed_mode => 'N'
1479 ,p_overflow_mode => 'N'
1480 ,p_sequence => 2
1481 ,p_frequency => NULL
1482 ,p_validate => false);
1483 --
1484 pay_mgr_ins.ins
1485 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1486 'DCSQWL_SUPPLEMENTAL')
1487 ,p_magnetic_block_id => L_BLOCK3
1488 ,p_next_block_id => NULL
1489 ,p_last_run_executed_mode => 'N'
1490 ,p_overflow_mode => 'N'
1491 ,p_sequence => 1
1492 ,p_frequency => NULL
1493 ,p_validate => false);
1494 --
1495 --
1496 --------------------------------------------------------------------------
1497 -- Puerto Rico SQWL format -
1498 --------------------------------------------------------------------------
1499 --
1500 -- Set up report format to be maintained.
1501 --
1502 L_REPORT_FORMAT := 'PRSQWL';
1503 --
1504 -- Clear down current format definition and its mappings.
1505 --
1506 delete from pay_magnetic_records MGR
1507 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1508 from pay_magnetic_blocks MGB
1509 where MGB.report_format = L_REPORT_FORMAT);
1510 --
1511 delete from pay_magnetic_blocks MGB
1512 where MGB.report_format = L_REPORT_FORMAT;
1513 --
1514 delete from pay_report_format_mappings_f RFM
1515 where RFM.report_format = L_REPORT_FORMAT;
1516 --
1517 -- Report to format definitions.
1518
1519 insert into pay_report_format_mappings_f
1520 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1521 RANGE_CODE,
1522 ASSIGNMENT_ACTION_CODE,
1523 INITIALIZATION_CODE,
1524 ARCHIVE_CODE,
1525 MAGNETIC_CODE,
1526 REPORT_FORMAT, EFFECTIVE_START_DATE,
1527 EFFECTIVE_END_DATE )
1528 values ('SQWL' , 'PR', 'RT',
1529 'pay_us_archive.range_cursor',
1530 'pay_us_archive.action_creation',
1531 'pay_us_archive.archinit',
1532 'pay_us_archive.archive_data',
1533 'pay_magtape_generic.new_formula',
1534 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1535
1536
1537 --
1538 -- Block definitions.
1539 --
1540 pay_mgb_ins.ins
1541 (p_magnetic_block_id => L_BLOCK1
1542 ,p_block_name => 'TRANSMITTER'
1543 ,p_main_block_flag => 'Y'
1544 ,p_report_format => L_REPORT_FORMAT
1545 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1546 ,p_no_column_returned => 6
1547 ,p_validate => false);
1548 --
1549 pay_mgb_ins.ins
1550 (p_magnetic_block_id => L_BLOCK2
1551 ,p_block_name => 'EMPLOYER'
1552 ,p_main_block_flag => 'N'
1553 ,p_report_format => L_REPORT_FORMAT
1554 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1555 ,p_no_column_returned => 12
1556 ,p_validate => false);
1557 --
1558 pay_mgb_ins.ins
1559 (p_magnetic_block_id => L_BLOCK3
1560 ,p_block_name => 'EMPLOYEE'
1561 ,p_main_block_flag => 'N'
1562 ,p_report_format => L_REPORT_FORMAT
1563 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1564 ,p_no_column_returned => 8
1565 ,p_validate => false);
1566 --
1567 -- Record definitions.
1568 --
1569 pay_mgr_ins.ins
1570 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1571 'DUMMY_SQWL_TRANSMITTER')
1572 ,p_magnetic_block_id => L_BLOCK1
1573 ,p_next_block_id => L_BLOCK2
1574 ,p_last_run_executed_mode => 'N'
1575 ,p_overflow_mode => 'N'
1576 ,p_sequence => 1
1577 ,p_frequency => NULL
1578 ,p_validate => false);
1579 --
1580 pay_mgr_ins.ins
1581 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1582 'DUMMY_SQWL_FINAL')
1583 ,p_magnetic_block_id => L_BLOCK1
1584 ,p_next_block_id => NULL
1585 ,p_last_run_executed_mode => 'N'
1586 ,p_overflow_mode => 'N'
1587 ,p_sequence => 2
1588 ,p_frequency => NULL
1589 ,p_validate => false);
1590 --
1591 pay_mgr_ins.ins
1592 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1593 'DUMMY_SQWL_EMPLOYER')
1594 ,p_magnetic_block_id => L_BLOCK2
1595 ,p_next_block_id => L_BLOCK3
1596 ,p_last_run_executed_mode => 'N'
1597 ,p_overflow_mode => 'N'
1598 ,p_sequence => 1
1599 ,p_frequency => NULL
1600 ,p_validate => false);
1601 --
1602 pay_mgr_ins.ins
1603 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1604 'DUMMY_SQWL_TOTAL')
1605 ,p_magnetic_block_id => L_BLOCK2
1606 ,p_next_block_id => NULL
1607 ,p_last_run_executed_mode => 'N'
1608 ,p_overflow_mode => 'N'
1609 ,p_sequence => 2
1610 ,p_frequency => NULL
1611 ,p_validate => false);
1612 --
1613 pay_mgr_ins.ins
1614 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1615 'PRSQWL_SUPPLEMENTAL')
1616 ,p_magnetic_block_id => L_BLOCK3
1617 ,p_next_block_id => NULL
1618 ,p_last_run_executed_mode => 'N'
1619 ,p_overflow_mode => 'N'
1620 ,p_sequence => 1
1621 ,p_frequency => NULL
1622 ,p_validate => false);
1623 --
1624 --
1625 --------------------------------------------------------------------------
1626 -- Indiana SQWL format -
1627 --------------------------------------------------------------------------
1628 --
1629 -- Set up report format to be maintained.
1630 --
1631 L_REPORT_FORMAT := 'INSQWL';
1632 --
1633 -- Clear down current format definition and its mappings.
1634 --
1635 delete from pay_magnetic_records MGR
1636 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1637 from pay_magnetic_blocks MGB
1638 where MGB.report_format = L_REPORT_FORMAT);
1639 --
1640 delete from pay_magnetic_blocks MGB
1641 where MGB.report_format = L_REPORT_FORMAT;
1642 --
1643 delete from pay_report_format_mappings_f RFM
1644 where RFM.report_format = L_REPORT_FORMAT;
1645 --
1646 -- Report to format definitions.
1647 /*
1648 insert into pay_report_format_mappings_f
1649 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1650 RANGE_CODE,
1651 ASSIGNMENT_ACTION_CODE,
1652 INITIALIZATION_CODE,
1653 ARCHIVE_CODE,
1654 MAGNETIC_CODE,
1655 REPORT_FORMAT, EFFECTIVE_START_DATE,
1656 EFFECTIVE_END_DATE )
1657 values ('SQWL' , 'IN', 'RT',
1658 'pay_us_archive.range_cursor',
1659 'pay_us_archive.action_creation',
1660 'pay_us_archive.archinit',
1661 'pay_us_archive.archive_data',
1662 'pay_magtape_generic.new_formula',
1663 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1664
1665 --
1666 -- Block definitions.
1667 --
1668 pay_mgb_ins.ins
1669 (p_magnetic_block_id => L_BLOCK1
1670 ,p_block_name => 'TRANSMITTER'
1671 ,p_main_block_flag => 'Y'
1672 ,p_report_format => L_REPORT_FORMAT
1673 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1674 ,p_no_column_returned => 6
1675 ,p_validate => false);
1676 --
1677 pay_mgb_ins.ins
1678 (p_magnetic_block_id => L_BLOCK2
1679 ,p_block_name => 'EMPLOYER'
1680 ,p_main_block_flag => 'N'
1681 ,p_report_format => L_REPORT_FORMAT
1682 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1683 ,p_no_column_returned => 12
1684 ,p_validate => false);
1685 --
1686 pay_mgb_ins.ins
1687 (p_magnetic_block_id => L_BLOCK3
1688 ,p_block_name => 'EMPLOYEE'
1689 ,p_main_block_flag => 'N'
1690 ,p_report_format => L_REPORT_FORMAT
1691 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1692 ,p_no_column_returned => 8
1693 ,p_validate => false);
1694 --
1695 -- Record definitions.
1696 --
1697
1698 pay_mgr_ins.ins
1699 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1700 'DUMMY_SQWL_TRANSMITTER')
1701 ,p_magnetic_block_id => L_BLOCK1
1702 ,p_next_block_id => L_BLOCK2
1703 ,p_last_run_executed_mode => 'N'
1704 ,p_overflow_mode => 'N'
1705 ,p_sequence => 1
1706 ,p_frequency => NULL
1707 ,p_validate => false);
1708
1709 --
1710 pay_mgr_ins.ins
1711 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1712 'INSQWL_FINAL')
1713 ,p_magnetic_block_id => L_BLOCK1
1714 ,p_next_block_id => NULL
1715 ,p_last_run_executed_mode => 'N'
1716 ,p_overflow_mode => 'N'
1717 ,p_sequence => 2
1718 ,p_frequency => NULL
1719 ,p_validate => false);
1720 --
1721 pay_mgr_ins.ins
1722 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1723 'DUMMY_SQWL_EMPLOYER')
1724 ,p_magnetic_block_id => L_BLOCK2
1725 ,p_next_block_id => L_BLOCK3
1726 ,p_last_run_executed_mode => 'N'
1727 ,p_overflow_mode => 'N'
1728 ,p_sequence => 1
1729 ,p_frequency => NULL
1730 ,p_validate => false);
1731 --
1732 pay_mgr_ins.ins
1733 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1734 'DUMMY_SQWL_TOTAL')
1735 ,p_magnetic_block_id => L_BLOCK2
1736 ,p_next_block_id => NULL
1737 ,p_last_run_executed_mode => 'N'
1738 ,p_overflow_mode => 'N'
1739 ,p_sequence => 2
1740 ,p_frequency => NULL
1741 ,p_validate => false);
1742 --
1743 pay_mgr_ins.ins
1744 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1745 'INSQWL_SUPPLEMENTAL')
1746 ,p_magnetic_block_id => L_BLOCK3
1747 ,p_next_block_id => NULL
1748 ,p_last_run_executed_mode => 'N'
1749 ,p_overflow_mode => 'N'
1750 ,p_sequence => 1
1751 ,p_frequency => NULL
1752 ,p_validate => false);
1753 --
1754 */
1755 --------------------------------------------------------------------------
1756 -- New Jersey SQWL format -
1757 --------------------------------------------------------------------------
1758 --
1759 -- Set up report format to be maintained.
1760 --
1761 L_REPORT_FORMAT := 'NJSQWL';
1762 --
1763 -- Clear down current format definition and its mappings.
1764 --
1765 delete from pay_magnetic_records MGR
1766 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1767 from pay_magnetic_blocks MGB
1768 where MGB.report_format = L_REPORT_FORMAT);
1769 --
1770 delete from pay_magnetic_blocks MGB
1771 where MGB.report_format = L_REPORT_FORMAT;
1772 --
1773 delete from pay_report_format_mappings_f RFM
1774 where RFM.report_format = L_REPORT_FORMAT;
1775 --
1776 -- Report to format definitions.
1777
1778 insert into pay_report_format_mappings_f
1779 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1780 RANGE_CODE,
1781 ASSIGNMENT_ACTION_CODE,
1782 INITIALIZATION_CODE,
1783 ARCHIVE_CODE,
1784 MAGNETIC_CODE,
1785 REPORT_FORMAT, EFFECTIVE_START_DATE,
1786 EFFECTIVE_END_DATE )
1787 values ('SQWL' , 'NJ', 'RT',
1788 'pay_us_archive.range_cursor',
1789 'pay_us_archive.action_creation',
1790 'pay_us_archive.archinit',
1791 'pay_us_archive.archive_data',
1792 'pay_magtape_generic.new_formula',
1793 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1794
1795
1796 --
1797 -- Block definitions.
1798 --
1799 pay_mgb_ins.ins
1800 (p_magnetic_block_id => L_BLOCK1
1801 ,p_block_name => 'TRANSMITTER'
1802 ,p_main_block_flag => 'Y'
1803 ,p_report_format => L_REPORT_FORMAT
1804 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1805 ,p_no_column_returned => 6
1806 ,p_validate => false);
1807 --
1808 pay_mgb_ins.ins
1809 (p_magnetic_block_id => L_BLOCK2
1810 ,p_block_name => 'EMPLOYER'
1811 ,p_main_block_flag => 'N'
1812 ,p_report_format => L_REPORT_FORMAT
1813 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1814 ,p_no_column_returned => 12
1815 ,p_validate => false);
1816 --
1817 pay_mgb_ins.ins
1818 (p_magnetic_block_id => L_BLOCK3
1819 ,p_block_name => 'EMPLOYEE'
1820 ,p_main_block_flag => 'N'
1821 ,p_report_format => L_REPORT_FORMAT
1822 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1823 ,p_no_column_returned => 8
1824 ,p_validate => false);
1825 --
1826 -- Record definitions.
1827 --
1828
1829 pay_mgr_ins.ins
1830 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1831 'NJSQWL_TRANSMITTER')
1832 ,p_magnetic_block_id => L_BLOCK1
1833 ,p_next_block_id => L_BLOCK2
1834 ,p_last_run_executed_mode => 'N'
1835 ,p_overflow_mode => 'N'
1836 ,p_sequence => 1
1837 ,p_frequency => NULL
1838 ,p_validate => false);
1839 --
1840 pay_mgr_ins.ins
1841 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1842 'DUMMY_SQWL_FINAL')
1843 ,p_magnetic_block_id => L_BLOCK1
1844 ,p_next_block_id => NULL
1845 ,p_last_run_executed_mode => 'N'
1846 ,p_overflow_mode => 'N'
1847 ,p_sequence => 2
1848 ,p_frequency => NULL
1849 ,p_validate => false);
1850 --
1851 pay_mgr_ins.ins
1852 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1853 'NJSQWL_EMPLOYER')
1854 ,p_magnetic_block_id => L_BLOCK2
1855 ,p_next_block_id => L_BLOCK3
1856 ,p_last_run_executed_mode => 'N'
1857 ,p_overflow_mode => 'N'
1858 ,p_sequence => 1
1859 ,p_frequency => NULL
1860 ,p_validate => false);
1861 --
1862 pay_mgr_ins.ins
1863 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1864 'DUMMY_SQWL_TOTAL')
1865 ,p_magnetic_block_id => L_BLOCK2
1866 ,p_next_block_id => NULL
1867 ,p_last_run_executed_mode => 'N'
1868 ,p_overflow_mode => 'N'
1869 ,p_sequence => 2
1870 ,p_frequency => NULL
1871 ,p_validate => false);
1872 --
1873 pay_mgr_ins.ins
1874 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1875 'NJSQWL_SUPPLEMENTAL')
1876 ,p_magnetic_block_id => L_BLOCK3
1877 ,p_next_block_id => NULL
1878 ,p_last_run_executed_mode => 'N'
1879 ,p_overflow_mode => 'N'
1880 ,p_sequence => 1
1881 ,p_frequency => NULL
1882 ,p_validate => false);
1883 --
1884
1885 --------------------------------------------------------------------------
1886 -- Georgia SQWL format -
1887 --------------------------------------------------------------------------
1888 --
1889 -- Set up report format to be maintained.
1890 --
1891 L_REPORT_FORMAT := 'GASQWL';
1892 --
1893 -- Clear down current format definition and its mappings.
1894 --
1895 delete from pay_magnetic_records MGR
1896 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
1897 from pay_magnetic_blocks MGB
1898 where MGB.report_format = L_REPORT_FORMAT);
1899 --
1900 delete from pay_magnetic_blocks MGB
1901 where MGB.report_format = L_REPORT_FORMAT;
1902 --
1903 delete from pay_report_format_mappings_f RFM
1904 where RFM.report_format = L_REPORT_FORMAT;
1905 --
1906 -- Report to format definitions.
1907
1908 insert into pay_report_format_mappings_f
1909 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
1910 RANGE_CODE,
1911 ASSIGNMENT_ACTION_CODE,
1912 INITIALIZATION_CODE,
1913 ARCHIVE_CODE,
1914 MAGNETIC_CODE,
1915 REPORT_FORMAT, EFFECTIVE_START_DATE,
1916 EFFECTIVE_END_DATE )
1917 values ('SQWL' , 'GA', 'RT',
1918 'pay_us_archive.range_cursor',
1919 'pay_us_archive.action_creation',
1920 'pay_us_archive.archinit',
1921 'pay_us_archive.archive_data',
1922 'pay_magtape_generic.new_formula',
1923 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
1924
1925
1926 --
1927 -- Block definitions.
1928 --
1929 pay_mgb_ins.ins
1930 (p_magnetic_block_id => L_BLOCK1
1931 ,p_block_name => 'TRANSMITTER'
1932 ,p_main_block_flag => 'Y'
1933 ,p_report_format => L_REPORT_FORMAT
1934 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
1935 ,p_no_column_returned => 6
1936 ,p_validate => false);
1937 --
1938 pay_mgb_ins.ins
1939 (p_magnetic_block_id => L_BLOCK2
1940 ,p_block_name => 'EMPLOYER'
1941 ,p_main_block_flag => 'N'
1942 ,p_report_format => L_REPORT_FORMAT
1943 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
1944 ,p_no_column_returned => 12
1945 ,p_validate => false);
1946 --
1947 pay_mgb_ins.ins
1948 (p_magnetic_block_id => L_BLOCK3
1949 ,p_block_name => 'EMPLOYEE'
1950 ,p_main_block_flag => 'N'
1951 ,p_report_format => L_REPORT_FORMAT
1952 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
1953 ,p_no_column_returned => 8
1954 ,p_validate => false);
1955 --
1956 -- Record definitions.
1957 --
1958 pay_mgr_ins.ins
1959 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1960 'DUMMY_SQWL_TRANSMITTER')
1961 ,p_magnetic_block_id => L_BLOCK1
1962 ,p_next_block_id => L_BLOCK2
1963 ,p_last_run_executed_mode => 'N'
1964 ,p_overflow_mode => 'N'
1965 ,p_sequence => 1
1966 ,p_frequency => NULL
1967 ,p_validate => false);
1968 --
1969 pay_mgr_ins.ins
1970 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1971 'DUMMY_SQWL_FINAL')
1972 ,p_magnetic_block_id => L_BLOCK1
1973 ,p_next_block_id => NULL
1974 ,p_last_run_executed_mode => 'N'
1975 ,p_overflow_mode => 'N'
1976 ,p_sequence => 2
1977 ,p_frequency => NULL
1978 ,p_validate => false);
1979 --
1980 pay_mgr_ins.ins
1981 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1982 'DUMMY_SQWL_EMPLOYER')
1983 ,p_magnetic_block_id => L_BLOCK2
1984 ,p_next_block_id => L_BLOCK3
1985 ,p_last_run_executed_mode => 'N'
1986 ,p_overflow_mode => 'N'
1987 ,p_sequence => 1
1988 ,p_frequency => NULL
1989 ,p_validate => false);
1990 --
1991 pay_mgr_ins.ins
1992 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
1993 'DUMMY_SQWL_TOTAL')
1994 ,p_magnetic_block_id => L_BLOCK2
1995 ,p_next_block_id => NULL
1996 ,p_last_run_executed_mode => 'N'
1997 ,p_overflow_mode => 'N'
1998 ,p_sequence => 2
1999 ,p_frequency => NULL
2000 ,p_validate => false);
2001 --
2002 pay_mgr_ins.ins
2003 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2004 'GASQWL_SUPPLEMENTAL')
2005 ,p_magnetic_block_id => L_BLOCK3
2006 ,p_next_block_id => NULL
2007 ,p_last_run_executed_mode => 'N'
2008 ,p_overflow_mode => 'N'
2009 ,p_sequence => 1
2010 ,p_frequency => NULL
2011 ,p_validate => false);
2012 --
2013
2014 --------------------------------------------------------------------------
2015 -- New Mexico SQWL format -
2016 --------------------------------------------------------------------------
2017 --
2018 -- Set up report format to be maintained.
2019 --
2020 L_REPORT_FORMAT := 'NMSQWL';
2021 --
2022 -- Clear down current format definition and its mappings.
2023 --
2024 delete from pay_magnetic_records MGR
2025 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2026 from pay_magnetic_blocks MGB
2027 where MGB.report_format = L_REPORT_FORMAT);
2028 --
2029 delete from pay_magnetic_blocks MGB
2030 where MGB.report_format = L_REPORT_FORMAT;
2031 --
2032 delete from pay_report_format_mappings_f RFM
2033 where RFM.report_format = L_REPORT_FORMAT;
2034 --
2035 -- Report to format definitions.
2036
2037 insert into pay_report_format_mappings_f
2038 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2039 RANGE_CODE,
2040 ASSIGNMENT_ACTION_CODE,
2041 INITIALIZATION_CODE,
2042 ARCHIVE_CODE,
2043 MAGNETIC_CODE,
2044 REPORT_FORMAT, EFFECTIVE_START_DATE,
2045 EFFECTIVE_END_DATE )
2046 values ('SQWL' , 'NM', 'RT',
2047 'pay_us_archive.range_cursor',
2048 'pay_us_archive.action_creation',
2049 'pay_us_archive.archinit',
2050 'pay_us_archive.archive_data',
2051 'pay_magtape_generic.new_formula',
2052 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2053
2054
2055 --
2056 -- Block definitions.
2057 --
2058 pay_mgb_ins.ins
2059 (p_magnetic_block_id => L_BLOCK1
2060 ,p_block_name => 'TRANSMITTER'
2061 ,p_main_block_flag => 'Y'
2062 ,p_report_format => L_REPORT_FORMAT
2063 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2064 ,p_no_column_returned => 6
2065 ,p_validate => false);
2066 --
2067 pay_mgb_ins.ins
2068 (p_magnetic_block_id => L_BLOCK2
2069 ,p_block_name => 'EMPLOYER'
2070 ,p_main_block_flag => 'N'
2071 ,p_report_format => L_REPORT_FORMAT
2072 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2073 ,p_no_column_returned => 12
2074 ,p_validate => false);
2075 --
2076 pay_mgb_ins.ins
2077 (p_magnetic_block_id => L_BLOCK3
2078 ,p_block_name => 'EMPLOYEE'
2079 ,p_main_block_flag => 'N'
2080 ,p_report_format => L_REPORT_FORMAT
2081 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2082 ,p_no_column_returned => 8
2083 ,p_validate => false);
2084 --
2085 -- Record definitions.
2086 --
2087 pay_mgr_ins.ins
2088 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2089 'DUMMY_SQWL_TRANSMITTER')
2090 ,p_magnetic_block_id => L_BLOCK1
2091 ,p_next_block_id => L_BLOCK2
2092 ,p_last_run_executed_mode => 'N'
2093 ,p_overflow_mode => 'N'
2094 ,p_sequence => 1
2095 ,p_frequency => NULL
2096 ,p_validate => false);
2097 --
2098 pay_mgr_ins.ins
2099 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2100 'DUMMY_SQWL_FINAL')
2101 ,p_magnetic_block_id => L_BLOCK1
2102 ,p_next_block_id => NULL
2103 ,p_last_run_executed_mode => 'N'
2104 ,p_overflow_mode => 'N'
2105 ,p_sequence => 2
2106 ,p_frequency => NULL
2107 ,p_validate => false);
2108 --
2109 pay_mgr_ins.ins
2110 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2111 'NMSQWL_EMPLOYER')
2112 ,p_magnetic_block_id => L_BLOCK2
2113 ,p_next_block_id => L_BLOCK3
2114 ,p_last_run_executed_mode => 'N'
2115 ,p_overflow_mode => 'N'
2116 ,p_sequence => 1
2117 ,p_frequency => NULL
2118 ,p_validate => false);
2119 --
2120 pay_mgr_ins.ins
2121 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2122 'DUMMY_SQWL_TOTAL')
2123 ,p_magnetic_block_id => L_BLOCK2
2124 ,p_next_block_id => NULL
2125 ,p_last_run_executed_mode => 'N'
2126 ,p_overflow_mode => 'N'
2127 ,p_sequence => 2
2128 ,p_frequency => NULL
2129 ,p_validate => false);
2130 --
2131 pay_mgr_ins.ins
2132 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2133 'NMSQWL_SUPPLEMENTAL')
2134 ,p_magnetic_block_id => L_BLOCK3
2135 ,p_next_block_id => NULL
2136 ,p_last_run_executed_mode => 'N'
2137 ,p_overflow_mode => 'N'
2138 ,p_sequence => 1
2139 ,p_frequency => NULL
2140 ,p_validate => false);
2141 --
2142
2143 --------------------------------------------------------------------------
2144 -- New York SQWL format -
2145 --------------------------------------------------------------------------
2146 --
2147 -- Set up report format to be maintained.
2148 --
2149 L_REPORT_FORMAT := 'NYSQWL';
2150 --
2151 -- Clear down current format definition and its mappings.
2152 --
2153 delete from pay_magnetic_records MGR
2154 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2155 from pay_magnetic_blocks MGB
2156 where MGB.report_format = L_REPORT_FORMAT);
2157 --
2158 delete from pay_magnetic_blocks MGB
2159 where MGB.report_format = L_REPORT_FORMAT;
2160 --
2161 delete from pay_report_format_mappings_f RFM
2162 where RFM.report_format = L_REPORT_FORMAT;
2163 --
2164 -- Report to format definitions.
2165
2166 insert into pay_report_format_mappings_f
2167 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2168 RANGE_CODE,
2169 ASSIGNMENT_ACTION_CODE,
2170 INITIALIZATION_CODE,
2171 ARCHIVE_CODE,
2172 MAGNETIC_CODE,
2173 REPORT_FORMAT, EFFECTIVE_START_DATE,
2174 EFFECTIVE_END_DATE )
2175 values ('SQWL' , 'NY', 'RT',
2176 'pay_us_archive.range_cursor',
2177 'pay_us_archive.action_creation',
2178 'pay_us_archive.archinit',
2179 'pay_us_archive.archive_data',
2180 'pay_magtape_generic.new_formula',
2181 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2182
2183 --
2184 -- Block definitions.
2185 --
2186 pay_mgb_ins.ins
2187 (p_magnetic_block_id => L_BLOCK1
2188 ,p_block_name => 'TRANSMITTER'
2189 ,p_main_block_flag => 'Y'
2190 ,p_report_format => L_REPORT_FORMAT
2191 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2192 ,p_no_column_returned => 6
2193 ,p_validate => false);
2194 --
2195 pay_mgb_ins.ins
2196 (p_magnetic_block_id => L_BLOCK2
2197 ,p_block_name => 'EMPLOYER'
2198 ,p_main_block_flag => 'N'
2199 ,p_report_format => L_REPORT_FORMAT
2200 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2201 ,p_no_column_returned => 12
2202 ,p_validate => false);
2203 --
2204 pay_mgb_ins.ins
2205 (p_magnetic_block_id => L_BLOCK3
2206 ,p_block_name => 'EMPLOYEE'
2207 ,p_main_block_flag => 'N'
2208 ,p_report_format => L_REPORT_FORMAT
2209 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2210 ,p_no_column_returned => 8
2211 ,p_validate => false);
2212 --
2213 -- Record definitions.
2214 --
2215
2216 pay_mgr_ins.ins
2217 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2218 'NYSQWL_TRANSMITTER')
2219 ,p_magnetic_block_id => L_BLOCK1
2220 ,p_next_block_id => L_BLOCK2
2221 ,p_last_run_executed_mode => 'N'
2222 ,p_overflow_mode => 'N'
2223 ,p_sequence => 1
2224 ,p_frequency => NULL
2225 ,p_validate => false);
2226
2227 --
2228
2229 pay_mgr_ins.ins
2230 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2231 'NYSQWL_FINAL')
2232 ,p_magnetic_block_id => L_BLOCK1
2233 ,p_next_block_id => NULL
2234 ,p_last_run_executed_mode => 'N'
2235 ,p_overflow_mode => 'N'
2236 ,p_sequence => 2
2237 ,p_frequency => NULL
2238 ,p_validate => false);
2239 --
2240 pay_mgr_ins.ins
2241 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2242 'NYSQWL_EMPLOYER')
2243 ,p_magnetic_block_id => L_BLOCK2
2244 ,p_next_block_id => L_BLOCK3
2245 ,p_last_run_executed_mode => 'N'
2246 ,p_overflow_mode => 'N'
2247 ,p_sequence => 1
2248 ,p_frequency => NULL
2249 ,p_validate => false);
2250 --
2251 pay_mgr_ins.ins
2252 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2253 'NYSQWL_TOTAL')
2254 ,p_magnetic_block_id => L_BLOCK2
2255 ,p_next_block_id => NULL
2256 ,p_last_run_executed_mode => 'N'
2257 ,p_overflow_mode => 'N'
2258 ,p_sequence => 2
2259 ,p_frequency => NULL
2260 ,p_validate => false);
2261 --
2262
2263 pay_mgr_ins.ins
2264 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2265 'NYSQWL_EMPLOYEE')
2266 ,p_magnetic_block_id => L_BLOCK3
2267 ,p_next_block_id => NULL
2268 ,p_last_run_executed_mode => 'N'
2269 ,p_overflow_mode => 'N'
2270 ,p_sequence => 1
2271 ,p_frequency => NULL
2272 ,p_validate => false);
2273 --
2274
2275 --
2276 --------------------------------------------------------------------------
2277 -- Ohio SQWL format -
2278 --------------------------------------------------------------------------
2279 --
2280 -- Set up report format to be maintained.
2281 --
2282 L_REPORT_FORMAT := 'OHSQWL';
2283 --
2284 -- Clear down current format definition and its mappings.
2285 --
2286 delete from pay_magnetic_records MGR
2287 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2288 from pay_magnetic_blocks MGB
2289 where MGB.report_format = L_REPORT_FORMAT);
2290 --
2291 delete from pay_magnetic_blocks MGB
2292 where MGB.report_format = L_REPORT_FORMAT;
2293 --
2294 delete from pay_report_format_mappings_f RFM
2295 where RFM.report_format = L_REPORT_FORMAT;
2296 --
2297 -- Report to format definitions.
2298
2299 insert into pay_report_format_mappings_f
2300 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2301 RANGE_CODE,
2302 ASSIGNMENT_ACTION_CODE,
2303 INITIALIZATION_CODE,
2304 ARCHIVE_CODE,
2305 MAGNETIC_CODE,
2306 REPORT_FORMAT, EFFECTIVE_START_DATE,
2307 EFFECTIVE_END_DATE )
2308 values ('SQWL' , 'OH', 'RT',
2309 'pay_us_archive.range_cursor',
2310 'pay_us_archive.action_creation',
2311 'pay_us_archive.archinit',
2312 'pay_us_archive.archive_data',
2313 'pay_magtape_generic.new_formula',
2314 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2315
2316
2317 --
2318 -- Block definitions.
2319 --
2320 pay_mgb_ins.ins
2321 (p_magnetic_block_id => L_BLOCK1
2322 ,p_block_name => 'TRANSMITTER'
2323 ,p_main_block_flag => 'Y'
2324 ,p_report_format => L_REPORT_FORMAT
2325 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2326 ,p_no_column_returned => 6
2327 ,p_validate => false);
2328 --
2329 pay_mgb_ins.ins
2330 (p_magnetic_block_id => L_BLOCK2
2331 ,p_block_name => 'EMPLOYER'
2332 ,p_main_block_flag => 'N'
2333 ,p_report_format => L_REPORT_FORMAT
2334 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2335 ,p_no_column_returned => 12
2336 ,p_validate => false);
2337 --
2338 pay_mgb_ins.ins
2339 (p_magnetic_block_id => L_BLOCK3
2340 ,p_block_name => 'EMPLOYEE'
2341 ,p_main_block_flag => 'N'
2342 ,p_report_format => L_REPORT_FORMAT
2343 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2344 ,p_no_column_returned => 8
2345 ,p_validate => false);
2346 --
2347 -- Record definitions.
2348 --
2349 pay_mgr_ins.ins
2350 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2351 'DUMMY_SQWL_TRANSMITTER')
2352 ,p_magnetic_block_id => L_BLOCK1
2353 ,p_next_block_id => L_BLOCK2
2354 ,p_last_run_executed_mode => 'N'
2355 ,p_overflow_mode => 'N'
2356 ,p_sequence => 1
2357 ,p_frequency => NULL
2358 ,p_validate => false);
2359 --
2360 pay_mgr_ins.ins
2361 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2362 'DUMMY_SQWL_FINAL')
2363 ,p_magnetic_block_id => L_BLOCK1
2364 ,p_next_block_id => NULL
2365 ,p_last_run_executed_mode => 'N'
2366 ,p_overflow_mode => 'N'
2367 ,p_sequence => 2
2368 ,p_frequency => NULL
2369 ,p_validate => false);
2370 --
2371 pay_mgr_ins.ins
2372 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2373 'OHSQWL_EMPLOYER')
2374 ,p_magnetic_block_id => L_BLOCK2
2375 ,p_next_block_id => L_BLOCK3
2376 ,p_last_run_executed_mode => 'N'
2377 ,p_overflow_mode => 'N'
2378 ,p_sequence => 1
2379 ,p_frequency => NULL
2380 ,p_validate => false);
2381
2382 --
2383 pay_mgr_ins.ins
2384 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2385 'SSA_SQWL_TOTAL')
2386 ,p_magnetic_block_id => L_BLOCK2
2387 ,p_next_block_id => NULL
2388 ,p_last_run_executed_mode => 'N'
2389 ,p_overflow_mode => 'N'
2390 ,p_sequence => 2
2391 ,p_frequency => NULL
2392 ,p_validate => false);
2393 --
2394 pay_mgr_ins.ins
2395 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2396 'OHSQWL_EMPLOYEE')
2397 ,p_magnetic_block_id => L_BLOCK3
2398 ,p_next_block_id => NULL
2399 ,p_last_run_executed_mode => 'N'
2400 ,p_overflow_mode => 'N'
2401 ,p_sequence => 1
2402 ,p_frequency => NULL
2403 ,p_validate => false);
2404 --
2405
2406 /*
2407 --
2408 --------------------------------------------------------------------------
2409 -- IASQWL format -
2410 --------------------------------------------------------------------------
2411 --
2412 -- Set up report format to be maintained.
2413 --
2414 L_REPORT_FORMAT := 'IASQWL';
2415 --
2416 -- Clear down current format definition and its mappings.
2417 --
2418 delete from pay_magnetic_records MGR
2419 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2420 from pay_magnetic_blocks MGB
2421 where MGB.report_format = L_REPORT_FORMAT);
2422 --
2423 delete from pay_magnetic_blocks MGB
2424 where MGB.report_format = L_REPORT_FORMAT;
2425 --
2426 delete from pay_report_format_mappings_f RFM
2427 where RFM.report_format = L_REPORT_FORMAT;
2428 --
2429 -- Report to format definitions.
2430 --
2431 insert into pay_report_format_mappings_f
2432 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2433 RANGE_CODE,
2434 ASSIGNMENT_ACTION_CODE,
2435 INITIALIZATION_CODE,
2436 ARCHIVE_CODE,
2437 MAGNETIC_CODE,
2438 REPORT_FORMAT, EFFECTIVE_START_DATE,
2439 EFFECTIVE_END_DATE )
2440 values ('SQWL' , 'IA', 'RT',
2441 'pay_us_archive.range_cursor',
2442 'pay_us_archive.action_creation',
2443 'pay_us_archive.archinit',
2444 'pay_us_archive.archive_data',
2445 'pay_magtape_generic.new_formula',
2446 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2447
2448 --
2449 -- Block definitions.
2450 --
2451 pay_mgb_ins.ins
2452 (p_magnetic_block_id => L_BLOCK1
2453 ,p_block_name => 'TRANSMITTER'
2454 ,p_main_block_flag => 'Y'
2455 ,p_report_format => L_REPORT_FORMAT
2456 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2457 ,p_no_column_returned => 6
2458 ,p_validate => false);
2459 --
2460 pay_mgb_ins.ins
2461 (p_magnetic_block_id => L_BLOCK2
2462 ,p_block_name => 'EMPLOYER'
2463 ,p_main_block_flag => 'N'
2464 ,p_report_format => L_REPORT_FORMAT
2465 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2466 ,p_no_column_returned => 12
2467 ,p_validate => false);
2468 --
2469 pay_mgb_ins.ins
2470 (p_magnetic_block_id => L_BLOCK3
2471 ,p_block_name => 'EMPLOYEE'
2472 ,p_main_block_flag => 'N'
2473 ,p_report_format => L_REPORT_FORMAT
2474 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2475 ,p_no_column_returned => 8
2476 ,p_validate => false);
2477 --
2478 -- Record definitions.
2479 --
2480
2481 pay_mgr_ins.ins
2482 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2483 'SSA_SQWL_TRANSMITTER')
2484 ,p_magnetic_block_id => L_BLOCK1
2485 ,p_next_block_id => NULL
2486 ,p_last_run_executed_mode => 'N'
2487 ,p_overflow_mode => 'N'
2488 ,p_sequence => 1
2489 ,p_frequency => NULL
2490 ,p_validate => false);
2491
2492 --
2493 pay_mgr_ins.ins
2494 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2495 'SSA_SQWL_BINFO')
2496 ,p_magnetic_block_id => L_BLOCK1
2497 ,p_next_block_id => L_BLOCK2
2498 ,p_last_run_executed_mode => 'N'
2499 ,p_overflow_mode => 'N'
2500 ,p_sequence => 2
2501 ,p_frequency => NULL
2502 ,p_validate => false);
2503 --
2504 pay_mgr_ins.ins
2505 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2506 'IASQWL_FINAL')
2507 ,p_magnetic_block_id => L_BLOCK1
2508 ,p_next_block_id => NULL
2509 ,p_last_run_executed_mode => 'N'
2510 ,p_overflow_mode => 'N'
2511 ,p_sequence => 3
2512 ,p_frequency => NULL
2513 ,p_validate => false);
2514 --
2515 pay_mgr_ins.ins
2516 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2517 'IASQWL_EMPLOYER')
2518 ,p_magnetic_block_id => L_BLOCK2
2519 ,p_next_block_id => L_BLOCK3
2520 ,p_last_run_executed_mode => 'N'
2521 ,p_overflow_mode => 'N'
2522 ,p_sequence => 1
2523 ,p_frequency => NULL
2524 ,p_validate => false);
2525 --
2526 pay_mgr_ins.ins
2527 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2528 'IASQWL_INTERMEDIATE_TOTAL')
2529 ,p_magnetic_block_id => L_BLOCK2
2530 ,p_next_block_id => NULL
2531 ,p_last_run_executed_mode => 'N'
2532 ,p_overflow_mode => 'N'
2533 ,p_sequence => 2
2534 ,p_frequency => NULL
2535 ,p_validate => false);
2536 --
2537 pay_mgr_ins.ins
2538 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2539 'IASQWL_TOTAL')
2540 ,p_magnetic_block_id => L_BLOCK2
2541 ,p_next_block_id => NULL
2542 ,p_last_run_executed_mode => 'N'
2543 ,p_overflow_mode => 'N'
2544 ,p_sequence => 3
2545 ,p_frequency => NULL
2546 ,p_validate => false);
2547 --
2548
2549 pay_mgr_ins.ins
2550 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2551 'IASQWL_SUPPLEMENTAL')
2552 ,p_magnetic_block_id => L_BLOCK3
2553 ,p_next_block_id => NULL
2554 ,p_last_run_executed_mode => 'N'
2555 ,p_overflow_mode => 'N'
2556 ,p_sequence => 1
2557 ,p_frequency => NULL
2558 ,p_validate => false);
2559 --
2560 pay_mgr_ins.ins
2561 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2562 'IASQWL_INTERMEDIATE_TOTAL')
2563 ,p_magnetic_block_id => L_BLOCK3
2564 ,p_next_block_id => NULL
2565 ,p_last_run_executed_mode => 'N'
2566 ,p_overflow_mode => 'N'
2567 ,p_sequence => 2
2568 ,p_frequency => 41
2569 ,p_validate => false);
2570 --
2571 */
2572 --------------------------------------------------------------------------
2573 -- FLSQWL format -
2574 --------------------------------------------------------------------------
2575 --
2576 -- Set up report format to be maintained.
2577 --
2578 L_REPORT_FORMAT := 'FLSQWL';
2579 --
2580 -- Clear down current format definition and its mappings.
2581 --
2582 delete from pay_magnetic_records MGR
2583 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2584 from pay_magnetic_blocks MGB
2585 where MGB.report_format = L_REPORT_FORMAT); --
2586 delete from pay_magnetic_blocks MGB
2587 where MGB.report_format = L_REPORT_FORMAT;
2588 --
2589 delete from pay_report_format_mappings_f RFM
2590 where RFM.report_format = L_REPORT_FORMAT;
2591 --
2592 -- Report to format definitions.
2593 --
2594 insert into pay_report_format_mappings_f
2595 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2596 RANGE_CODE,
2597 ASSIGNMENT_ACTION_CODE,
2598 INITIALIZATION_CODE,
2599 ARCHIVE_CODE,
2600 MAGNETIC_CODE,
2601 REPORT_FORMAT, EFFECTIVE_START_DATE,
2602 EFFECTIVE_END_DATE )
2603 values ('SQWL' , 'FL', 'RT',
2604 'pay_us_archive.range_cursor',
2605 'pay_us_archive.action_creation',
2606 'pay_us_archive.archinit',
2607 'pay_us_archive.archive_data',
2608 'pay_magtape_generic.new_formula',
2609 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2610
2611 --
2612 -- Block definitions.
2613 --
2614 pay_mgb_ins.ins
2615 (p_magnetic_block_id => L_BLOCK1
2616 ,p_block_name => 'TRANSMITTER'
2617 ,p_main_block_flag => 'Y'
2618 ,p_report_format => L_REPORT_FORMAT
2619 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2620 ,p_no_column_returned => 6
2621 ,p_validate => false);
2622 --
2623 pay_mgb_ins.ins
2624 (p_magnetic_block_id => L_BLOCK2
2625 ,p_block_name => 'EMPLOYER'
2626 ,p_main_block_flag => 'N'
2627 ,p_report_format => L_REPORT_FORMAT
2628 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2629 ,p_no_column_returned => 12
2630 ,p_validate => false);
2631 --
2632 pay_mgb_ins.ins
2633 (p_magnetic_block_id => L_BLOCK3
2634 ,p_block_name => 'EMPLOYEE'
2635 ,p_main_block_flag => 'N'
2636 ,p_report_format => L_REPORT_FORMAT
2637 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2638 ,p_no_column_returned => 8
2639 ,p_validate => false);
2640 --
2641 -- Record definitions.
2642 --
2643
2644 pay_mgr_ins.ins
2645 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2646 'FLSQWL_TRANSMITTER')
2647 ,p_magnetic_block_id => L_BLOCK1
2648 ,p_next_block_id => L_BLOCK2
2649 ,p_last_run_executed_mode => 'N'
2650 ,p_overflow_mode => 'N'
2651 ,p_sequence => 1
2652 ,p_frequency => NULL
2653 ,p_validate => false);
2654
2655 --
2656 pay_mgr_ins.ins
2657 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2658 'FLSQWL_FINAL')
2659 ,p_magnetic_block_id => L_BLOCK1
2660 ,p_next_block_id => NULL
2661 ,p_last_run_executed_mode => 'N'
2662 ,p_overflow_mode => 'N'
2663 ,p_sequence => 2
2664 ,p_frequency => NULL
2665 ,p_validate => false);
2666 --
2667 pay_mgr_ins.ins
2668 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2669 'FLSQWL_EMPLOYER')
2670 ,p_magnetic_block_id => L_BLOCK2
2671 ,p_next_block_id => L_BLOCK3
2672 ,p_last_run_executed_mode => 'N'
2673 ,p_overflow_mode => 'N'
2674 ,p_sequence => 1
2675 ,p_frequency => NULL
2676 ,p_validate => false);
2677 --
2678 pay_mgr_ins.ins
2679 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2680 'FLSQWL_INTERMEDIATE_TOTAL')
2681 ,p_magnetic_block_id => L_BLOCK2
2682 ,p_next_block_id => NULL
2683 ,p_last_run_executed_mode => 'N'
2684 ,p_overflow_mode => 'N'
2685 ,p_sequence => 2
2686 ,p_frequency => NULL
2687 ,p_validate => false);
2688 --
2689 pay_mgr_ins.ins
2690 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2691 'FLSQWL_TOTAL')
2692 ,p_magnetic_block_id => L_BLOCK2
2693 ,p_next_block_id => NULL
2694 ,p_last_run_executed_mode => 'N'
2695 ,p_overflow_mode => 'N'
2696 ,p_sequence => 3
2697 ,p_frequency => NULL
2698 ,p_validate => false);
2699 --
2700
2701 pay_mgr_ins.ins
2702 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2703 'FLSQWL_SUPPLEMENTAL')
2704 ,p_magnetic_block_id => L_BLOCK3
2705 ,p_next_block_id => NULL
2706 ,p_last_run_executed_mode => 'N'
2707 ,p_overflow_mode => 'N'
2708 ,p_sequence => 1
2709 ,p_frequency => NULL
2710 ,p_validate => false);
2711 --
2712 pay_mgr_ins.ins
2713 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2714 'FLSQWL_INTERMEDIATE_TOTAL')
2715 ,p_magnetic_block_id => L_BLOCK3
2716 ,p_next_block_id => NULL
2717 ,p_last_run_executed_mode => 'N'
2718 ,p_overflow_mode => 'N'
2719 ,p_sequence => 2
2720 ,p_frequency => 41
2721 ,p_validate => false);
2722 --
2723 --------------------------------------------------------------------------
2724 -- Rhode Island SQWL format -
2725 --------------------------------------------------------------------------
2726 --
2727 -- Set up report format to be maintained.
2728 --
2729 L_REPORT_FORMAT := 'RISQWL';
2730 --
2731 -- Clear down current format definition and its mappings.
2732 --
2733 delete from pay_magnetic_records MGR
2734 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2735 from pay_magnetic_blocks MGB
2736 where MGB.report_format = L_REPORT_FORMAT);
2737 --
2738 delete from pay_magnetic_blocks MGB
2739 where MGB.report_format = L_REPORT_FORMAT;
2740 --
2741 delete from pay_report_format_mappings_f RFM
2742 where RFM.report_format = L_REPORT_FORMAT;
2743 --
2744 -- Report to format definitions.
2745
2746 insert into pay_report_format_mappings_f
2747 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2748 RANGE_CODE,
2749 ASSIGNMENT_ACTION_CODE,
2750 INITIALIZATION_CODE,
2751 ARCHIVE_CODE,
2752 MAGNETIC_CODE,
2753 REPORT_FORMAT, EFFECTIVE_START_DATE,
2754 EFFECTIVE_END_DATE )
2755 values ('SQWL' , 'RI', 'RT',
2756 'pay_us_archive.range_cursor',
2757 'pay_us_archive.action_creation',
2758 'pay_us_archive.archinit',
2759 'pay_us_archive.archive_data',
2760 'pay_magtape_generic.new_formula',
2761 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2762
2763
2764
2765 --
2766 -- Block definitions.
2767 --
2768 pay_mgb_ins.ins
2769 (p_magnetic_block_id => L_BLOCK1
2770 ,p_block_name => 'TRANSMITTER'
2771 ,p_main_block_flag => 'Y'
2772 ,p_report_format => L_REPORT_FORMAT
2773 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2774 ,p_no_column_returned => 6
2775 ,p_validate => false);
2776 --
2777 pay_mgb_ins.ins
2778 (p_magnetic_block_id => L_BLOCK2
2779 ,p_block_name => 'EMPLOYER'
2780 ,p_main_block_flag => 'N'
2781 ,p_report_format => L_REPORT_FORMAT
2782 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2783 ,p_no_column_returned => 12
2784 ,p_validate => false);
2785 --
2786 pay_mgb_ins.ins
2787 (p_magnetic_block_id => L_BLOCK3
2788 ,p_block_name => 'EMPLOYEE'
2789 ,p_main_block_flag => 'N'
2790 ,p_report_format => L_REPORT_FORMAT
2791 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2792 ,p_no_column_returned => 8
2793 ,p_validate => false);
2794 --
2795 -- Record definitions.
2796 --
2797
2798 pay_mgr_ins.ins
2799 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2800 'DUMMY_SQWL_TRANSMITTER')
2801 ,p_magnetic_block_id => L_BLOCK1
2802 ,p_next_block_id => L_BLOCK2
2803 ,p_last_run_executed_mode => 'N'
2804 ,p_overflow_mode => 'N'
2805 ,p_sequence => 1
2806 ,p_frequency => NULL
2807 ,p_validate => false);
2808 --
2809 pay_mgr_ins.ins
2810 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2811 'DUMMY_SQWL_FINAL')
2812 ,p_magnetic_block_id => L_BLOCK1
2813 ,p_next_block_id => NULL
2814 ,p_last_run_executed_mode => 'N'
2815 ,p_overflow_mode => 'N'
2816 ,p_sequence => 2
2817 ,p_frequency => NULL
2818 ,p_validate => false);
2819 --
2820 pay_mgr_ins.ins
2821 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2822 'SSA_SQWL_EMPLOYER')
2823 ,p_magnetic_block_id => L_BLOCK2
2824 ,p_next_block_id => L_BLOCK3
2825 ,p_last_run_executed_mode => 'N'
2826 ,p_overflow_mode => 'N'
2827 ,p_sequence => 1
2828 ,p_frequency => NULL
2829 ,p_validate => false);
2830 --
2831 pay_mgr_ins.ins
2832 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2833 'DUMMY_SQWL_TOTAL')
2834 ,p_magnetic_block_id => L_BLOCK2
2835 ,p_next_block_id => NULL
2836 ,p_last_run_executed_mode => 'N'
2837 ,p_overflow_mode => 'N'
2838 ,p_sequence => 2
2839 ,p_frequency => NULL
2840 ,p_validate => false);
2841 --
2842 pay_mgr_ins.ins
2843 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2844 'SSA_SQWL_SUPPLEMENTAL')
2845 ,p_magnetic_block_id => L_BLOCK3
2846 ,p_next_block_id => NULL
2847 ,p_last_run_executed_mode => 'N'
2848 ,p_overflow_mode => 'N'
2849 ,p_sequence => 1
2850 ,p_frequency => NULL
2851 ,p_validate => false);
2852 --
2853
2854 --
2855 --------------------------------------------------------------------------
2856 -- Wyoming SQWL format -
2857 --------------------------------------------------------------------------
2858 --
2859 -- Set up report format to be maintained.
2860 --
2861 L_REPORT_FORMAT := 'WYSQWL';
2862 --
2863 -- Clear down current format definition and its mappings.
2864 --
2865 delete from pay_magnetic_records MGR
2866 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2867 from pay_magnetic_blocks MGB
2868 where MGB.report_format = L_REPORT_FORMAT);
2869 --
2870 delete from pay_magnetic_blocks MGB
2871 where MGB.report_format = L_REPORT_FORMAT;
2872 --
2873 delete from pay_report_format_mappings_f RFM
2874 where RFM.report_format = L_REPORT_FORMAT;
2875 --
2876 -- Report to format definitions.
2877
2878 insert into pay_report_format_mappings_f
2879 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
2880 RANGE_CODE,
2881 ASSIGNMENT_ACTION_CODE,
2882 INITIALIZATION_CODE,
2883 ARCHIVE_CODE,
2884 MAGNETIC_CODE,
2885 REPORT_FORMAT, EFFECTIVE_START_DATE,
2886 EFFECTIVE_END_DATE )
2887 values ('SQWL' , 'WY', 'RT',
2888 'pay_us_archive.range_cursor',
2889 'pay_us_archive.action_creation',
2890 'pay_us_archive.archinit',
2891 'pay_us_archive.archive_data',
2892 'pay_magtape_generic.new_formula',
2893 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
2894 --
2895 -- Block definitions.
2896 --
2897 pay_mgb_ins.ins
2898 (p_magnetic_block_id => L_BLOCK1
2899 ,p_block_name => 'TRANSMITTER'
2900 ,p_main_block_flag => 'Y'
2901 ,p_report_format => L_REPORT_FORMAT
2902 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
2903 ,p_no_column_returned => 6
2904 ,p_validate => false);
2905 --
2906 pay_mgb_ins.ins
2907 (p_magnetic_block_id => L_BLOCK2
2908 ,p_block_name => 'EMPLOYER'
2909 ,p_main_block_flag => 'N'
2910 ,p_report_format => L_REPORT_FORMAT
2911 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
2912 ,p_no_column_returned => 12
2913 ,p_validate => false);
2914 --
2915 pay_mgb_ins.ins
2916 (p_magnetic_block_id => L_BLOCK3
2917 ,p_block_name => 'EMPLOYEE'
2918 ,p_main_block_flag => 'N'
2919 ,p_report_format => L_REPORT_FORMAT
2920 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
2921 ,p_no_column_returned => 8
2922 ,p_validate => false);
2923 --
2924 -- Record definitions.
2925 --
2926
2927 pay_mgr_ins.ins
2928 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2929 'DUMMY_SQWL_TRANSMITTER')
2930 ,p_magnetic_block_id => L_BLOCK1
2931 ,p_next_block_id => L_BLOCK2
2932 ,p_last_run_executed_mode => 'N'
2933 ,p_overflow_mode => 'N'
2934 ,p_sequence => 1
2935 ,p_frequency => NULL
2936 ,p_validate => false);
2937 --
2938 pay_mgr_ins.ins
2939 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2940 'DUMMY_SQWL_FINAL')
2941 ,p_magnetic_block_id => L_BLOCK1
2942 ,p_next_block_id => NULL
2943 ,p_last_run_executed_mode => 'N'
2944 ,p_overflow_mode => 'N'
2945 ,p_sequence => 2
2946 ,p_frequency => NULL
2947 ,p_validate => false);
2948 --
2949 pay_mgr_ins.ins
2950 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2951 'DUMMY_SQWL_EMPLOYER')
2952 ,p_magnetic_block_id => L_BLOCK2
2953 ,p_next_block_id => L_BLOCK3
2954 ,p_last_run_executed_mode => 'N'
2955 ,p_overflow_mode => 'N'
2956 ,p_sequence => 1
2957 ,p_frequency => NULL
2958 ,p_validate => false);
2959 --
2960 pay_mgr_ins.ins
2961 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2962 'DUMMY_SQWL_TOTAL')
2963 ,p_magnetic_block_id => L_BLOCK2
2964 ,p_next_block_id => NULL
2965 ,p_last_run_executed_mode => 'N'
2966 ,p_overflow_mode => 'N'
2967 ,p_sequence => 2
2968 ,p_frequency => NULL
2969 ,p_validate => false);
2970 --
2971 pay_mgr_ins.ins
2972 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
2973 'SSA_SQWL_SUPPLEMENTAL')
2974 ,p_magnetic_block_id => L_BLOCK3
2975 ,p_next_block_id => NULL
2976 ,p_last_run_executed_mode => 'N'
2977 ,p_overflow_mode => 'N'
2978 ,p_sequence => 1
2979 ,p_frequency => NULL
2980 ,p_validate => false);
2981 --
2982
2983 --------------------------------------------------------------------------
2984 -- Michigan SQWL format -
2985 --------------------------------------------------------------------------
2986 --
2987 -- Set up report format to be maintained.
2988 --
2989 L_REPORT_FORMAT := 'MISQWL';
2990 --
2991 -- Clear down current format definition and its mappings.
2992 --
2993 delete from pay_magnetic_records MGR
2994 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
2995 from pay_magnetic_blocks MGB
2996 where MGB.report_format = L_REPORT_FORMAT);
2997 --
2998 delete from pay_magnetic_blocks MGB
2999 where MGB.report_format = L_REPORT_FORMAT;
3000 --
3001 delete from pay_report_format_mappings_f RFM
3002 where RFM.report_format = L_REPORT_FORMAT;
3003 --
3004 -- Report to format definitions.
3005
3006 insert into pay_report_format_mappings_f
3007 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3008 RANGE_CODE,
3009 ASSIGNMENT_ACTION_CODE,
3010 INITIALIZATION_CODE,
3011 ARCHIVE_CODE,
3012 MAGNETIC_CODE,
3013 REPORT_FORMAT, EFFECTIVE_START_DATE,
3014 EFFECTIVE_END_DATE )
3015 values ('SQWL' , 'MI', 'RT',
3016 'pay_us_archive.range_cursor',
3017 'pay_us_archive.action_creation',
3018 'pay_us_archive.archinit',
3019 'pay_us_archive.archive_data',
3020 'pay_magtape_generic.new_formula',
3021 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3022
3023 -- Block definitions.
3024 --
3025 pay_mgb_ins.ins
3026 (p_magnetic_block_id => L_BLOCK1
3027 ,p_block_name => 'TRANSMITTER'
3028 ,p_main_block_flag => 'Y'
3029 ,p_report_format => L_REPORT_FORMAT
3030 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3031 ,p_no_column_returned => 6
3032 ,p_validate => false);
3033 --
3034 pay_mgb_ins.ins
3035 (p_magnetic_block_id => L_BLOCK2
3036 ,p_block_name => 'EMPLOYER'
3037 ,p_main_block_flag => 'N'
3038 ,p_report_format => L_REPORT_FORMAT
3039 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3040 ,p_no_column_returned => 12
3041 ,p_validate => false);
3042 --
3043 pay_mgb_ins.ins
3044 (p_magnetic_block_id => L_BLOCK3
3045 ,p_block_name => 'EMPLOYEE'
3046 ,p_main_block_flag => 'N'
3047 ,p_report_format => L_REPORT_FORMAT
3048 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3049 ,p_no_column_returned => 8
3050 ,p_validate => false);
3051 --
3052 -- Record definitions.
3053 --
3054
3055 pay_mgr_ins.ins
3056 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3057 'DUMMY_SQWL_TRANSMITTER')
3058 ,p_magnetic_block_id => L_BLOCK1
3059 ,p_next_block_id => L_BLOCK2
3060 ,p_last_run_executed_mode => 'N'
3061 ,p_overflow_mode => 'N'
3062 ,p_sequence => 1
3063 ,p_frequency => NULL
3064 ,p_validate => false);
3065 --
3066 pay_mgr_ins.ins
3067 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3068 'DUMMY_SQWL_FINAL')
3069 ,p_magnetic_block_id => L_BLOCK1
3070 ,p_next_block_id => NULL
3071 ,p_last_run_executed_mode => 'N'
3072 ,p_overflow_mode => 'N'
3073 ,p_sequence => 2
3074 ,p_frequency => NULL
3075 ,p_validate => false);
3076 --
3077 pay_mgr_ins.ins
3078 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3079 'SSA_SQWL_EMPLOYER')
3080 ,p_magnetic_block_id => L_BLOCK2
3081 ,p_next_block_id => L_BLOCK3
3082 ,p_last_run_executed_mode => 'N'
3083 ,p_overflow_mode => 'N'
3084 ,p_sequence => 1
3085 ,p_frequency => NULL
3086 ,p_validate => false);
3087 --
3088 pay_mgr_ins.ins
3089 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3090 'SSA_SQWL_TOTAL')
3091 ,p_magnetic_block_id => L_BLOCK2
3092 ,p_next_block_id => NULL
3093 ,p_last_run_executed_mode => 'N'
3094 ,p_overflow_mode => 'N'
3095 ,p_sequence => 2
3096 ,p_frequency => NULL
3097 ,p_validate => false);
3098 --
3099 pay_mgr_ins.ins
3100 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3101 'SSA_SQWL_SUPPLEMENTAL')
3102 ,p_magnetic_block_id => L_BLOCK3
3103 ,p_next_block_id => NULL
3104 ,p_last_run_executed_mode => 'N'
3105 ,p_overflow_mode => 'N'
3106 ,p_sequence => 1
3107 ,p_frequency => NULL
3108 ,p_validate => false);
3109 --
3110 --------------------------------------------------------------------------
3111 -- Hawaii SQWL format -
3112 --------------------------------------------------------------------------
3113 --
3114 -- Set up report format to be maintained.
3115 --
3116 L_REPORT_FORMAT := 'HISQWL';
3117 --
3118 -- Clear down current format definition and its mappings.
3119 --
3120 delete from pay_magnetic_records MGR
3121 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3122 from pay_magnetic_blocks MGB
3123 where MGB.report_format = L_REPORT_FORMAT);
3124 --
3125 delete from pay_magnetic_blocks MGB
3126 where MGB.report_format = L_REPORT_FORMAT;
3127 --
3128 delete from pay_report_format_mappings_f RFM
3129 where RFM.report_format = L_REPORT_FORMAT;
3130 --
3131 -- Report to format definitions.
3132
3133 insert into pay_report_format_mappings_f
3134 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3135 RANGE_CODE,
3136 ASSIGNMENT_ACTION_CODE,
3137 INITIALIZATION_CODE,
3138 ARCHIVE_CODE,
3139 MAGNETIC_CODE,
3140 REPORT_FORMAT, EFFECTIVE_START_DATE,
3141 EFFECTIVE_END_DATE )
3142 values ('SQWL' , 'HI', 'RT',
3143 'pay_us_archive.range_cursor',
3144 'pay_us_archive.action_creation',
3145 'pay_us_archive.archinit',
3146 'pay_us_archive.archive_data',
3147 'pay_magtape_generic.new_formula',
3148 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3149
3150
3151 --
3152 -- Block definitions.
3153 --
3154 pay_mgb_ins.ins
3155 (p_magnetic_block_id => L_BLOCK1
3156 ,p_block_name => 'TRANSMITTER'
3157 ,p_main_block_flag => 'Y'
3158 ,p_report_format => L_REPORT_FORMAT
3159 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3160 ,p_no_column_returned => 6
3161 ,p_validate => false);
3162 --
3163 pay_mgb_ins.ins
3164 (p_magnetic_block_id => L_BLOCK2
3165 ,p_block_name => 'EMPLOYER'
3166 ,p_main_block_flag => 'N'
3167 ,p_report_format => L_REPORT_FORMAT
3168 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3169 ,p_no_column_returned => 12
3170 ,p_validate => false);
3171 --
3172 pay_mgb_ins.ins
3173 (p_magnetic_block_id => L_BLOCK3
3174 ,p_block_name => 'EMPLOYEE'
3175 ,p_main_block_flag => 'N'
3176 ,p_report_format => L_REPORT_FORMAT
3177 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3178 ,p_no_column_returned => 8
3179 ,p_validate => false);
3180 --
3181 -- Record definitions.
3182 --
3183
3184 pay_mgr_ins.ins
3185 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3186 'SSA_SQWL_TRANSMITTER')
3187 ,p_magnetic_block_id => L_BLOCK1
3188 ,p_next_block_id => L_BLOCK2
3189 ,p_last_run_executed_mode => 'N'
3190 ,p_overflow_mode => 'N'
3191 ,p_sequence => 1
3192 ,p_frequency => NULL
3193 ,p_validate => false);
3194 --
3195 pay_mgr_ins.ins
3196 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3197 'DUMMY_SQWL_FINAL')
3198 ,p_magnetic_block_id => L_BLOCK1
3199 ,p_next_block_id => NULL
3200 ,p_last_run_executed_mode => 'N'
3201 ,p_overflow_mode => 'N'
3202 ,p_sequence => 2
3203 ,p_frequency => NULL
3204 ,p_validate => false);
3205 --
3206 pay_mgr_ins.ins
3207 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3208 'SSA_SQWL_EMPLOYER')
3209 ,p_magnetic_block_id => L_BLOCK2
3210 ,p_next_block_id => L_BLOCK3
3211 ,p_last_run_executed_mode => 'N'
3212 ,p_overflow_mode => 'N'
3213 ,p_sequence => 1
3214 ,p_frequency => NULL
3215 ,p_validate => false);
3216 --
3217 pay_mgr_ins.ins
3218 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3219 'DUMMY_SQWL_TOTAL')
3220 ,p_magnetic_block_id => L_BLOCK2
3221 ,p_next_block_id => NULL
3222 ,p_last_run_executed_mode => 'N'
3223 ,p_overflow_mode => 'N'
3224 ,p_sequence => 2
3225 ,p_frequency => NULL
3226 ,p_validate => false);
3227 --
3228 pay_mgr_ins.ins
3229 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3230 'SSA_SQWL_SUPPLEMENTAL')
3231 ,p_magnetic_block_id => L_BLOCK3
3232 ,p_next_block_id => NULL
3233 ,p_last_run_executed_mode => 'N'
3234 ,p_overflow_mode => 'N'
3235 ,p_sequence => 1
3236 ,p_frequency => NULL
3237 ,p_validate => false);
3238 --
3239
3240 --------------------------------------------------------------------------
3241 -- Washington SQWL format -
3242 --------------------------------------------------------------------------
3243 --
3244 -- Set up report format to be maintained.
3245 --
3246 L_REPORT_FORMAT := 'WASQWL';
3247 --
3248 -- Clear down current format definition and its mappings.
3249 --
3250 delete from pay_magnetic_records MGR
3251 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3252 from pay_magnetic_blocks MGB
3253 where MGB.report_format = L_REPORT_FORMAT);
3254 --
3255 delete from pay_magnetic_blocks MGB
3256 where MGB.report_format = L_REPORT_FORMAT;
3257 --
3258 delete from pay_report_format_mappings_f RFM
3259 where RFM.report_format = L_REPORT_FORMAT;
3260 --
3261 -- Report to format definitions.
3262
3263 insert into pay_report_format_mappings_f
3264 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3265 RANGE_CODE,
3266 ASSIGNMENT_ACTION_CODE,
3267 INITIALIZATION_CODE,
3268 ARCHIVE_CODE,
3269 MAGNETIC_CODE,
3270 REPORT_FORMAT, EFFECTIVE_START_DATE,
3271 EFFECTIVE_END_DATE )
3272 values ('SQWL' , 'WA', 'RT',
3273 'pay_us_archive.range_cursor',
3274 'pay_us_archive.action_creation',
3275 'pay_us_archive.archinit',
3276 'pay_us_archive.archive_data',
3277 'pay_magtape_generic.new_formula',
3278 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3279
3280 --
3281 -- Block definitions.
3282 --
3283 pay_mgb_ins.ins
3284 (p_magnetic_block_id => L_BLOCK1
3285 ,p_block_name => 'TRANSMITTER'
3286 ,p_main_block_flag => 'Y'
3287 ,p_report_format => L_REPORT_FORMAT
3288 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3289 ,p_no_column_returned => 6
3290 ,p_validate => false);
3291 --
3292 pay_mgb_ins.ins
3293 (p_magnetic_block_id => L_BLOCK2
3294 ,p_block_name => 'EMPLOYER'
3295 ,p_main_block_flag => 'N'
3296 ,p_report_format => L_REPORT_FORMAT
3297 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3298 ,p_no_column_returned => 12
3299 ,p_validate => false);
3300 --
3301 pay_mgb_ins.ins
3302 (p_magnetic_block_id => L_BLOCK3
3303 ,p_block_name => 'EMPLOYEE'
3304 ,p_main_block_flag => 'N'
3305 ,p_report_format => L_REPORT_FORMAT
3306 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3307 ,p_no_column_returned => 8
3308 ,p_validate => false);
3309 --
3310 -- Record definitions.
3311 --
3312 pay_mgr_ins.ins
3313 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3314 'DUMMY_SQWL_TRANSMITTER')
3315 ,p_magnetic_block_id => L_BLOCK1
3316 ,p_next_block_id => L_BLOCK2
3317 ,p_last_run_executed_mode => 'N'
3318 ,p_overflow_mode => 'N'
3319 ,p_sequence => 1
3320 ,p_frequency => NULL
3321 ,p_validate => false);
3322 --
3323 pay_mgr_ins.ins
3324 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3325 'WASQWL_FINAL')
3326 ,p_magnetic_block_id => L_BLOCK1
3327 ,p_next_block_id => NULL
3328 ,p_last_run_executed_mode => 'N'
3329 ,p_overflow_mode => 'N'
3330 ,p_sequence => 2
3331 ,p_frequency => NULL
3332 ,p_validate => false);
3333 --
3334 pay_mgr_ins.ins
3335 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3336 'WASQWL_EMPLOYER')
3337 ,p_magnetic_block_id => L_BLOCK2
3338 ,p_next_block_id => L_BLOCK3
3339 ,p_last_run_executed_mode => 'N'
3340 ,p_overflow_mode => 'N'
3341 ,p_sequence => 1
3342 ,p_frequency => NULL
3343 ,p_validate => false);
3344 --
3345 pay_mgr_ins.ins
3346 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3347 'DUMMY_SQWL_TOTAL')
3348 ,p_magnetic_block_id => L_BLOCK2
3349 ,p_next_block_id => NULL
3350 ,p_last_run_executed_mode => 'N'
3351 ,p_overflow_mode => 'N'
3352 ,p_sequence => 2
3353 ,p_frequency => NULL
3354 ,p_validate => false);
3355 --
3356 pay_mgr_ins.ins
3357 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3358 'WASQWL_SUPPLEMENTAL')
3359 ,p_magnetic_block_id => L_BLOCK3
3360 ,p_next_block_id => NULL
3361 ,p_last_run_executed_mode => 'N'
3362 ,p_overflow_mode => 'N'
3363 ,p_sequence => 1
3364 ,p_frequency => NULL
3365 ,p_validate => false);
3366 --
3367
3368 --------------------------------------------------------------------------
3369 -- Connecticut (SSA E, S and F only) SQWL format -
3370 --------------------------------------------------------------------------
3371 --
3372 -- Set up report format to be maintained.
3373 --
3374 L_REPORT_FORMAT := 'CTSQWL';
3375 --
3376 -- Clear down current format definition and its mappings.
3377 --
3378 delete from pay_magnetic_records MGR
3379 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3380 from pay_magnetic_blocks MGB
3381 where MGB.report_format = L_REPORT_FORMAT);
3382 --
3383 delete from pay_magnetic_blocks MGB
3384 where MGB.report_format = L_REPORT_FORMAT;
3385 --
3386 delete from pay_report_format_mappings_f RFM
3387 where RFM.report_format = L_REPORT_FORMAT;
3388 --
3389 -- Report to format definitions.
3390
3391 insert into pay_report_format_mappings_f
3392 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3393 RANGE_CODE,
3394 ASSIGNMENT_ACTION_CODE,
3395 INITIALIZATION_CODE,
3396 ARCHIVE_CODE,
3397 MAGNETIC_CODE,
3398 REPORT_FORMAT, EFFECTIVE_START_DATE,
3399 EFFECTIVE_END_DATE )
3400 values ('SQWL' , 'CT', 'RT',
3401 'pay_us_archive.range_cursor',
3402 'pay_us_archive.action_creation',
3403 'pay_us_archive.archinit',
3404 'pay_us_archive.archive_data',
3405 'pay_magtape_generic.new_formula',
3406 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3407
3408 --
3409 -- Block definitions.
3410 --
3411 pay_mgb_ins.ins
3412 (p_magnetic_block_id => L_BLOCK1
3413 ,p_block_name => 'TRANSMITTER'
3414 ,p_main_block_flag => 'Y'
3415 ,p_report_format => L_REPORT_FORMAT
3416 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3417 ,p_no_column_returned => 6
3418 ,p_validate => false);
3419 --
3420 pay_mgb_ins.ins
3421 (p_magnetic_block_id => L_BLOCK2
3422 ,p_block_name => 'EMPLOYER'
3423 ,p_main_block_flag => 'N'
3424 ,p_report_format => L_REPORT_FORMAT
3425 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3426 ,p_no_column_returned => 12
3427 ,p_validate => false);
3428 --
3429 pay_mgb_ins.ins
3430 (p_magnetic_block_id => L_BLOCK3
3431 ,p_block_name => 'EMPLOYEE'
3432 ,p_main_block_flag => 'N'
3433 ,p_report_format => L_REPORT_FORMAT
3434 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3435 ,p_no_column_returned => 8
3436 ,p_validate => false);
3437 --
3438 -- Record definitions.
3439 --
3440 pay_mgr_ins.ins
3441 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3442 'DUMMY_SQWL_TRANSMITTER')
3443 ,p_magnetic_block_id => L_BLOCK1
3444 ,p_next_block_id => L_BLOCK2
3445 ,p_last_run_executed_mode => 'N'
3446 ,p_overflow_mode => 'N'
3447 ,p_sequence => 1
3448 ,p_frequency => NULL
3449 ,p_validate => false);
3450 --
3451 pay_mgr_ins.ins
3452 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3453 'DUMMY_SQWL_FINAL')
3454 ,p_magnetic_block_id => L_BLOCK1
3455 ,p_next_block_id => NULL
3456 ,p_last_run_executed_mode => 'N'
3457 ,p_overflow_mode => 'N'
3458 ,p_sequence => 2
3459 ,p_frequency => NULL
3460 ,p_validate => false);
3461 --
3462 pay_mgr_ins.ins
3463 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3464 'SSA_SQWL_EMPLOYER')
3465 ,p_magnetic_block_id => L_BLOCK2
3466 ,p_next_block_id => L_BLOCK3
3467 ,p_last_run_executed_mode => 'N'
3468 ,p_overflow_mode => 'N'
3469 ,p_sequence => 1
3470 ,p_frequency => NULL
3471 ,p_validate => false);
3472 --
3473 pay_mgr_ins.ins
3474 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3475 'CTSQWL_TOTAL')
3476 ,p_magnetic_block_id => L_BLOCK2
3477 ,p_next_block_id => NULL
3478 ,p_last_run_executed_mode => 'N'
3479 ,p_overflow_mode => 'N'
3480 ,p_sequence => 2
3481 ,p_frequency => NULL
3482 ,p_validate => false);
3483 --
3484 pay_mgr_ins.ins
3485 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3486 'SSA_SQWL_SUPPLEMENTAL')
3487 ,p_magnetic_block_id => L_BLOCK3
3488 ,p_next_block_id => NULL
3489 ,p_last_run_executed_mode => 'N'
3490 ,p_overflow_mode => 'N'
3491 ,p_sequence => 1
3492 ,p_frequency => NULL
3493 ,p_validate => false);
3494 --
3495 --------------------------------------------------------------------------
3496 -- ICESA_S (S Record only) SQWL format -
3497 --------------------------------------------------------------------------
3498 --
3499 -- Set up report format to be maintained.
3500 --
3501 L_REPORT_FORMAT := 'ICESA_S';
3502 --
3503 -- Clear down current format definition and its mappings.
3504 --
3505 delete from pay_magnetic_records MGR
3506 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3507 from pay_magnetic_blocks MGB
3508 where MGB.report_format = L_REPORT_FORMAT);
3509 --
3510 delete from pay_magnetic_blocks MGB
3511 where MGB.report_format = L_REPORT_FORMAT;
3512 --
3513 delete from pay_report_format_mappings_f RFM
3514 where RFM.report_format = L_REPORT_FORMAT;
3515 --
3516 -- Report to format definitions.
3517
3518 insert into pay_report_format_mappings_f
3519 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3520 RANGE_CODE,
3521 ASSIGNMENT_ACTION_CODE,
3522 INITIALIZATION_CODE,
3523 ARCHIVE_CODE,
3524 MAGNETIC_CODE,
3525 REPORT_FORMAT, EFFECTIVE_START_DATE,
3526 EFFECTIVE_END_DATE )
3527 values ('SQWL' , 'MS', 'RT',
3528 'pay_us_archive.range_cursor',
3529 'pay_us_archive.action_creation',
3530 'pay_us_archive.archinit',
3531 'pay_us_archive.archive_data',
3532 'pay_magtape_generic.new_formula',
3533 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3534
3535 --
3536 -- Block definitions.
3537 --
3538 pay_mgb_ins.ins
3539 (p_magnetic_block_id => L_BLOCK1
3540 ,p_block_name => 'TRANSMITTER'
3541 ,p_main_block_flag => 'Y'
3542 ,p_report_format => L_REPORT_FORMAT
3543 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3544 ,p_no_column_returned => 6
3545 ,p_validate => false);
3546 --
3547 pay_mgb_ins.ins
3548 (p_magnetic_block_id => L_BLOCK2
3549 ,p_block_name => 'EMPLOYER'
3550 ,p_main_block_flag => 'N'
3551 ,p_report_format => L_REPORT_FORMAT
3552 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3553 ,p_no_column_returned => 12
3554 ,p_validate => false);
3555 --
3556 pay_mgb_ins.ins
3557 (p_magnetic_block_id => L_BLOCK3
3558 ,p_block_name => 'EMPLOYEE'
3559 ,p_main_block_flag => 'N'
3560 ,p_report_format => L_REPORT_FORMAT
3561 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3562 ,p_no_column_returned => 8
3563 ,p_validate => false);
3564 --
3565 -- Record definitions.
3566 --
3567 pay_mgr_ins.ins
3568 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3569 'DUMMY_SQWL_TRANSMITTER')
3570 ,p_magnetic_block_id => L_BLOCK1
3571 ,p_next_block_id => L_BLOCK2
3572 ,p_last_run_executed_mode => 'N'
3573 ,p_overflow_mode => 'N'
3574 ,p_sequence => 1
3575 ,p_frequency => NULL
3576 ,p_validate => false);
3577 --
3578 pay_mgr_ins.ins
3579 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3580 'DUMMY_SQWL_FINAL')
3581 ,p_magnetic_block_id => L_BLOCK1
3582 ,p_next_block_id => NULL
3583 ,p_last_run_executed_mode => 'N'
3584 ,p_overflow_mode => 'N'
3585 ,p_sequence => 2
3586 ,p_frequency => NULL
3587 ,p_validate => false);
3588 --
3589 pay_mgr_ins.ins
3590 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3591 'DUMMY_SQWL_EMPLOYER')
3592 ,p_magnetic_block_id => L_BLOCK2
3593 ,p_next_block_id => L_BLOCK3
3594 ,p_last_run_executed_mode => 'N'
3595 ,p_overflow_mode => 'N'
3596 ,p_sequence => 1
3597 ,p_frequency => NULL
3598 ,p_validate => false);
3599 --
3600 pay_mgr_ins.ins
3601 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3602 'DUMMY_SQWL_TOTAL')
3603 ,p_magnetic_block_id => L_BLOCK2
3604 ,p_next_block_id => NULL
3605 ,p_last_run_executed_mode => 'N'
3606 ,p_overflow_mode => 'N'
3607 ,p_sequence => 2
3608 ,p_frequency => NULL
3609 ,p_validate => false);
3610 --
3611 pay_mgr_ins.ins
3612 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3613 'ICESA_SUPPLEMENTAL')
3614 ,p_magnetic_block_id => L_BLOCK3
3615 ,p_next_block_id => NULL
3616 ,p_last_run_executed_mode => 'N'
3617 ,p_overflow_mode => 'N'
3618 ,p_sequence => 1
3619 ,p_frequency => NULL
3620 ,p_validate => false);
3621 --
3622 --
3623 --------------------------------------------------------------------------
3624 -- SD diskette format
3625 --
3626 -- Set up report format to be maintained.
3627 --
3628 L_REPORT_FORMAT := 'SDSQWLD';
3629 --
3630 -- Clear down current format definition and its mappings.
3631 --
3632 delete from pay_magnetic_records MGR
3633 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3634 from pay_magnetic_blocks MGB
3635 where MGB.report_format = L_REPORT_FORMAT);
3636 --
3637 delete from pay_magnetic_blocks MGB
3638 where MGB.report_format = L_REPORT_FORMAT;
3639 --
3640 delete from pay_report_format_mappings_f RFM
3641 where RFM.report_format = L_REPORT_FORMAT;
3642 --
3643 -- Report to format definitions.
3644 --
3645 insert into pay_report_format_mappings_f
3646 (REPORT_TYPE,
3647 REPORT_QUALIFIER,
3648 REPORT_CATEGORY,
3649 REPORT_FORMAT,
3650 RANGE_CODE,
3651 ASSIGNMENT_ACTION_CODE,
3652 INITIALIZATION_CODE,
3653 ARCHIVE_CODE,
3654 MAGNETIC_CODE,
3655 EFFECTIVE_START_DATE,
3656 EFFECTIVE_END_DATE)
3657 values ('SQWL' , 'SD', 'PD', L_REPORT_FORMAT,
3658 'pay_us_archive.range_cursor',
3659 'pay_us_archive.action_creation',
3660 'pay_us_archive.archinit',
3661 'pay_us_archive.archive_data',
3662 'pay_magtape_generic.new_formula',
3663 START_OF_TIME, END_OF_TIME);
3664 --
3665 -- Block definitions.
3666 --
3667 pay_mgb_ins.ins
3668 (p_magnetic_block_id => L_BLOCK1
3669 ,p_block_name => 'TRANSMITTER'
3670 ,p_main_block_flag => 'Y'
3671 ,p_report_format => L_REPORT_FORMAT
3672 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3673 ,p_no_column_returned => 6
3674 ,p_validate => false);
3675 --
3676 pay_mgb_ins.ins
3677 (p_magnetic_block_id => L_BLOCK2
3678 ,p_block_name => 'EMPLOYER'
3679 ,p_main_block_flag => 'N'
3680 ,p_report_format => L_REPORT_FORMAT
3681 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3682 ,p_no_column_returned => 12
3683 ,p_validate => false);
3684 --
3685 pay_mgb_ins.ins
3686 (p_magnetic_block_id => L_BLOCK3
3687 ,p_block_name => 'EMPLOYEE'
3688 ,p_main_block_flag => 'N'
3689 ,p_report_format => L_REPORT_FORMAT
3690 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3691 ,p_no_column_returned => 8
3692 ,p_validate => false);
3693 --
3694 -- Record definitions.
3695 --
3696
3697 pay_mgr_ins.ins
3698 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3699 'DUMMY_SQWL_TRANSMITTER')
3700 ,p_magnetic_block_id => L_BLOCK1
3701 ,p_next_block_id => L_BLOCK2
3702 ,p_last_run_executed_mode => 'N'
3703 ,p_overflow_mode => 'N'
3704 ,p_sequence => 1
3705 ,p_frequency => NULL
3706 ,p_validate => false);
3707
3708 --
3709 pay_mgr_ins.ins
3710 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3711 'DUMMY_SQWL_FINAL')
3712 ,p_magnetic_block_id => L_BLOCK1
3713 ,p_next_block_id => NULL
3714 ,p_last_run_executed_mode => 'N'
3715 ,p_overflow_mode => 'N'
3716 ,p_sequence => 2
3717 ,p_frequency => NULL
3718 ,p_validate => false);
3719 --
3720 pay_mgr_ins.ins
3721 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3722 'SDSQWLD_EMPLOYER')
3723 ,p_magnetic_block_id => L_BLOCK2
3724 ,p_next_block_id => L_BLOCK3
3725 ,p_last_run_executed_mode => 'N'
3726 ,p_overflow_mode => 'N'
3727 ,p_sequence => 1
3728 ,p_frequency => NULL
3729 ,p_validate => false);
3730 --
3731 pay_mgr_ins.ins
3732 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3733 'DUMMY_SQWL_TOTAL')
3734 ,p_magnetic_block_id => L_BLOCK2
3735 ,p_next_block_id => NULL
3736 ,p_last_run_executed_mode => 'N'
3737 ,p_overflow_mode => 'N'
3738 ,p_sequence => 2
3739 ,p_frequency => NULL
3740 ,p_validate => false);
3741 --
3742 pay_mgr_ins.ins
3743 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3744 'SDSQWLD_SUPPLEMENTAL')
3745 ,p_magnetic_block_id => L_BLOCK3
3746 ,p_next_block_id => NULL
3747 ,p_last_run_executed_mode => 'N'
3748 ,p_overflow_mode => 'N'
3749 ,p_sequence => 1
3750 ,p_frequency => NULL
3751 ,p_validate => false);
3752 --------------------------------------------------------------------------
3753 -- MDSQWLD (Maryland Diskette) SQWL format -
3754 --------------------------------------------------------------------------
3755 --
3756 -- Set up report format to be maintained.
3757 --
3758 L_REPORT_FORMAT := 'MDSQWLD';
3759 --
3760 -- Clear down current format definition and its mappings.
3761 --
3762 delete from pay_magnetic_records MGR
3763 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3764 from pay_magnetic_blocks MGB
3765 where MGB.report_format = L_REPORT_FORMAT);
3766 --
3767 delete from pay_magnetic_blocks MGB
3768 where MGB.report_format = L_REPORT_FORMAT;
3769 --
3770 delete from pay_report_format_mappings_f RFM
3771 where RFM.report_format = L_REPORT_FORMAT;
3772 --
3773 -- Report to format definitions.
3774
3775 insert into pay_report_format_mappings_f
3776 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3777 RANGE_CODE,
3778 ASSIGNMENT_ACTION_CODE,
3779 INITIALIZATION_CODE,
3780 ARCHIVE_CODE,
3781 MAGNETIC_CODE,
3782 REPORT_FORMAT, EFFECTIVE_START_DATE,
3783 EFFECTIVE_END_DATE )
3784 values ('SQWL' , 'MD', 'PD',
3785 'pay_us_archive.range_cursor',
3786 'pay_us_archive.action_creation',
3787 'pay_us_archive.archinit',
3788 'pay_us_archive.archive_data',
3789 'pay_magtape_generic.new_formula',
3790 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3791
3792 --
3793 -- Block definitions.
3794 --
3795 pay_mgb_ins.ins
3796 (p_magnetic_block_id => L_BLOCK1
3797 ,p_block_name => 'TRANSMITTER'
3798 ,p_main_block_flag => 'Y'
3799 ,p_report_format => L_REPORT_FORMAT
3800 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3801 ,p_no_column_returned => 6
3802 ,p_validate => false);
3803 --
3804 pay_mgb_ins.ins
3805 (p_magnetic_block_id => L_BLOCK2
3806 ,p_block_name => 'EMPLOYER'
3807 ,p_main_block_flag => 'N'
3808 ,p_report_format => L_REPORT_FORMAT
3809 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3810 ,p_no_column_returned => 12
3811 ,p_validate => false);
3812 --
3813 pay_mgb_ins.ins
3814 (p_magnetic_block_id => L_BLOCK3
3815 ,p_block_name => 'EMPLOYEE'
3816 ,p_main_block_flag => 'N'
3817 ,p_report_format => L_REPORT_FORMAT
3818 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3819 ,p_no_column_returned => 8
3820 ,p_validate => false);
3821 --
3822 -- Record definitions.
3823 --
3824 pay_mgr_ins.ins
3825 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3826 'DUMMY_SQWL_TRANSMITTER')
3827 ,p_magnetic_block_id => L_BLOCK1
3828 ,p_next_block_id => L_BLOCK2
3829 ,p_last_run_executed_mode => 'N'
3830 ,p_overflow_mode => 'N'
3831 ,p_sequence => 1
3832 ,p_frequency => NULL
3833 ,p_validate => false);
3834 --
3835 pay_mgr_ins.ins
3836 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3837 'MDSQWLD_FINAL')
3838 ,p_magnetic_block_id => L_BLOCK1
3839 ,p_next_block_id => NULL
3840 ,p_last_run_executed_mode => 'N'
3841 ,p_overflow_mode => 'N'
3842 ,p_sequence => 2
3843 ,p_frequency => NULL
3844 ,p_validate => false);
3845 --
3846 pay_mgr_ins.ins
3847 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3848 'DUMMY_SQWL_EMPLOYER')
3849 ,p_magnetic_block_id => L_BLOCK2
3850 ,p_next_block_id => L_BLOCK3
3851 ,p_last_run_executed_mode => 'N'
3852 ,p_overflow_mode => 'N'
3853 ,p_sequence => 1
3854 ,p_frequency => NULL
3855 ,p_validate => false);
3856 --
3857 pay_mgr_ins.ins
3858 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3859 'DUMMY_SQWL_TOTAL')
3860 ,p_magnetic_block_id => L_BLOCK2
3861 ,p_next_block_id => NULL
3862 ,p_last_run_executed_mode => 'N'
3863 ,p_overflow_mode => 'N'
3864 ,p_sequence => 2
3865 ,p_frequency => NULL
3866 ,p_validate => false);
3867 --
3868 pay_mgr_ins.ins
3869 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3870 'MDSQWLD_SUPPLEMENTAL')
3871 ,p_magnetic_block_id => L_BLOCK3
3872 ,p_next_block_id => NULL
3873 ,p_last_run_executed_mode => 'N'
3874 ,p_overflow_mode => 'N'
3875 ,p_sequence => 1
3876 ,p_frequency => NULL
3877 ,p_validate => false);
3878 --------------------------------------------------------------------------
3879 -- ILSQWLD (Illinois Diskette) SQWL format -
3880 --------------------------------------------------------------------------
3881 --
3882 -- Set up report format to be maintained.
3883 --
3884 L_REPORT_FORMAT := 'ILSQWLD';
3885 --
3886 -- Clear down current format definition and its mappings.
3887 --
3888 delete from pay_magnetic_records MGR
3889 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
3890 from pay_magnetic_blocks MGB
3891 where MGB.report_format = L_REPORT_FORMAT);
3892 --
3893 delete from pay_magnetic_blocks MGB
3894 where MGB.report_format = L_REPORT_FORMAT;
3895 --
3896 delete from pay_report_format_mappings_f RFM
3897 where RFM.report_format = L_REPORT_FORMAT;
3898 --
3899 -- Report to format definitions.
3900 --
3901 --
3902 insert into pay_report_format_mappings_f
3903 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
3904 RANGE_CODE,
3905 ASSIGNMENT_ACTION_CODE,
3906 INITIALIZATION_CODE,
3907 ARCHIVE_CODE,
3908 MAGNETIC_CODE,
3909 REPORT_FORMAT, EFFECTIVE_START_DATE,
3910 EFFECTIVE_END_DATE )
3911 values ('SQWL' , 'IL', 'PD',
3912 'pay_us_archive.range_cursor',
3913 'pay_us_archive.action_creation',
3914 'pay_us_archive.archinit',
3915 'pay_us_archive.archive_data',
3916 'pay_magtape_generic.new_formula',
3917 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
3918
3919 --
3920 -- Block definitions.
3921 --
3922 pay_mgb_ins.ins
3923 (p_magnetic_block_id => L_BLOCK1
3924 ,p_block_name => 'TRANSMITTER'
3925 ,p_main_block_flag => 'Y'
3926 ,p_report_format => L_REPORT_FORMAT
3927 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
3928 ,p_no_column_returned => 6
3929 ,p_validate => false);
3930 --
3931 pay_mgb_ins.ins
3932 (p_magnetic_block_id => L_BLOCK2
3933 ,p_block_name => 'EMPLOYER'
3934 ,p_main_block_flag => 'N'
3935 ,p_report_format => L_REPORT_FORMAT
3936 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
3937 ,p_no_column_returned => 12
3938 ,p_validate => false);
3939 --
3940 pay_mgb_ins.ins
3941 (p_magnetic_block_id => L_BLOCK3
3942 ,p_block_name => 'EMPLOYEE'
3943 ,p_main_block_flag => 'N'
3944 ,p_report_format => L_REPORT_FORMAT
3945 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
3946 ,p_no_column_returned => 8
3947 ,p_validate => false);
3948 --
3949 -- Record definitions.
3950 --
3951
3952 pay_mgr_ins.ins
3953 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3954 'ICESA_TRANSMITTER')
3955 ,p_magnetic_block_id => L_BLOCK1
3956 ,p_next_block_id => NULL
3957 ,p_last_run_executed_mode => 'N'
3958 ,p_overflow_mode => 'N'
3959 ,p_sequence => 1
3960 ,p_frequency => NULL
3961 ,p_validate => false);
3962
3963 --
3964 pay_mgr_ins.ins
3965 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3966 'ICESA_BINFO')
3967 ,p_magnetic_block_id => L_BLOCK1
3968 ,p_next_block_id => L_BLOCK2
3969 ,p_last_run_executed_mode => 'N'
3970 ,p_overflow_mode => 'N'
3971 ,p_sequence => 2
3972 ,p_frequency => NULL
3973 ,p_validate => false);
3974 --
3975 pay_mgr_ins.ins
3976 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3977 'ICESA_FINAL')
3978 ,p_magnetic_block_id => L_BLOCK1
3979 ,p_next_block_id => NULL
3980 ,p_last_run_executed_mode => 'N'
3981 ,p_overflow_mode => 'N'
3982 ,p_sequence => 3
3983 ,p_frequency => NULL
3984 ,p_validate => false);
3985 --
3986 pay_mgr_ins.ins
3987 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3988 'ICESA_EMPLOYER')
3989 ,p_magnetic_block_id => L_BLOCK2
3990 ,p_next_block_id => L_BLOCK3
3991 ,p_last_run_executed_mode => 'N'
3992 ,p_overflow_mode => 'N'
3993 ,p_sequence => 1
3994 ,p_frequency => NULL
3995 ,p_validate => false);
3996 --
3997 pay_mgr_ins.ins
3998 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
3999 'ICESA_TOTAL')
4000 ,p_magnetic_block_id => L_BLOCK2
4001 ,p_next_block_id => NULL
4002 ,p_last_run_executed_mode => 'N'
4003 ,p_overflow_mode => 'N'
4004 ,p_sequence => 2
4005 ,p_frequency => NULL
4006 ,p_validate => false);
4007 --
4008 pay_mgr_ins.ins
4009 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4010 'ICESA_TOTAL2')
4011 ,p_magnetic_block_id => L_BLOCK2
4012 ,p_next_block_id => NULL
4013 ,p_last_run_executed_mode => 'N'
4014 ,p_overflow_mode => 'N'
4015 ,p_sequence => 3
4016 ,p_frequency => NULL
4017 ,p_validate => false);
4018 --
4019
4020 pay_mgr_ins.ins
4021 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4022 'ICESA_SUPPLEMENTAL')
4023 ,p_magnetic_block_id => L_BLOCK3
4024 ,p_next_block_id => NULL
4025 ,p_last_run_executed_mode => 'N'
4026 ,p_overflow_mode => 'N'
4027 ,p_sequence => 1
4028 ,p_frequency => NULL
4029 ,p_validate => false);
4030
4031 --------------------------------------------------------------------------
4032 -- LAQJPT (Louisiana Quality Jobs Tape) SQWL format -
4033 --------------------------------------------------------------------------
4034 --
4035 -- Set up report format to be maintained.
4036 --
4037 L_REPORT_FORMAT := 'LAQJPT';
4038 --
4039 -- Clear down current format definition and its mappings.
4040 --
4041 delete from pay_magnetic_records MGR
4042 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
4043 from pay_magnetic_blocks MGB
4044 where MGB.report_format = L_REPORT_FORMAT);
4045 --
4046 delete from pay_magnetic_blocks MGB
4047 where MGB.report_format = L_REPORT_FORMAT;
4048 --
4049 delete from pay_report_format_mappings_f RFM
4050 where RFM.report_format = L_REPORT_FORMAT;
4051 --
4052 -- Report to format definitions.
4053 --
4054 --
4055 insert into pay_report_format_mappings_f
4056 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4057 RANGE_CODE,
4058 ASSIGNMENT_ACTION_CODE,
4059 INITIALIZATION_CODE,
4060 ARCHIVE_CODE,
4061 MAGNETIC_CODE,
4062 REPORT_FORMAT, EFFECTIVE_START_DATE,
4063 EFFECTIVE_END_DATE )
4064 values ('SQWL' , 'LA', 'RTLAQ',
4065 'pay_us_archive.range_cursor',
4066 'pay_us_archive.action_creation',
4067 'pay_us_archive.archinit',
4068 'pay_us_archive.archive_data',
4069 'pay_magtape_generic.new_formula',
4070 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4071
4072 --
4073 -- Block definitions.
4074 --
4075 pay_mgb_ins.ins
4076 (p_magnetic_block_id => L_BLOCK1
4077 ,p_block_name => 'TRANSMITTER'
4078 ,p_main_block_flag => 'Y'
4079 ,p_report_format => L_REPORT_FORMAT
4080 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
4081 ,p_no_column_returned => 6
4082 ,p_validate => false);
4083 --
4084 pay_mgb_ins.ins
4085 (p_magnetic_block_id => L_BLOCK2
4086 ,p_block_name => 'EMPLOYER'
4087 ,p_main_block_flag => 'N'
4088 ,p_report_format => L_REPORT_FORMAT
4089 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
4090 ,p_no_column_returned => 12
4091 ,p_validate => false);
4092 --
4093 pay_mgb_ins.ins
4094 (p_magnetic_block_id => L_BLOCK3
4095 ,p_block_name => 'EMPLOYEE'
4096 ,p_main_block_flag => 'N'
4097 ,p_report_format => L_REPORT_FORMAT
4098 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
4099 ,p_no_column_returned => 8
4100 ,p_validate => false);
4101 --
4102 -- Record definitions.
4103 --
4104
4105 pay_mgr_ins.ins
4106 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4107 'SSA_SQWL_TRANSMITTER')
4108 ,p_magnetic_block_id => L_BLOCK1
4109 ,p_next_block_id => NULL
4110 ,p_last_run_executed_mode => 'N'
4111 ,p_overflow_mode => 'N'
4112 ,p_sequence => 1
4113 ,p_frequency => NULL
4114 ,p_validate => false);
4115
4116 --
4117 pay_mgr_ins.ins
4118 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4119 'SSA_SQWL_BINFO')
4120 ,p_magnetic_block_id => L_BLOCK1
4121 ,p_next_block_id => L_BLOCK2
4122 ,p_last_run_executed_mode => 'N'
4123 ,p_overflow_mode => 'N'
4124 ,p_sequence => 2
4125 ,p_frequency => NULL
4126 ,p_validate => false);
4127 --
4128 pay_mgr_ins.ins
4129 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4130 'SSA_SQWL_FINAL')
4131 ,p_magnetic_block_id => L_BLOCK1
4132 ,p_next_block_id => NULL
4133 ,p_last_run_executed_mode => 'N'
4134 ,p_overflow_mode => 'N'
4135 ,p_sequence => 3
4136 ,p_frequency => NULL
4137 ,p_validate => false);
4138 --
4139 pay_mgr_ins.ins
4140 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4141 'SSA_SQWL_EMPLOYER')
4142 ,p_magnetic_block_id => L_BLOCK2
4143 ,p_next_block_id => L_BLOCK3
4144 ,p_last_run_executed_mode => 'N'
4145 ,p_overflow_mode => 'N'
4146 ,p_sequence => 1
4147 ,p_frequency => NULL
4148 ,p_validate => false);
4149 --
4150 pay_mgr_ins.ins
4151 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4152 'SSA_SQWL_TOTAL')
4153 ,p_magnetic_block_id => L_BLOCK2
4154 ,p_next_block_id => NULL
4155 ,p_last_run_executed_mode => 'N'
4156 ,p_overflow_mode => 'N'
4157 ,p_sequence => 2
4158 ,p_frequency => NULL
4159 ,p_validate => false);
4160 --
4161 pay_mgr_ins.ins
4162 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4163 'SSA_SQWL_SUPPLEMENTAL')
4164 ,p_magnetic_block_id => L_BLOCK3
4165 ,p_next_block_id => NULL
4166 ,p_last_run_executed_mode => 'N'
4167 ,p_overflow_mode => 'N'
4168 ,p_sequence => 1
4169 ,p_frequency => NULL
4170 ,p_validate => false);
4171
4172 --------------------------------------------------------------------------
4173 -- ORSQWLF (Oregon FTP) SQWL format -
4174 --------------------------------------------------------------------------
4175 --
4176 -- Set up report format to be maintained.
4177 --
4178 L_REPORT_FORMAT := 'ORSQWLF';
4179 --
4180 -- Clear down current format definition and its mappings.
4181 --
4182 delete from pay_magnetic_records MGR
4183 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
4184 from pay_magnetic_blocks MGB
4185 where MGB.report_format = L_REPORT_FORMAT);
4186 --
4187 delete from pay_magnetic_blocks MGB
4188 where MGB.report_format = L_REPORT_FORMAT;
4189 --
4190 delete from pay_report_format_mappings_f RFM
4191 where RFM.report_format = L_REPORT_FORMAT;
4192 --
4193 -- Report to format definitions.
4194 --
4195 --
4196 insert into pay_report_format_mappings_f
4197 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4198 RANGE_CODE,
4199 ASSIGNMENT_ACTION_CODE,
4200 INITIALIZATION_CODE,
4201 ARCHIVE_CODE,
4202 MAGNETIC_CODE,
4203 REPORT_FORMAT, EFFECTIVE_START_DATE,
4204 EFFECTIVE_END_DATE )
4205 values ('SQWL' , 'OR', 'FTP',
4206 'pay_us_archive.range_cursor',
4207 'pay_us_archive.action_creation',
4208 'pay_us_archive.archinit',
4209 'pay_us_archive.archive_data',
4210 'pay_magtape_generic.new_formula',
4211 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4212
4213 --
4214 -- Block definitions.
4215 --
4216 pay_mgb_ins.ins
4217 (p_magnetic_block_id => L_BLOCK1
4218 ,p_block_name => 'TRANSMITTER'
4219 ,p_main_block_flag => 'Y'
4220 ,p_report_format => L_REPORT_FORMAT
4221 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
4222 ,p_no_column_returned => 6
4223 ,p_validate => false);
4224 --
4225 pay_mgb_ins.ins
4226 (p_magnetic_block_id => L_BLOCK2
4227 ,p_block_name => 'EMPLOYER'
4228 ,p_main_block_flag => 'N'
4229 ,p_report_format => L_REPORT_FORMAT
4230 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
4231 ,p_no_column_returned => 12
4232 ,p_validate => false);
4233 --
4234 pay_mgb_ins.ins
4235 (p_magnetic_block_id => L_BLOCK3
4236 ,p_block_name => 'EMPLOYEE'
4237 ,p_main_block_flag => 'N'
4238 ,p_report_format => L_REPORT_FORMAT
4239 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
4240 ,p_no_column_returned => 8
4241 ,p_validate => false);
4242 --
4243 -- Record definitions.
4244 --
4245
4246 pay_mgr_ins.ins
4247 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4248 'SSA_SQWL_TRANSMITTER')
4249 ,p_magnetic_block_id => L_BLOCK1
4250 ,p_next_block_id => NULL
4251 ,p_last_run_executed_mode => 'N'
4252 ,p_overflow_mode => 'N'
4253 ,p_sequence => 1
4254 ,p_frequency => NULL
4255 ,p_validate => false);
4256
4257 --
4258 pay_mgr_ins.ins
4259 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4260 'SSA_SQWL_BINFO')
4261 ,p_magnetic_block_id => L_BLOCK1
4262 ,p_next_block_id => L_BLOCK2
4263 ,p_last_run_executed_mode => 'N'
4264 ,p_overflow_mode => 'N'
4265 ,p_sequence => 2
4266 ,p_frequency => NULL
4267 ,p_validate => false);
4268 --
4269 pay_mgr_ins.ins
4270 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4271 'SSA_SQWL_FINAL')
4272 ,p_magnetic_block_id => L_BLOCK1
4273 ,p_next_block_id => NULL
4274 ,p_last_run_executed_mode => 'N'
4275 ,p_overflow_mode => 'N'
4276 ,p_sequence => 3
4277 ,p_frequency => NULL
4278 ,p_validate => false);
4279 --
4280 pay_mgr_ins.ins
4281 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4282 'SSA_SQWL_EMPLOYER')
4283 ,p_magnetic_block_id => L_BLOCK2
4284 ,p_next_block_id => L_BLOCK3
4285 ,p_last_run_executed_mode => 'N'
4286 ,p_overflow_mode => 'N'
4287 ,p_sequence => 1
4288 ,p_frequency => NULL
4289 ,p_validate => false);
4290 --
4291 pay_mgr_ins.ins
4292 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4293 'SSA_SQWL_TOTAL')
4294 ,p_magnetic_block_id => L_BLOCK2
4295 ,p_next_block_id => NULL
4296 ,p_last_run_executed_mode => 'N'
4297 ,p_overflow_mode => 'N'
4298 ,p_sequence => 2
4299 ,p_frequency => NULL
4300 ,p_validate => false);
4301 --
4302 pay_mgr_ins.ins
4303 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4304 'SSA_SQWL_SUPPLEMENTAL')
4305 ,p_magnetic_block_id => L_BLOCK3
4306 ,p_next_block_id => NULL
4307 ,p_last_run_executed_mode => 'N'
4308 ,p_overflow_mode => 'N'
4309 ,p_sequence => 1
4310 ,p_frequency => NULL
4311 ,p_validate => false);
4312
4313 --
4314 --------------------------------------------------------------------------
4315 -- North Dakota SQWL (FTP)format -
4316 --------------------------------------------------------------------------
4317 --
4318 -- Set up report format to be maintained.
4319 --
4320 L_REPORT_FORMAT := 'NDSQWLF';
4321 --
4322 -- Clear down current format definition and its mappings.
4323 --
4324 delete from pay_magnetic_records MGR
4325 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
4326 from pay_magnetic_blocks MGB
4327 where MGB.report_format = L_REPORT_FORMAT);
4328
4329 delete from pay_magnetic_blocks MGB
4330 where MGB.report_format = L_REPORT_FORMAT;
4331 --
4332 delete from pay_report_format_mappings_f RFM
4333 where RFM.report_format = L_REPORT_FORMAT;
4334 --
4335 -- Report to format definitions.
4336
4337 insert into pay_report_format_mappings_f
4338 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4339 RANGE_CODE,
4340 ASSIGNMENT_ACTION_CODE,
4341 INITIALIZATION_CODE,
4342 ARCHIVE_CODE,
4343 MAGNETIC_CODE,
4344 REPORT_FORMAT, EFFECTIVE_START_DATE,
4345 EFFECTIVE_END_DATE )
4346 values ('SQWL' , 'ND', 'FTP',
4347 'pay_us_archive.range_cursor',
4348 'pay_us_archive.action_creation',
4349 'pay_us_archive.archinit',
4350 'pay_us_archive.archive_data',
4351 'pay_magtape_generic.new_formula',
4352 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4353
4354 --
4355 -- Block definitions.
4356 --
4357 pay_mgb_ins.ins
4358 (p_magnetic_block_id => L_BLOCK1
4359 ,p_block_name => 'TRANSMITTER'
4360 ,p_main_block_flag => 'Y'
4361 ,p_report_format => L_REPORT_FORMAT
4362 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
4363 ,p_no_column_returned => 6
4364 ,p_validate => false);
4365 --
4366 pay_mgb_ins.ins
4367 (p_magnetic_block_id => L_BLOCK2
4368 ,p_block_name => 'EMPLOYER'
4369 ,p_main_block_flag => 'N'
4370 ,p_report_format => L_REPORT_FORMAT
4371 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
4372 ,p_no_column_returned => 12
4373 ,p_validate => false);
4374 --
4375 pay_mgb_ins.ins
4376 (p_magnetic_block_id => L_BLOCK3
4377 ,p_block_name => 'EMPLOYEE'
4378 ,p_main_block_flag => 'N'
4379 ,p_report_format => L_REPORT_FORMAT
4380 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
4381 ,p_no_column_returned => 8
4382 ,p_validate => false);
4383 --
4384 -- Record definitions.
4385 --
4386
4387 pay_mgr_ins.ins
4388 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4389 'DUMMY_SQWL_TRANSMITTER')
4390 ,p_magnetic_block_id => L_BLOCK1
4391 ,p_next_block_id => L_BLOCK2
4392 ,p_last_run_executed_mode => 'N'
4393 ,p_overflow_mode => 'N'
4394 ,p_sequence => 1
4395 ,p_frequency => NULL
4396 ,p_validate => false);
4397
4398 --
4399 pay_mgr_ins.ins
4400 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4401 'DUMMY_SQWL_FINAL')
4402 ,p_magnetic_block_id => L_BLOCK1
4403 ,p_next_block_id => NULL
4404 ,p_last_run_executed_mode => 'N'
4405 ,p_overflow_mode => 'N'
4406 ,p_sequence => 2
4407 ,p_frequency => NULL
4408 ,p_validate => false);
4409 --
4410 pay_mgr_ins.ins
4411 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4412 'ICESA_EMPLOYER')
4413 ,p_magnetic_block_id => L_BLOCK2
4414 ,p_next_block_id => L_BLOCK3
4415 ,p_last_run_executed_mode => 'N'
4416 ,p_overflow_mode => 'N'
4417 ,p_sequence => 1
4418 ,p_frequency => NULL
4419 ,p_validate => false);
4420 --
4421 pay_mgr_ins.ins
4422 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4423 'ICESA_TOTAL')
4424 ,p_magnetic_block_id => L_BLOCK2
4425 ,p_next_block_id => NULL
4426 ,p_last_run_executed_mode => 'N'
4427 ,p_overflow_mode => 'N'
4428 ,p_sequence => 2
4429 ,p_frequency => NULL
4430 ,p_validate => false);
4431 --
4432 pay_mgr_ins.ins
4433 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4434 'ICESA_TOTAL2')
4435 ,p_magnetic_block_id => L_BLOCK2
4436 ,p_next_block_id => NULL
4437 ,p_last_run_executed_mode => 'N'
4438 ,p_overflow_mode => 'N'
4439 ,p_sequence => 3
4440 ,p_frequency => NULL
4441 ,p_validate => false);
4442 --
4443 pay_mgr_ins.ins
4444 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4445 'ICESA_SUPPLEMENTAL')
4446 ,p_magnetic_block_id => L_BLOCK3
4447 ,p_next_block_id => NULL
4448 ,p_last_run_executed_mode => 'N'
4449 ,p_overflow_mode => 'N'
4450 ,p_sequence => 1
4451 ,p_frequency => NULL
4452 ,p_validate => false);
4453
4454 --
4455 --------------------------------------------------------------------------
4456 -- ICESA (Diskette/FTP) format -
4457 --------------------------------------------------------------------------
4458 --
4459 -- Set up report format to be maintained.
4460 --
4461 L_REPORT_FORMAT := 'ICESAD';
4462 --
4463 -- Clear down current format definition and its mappings.
4464 --
4465 delete from pay_magnetic_records MGR
4466 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
4467 from pay_magnetic_blocks MGB
4468 where MGB.report_format = L_REPORT_FORMAT);
4469 --
4470 delete from pay_magnetic_blocks MGB
4471 where MGB.report_format = L_REPORT_FORMAT;
4472 --
4473 delete from pay_report_format_mappings_f RFM
4474 where RFM.report_format = L_REPORT_FORMAT;
4475 --
4476 -- Report to format definitions.
4477 --
4478 -- 01-MAR-1999 The Current List of ICESA Diskette States
4479
4480 insert into pay_report_format_mappings_f
4481 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4482 RANGE_CODE,
4483 ASSIGNMENT_ACTION_CODE,
4484 INITIALIZATION_CODE,
4485 ARCHIVE_CODE,
4486 MAGNETIC_CODE,
4487 REPORT_FORMAT, EFFECTIVE_START_DATE,
4488 EFFECTIVE_END_DATE )
4489 values ('SQWL' , 'AL', 'FTP',
4490 'pay_us_archive.range_cursor',
4491 'pay_us_archive.action_creation',
4492 'pay_us_archive.archinit',
4493 'pay_us_archive.archive_data',
4494 'pay_magtape_generic.new_formula',
4495 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4496
4497 insert into pay_report_format_mappings_f
4498 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4499 RANGE_CODE,
4500 ASSIGNMENT_ACTION_CODE,
4501 INITIALIZATION_CODE,
4502 ARCHIVE_CODE,
4503 MAGNETIC_CODE,
4504 REPORT_FORMAT, EFFECTIVE_START_DATE,
4505 EFFECTIVE_END_DATE )
4506 values ('SQWL' , 'IL', 'FTP',
4507 'pay_us_archive.range_cursor',
4508 'pay_us_archive.action_creation',
4509 'pay_us_archive.archinit',
4510 'pay_us_archive.archive_data',
4511 'pay_magtape_generic.new_formula',
4512 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4513
4514 insert into pay_report_format_mappings_f
4515 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4516 RANGE_CODE,
4517 ASSIGNMENT_ACTION_CODE,
4518 INITIALIZATION_CODE,
4519 ARCHIVE_CODE,
4520 MAGNETIC_CODE,
4521 REPORT_FORMAT, EFFECTIVE_START_DATE,
4522 EFFECTIVE_END_DATE )
4523 values ('SQWL' , 'NC', 'FTP',
4524 'pay_us_archive.range_cursor',
4525 'pay_us_archive.action_creation',
4526 'pay_us_archive.archinit',
4527 'pay_us_archive.archive_data',
4528 'pay_magtape_generic.new_formula',
4529 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4530
4531 insert into pay_report_format_mappings_f
4532 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4533 RANGE_CODE,
4534 ASSIGNMENT_ACTION_CODE,
4535 INITIALIZATION_CODE,
4536 ARCHIVE_CODE,
4537 MAGNETIC_CODE,
4538 REPORT_FORMAT, EFFECTIVE_START_DATE,
4539 EFFECTIVE_END_DATE )
4540 values ('SQWL' , 'WV', 'PD',
4541 'pay_us_archive.range_cursor',
4542 'pay_us_archive.action_creation',
4543 'pay_us_archive.archinit',
4544 'pay_us_archive.archive_data',
4545 'pay_magtape_generic.new_formula',
4546 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4547
4548 -- End ICESA Data
4549
4550 --
4551 -- Block definitions.
4552 --
4553 pay_mgb_ins.ins
4554 (p_magnetic_block_id => L_BLOCK1
4555 ,p_block_name => 'TRANSMITTER'
4556 ,p_main_block_flag => 'Y'
4557 ,p_report_format => L_REPORT_FORMAT
4558 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
4559 ,p_no_column_returned => 6
4560 ,p_validate => false);
4561 --
4562 pay_mgb_ins.ins
4563 (p_magnetic_block_id => L_BLOCK2
4564 ,p_block_name => 'EMPLOYER'
4565 ,p_main_block_flag => 'N'
4566 ,p_report_format => L_REPORT_FORMAT
4567 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
4568 ,p_no_column_returned => 12
4569 ,p_validate => false);
4570 --
4571 pay_mgb_ins.ins
4572 (p_magnetic_block_id => L_BLOCK3
4573 ,p_block_name => 'EMPLOYEE'
4574 ,p_main_block_flag => 'N'
4575 ,p_report_format => L_REPORT_FORMAT
4576 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
4577 ,p_no_column_returned => 8
4578 ,p_validate => false);
4579 --
4580 -- Record definitions.
4581 --
4582
4583 pay_mgr_ins.ins
4584 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4585 'ICESA_TRANSMITTER')
4586 ,p_magnetic_block_id => L_BLOCK1
4587 ,p_next_block_id => NULL
4588 ,p_last_run_executed_mode => 'N'
4589 ,p_overflow_mode => 'N'
4590 ,p_sequence => 1
4591 ,p_frequency => NULL
4592 ,p_validate => false);
4593
4594 --
4595 pay_mgr_ins.ins
4596 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4597 'ICESA_BINFO')
4598 ,p_magnetic_block_id => L_BLOCK1
4599 ,p_next_block_id => L_BLOCK2
4600 ,p_last_run_executed_mode => 'N'
4601 ,p_overflow_mode => 'N'
4602 ,p_sequence => 2
4603 ,p_frequency => NULL
4604 ,p_validate => false);
4605 --
4606 pay_mgr_ins.ins
4607 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4608 'ICESA_FINAL')
4609 ,p_magnetic_block_id => L_BLOCK1
4610 ,p_next_block_id => NULL
4611 ,p_last_run_executed_mode => 'N'
4612 ,p_overflow_mode => 'N'
4613 ,p_sequence => 3
4614 ,p_frequency => NULL
4615 ,p_validate => false);
4616 --
4617 pay_mgr_ins.ins
4618 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4619 'ICESA_EMPLOYER')
4620 ,p_magnetic_block_id => L_BLOCK2
4621 ,p_next_block_id => L_BLOCK3
4622 ,p_last_run_executed_mode => 'N'
4623 ,p_overflow_mode => 'N'
4624 ,p_sequence => 1
4625 ,p_frequency => NULL
4626 ,p_validate => false);
4627 --
4628 pay_mgr_ins.ins
4629 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4630 'ICESA_TOTAL')
4631 ,p_magnetic_block_id => L_BLOCK2
4632 ,p_next_block_id => NULL
4633 ,p_last_run_executed_mode => 'N'
4634 ,p_overflow_mode => 'N'
4635 ,p_sequence => 2
4636 ,p_frequency => NULL
4637 ,p_validate => false);
4638 --
4639 pay_mgr_ins.ins
4640 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4641 'ICESA_TOTAL2')
4642 ,p_magnetic_block_id => L_BLOCK2
4643 ,p_next_block_id => NULL
4644 ,p_last_run_executed_mode => 'N'
4645 ,p_overflow_mode => 'N'
4646 ,p_sequence => 3
4647 ,p_frequency => NULL
4648 ,p_validate => false);
4649 --
4650
4651 pay_mgr_ins.ins
4652 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4653 'ICESA_SUPPLEMENTAL')
4654 ,p_magnetic_block_id => L_BLOCK3
4655 ,p_next_block_id => NULL
4656 ,p_last_run_executed_mode => 'N'
4657 ,p_overflow_mode => 'N'
4658 ,p_sequence => 1
4659 ,p_frequency => NULL
4660 ,p_validate => false);
4661 --------------------------------------------------------------------------
4662 -- ICESA_SD (S Record only) SQWL (Diskette) format -
4663 --------------------------------------------------------------------------
4664 --
4665 -- Set up report format to be maintained.
4666 --
4667 L_REPORT_FORMAT := 'ICESA_SD';
4668 --
4669 -- Clear down current format definition and its mappings.
4670 --
4671 delete from pay_magnetic_records MGR
4672 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
4673 from pay_magnetic_blocks MGB
4674 where MGB.report_format = L_REPORT_FORMAT);
4675 --
4676 delete from pay_magnetic_blocks MGB
4677 where MGB.report_format = L_REPORT_FORMAT;
4678 --
4679 delete from pay_report_format_mappings_f RFM
4680 where RFM.report_format = L_REPORT_FORMAT;
4681 --
4682 -- Report to format definitions.
4683
4684 insert into pay_report_format_mappings_f
4685 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4686 RANGE_CODE,
4687 ASSIGNMENT_ACTION_CODE,
4688 INITIALIZATION_CODE,
4689 ARCHIVE_CODE,
4690 MAGNETIC_CODE,
4691 REPORT_FORMAT, EFFECTIVE_START_DATE,
4692 EFFECTIVE_END_DATE )
4693 values ('SQWL' , 'MS', 'PD',
4694 'pay_us_archive.range_cursor',
4695 'pay_us_archive.action_creation',
4696 'pay_us_archive.archinit',
4697 'pay_us_archive.archive_data',
4698 'pay_magtape_generic.new_formula',
4699 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4700
4701 --
4702 -- Block definitions.
4703 --
4704 pay_mgb_ins.ins
4705 (p_magnetic_block_id => L_BLOCK1
4706 ,p_block_name => 'TRANSMITTER'
4707 ,p_main_block_flag => 'Y'
4708 ,p_report_format => L_REPORT_FORMAT
4709 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
4710 ,p_no_column_returned => 6
4711 ,p_validate => false);
4712 --
4713 pay_mgb_ins.ins
4714 (p_magnetic_block_id => L_BLOCK2
4715 ,p_block_name => 'EMPLOYER'
4716 ,p_main_block_flag => 'N'
4717 ,p_report_format => L_REPORT_FORMAT
4718 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
4719 ,p_no_column_returned => 12
4720 ,p_validate => false);
4721 --
4722 pay_mgb_ins.ins
4723 (p_magnetic_block_id => L_BLOCK3
4724 ,p_block_name => 'EMPLOYEE'
4725 ,p_main_block_flag => 'N'
4726 ,p_report_format => L_REPORT_FORMAT
4727 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
4728 ,p_no_column_returned => 8
4729 ,p_validate => false);
4730 --
4731 -- Record definitions.
4732 --
4733 pay_mgr_ins.ins
4734 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4735 'DUMMY_SQWL_TRANSMITTER')
4736 ,p_magnetic_block_id => L_BLOCK1
4737 ,p_next_block_id => L_BLOCK2
4738 ,p_last_run_executed_mode => 'N'
4739 ,p_overflow_mode => 'N'
4740 ,p_sequence => 1
4741 ,p_frequency => NULL
4742 ,p_validate => false);
4743 --
4744 pay_mgr_ins.ins
4745 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4746 'DUMMY_SQWL_FINAL')
4747 ,p_magnetic_block_id => L_BLOCK1
4748 ,p_next_block_id => NULL
4749 ,p_last_run_executed_mode => 'N'
4750 ,p_overflow_mode => 'N'
4751 ,p_sequence => 2
4752 ,p_frequency => NULL
4753 ,p_validate => false);
4754 --
4755 pay_mgr_ins.ins
4756 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4757 'DUMMY_SQWL_EMPLOYER')
4758 ,p_magnetic_block_id => L_BLOCK2
4759 ,p_next_block_id => L_BLOCK3
4760 ,p_last_run_executed_mode => 'N'
4761 ,p_overflow_mode => 'N'
4762 ,p_sequence => 1
4763 ,p_frequency => NULL
4764 ,p_validate => false);
4765 --
4766 pay_mgr_ins.ins
4767 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4768 'DUMMY_SQWL_TOTAL')
4769 ,p_magnetic_block_id => L_BLOCK2
4770 ,p_next_block_id => NULL
4771 ,p_last_run_executed_mode => 'N'
4772 ,p_overflow_mode => 'N'
4773 ,p_sequence => 2
4774 ,p_frequency => NULL
4775 ,p_validate => false);
4776 --
4777 pay_mgr_ins.ins
4778 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4779 'ICESA_SUPPLEMENTAL')
4780 ,p_magnetic_block_id => L_BLOCK3
4781 ,p_next_block_id => NULL
4782 ,p_last_run_executed_mode => 'N'
4783 ,p_overflow_mode => 'N'
4784 ,p_sequence => 1
4785 ,p_frequency => NULL
4786 ,p_validate => false);
4787 --
4788 --------------------------------------------------------------------------
4789 -- Wyoming SQWL (Diskette) format -
4790 --------------------------------------------------------------------------
4791 --
4792 -- Set up report format to be maintained.
4793 --
4794 L_REPORT_FORMAT := 'WYSQWLD';
4795 --
4796 -- Clear down current format definition and its mappings.
4797 --
4798 delete from pay_magnetic_records MGR
4799 where MGR.magnetic_block_id in (select MGB.magnetic_block_id
4800 from pay_magnetic_blocks MGB
4801 where MGB.report_format = L_REPORT_FORMAT);
4802 --
4803 delete from pay_magnetic_blocks MGB
4804 where MGB.report_format = L_REPORT_FORMAT;
4805 --
4806 delete from pay_report_format_mappings_f RFM
4807 where RFM.report_format = L_REPORT_FORMAT;
4808 --
4809 -- Report to format definitions.
4810
4811 insert into pay_report_format_mappings_f
4812 ( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
4813 RANGE_CODE,
4814 ASSIGNMENT_ACTION_CODE,
4815 INITIALIZATION_CODE,
4816 ARCHIVE_CODE,
4817 MAGNETIC_CODE,
4818 REPORT_FORMAT, EFFECTIVE_START_DATE,
4819 EFFECTIVE_END_DATE )
4820 values ('SQWL' , 'WY', 'PD',
4821 'pay_us_archive.range_cursor',
4822 'pay_us_archive.action_creation',
4823 'pay_us_archive.archinit',
4824 'pay_us_archive.archive_data',
4825 'pay_magtape_generic.new_formula',
4826 L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
4827 --
4828 -- Block definitions.
4829 --
4830 pay_mgb_ins.ins
4831 (p_magnetic_block_id => L_BLOCK1
4832 ,p_block_name => 'TRANSMITTER'
4833 ,p_main_block_flag => 'Y'
4834 ,p_report_format => L_REPORT_FORMAT
4835 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_transmitter'
4836 ,p_no_column_returned => 6
4837 ,p_validate => false);
4838 --
4839 pay_mgb_ins.ins
4840 (p_magnetic_block_id => L_BLOCK2
4841 ,p_block_name => 'EMPLOYER'
4842 ,p_main_block_flag => 'N'
4843 ,p_report_format => L_REPORT_FORMAT
4844 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employer'
4845 ,p_no_column_returned => 12
4846 ,p_validate => false);
4847 --
4848 pay_mgb_ins.ins
4849 (p_magnetic_block_id => L_BLOCK3
4850 ,p_block_name => 'EMPLOYEE'
4851 ,p_main_block_flag => 'N'
4852 ,p_report_format => L_REPORT_FORMAT
4853 ,p_cursor_name => 'pay_us_magtape_reporting.sqwl_employee'
4854 ,p_no_column_returned => 8
4855 ,p_validate => false);
4856 --
4857 -- Record definitions.
4858 --
4859
4860 pay_mgr_ins.ins
4861 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4862 'DUMMY_SQWL_TRANSMITTER')
4863 ,p_magnetic_block_id => L_BLOCK1
4864 ,p_next_block_id => L_BLOCK2
4865 ,p_last_run_executed_mode => 'N'
4866 ,p_overflow_mode => 'N'
4867 ,p_sequence => 1
4868 ,p_frequency => NULL
4869 ,p_validate => false);
4870 --
4871 pay_mgr_ins.ins
4872 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4873 'DUMMY_SQWL_FINAL')
4874 ,p_magnetic_block_id => L_BLOCK1
4875 ,p_next_block_id => NULL
4876 ,p_last_run_executed_mode => 'N'
4877 ,p_overflow_mode => 'N'
4878 ,p_sequence => 2
4879 ,p_frequency => NULL
4880 ,p_validate => false);
4881 --
4882 pay_mgr_ins.ins
4883 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4884 'DUMMY_SQWL_EMPLOYER')
4885 ,p_magnetic_block_id => L_BLOCK2
4886 ,p_next_block_id => L_BLOCK3
4887 ,p_last_run_executed_mode => 'N'
4888 ,p_overflow_mode => 'N'
4889 ,p_sequence => 1
4890 ,p_frequency => NULL
4891 ,p_validate => false);
4892 --
4893 pay_mgr_ins.ins
4894 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4895 'DUMMY_SQWL_TOTAL')
4896 ,p_magnetic_block_id => L_BLOCK2
4897 ,p_next_block_id => NULL
4898 ,p_last_run_executed_mode => 'N'
4899 ,p_overflow_mode => 'N'
4900 ,p_sequence => 2
4901 ,p_frequency => NULL
4902 ,p_validate => false);
4903 --
4904 pay_mgr_ins.ins
4905 (p_formula_id => lookup_formula(START_OF_TIME, NULL, 'US',
4906 'SSA_SQWL_SUPPLEMENTAL')
4907 ,p_magnetic_block_id => L_BLOCK3
4908 ,p_next_block_id => NULL
4909 ,p_last_run_executed_mode => 'N'
4910 ,p_overflow_mode => 'N'
4911 ,p_sequence => 1
4912 ,p_frequency => NULL
4913 ,p_validate => false);
4914 --
4915 --
4916 -- Make the data permanent.
4917 --
4918 commit;
4919 --
4920 end setup;
4921 --
4922 end pysqdata;
4923