eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PAY_MAGTAPE_EXTRACT dependencies on HR_UTILITY

Line 133: hr_utility.set_location ('arch_initialise',1);

129: PROCEDURE arch_initialise (p_payroll_action_id NUMBER) IS
130: jurisdiction_code pay_state_rules.jurisdiction_code%TYPE;
131: legislative_parameters pay_payroll_actions.legislative_parameters%TYPE;
132: BEGIN
133: hr_utility.set_location ('arch_initialise',1);
134: --
135: l_payroll_action_id := p_payroll_action_id;
136: --------------------------------------------------------------------------------
137: -- Initialise table sizes

Line 143: hr_utility.set_location ('arch_initialise',2);

139: l_balance_dbis.sz := 0;
140: l_employer_dbis.sz := 0;
141: l_assignment_dbis.sz := 0;
142: --
143: hr_utility.set_location ('arch_initialise',2);
144: --------------------------------------------------------------------------------
145: -- Get business_group and legislation_code
146: --------------------------------------------------------------------------------
147: SELECT pa.business_group_id,

Line 162: hr_utility.set_location ('arch_initialise',3);

158: per_business_groups bg
159: WHERE pa.payroll_action_id = l_payroll_action_id AND
160: pa.business_group_id = bg.business_group_id;
161: --
162: hr_utility.set_location ('arch_initialise',3);
163: --------------------------------------------------------------------------------
164: -- Set session date from effective date
165: --------------------------------------------------------------------------------
166: DELETE FROM fnd_sessions WHERE session_id = userenv('SESSIONID');

Line 170: hr_utility.set_location ('arch_initialise',4);

166: DELETE FROM fnd_sessions WHERE session_id = userenv('SESSIONID');
167: INSERT INTO fnd_sessions (session_id, effective_date)
168: VALUES ( userenv('SESSIONID'),l_effective_date );
169: --
170: hr_utility.set_location ('arch_initialise',4);
171: --------------------------------------------------------------------------------
172: -- Derive state, transmitter tax unit and report format from legislative params
173: --------------------------------------------------------------------------------
174: l_report_type := LTRIM (SUBSTR(legislative_parameters,11,5),' ');

Line 203: hr_utility.set_location ('arch_initialise',5);

199: l_state,
200: l_media_type);
201: -- end new SQWLD code
202: --
203: hr_utility.set_location ('arch_initialise',5);
204: --------------------------------------------------------------------------------
205: -- Get jurisdiction code and store as a context
206: --------------------------------------------------------------------------------
207: IF l_state <> 'FED' THEN

Line 216: hr_utility.set_location ('arch_initialise',6);

212: --
213: pay_balance_pkg.set_context ('JURISDICTION_CODE',jurisdiction_code);
214: END IF;
215: --
216: hr_utility.set_location ('arch_initialise',6);
217: --------------------------------------------------------------------------------
218: -- Get CHUNK_SIZE or default to 20 if CHUNK_SIZE does not exist
219: --------------------------------------------------------------------------------
220: BEGIN

Line 230: hr_utility.set_location ('arch_initialise',7);

226: WHEN no_data_found THEN
227: l_chunk_size := 20;
228: END;
229: --
230: hr_utility.set_location ('arch_initialise',7);
231: END arch_initialise;
232: --
233: --==============================================================================
234: -- ARCH_DB_ITEMS_LOOP

Line 279: hr_utility.set_location ('arch_db_items_loop',1);

275: creator_type ff_user_entities.creator_type%TYPE;
276: name VARCHAR2(240);
277: flag VARCHAR2(1);
278: BEGIN
279: hr_utility.set_location ('arch_db_items_loop',1);
280: --
281: --------------------------------------------------------------------------------
282: -- Loop through database items
283: --------------------------------------------------------------------------------

Line 285: hr_utility.set_location ('arch_db_items_loop',11);

281: --------------------------------------------------------------------------------
282: -- Loop through database items
283: --------------------------------------------------------------------------------
284: FOR db_items_row IN db_items_csr (l_report_format) LOOP
285: hr_utility.set_location ('arch_db_items_loop',11);
286: --------------------------------------------------------------------------------
287: -- Ignore any database item found without a A_ prefix
288: --------------------------------------------------------------------------------
289: IF substr(db_items_row.item_name,1,2) <> 'A_' THEN

Line 290: hr_utility.trace ('** Ignoring DB Item without A_ prefix: ' ||

286: --------------------------------------------------------------------------------
287: -- Ignore any database item found without a A_ prefix
288: --------------------------------------------------------------------------------
289: IF substr(db_items_row.item_name,1,2) <> 'A_' THEN
290: hr_utility.trace ('** Ignoring DB Item without A_ prefix: ' ||
291: db_items_row.item_name || ' **');
292: ELSE
293: hr_utility.set_location ('arch_db_items_loop',111);
294: --------------------------------------------------------------------------------

Line 293: hr_utility.set_location ('arch_db_items_loop',111);

289: IF substr(db_items_row.item_name,1,2) <> 'A_' THEN
290: hr_utility.trace ('** Ignoring DB Item without A_ prefix: ' ||
291: db_items_row.item_name || ' **');
292: ELSE
293: hr_utility.set_location ('arch_db_items_loop',111);
294: --------------------------------------------------------------------------------
295: -- Default to an employer database item
296: --------------------------------------------------------------------------------
297: flag := 'R';

Line 301: hr_utility.trace (' Found ' || db_items_row.item_name || ' ');

297: flag := 'R';
298: name := substr (db_items_row.item_name,3,
299: length(db_items_row.item_name)-2);
300: --
301: hr_utility.trace ('** Found ' || db_items_row.item_name || ' **');
302: hr_utility.set_location ('arch_db_items_loop',112);
303: --------------------------------------------------------------------------------
304: -- Get archive entity id and data type
305: --------------------------------------------------------------------------------

Line 302: hr_utility.set_location ('arch_db_items_loop',112);

298: name := substr (db_items_row.item_name,3,
299: length(db_items_row.item_name)-2);
300: --
301: hr_utility.trace ('** Found ' || db_items_row.item_name || ' **');
302: hr_utility.set_location ('arch_db_items_loop',112);
303: --------------------------------------------------------------------------------
304: -- Get archive entity id and data type
305: --------------------------------------------------------------------------------
306: SELECT dbi.user_entity_id, dbi.data_type

Line 336: hr_utility.set_location ('arch_db_items_loop',113);

332: END IF;
333: END LOOP;
334: END IF;
335: --
336: hr_utility.set_location ('arch_db_items_loop',113);
337: --------------------------------------------------------------------------------
338: -- Store data in appropriate table
339: --------------------------------------------------------------------------------
340: IF flag = 'B' THEN

Line 341: hr_utility.set_location ('arch_db_items_loop',1131);

337: --------------------------------------------------------------------------------
338: -- Store data in appropriate table
339: --------------------------------------------------------------------------------
340: IF flag = 'B' THEN
341: hr_utility.set_location ('arch_db_items_loop',1131);
342: --
343: l_balance_dbis.sz := l_balance_dbis.sz + 1;
344: l_balance_dbis.item_name(l_balance_dbis.sz) := name;
345: l_balance_dbis.user_entity_id(l_balance_dbis.sz) := a_user_entity_id;

Line 350: hr_utility.set_location ('arch_db_items_loop',1132);

346: l_balance_dbis.balance_id(l_balance_dbis.sz) :=
347: pay_us_magtape_reporting.bal_db_item (l_balance_dbis.item_name
348: (l_balance_dbis.sz));
349: ELSIF flag = 'A' THEN
350: hr_utility.set_location ('arch_db_items_loop',1132);
351: --
352: l_assignment_dbis.sz := l_assignment_dbis.sz + 1;
353: l_assignment_dbis.item_name(l_assignment_dbis.sz) := name;
354: l_assignment_dbis.user_entity_id(l_assignment_dbis.sz) :=

Line 358: hr_utility.set_location ('arch_db_items_loop',1133);

354: l_assignment_dbis.user_entity_id(l_assignment_dbis.sz) :=
355: a_user_entity_id;
356: l_assignment_dbis.data_type(l_assignment_dbis.sz) := a_data_type;
357: ELSE
358: hr_utility.set_location ('arch_db_items_loop',1133);
359: --
360: l_employer_dbis.sz := l_employer_dbis.sz + 1;
361: l_employer_dbis.item_name(l_employer_dbis.sz) := name;
362: l_employer_dbis.user_entity_id(l_employer_dbis.sz) :=

Line 368: hr_utility.set_location ('arch_db_items_loop',12);

364: l_employer_dbis.data_type(l_employer_dbis.sz) := a_data_type;
365: END IF;
366: END IF;
367: --
368: hr_utility.set_location ('arch_db_items_loop',12);
369: END LOOP;
370: --
371: hr_utility.set_location ('arch_db_items_loop',2);
372: END arch_db_items_loop;

Line 371: hr_utility.set_location ('arch_db_items_loop',2);

367: --
368: hr_utility.set_location ('arch_db_items_loop',12);
369: END LOOP;
370: --
371: hr_utility.set_location ('arch_db_items_loop',2);
372: END arch_db_items_loop;
373: --
374: --==============================================================================
375: -- ARCH_OUTPUT

Line 381: hr_utility.set_location ('arch_output',1);

377: -- Output a report line to pay_message_lines
378: --==============================================================================
379: PROCEDURE arch_output (p_line VARCHAR2) IS
380: BEGIN
381: hr_utility.set_location ('arch_output',1);
382: --
383: INSERT INTO pay_message_lines
384: ( line_sequence, payroll_id, message_level,
385: source_id, source_type, line_text )

Line 394: hr_utility.set_location ('arch_output',2);

390: l_payroll_action_id,
391: 'P',
392: p_line );
393: --
394: hr_utility.set_location ('arch_output',2);
395: END arch_output;
396: --
397: --==============================================================================
398: -- ARCH_REPORT_HEADER

Line 421: hr_utility.set_location ('arch_report_header',1);

417: RETURN LPAD(RPAD(s,LENGTH(s) + ((l - LENGTH(s))/2)), l);
418: END centre;
419: --
420: BEGIN
421: hr_utility.set_location ('arch_report_header',1);
422: --
423: IF l_runmode = 'R' THEN
424: hr_utility.set_location ('arch_report_header',11);
425: --------------------------------------------------------------------------------

Line 424: hr_utility.set_location ('arch_report_header',11);

420: BEGIN
421: hr_utility.set_location ('arch_report_header',1);
422: --
423: IF l_runmode = 'R' THEN
424: hr_utility.set_location ('arch_report_header',11);
425: --------------------------------------------------------------------------------
426: -- Print employee report header
427: --------------------------------------------------------------------------------
428: IF p_report_section = 'E' THEN

Line 429: hr_utility.set_location ('arch_report_header',111);

425: --------------------------------------------------------------------------------
426: -- Print employee report header
427: --------------------------------------------------------------------------------
428: IF p_report_section = 'E' THEN
429: hr_utility.set_location ('arch_report_header',111);
430: --
431: arch_output ('');
432: arch_output ('Last Name ' ||
433: 'SS Number ' ||

Line 446: hr_utility.set_location ('arch_report_header',112);

442: --------------------------------------------------------------------------------
443: -- Print employer report header
444: --------------------------------------------------------------------------------
445: ELSIF p_report_section = 'R' THEN
446: hr_utility.set_location ('arch_report_header',112);
447: --
448: arch_output ('');
449: arch_output ('Organization Name ' ||
450: ' ' ||

Line 463: hr_utility.set_location ('arch_report_header',113);

459: --------------------------------------------------------------------------------
460: -- Print report footer
461: --------------------------------------------------------------------------------
462: ELSIF p_report_section = 'F' THEN
463: hr_utility.set_location ('arch_report_header',113);
464: --
465: arch_output ('');
466: arch_output (centre('** End of Listing **',80));
467: --------------------------------------------------------------------------------

Line 471: hr_utility.set_location ('arch_report_header',114);

467: --------------------------------------------------------------------------------
468: -- Print report main header
469: --------------------------------------------------------------------------------
470: ELSE
471: hr_utility.set_location ('arch_report_header',114);
472: --
473: SELECT period
474: INTO period
475: FROM pay_w2_magnetic_tape_reports

Line 478: hr_utility.set_location ('arch_report_header',115);

474: INTO period
475: FROM pay_w2_magnetic_tape_reports
476: WHERE payroll_action_id = l_payroll_action_id;
477: --
478: hr_utility.set_location ('arch_report_header',115);
479: --
480: now := fnd_date.date_to_canonical (SYSDATE);
481: title := centre ('ARCHIVE DIFFERENCES REPORT',100);
482: --

Line 493: hr_utility.set_location ('arch_report_header',116);

489: arch_output ('Report Type: ' || l_report_type);
490: arch_output ('State: ' || l_state);
491: arch_output ('Period: ' || period);
492: --
493: hr_utility.set_location ('arch_report_header',116);
494: END IF;
495: --
496: hr_utility.set_location ('arch_report_header',12);
497: END IF;

Line 496: hr_utility.set_location ('arch_report_header',12);

492: --
493: hr_utility.set_location ('arch_report_header',116);
494: END IF;
495: --
496: hr_utility.set_location ('arch_report_header',12);
497: END IF;
498: --
499: hr_utility.set_location ('arch_report_header',2);
500: END arch_report_header;

Line 499: hr_utility.set_location ('arch_report_header',2);

495: --
496: hr_utility.set_location ('arch_report_header',12);
497: END IF;
498: --
499: hr_utility.set_location ('arch_report_header',2);
500: END arch_report_header;
501: --
502: --==============================================================================
503: -- ARCH_STORE

Line 571: hr_utility.set_location ('arch_report_line',1);

567: PROCEDURE arch_report_line (p_item_name VARCHAR2,
568: p_calc_val VARCHAR2,
569: p_arch_val VARCHAR2) IS
570: BEGIN
571: hr_utility.set_location ('arch_report_line',1);
572: --------------------------------------------------------------------------------
573: -- If it is the start of a new person/organisation...
574: --------------------------------------------------------------------------------
575: IF (l_last_context <> p_context1) OR (l_last_context IS NULL) THEN

Line 576: hr_utility.set_location ('arch_report_line',11);

572: --------------------------------------------------------------------------------
573: -- If it is the start of a new person/organisation...
574: --------------------------------------------------------------------------------
575: IF (l_last_context <> p_context1) OR (l_last_context IS NULL) THEN
576: hr_utility.set_location ('arch_report_line',11);
577: --------------------------------------------------------------------------------
578: -- Add a space between the last person/organisation and the new one
579: --------------------------------------------------------------------------------
580: IF l_last_context IS NOT NULL THEN

Line 581: hr_utility.set_location ('arch_report_line',111);

577: --------------------------------------------------------------------------------
578: -- Add a space between the last person/organisation and the new one
579: --------------------------------------------------------------------------------
580: IF l_last_context IS NOT NULL THEN
581: hr_utility.set_location ('arch_report_line',111);
582: arch_output ('');
583: END IF;
584: --
585: l_last_context := p_context1;

Line 587: hr_utility.set_location ('arch_report_line',12);

583: END IF;
584: --
585: l_last_context := p_context1;
586: --
587: hr_utility.set_location ('arch_report_line',12);
588: --------------------------------------------------------------------------------
589: -- Print new report header if section has changed
590: --------------------------------------------------------------------------------
591: IF (l_next_header = 'R') OR (l_next_header = 'E') THEN

Line 592: hr_utility.set_location ('arch_report_line',121);

588: --------------------------------------------------------------------------------
589: -- Print new report header if section has changed
590: --------------------------------------------------------------------------------
591: IF (l_next_header = 'R') OR (l_next_header = 'E') THEN
592: hr_utility.set_location ('arch_report_line',121);
593: arch_report_header (l_next_header);
594: l_next_header := NULL;
595: END IF;
596: --

Line 597: hr_utility.set_location ('arch_report_line',13);

593: arch_report_header (l_next_header);
594: l_next_header := NULL;
595: END IF;
596: --
597: hr_utility.set_location ('arch_report_line',13);
598: --------------------------------------------------------------------------------
599: -- Print person/organisation details
600: --------------------------------------------------------------------------------
601: IF p_report_section = 'E' THEN

Line 602: hr_utility.set_location ('arch_report_line',131);

598: --------------------------------------------------------------------------------
599: -- Print person/organisation details
600: --------------------------------------------------------------------------------
601: IF p_report_section = 'E' THEN
602: hr_utility.set_location ('arch_report_line',131);
603: --
604: arch_output (RPAD(arch_report_info('A_PER_LAST_NAME',
605: p_context1),20) || ' ' ||
606: RPAD(arch_report_info(

Line 609: hr_utility.set_location ('arch_report_line',132);

605: p_context1),20) || ' ' ||
606: RPAD(arch_report_info(
607: 'A_PER_NATIONAL_IDENTIFIER',p_context1),11));
608: ELSE
609: hr_utility.set_location ('arch_report_line',132);
610: --
611: arch_output (RPAD(arch_report_info(p_context2),11));
612: END IF;
613: --

Line 614: hr_utility.set_location ('arch_report_line',14);

610: --
611: arch_output (RPAD(arch_report_info(p_context2),11));
612: END IF;
613: --
614: hr_utility.set_location ('arch_report_line',14);
615: END IF;
616: --
617: hr_utility.set_location ('arch_report_line',2);
618: --------------------------------------------------------------------------------

Line 617: hr_utility.set_location ('arch_report_line',2);

613: --
614: hr_utility.set_location ('arch_report_line',14);
615: END IF;
616: --
617: hr_utility.set_location ('arch_report_line',2);
618: --------------------------------------------------------------------------------
619: -- Print actual report line
620: --------------------------------------------------------------------------------
621: arch_output (' ' ||

Line 627: hr_utility.set_location ('arch_report_line',3);

623: RPAD(replace(substr(p_item_name,3,42),'_', ' '),42) || ' ' ||
624: RPAD(NVL(p_calc_val,'** NULL **'),11) || ' ' ||
625: RPAD(NVL(p_arch_val,'** NULL **'),12));
626: --
627: hr_utility.set_location ('arch_report_line',3);
628: END arch_report_line;
629: --------------------------------------------------------------------------------
630: BEGIN
631: hr_utility.set_location ('arch_store',1);

Line 631: hr_utility.set_location ('arch_store',1);

627: hr_utility.set_location ('arch_report_line',3);
628: END arch_report_line;
629: --------------------------------------------------------------------------------
630: BEGIN
631: hr_utility.set_location ('arch_store',1);
632: --------------------------------------------------------------------------------
633: -- If in Validate mode, don't do anything
634: --------------------------------------------------------------------------------
635: IF l_runmode = 'V' THEN

Line 636: hr_utility.set_location ('arch_store',111);

632: --------------------------------------------------------------------------------
633: -- If in Validate mode, don't do anything
634: --------------------------------------------------------------------------------
635: IF l_runmode = 'V' THEN
636: hr_utility.set_location ('arch_store',111);
637: --------------------------------------------------------------------------------
638: -- If in Store mode, store the data into the archive tables
639: --------------------------------------------------------------------------------
640: ELSIF l_runmode = 'S' THEN

Line 641: hr_utility.set_location ('arch_store',121);

637: --------------------------------------------------------------------------------
638: -- If in Store mode, store the data into the archive tables
639: --------------------------------------------------------------------------------
640: ELSIF l_runmode = 'S' THEN
641: hr_utility.set_location ('arch_store',121);
642: --
643: INSERT INTO ff_archive_items
644: ( ARCHIVE_ITEM_ID, USER_ENTITY_ID, CONTEXT1, VALUE)
645: VALUES

Line 648: hr_utility.set_location ('arch_store',122);

644: ( ARCHIVE_ITEM_ID, USER_ENTITY_ID, CONTEXT1, VALUE)
645: VALUES
646: ( ff_archive_items_s.nextval,p_user_entity_id,p_context1,p_value );
647: --
648: hr_utility.set_location ('arch_store',122);
649: --
650: /* context2 is not supported in the old archive process. So, commenting this insert */
651: IF p_context2 IS NOT NULL THEN
652: -- INSERT INTO ff_archive_item_contexts VALUES

Line 655: hr_utility.set_location ('arch_store',123);

651: IF p_context2 IS NOT NULL THEN
652: -- INSERT INTO ff_archive_item_contexts VALUES
653: -- ( ff_archive_items_s.currval,2,p_context2 );
654: --
655: hr_utility.set_location ('arch_store',123);
656: END IF;
657: --------------------------------------------------------------------------------
658: -- Otherwise, you're in Report mode so compare the data with the archive and
659: -- report any differences

Line 662: hr_utility.set_location ('arch_store',131);

658: -- Otherwise, you're in Report mode so compare the data with the archive and
659: -- report any differences
660: --------------------------------------------------------------------------------
661: ELSE
662: hr_utility.set_location ('arch_store',131);
663: --
664: BEGIN
665: hr_utility.set_location ('arch_store',132);
666: --

Line 665: hr_utility.set_location ('arch_store',132);

661: ELSE
662: hr_utility.set_location ('arch_store',131);
663: --
664: BEGIN
665: hr_utility.set_location ('arch_store',132);
666: --
667: --------------------------------------------------------------------------------
668: -- Get archived value
669: --------------------------------------------------------------------------------

Line 671: hr_utility.set_location ('arch_store',1321);

667: --------------------------------------------------------------------------------
668: -- Get archived value
669: --------------------------------------------------------------------------------
670: IF p_context2 IS NOT NULL THEN
671: hr_utility.set_location ('arch_store',1321);
672: --
673: SELECT value
674: INTO chk
675: FROM ff_archive_items ai,

Line 683: hr_utility.set_location ('arch_store',1322);

679: ai.context1 = p_context1 AND
680: aic.sequence_no = 2 AND
681: aic.context = p_context2;
682: ELSE
683: hr_utility.set_location ('arch_store',1322);
684: --
685: SELECT value
686: INTO chk
687: FROM ff_archive_items ai

Line 692: hr_utility.set_location ('arch_store',133);

688: WHERE ai.user_entity_id = p_user_entity_id AND
689: ai.context1 = p_context1;
690: END IF;
691: --
692: hr_utility.set_location ('arch_store',133);
693: --------------------------------------------------------------------------------
694: -- If there is a differance print a line on the report
695: --------------------------------------------------------------------------------
696: IF chk <> p_value THEN

Line 697: hr_utility.set_location ('arch_store',1331);

693: --------------------------------------------------------------------------------
694: -- If there is a differance print a line on the report
695: --------------------------------------------------------------------------------
696: IF chk <> p_value THEN
697: hr_utility.set_location ('arch_store',1331);
698: --
699: arch_report_line (p_item_name,p_value,chk);
700: END IF;
701: --

Line 702: hr_utility.set_location ('arch_store',134);

698: --
699: arch_report_line (p_item_name,p_value,chk);
700: END IF;
701: --
702: hr_utility.set_location ('arch_store',134);
703: EXCEPTION
704: --------------------------------------------------------------------------------
705: -- Catch for when there is no corresponding data in the archive table for a
706: -- calculated value

Line 709: hr_utility.set_location ('arch_store',14);

705: -- Catch for when there is no corresponding data in the archive table for a
706: -- calculated value
707: --------------------------------------------------------------------------------
708: WHEN no_data_found THEN
709: hr_utility.set_location ('arch_store',14);
710: --
711: arch_report_line (p_item_name,p_value,'** NOT FOUND **');
712: END;
713: --

Line 714: hr_utility.set_location ('arch_store',2);

710: --
711: arch_report_line (p_item_name,p_value,'** NOT FOUND **');
712: END;
713: --
714: hr_utility.set_location ('arch_store',2);
715: END IF;
716: END arch_store;
717: --
718: --==============================================================================

Line 745: hr_utility.set_location ('arch_employer_loop',1);

741: employer_row employer_csr%ROWTYPE;
742: result ff_archive_items.value%TYPE;
743: i INTEGER;
744: BEGIN
745: hr_utility.set_location ('arch_employer_loop',1);
746: l_next_header := 'R';
747: --
748: --------------------------------------------------------------------------------
749: -- Loop through employers

Line 753: hr_utility.set_location ('arch_employer_loop',11);

749: -- Loop through employers
750: --------------------------------------------------------------------------------
751: FOR employer_row IN employer_csr (l_payroll_action_id,
752: l_transmitter_tax_unit_id) LOOP
753: hr_utility.set_location ('arch_employer_loop',11);
754: --
755: --------------------------------------------------------------------------------
756: -- Set contexts
757: --------------------------------------------------------------------------------

Line 760: hr_utility.set_location ('arch_employer_loop',12);

756: -- Set contexts
757: --------------------------------------------------------------------------------
758: pay_balance_pkg.set_context ('TAX_UNIT_ID',employer_row.tax_unit_id);
759: --
760: hr_utility.set_location ('arch_employer_loop',12);
761: --------------------------------------------------------------------------------
762: -- Loop through employer db items
763: --------------------------------------------------------------------------------
764: FOR i IN 1..l_employer_dbis.sz LOOP

Line 765: hr_utility.set_location ('arch_employer_loop',121);

761: --------------------------------------------------------------------------------
762: -- Loop through employer db items
763: --------------------------------------------------------------------------------
764: FOR i IN 1..l_employer_dbis.sz LOOP
765: hr_utility.set_location ('arch_employer_loop',121);
766: --
767: --------------------------------------------------------------------------------
768: -- Execute user exit
769: --------------------------------------------------------------------------------

Line 792: hr_utility.set_location ('arch_employer_loop',122);

788: l_payroll_action_id,
789: result,
790: employer_row.tax_unit_id );
791: --
792: hr_utility.set_location ('arch_employer_loop',122);
793: END LOOP;
794: --
795: hr_utility.set_location ('arch_employer_loop',13);
796: --------------------------------------------------------------------------------

Line 795: hr_utility.set_location ('arch_employer_loop',13);

791: --
792: hr_utility.set_location ('arch_employer_loop',122);
793: END LOOP;
794: --
795: hr_utility.set_location ('arch_employer_loop',13);
796: --------------------------------------------------------------------------------
797: -- Commit every 20 employees
798: --------------------------------------------------------------------------------
799: IF (employer_csr%ROWCOUNT > 0) AND

Line 804: hr_utility.set_location ('arch_employer_loop',14);

800: ((employer_csr%ROWCOUNT MOD l_chunk_size) = 0) THEN
801: COMMIT;
802: END IF;
803: --
804: hr_utility.set_location ('arch_employer_loop',14);
805: END LOOP;
806: --
807: hr_utility.set_location ('arch_employer_loop',2);
808: END arch_employer_loop;

Line 807: hr_utility.set_location ('arch_employer_loop',2);

803: --
804: hr_utility.set_location ('arch_employer_loop',14);
805: END LOOP;
806: --
807: hr_utility.set_location ('arch_employer_loop',2);
808: END arch_employer_loop;
809: --
810: --==============================================================================
811: -- ARCH_EMPLOYEE_LOOP

Line 839: hr_utility.set_location ('arch_employee_loop',1);

835: result ff_archive_items.value%TYPE;
836: aaid pay_assignment_actions.assignment_action_id%TYPE;
837: i INTEGER;
838: BEGIN
839: hr_utility.set_location ('arch_employee_loop',1);
840: l_next_header := 'E';
841: --
842: --------------------------------------------------------------------------------
843: -- Loop through employees

Line 846: hr_utility.set_location ('arch_employee_loop',11);

842: --------------------------------------------------------------------------------
843: -- Loop through employees
844: --------------------------------------------------------------------------------
845: FOR employee_row IN employee_csr (l_payroll_action_id,l_effective_date) LOOP
846: hr_utility.set_location ('arch_employee_loop',11);
847: --
848: --------------------------------------------------------------------------------
849: -- Setup contexts
850: --------------------------------------------------------------------------------

Line 869: hr_utility.set_location ('arch_employee_loop',12);

865: pay_balance_pkg.set_context ('ASSIGNMENT_ACTION_ID',
866: employee_row.assignment_action_id);
867: END IF;
868: --
869: hr_utility.set_location ('arch_employee_loop',12);
870: --------------------------------------------------------------------------------
871: -- Balance Loop
872: --------------------------------------------------------------------------------
873: FOR i IN 1..l_balance_dbis.sz LOOP

Line 875: hr_utility.set_location ('arch_employee_loop',121);

871: -- Balance Loop
872: --------------------------------------------------------------------------------
873: FOR i IN 1..l_balance_dbis.sz LOOP
874: --
875: hr_utility.set_location ('arch_employee_loop',121);
876: --
877: result := pay_balance_pkg.get_value (l_balance_dbis.balance_id(i),
878: employee_row.assignment_action_id);
879: --

Line 880: hr_utility.trace (' Balance Loop ' ||

876: --
877: result := pay_balance_pkg.get_value (l_balance_dbis.balance_id(i),
878: employee_row.assignment_action_id);
879: --
880: hr_utility.trace ('** Balance Loop ** ' ||
881: l_balance_dbis.item_name(i) || ' = ' || result);
882: --
883: arch_store ('E',
884: 'A_' || l_balance_dbis.item_name(i),

Line 889: hr_utility.set_location ('arch_employee_loop',122);

885: l_balance_dbis.user_entity_id(i),
886: employee_row.assignment_action_id,
887: result );
888: --
889: hr_utility.set_location ('arch_employee_loop',122);
890: END LOOP;
891: --
892: hr_utility.set_location ('arch_employee_loop',13);
893: --------------------------------------------------------------------------------

Line 892: hr_utility.set_location ('arch_employee_loop',13);

888: --
889: hr_utility.set_location ('arch_employee_loop',122);
890: END LOOP;
891: --
892: hr_utility.set_location ('arch_employee_loop',13);
893: --------------------------------------------------------------------------------
894: -- Assignment Loop
895: --------------------------------------------------------------------------------
896: FOR i IN 1..l_assignment_dbis.sz LOOP

Line 897: hr_utility.set_location ('arch_employee_loop',131);

893: --------------------------------------------------------------------------------
894: -- Assignment Loop
895: --------------------------------------------------------------------------------
896: FOR i IN 1..l_assignment_dbis.sz LOOP
897: hr_utility.set_location ('arch_employee_loop',131);
898: --
899: --------------------------------------------------------------------------------
900: -- Execute user exit
901: --------------------------------------------------------------------------------

Line 914: hr_utility.trace (' Assignments loop ' ||

910: -- IF l_assignment_dbis.data_type(i) = 'D' THEN
911: -- result := TO_CHAR (fnd_date.canonical_to_date(result));
912: -- END IF;
913: --
914: hr_utility.trace ('** Assignments loop ** ' ||
915: l_assignment_dbis.item_name(i) || ' = ' || result);
916: --
917: --------------------------------------------------------------------------------
918: -- Store data

Line 926: hr_utility.set_location ('arch_employee_loop',132);

922: l_assignment_dbis.user_entity_id(i),
923: employee_row.assignment_action_id,
924: result );
925: --
926: hr_utility.set_location ('arch_employee_loop',132);
927: END LOOP;
928: --
929: hr_utility.set_location ('arch_employee_loop',14);
930: --------------------------------------------------------------------------------

Line 929: hr_utility.set_location ('arch_employee_loop',14);

925: --
926: hr_utility.set_location ('arch_employee_loop',132);
927: END LOOP;
928: --
929: hr_utility.set_location ('arch_employee_loop',14);
930: --------------------------------------------------------------------------------
931: -- Commit every 20 employees
932: --------------------------------------------------------------------------------
933: IF (employee_csr%ROWCOUNT > 0) AND

Line 938: hr_utility.set_location ('arch_employee_loop',15);

934: ((employee_csr%ROWCOUNT MOD l_chunk_size) = 0) THEN
935: COMMIT;
936: END IF;
937: --
938: hr_utility.set_location ('arch_employee_loop',15);
939: END LOOP;
940: --
941: hr_utility.set_location ('arch_employee_loop',2);
942: END arch_employee_loop;

Line 941: hr_utility.set_location ('arch_employee_loop',2);

937: --
938: hr_utility.set_location ('arch_employee_loop',15);
939: END LOOP;
940: --
941: hr_utility.set_location ('arch_employee_loop',2);
942: END arch_employee_loop;
943: --
944: --==============================================================================
945: -- ARCH_MAIN

Line 952: hr_utility.set_location ('arch_main',1);

948: --==============================================================================
949: PROCEDURE arch_main (p_runmode VARCHAR2,
950: p_payroll_action_id NUMBER) IS
951: BEGIN
952: hr_utility.set_location ('arch_main',1);
953: --
954: l_runmode := p_runmode;
955: --
956: arch_initialise (p_payroll_action_id);

Line 964: hr_utility.set_location ('arch_main',2);

960: arch_employee_loop;
961: arch_report_header ('F');
962: COMMIT;
963: --
964: hr_utility.set_location ('arch_main',2);
965: END arch_main;
966: --
967: --==============================================================================
968: -- ARCH_ROLBK

Line 977: hr_utility.set_location ('arch_rolbk',1);

973: PROCEDURE arch_rolbk (p_errmsg OUT nocopy VARCHAR2,
974: p_errcode OUT nocopy NUMBER,
975: p_payroll_action_id NUMBER) IS
976: BEGIN
977: hr_utility.set_location ('arch_rolbk',1);
978: --
979: --------------------------------------------------------------------------------
980: -- Delete archive items
981: --------------------------------------------------------------------------------

Line 1010: hr_utility.set_location ('arch_rolbk',2);

1006: AND rcu.sequence_no = 1
1007: AND rcu.context_id = con.context_id
1008: AND con.context_name ||''= 'PAYROLL_ACTION_ID' );
1009: --
1010: hr_utility.set_location ('arch_rolbk',2);
1011: --
1012: DELETE FROM ff_archive_items i
1013: WHERE EXISTS ( SELECT '1'
1014: FROM ff_contexts con,

Line 1048: hr_utility.set_location ('arch_rolbk',3);

1044: --------------------------------------------------------------------------------
1045: py_rollback_pkg.rollback_payroll_action (p_payroll_action_id);
1046: COMMIT;
1047: --
1048: hr_utility.set_location ('arch_rolbk',3);
1049: END arch_rolbk;
1050: --
1051: END pay_magtape_extract;