[Home] [Help]
34: The table definition of ff_archive_item_contexts has
35: changed and the old archive process does not need to
36: populate this table since there is only one contxt for the routes
37: djoshi 40.8 08-Apr-1999 Verfied for Canonical Complience of Date
38: mreid 115.5 30-Nov-1999 Added column names to ff_archive_items insert
39: alogue 115.6 15-Feb-2000 Utf8 support : varchar_240_tbl required for item_name.
40: mreid 115.7 13-Sep-2001 Added column name to all inserts
41: rsirigir 115.8 13-Aug-2002 Bug 2484696, included dbdrv commands to conform to
42: GSCC compliance
508: -- chk Currently stored archive value
509: --==============================================================================
510: PROCEDURE arch_store (p_report_section VARCHAR2,
511: p_item_name VARCHAR2,
512: p_user_entity_id ff_archive_items.user_entity_id%TYPE,
513: p_context1 ff_archive_items.context1%TYPE,
514: p_value ff_archive_items.value%TYPE,
515: p_context2 ff_archive_item_contexts.context%TYPE
516: := NULL) IS
509: --==============================================================================
510: PROCEDURE arch_store (p_report_section VARCHAR2,
511: p_item_name VARCHAR2,
512: p_user_entity_id ff_archive_items.user_entity_id%TYPE,
513: p_context1 ff_archive_items.context1%TYPE,
514: p_value ff_archive_items.value%TYPE,
515: p_context2 ff_archive_item_contexts.context%TYPE
516: := NULL) IS
517: --
510: PROCEDURE arch_store (p_report_section VARCHAR2,
511: p_item_name VARCHAR2,
512: p_user_entity_id ff_archive_items.user_entity_id%TYPE,
513: p_context1 ff_archive_items.context1%TYPE,
514: p_value ff_archive_items.value%TYPE,
515: p_context2 ff_archive_item_contexts.context%TYPE
516: := NULL) IS
517: --
518: chk ff_archive_items.value%TYPE;
514: p_value ff_archive_items.value%TYPE,
515: p_context2 ff_archive_item_contexts.context%TYPE
516: := NULL) IS
517: --
518: chk ff_archive_items.value%TYPE;
519: --
520: --------------------------------------------------------------------------------
521: -- ARCH_REPORT_INFO
522: --
528: BEGIN
529: SELECT ai.value
530: INTO r
531: FROM ff_database_items dbi,
532: ff_archive_items ai
533: WHERE dbi.user_entity_id = ai.user_entity_id AND
534: dbi.user_name = p_item_name AND
535: ai.context1 = p_context1;
536: --
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
646: ( ff_archive_items_s.nextval,p_user_entity_id,p_context1,p_value );
647: --
642: --
643: INSERT INTO ff_archive_items
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 */
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
653: -- ( ff_archive_items_s.currval,2,p_context2 );
654: --
655: hr_utility.set_location ('arch_store',123);
656: END IF;
657: --------------------------------------------------------------------------------
671: hr_utility.set_location ('arch_store',1321);
672: --
673: SELECT value
674: INTO chk
675: FROM ff_archive_items ai,
676: ff_archive_item_contexts aic
677: WHERE ai.archive_item_id = aic.archive_item_id AND
678: ai.user_entity_id = p_user_entity_id AND
679: ai.context1 = p_context1 AND
683: hr_utility.set_location ('arch_store',1322);
684: --
685: SELECT value
686: INTO chk
687: FROM ff_archive_items ai
688: WHERE ai.user_entity_id = p_user_entity_id AND
689: ai.context1 = p_context1;
690: END IF;
691: --
738: SELECT p_transmitter_tax_unit_id
739: FROM DUAL;
740: --
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';
831: FROM pay_assignment_actions aa
832: WHERE aa.payroll_action_id = p_payroll_action_id;
833: --
834: employee_row employee_csr%ROWTYPE;
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);
966: --
967: --==============================================================================
968: -- ARCH_ROLBK
969: --
970: -- rollback an archive - delete rows from ff_archive_items and
971: -- ff_archive_item_contexts that relate to a specified payroll action
972: --==============================================================================
973: PROCEDURE arch_rolbk (p_errmsg OUT nocopy VARCHAR2,
974: p_errcode OUT nocopy NUMBER,
984: FROM ff_contexts con,
985: ff_route_context_usages rcu,
986: ff_user_entities ue,
987: pay_assignment_actions assact,
988: ff_archive_items i
989: WHERE i.archive_item_id = ic.archive_item_id
990: AND assact.payroll_action_id = p_payroll_action_id
991: AND assact.assignment_action_id = i.context1
992: AND i.user_entity_id = ue.user_entity_id
997: OR EXISTS ( SELECT '1'
998: FROM ff_contexts con,
999: ff_route_context_usages rcu,
1000: ff_user_entities ue,
1001: ff_archive_items i
1002: WHERE i.archive_item_id = ic.archive_item_id
1003: AND i.context1 = p_payroll_action_id
1004: AND i.user_entity_id = ue.user_entity_id
1005: AND rcu.route_id = ue.route_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,
1015: ff_route_context_usages rcu,
1016: ff_user_entities ue,