[Home] [Help]
1: PACKAGE BODY pqp_log_alien_data_changes as
2: /* $Header: pquslapc.pkb 115.2 2002/10/28 23:41:34 sshetty ship $*/
3: -----------------------------------------------------------------------------
4: -- CHECK_FOR_CHANGES
5: -----------------------------------------------------------------------------
33: --
34: -- this procedure accepts old and new values, compares the values
35: -- and if there are any changes, it calls the log events procedure.
36: --
37: l_proc VARCHAR2(60) := 'pqp_log_alien_data_changes.check_for_changes';
38: --
39: BEGIN
40: hr_utility.set_location('Entering: '||l_proc, 10);
41: --
111: l_get_curent_code c_get_curent_code%ROWTYPE;
112: l_exist VARCHAR2(1):='N';
113:
114: --
115: l_proc VARCHAR2(60) := 'pqp_log_alien_data_changes.alien_element_check';
116: --
117: BEGIN
118: hr_utility.set_location('Entering: '||l_proc, 10);
119: --
169: -- called from all the person related triggers like person, person extra
170: -- info etc. Validates if there are any changes and logs all the
171: -- assignments into the process log
172: --
173: l_proc VARCHAR2(60) := 'pqp_log_alien_data_changes.person_level_check';
174: --
175: l_session_date DATE := p_effective_date;
176: l_continue BOOLEAN := TRUE;
177: l_new_char1 VARCHAR2(80);
361: --
362: l_temp varchar2(10);
363: l_dummy1 number;
364: l_dummy2 number;
365: l_proc VARCHAR2(60) := 'pqp_log_alien_data_changes.log_events';
366: --
367: BEGIN
368: hr_utility.set_location('Entering: '||l_proc, 10);
369: --
414: -- HOOKS to check whether the event is already logged.
415: -- Legislative user hook is used due to mutating table problem for
416: -- dynamic triggers on this table.
417: --
418: l_proc VARCHAR2(60) := 'pqp_log_alien_data_changes.log_pei_insert_changes';
419: --
420: BEGIN
421: hr_utility.set_location('Entering: '||l_proc, 10);
422: --
473: ,p_pei_information12_o in varchar2
474: ,p_pei_information13 in varchar2
475: ,p_pei_information13_o in varchar2 ) IS
476: --
477: l_proc VARCHAR2(60) := 'pqp_log_alien_data_changes.log_pei_update_changes';
478: --
479: BEGIN
480: hr_utility.set_location('Entering: '||l_proc, 10);
481: --
507: hr_utility.set_location('Leaving: '||l_proc, 20);
508: --
509: END log_pei_update_changes;
510: --
511: END pqp_log_alien_data_changes;