DBA Data[Home] [Help]

PACKAGE BODY: APPS.PAY_DYT_ELEMENT_ENTRY_VAL_PKG

Source


1 package body PAY_DYT_ELEMENT_ENTRY_VAL_PKG
2 IS
3 
4 --
5 /*
6   ==================================================
7   This is a dynamically generated database package  
8   containing code to support the use of dynamic     
9   triggers.             
10                              
11   Preference of package Vs dbms triggers supporting 
12   dyn' triggers is made via the dated table form.  
13   .                                                 
14   This code will be called implicitly by table rhi  
15   and 
16 explictly from non-API packages that maintain 
17   data on the relevant table.                       
18   ==================================================
19               ** DO NOT CHANGE MANUALLY **          
20   
21 --------------------------------------------------
22     Package Name: PAY_DYT_ELEMENT_ENTRY_VAL_PKG
23     Base Table:   PAY_ELEMENT_ENTRY_VALUES_F
24     Date:         30/03/2009 04:53
25   ==================================================
26 */
27 
28 --
29 
30 /*
31   ================================================
32   THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
33   WITH CODE REPRESENTING A DYNAMIC TRIGGER        
34   ================================================
35             ** DO NOT CHANGE MANUALLY **      
36      
37   ------------------------------------------------
38     NAME:   PAY_ELEMENT_ENTRY_VALUES_F_ARU
39     TABLE:  PAY_ELEMENT_ENTRY_VALUES_F
40     ACTION: UPDATE
41     GENERATED DATE:   30/03/2009 04:53
42     DESCRIPTION: CONTINUOUS CALCULATION TRIGGER ON UPDATE
43  OF ELEMENT ENTRY VALUE
44     FULL TRIGGER NAME: PAY_ELEMENT_ENTRY_VALUES_F_ARU
45   ================================================
46 */
47 --
48 PROCEDURE PAY_ELEMENT_ENTRY_VALUES_F_ARU
49 (
50     P_NEW_EFFECTIVE_END_DATE                 IN DATE
51    
52 ,P_NEW_EFFECTIVE_START_DATE               IN DATE
53    ,P_NEW_ELEMENT_ENTRY_ID                   IN NUMBER
54    ,P_NEW_ELEMENT_ENTRY_VALUE_ID             IN NUMBER
55    ,P_NEW_INPUT_VALUE_ID                     IN NUMBER
56    ,P_NEW_SCREEN_ENTRY_VALUE           
57       IN VARCHAR2
58    ,P_OLD_EFFECTIVE_END_DATE                 IN DATE
59    ,P_OLD_EFFECTIVE_START_DATE               IN DATE
60    ,P_OLD_ELEMENT_ENTRY_ID                   IN NUMBER
61    ,P_OLD_ELEMENT_ENTRY_VALUE_ID             IN NUMBER
62    
63 ,P_OLD_INPUT_VALUE_ID                     IN NUMBER
64    ,P_OLD_SCREEN_ENTRY_VALUE                 IN VARCHAR2
65  ) IS 
66 
67 --
68   /* LOCAL VARIABLE DECLARATIONS */
69   L_BUSINESS_GROUP_ID            NUMBER;
70   L_LEGISLATION_CODE             VARCHAR2(10);
71 BEGIN
72   
73 HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF DYNAMIC TRIGGER: PAY_ELEMENT_ENTRY_VALUES_F_ARU');
74 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
75   RETURN;
76 END IF;
77   /* INITIALISING LOCAL VARIABLES */
78   L_BUSINESS_GROUP_ID := 
79 PAY_CORE_UTILS.GET_BUSINESS_GROUP(
80     P_STATEMENT                    => 'SELECT PAF.BUSINESS_GROUP_ID FROM PER_ASSIGNMENTS_F PAF, PAY_ELEMENT_ENTRIES_F PEE WHERE PEE.ELEMENT_ENTRY_ID = '||P_OLD_ELEMENT_ENTRY_ID||' AND 
81 TO_DATE('''||TO_CHAR(P_NEW_EFFECTIVE_START_DATE, 'DD-MON-YYYY')||''',''DD-MON-YYYY'') BETWEEN PAF.EFFECTIVE_START_DATE AND PAF.EFFECTIVE_END_DATE AND TO_DATE('''||TO_CHAR(P_NEW_EFFECTIVE_START_DATE, 'DD-MON-YYYY')||''',''DD-MON-YYYY'') BETWEEN 
82 PEE.EFFECTIVE_START_DATE AND PEE.EFFECTIVE_END_DATE AND PAF.ASSIGNMENT_ID = PEE.ASSIGNMENT_ID'
83   ); 
84   --
85   L_LEGISLATION_CODE := PAY_CORE_UTILS.GET_LEGISLATION_CODE(
86     P_BG_ID                        => L_BUSINESS_GROUP_ID
87   ); 
88   --
89   /* IS THE 
90 TRIGGER IN AN ENABLED FUNCTIONAL AREA */
91   IF PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
92     P_EVENT_ID          => 42,
93     P_LEGISLATION_CODE  => L_LEGISLATION_CODE,
94     P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
95     P_PAYROLL_ID        => NULL
96   ) THEN
97     
98 RETURN;
99   END IF;
100   --
101   /* GLOBAL COMPONENT CALLS */
102   --
103   /* LEGISLATION SPECIFIC COMPONENT CALLS */
104   --
105   /* BUSINESS GROUP SPECIFIC COMPONENT CALLS */
106   --
107   /* PAYROLL SPECIFIC COMPONENT CALLS */
108   --
109 EXCEPTION
110   WHEN OTHERS THEN
111     
112 HR_UTILITY.SET_LOCATION('PAY_ELEMENT_ENTRY_VALUES_F_ARU',ABS(SQLCODE));
113     RAISE;
114   --
115 END PAY_ELEMENT_ENTRY_VALUES_F_ARU;
116 
117 --
118 
119 /*
120   ================================================
121   THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
122   WITH CODE REPRESENTING A DYNAMIC TRIGGER        
123   ================================================
124             ** DO NOT CHANGE MANUALLY **      
125      
126   ------------------------------------------------
127     NAME:   ES_SS_REP_ELEMENT_I_I
128     TABLE:  PAY_ELEMENT_ENTRY_VALUES_F
129     ACTION: INSERT
130     GENERATED DATE:   30/03/2009 04:53
131     DESCRIPTION: SPANISH TRIGGER FOR SOCIAL SECURITY REPORTING
132    
133  FULL TRIGGER NAME: ES_SS_REP_ELEMENT_I
134   ================================================
135 */
136 --
137 PROCEDURE ES_SS_REP_ELEMENT_I_I
138 (
139     P_NEW_EFFECTIVE_END_DATE                 IN DATE
140    ,P_NEW_EFFECTIVE_START_DATE               IN DATE
141    
142 ,P_NEW_ELEMENT_ENTRY_ID                   IN NUMBER
143    ,P_NEW_ELEMENT_ENTRY_VALUE_ID             IN NUMBER
144    ,P_NEW_INPUT_VALUE_ID                     IN NUMBER
145    ,P_NEW_SCREEN_ENTRY_VALUE                 IN VARCHAR2
146    ,P_OLD_EFFECTIVE_END_DATE       
147           IN DATE
148    ,P_OLD_EFFECTIVE_START_DATE               IN DATE
149    ,P_OLD_ELEMENT_ENTRY_ID                   IN NUMBER
150    ,P_OLD_ELEMENT_ENTRY_VALUE_ID             IN NUMBER
151    ,P_OLD_INPUT_VALUE_ID                     IN NUMBER
152    
153 ,P_OLD_SCREEN_ENTRY_VALUE                 IN VARCHAR2
154  ) IS 
155 
156 --
157   /* LOCAL VARIABLE DECLARATIONS */
158   L_BUSINESS_GROUP_ID            NUMBER;
159   L_LEGISLATION_CODE             VARCHAR2(30);
160 BEGIN
161   HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF 
162 DYNAMIC TRIGGER: ES_SS_REP_ELEMENT_I');
163 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
164   RETURN;
165 END IF;
166   /* INITIALISING LOCAL VARIABLES */
167   L_BUSINESS_GROUP_ID := PER_ES_SS_REP_DYN_TRG.GET_BUSINESS_GROUP_ID(
168     P_ELEMENT_ENTRY_ID             
169 => P_NEW_ELEMENT_ENTRY_ID
170   ); 
171   --
172   SELECT LEGISLATION_CODE
173   INTO   L_LEGISLATION_CODE
174   FROM PER_BUSINESS_GROUPS WHERE BUSINESS_GROUP_ID = L_BUSINESS_GROUP_ID; 
175   --
176   /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
177   IF 
178 PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
179     P_EVENT_ID          => 121,
180     P_LEGISLATION_CODE  => L_LEGISLATION_CODE,
181     P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
182     P_PAYROLL_ID        => NULL
183   ) THEN
184     RETURN;
185   END IF;
186   --
187   /* GLOBAL COMPONENT 
188 CALLS */
189   --
190   /* LEGISLATION SPECIFIC COMPONENT CALLS */
191   IF L_LEGISLATION_CODE = 'ES' THEN
192     PER_ES_SS_REP_DYN_TRG.ELEMENT_CHECK_INSERT(
193       P_EFFECTIVE_END_DATE           => P_NEW_EFFECTIVE_END_DATE,
194       P_EFFECTIVE_START_DATE         => 
195 P_NEW_EFFECTIVE_START_DATE,
196       P_ELEMENT_ENTRY_ID             => P_NEW_ELEMENT_ENTRY_ID,
197       P_EPIGRAPH_CODE                => P_NEW_SCREEN_ENTRY_VALUE,
198       P_INPUT_VALUE_ID               => P_NEW_INPUT_VALUE_ID
199     );
200   END IF; 
201   --
202   /* 
203 BUSINESS GROUP SPECIFIC COMPONENT CALLS */
204   --
205   /* PAYROLL SPECIFIC COMPONENT CALLS */
206   --
207 EXCEPTION
208   WHEN OTHERS THEN
209     HR_UTILITY.SET_LOCATION('ES_SS_REP_ELEMENT_I_I',ABS(SQLCODE));
210     RAISE;
211   --
212 END ES_SS_REP_ELEMENT_I_I;
213 
214 --
215 
216 /*
217   ================================================
218   THIS IS A DYNAMICALLY GENERATED PACKAGE PROCEDURE
219   WITH CODE REPRESENTING A DYNAMIC TRIGGER        
220   ================================================
221             ** DO NOT CHANGE MANUALLY **      
222      
223   ------------------------------------------------
224     NAME:   ES_SS_REP_ELEMENT_U_U
225     TABLE:  PAY_ELEMENT_ENTRY_VALUES_F
226     ACTION: UPDATE
227     GENERATED DATE:   30/03/2009 04:53
228     DESCRIPTION: SPANISH TRIGGER FOR SOCIAL SECURITY REPORTING
229    
230  FULL TRIGGER NAME: ES_SS_REP_ELEMENT_U
231   ================================================
232 */
233 --
234 PROCEDURE ES_SS_REP_ELEMENT_U_U
235 (
236     P_NEW_EFFECTIVE_END_DATE                 IN DATE
237    ,P_NEW_EFFECTIVE_START_DATE               IN DATE
238    
239 ,P_NEW_ELEMENT_ENTRY_ID                   IN NUMBER
240    ,P_NEW_ELEMENT_ENTRY_VALUE_ID             IN NUMBER
241    ,P_NEW_INPUT_VALUE_ID                     IN NUMBER
242    ,P_NEW_SCREEN_ENTRY_VALUE                 IN VARCHAR2
243    ,P_OLD_EFFECTIVE_END_DATE       
244           IN DATE
245    ,P_OLD_EFFECTIVE_START_DATE               IN DATE
246    ,P_OLD_ELEMENT_ENTRY_ID                   IN NUMBER
247    ,P_OLD_ELEMENT_ENTRY_VALUE_ID             IN NUMBER
248    ,P_OLD_INPUT_VALUE_ID                     IN NUMBER
249    
250 ,P_OLD_SCREEN_ENTRY_VALUE                 IN VARCHAR2
251  ) IS 
252 
253 --
254   /* LOCAL VARIABLE DECLARATIONS */
255   L_BUSINESS_GROUP_ID            NUMBER;
256   L_LEGISLATION_CODE             VARCHAR2(30);
257 BEGIN
258   HR_UTILITY.TRACE(' >DYT: EXECUTE PROCEDURE VERSION OF 
259 DYNAMIC TRIGGER: ES_SS_REP_ELEMENT_U');
260 IF NOT (HR_GENERAL.G_DATA_MIGRATOR_MODE <> 'Y') THEN
261   RETURN;
262 END IF;
263   /* INITIALISING LOCAL VARIABLES */
264   L_BUSINESS_GROUP_ID := PER_ES_SS_REP_DYN_TRG.GET_BUSINESS_GROUP_ID(
265     P_ELEMENT_ENTRY_ID             
266 => P_NEW_ELEMENT_ENTRY_ID
267   ); 
268   --
269   SELECT LEGISLATION_CODE
270   INTO   L_LEGISLATION_CODE
271   FROM PER_BUSINESS_GROUPS WHERE BUSINESS_GROUP_ID = L_BUSINESS_GROUP_ID; 
272   --
273   /* IS THE TRIGGER IN AN ENABLED FUNCTIONAL AREA */
274   IF 
275 PAYWSFGT_PKG.TRIGGER_IS_NOT_ENABLED(
276     P_EVENT_ID          => 122,
277     P_LEGISLATION_CODE  => L_LEGISLATION_CODE,
278     P_BUSINESS_GROUP_ID => L_BUSINESS_GROUP_ID,
279     P_PAYROLL_ID        => NULL
280   ) THEN
281     RETURN;
282   END IF;
283   --
284   /* GLOBAL COMPONENT 
285 CALLS */
286   --
287   /* LEGISLATION SPECIFIC COMPONENT CALLS */
288   IF L_LEGISLATION_CODE = 'ES' THEN
289     PER_ES_SS_REP_DYN_TRG.ELEMENT_CHECK_UPDATE(
290       P_EFFECTIVE_END_DATE           => P_NEW_EFFECTIVE_END_DATE,
291       P_EFFECTIVE_START_DATE         => 
292 P_NEW_EFFECTIVE_START_DATE,
293       P_ELEMENT_ENTRY_ID             => P_NEW_ELEMENT_ENTRY_ID,
294       P_EPIGRAPH_CODE                => P_NEW_SCREEN_ENTRY_VALUE,
295       P_INPUT_VALUE_ID               => P_NEW_INPUT_VALUE_ID
296     );
297   END IF; 
298   --
299   /* 
300 BUSINESS GROUP SPECIFIC COMPONENT CALLS */
301   --
302   /* PAYROLL SPECIFIC COMPONENT CALLS */
303   --
304 EXCEPTION
305   WHEN OTHERS THEN
306     HR_UTILITY.SET_LOCATION('ES_SS_REP_ELEMENT_U_U',ABS(SQLCODE));
307     RAISE;
308   --
309 END ES_SS_REP_ELEMENT_U_U;
310 
311 --
312 
313 /*
314   ================================================
315   This is a dynamically generated procedure.      
316   Will be called  by API.                         
317   ================================================
318             ** DO NOT CHANGE MANUALLY **       
319     
320   ------------------------------------------------
321     Name:   AFTER_INSERT
322     Table:  PAY_ELEMENT_ENTRY_VALUES_F
323     Action: INSERT
324     Generated Date:   30/03/2009 04:53
325     Description: Called as part of INSERT process
326   
327 ================================================
328 */
329 
330 --
331 PROCEDURE AFTER_INSERT
332 (
333     P_EFFECTIVE_END_DATE                     in DATE
334    ,P_EFFECTIVE_START_DATE                   in DATE
335    ,P_ELEMENT_ENTRY_ID                       in NUMBER
336    
337 ,P_ELEMENT_ENTRY_VALUE_ID                 in NUMBER
338    ,P_INPUT_VALUE_ID                         in NUMBER
339    ,P_SCREEN_ENTRY_VALUE                     in VARCHAR2
340    ,P_EFFECTIVE_END_DATE_O                   in DATE
341    ,P_EFFECTIVE_START_DATE_O         
342         in DATE
343    ,P_ELEMENT_ENTRY_ID_O                     in NUMBER
344    ,P_ELEMENT_ENTRY_VALUE_ID_O               in NUMBER
345    ,P_INPUT_VALUE_ID_O                       in NUMBER
346    ,P_SCREEN_ENTRY_VALUE_O                   in VARCHAR2
347  ) IS 
348   l_mode 
349  varchar2(80);
350 
351 --
352  BEGIN
353 
354 --
355     hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_INSERT');
356   /* Mechanism for event capture to know whats occurred */
357   l_mode := pay_dyn_triggers.g_dyt_mode;
358   pay_dyn_triggers.g_dyt_mode := 
359 hr_api.g_insert;
360 
361 --
362 
363   if (paywsdyg_pkg.trigger_enabled('ES_SS_REP_ELEMENT_I')) then
364     ES_SS_REP_ELEMENT_I_I(
365       p_new_EFFECTIVE_END_DATE                 => P_EFFECTIVE_END_DATE
366      ,p_new_EFFECTIVE_START_DATE               => P_EFFECTIVE_START_DATE
367      
368  ,p_new_ELEMENT_ENTRY_ID                   => P_ELEMENT_ENTRY_ID
369      ,p_new_ELEMENT_ENTRY_VALUE_ID             => P_ELEMENT_ENTRY_VALUE_ID
370      ,p_new_INPUT_VALUE_ID                     => P_INPUT_VALUE_ID
371      ,p_new_SCREEN_ENTRY_VALUE                 
372 => P_SCREEN_ENTRY_VALUE
373      ,p_old_EFFECTIVE_END_DATE                 => P_EFFECTIVE_END_DATE_O
374      ,p_old_EFFECTIVE_START_DATE               => P_EFFECTIVE_START_DATE_O
375      ,p_old_ELEMENT_ENTRY_ID                   => P_ELEMENT_ENTRY_ID_O
376      
377 ,p_old_ELEMENT_ENTRY_VALUE_ID             => P_ELEMENT_ENTRY_VALUE_ID_O
378      ,p_old_INPUT_VALUE_ID                     => P_INPUT_VALUE_ID_O
379      ,p_old_SCREEN_ENTRY_VALUE                 => P_SCREEN_ENTRY_VALUE_O
380     );
381   end if;
382 
383 --
384   
385 pay_dyn_triggers.g_dyt_mode := l_mode;
386 
387 --
388 EXCEPTION
389   WHEN OTHERS THEN
390     hr_utility.set_location('AFTER_INSERT',ABS(SQLCODE));
391     pay_dyn_triggers.g_dyt_mode := l_mode;
392     RAISE;
393   --
394 END  AFTER_INSERT;
395 
396 --
397 
398 /*
399   ================================================
400   This is a dynamically generated procedure.      
401   Will be called  by API.                         
402   ================================================
403             ** DO NOT CHANGE MANUALLY **       
404     
405   ------------------------------------------------
406     Name:   AFTER_UPDATE
407     Table:  PAY_ELEMENT_ENTRY_VALUES_F
408     Action: UPDATE
409     Generated Date:   30/03/2009 04:53
410     Description: Called as part of UPDATE process
411   
412 ================================================
413 */
414 
415 --
416 PROCEDURE AFTER_UPDATE
417 (
418     P_EFFECTIVE_END_DATE                     in DATE
419    ,P_EFFECTIVE_START_DATE                   in DATE
420    ,P_ELEMENT_ENTRY_ID                       in NUMBER
421    
422 ,P_ELEMENT_ENTRY_VALUE_ID                 in NUMBER
423    ,P_INPUT_VALUE_ID                         in NUMBER
424    ,P_SCREEN_ENTRY_VALUE                     in VARCHAR2
425    ,P_EFFECTIVE_END_DATE_O                   in DATE
426    ,P_EFFECTIVE_START_DATE_O         
427         in DATE
428    ,P_ELEMENT_ENTRY_ID_O                     in NUMBER
432    
429    ,P_ELEMENT_ENTRY_VALUE_ID_O               in NUMBER
430    ,P_INPUT_VALUE_ID_O                       in NUMBER
431    ,P_SCREEN_ENTRY_VALUE_O                   in VARCHAR2
433 ,P_DATETRACK_MODE                         in VARCHAR2
434  ) IS 
435   l_mode  varchar2(80);
436 
437 --
438  BEGIN
439 
440 --
441     hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_UPDATE');
442   /* Mechanism for event capture to know whats occurred */
443   l_mode := 
444 pay_dyn_triggers.g_dyt_mode;
445   pay_dyn_triggers.g_dyt_mode := p_datetrack_mode;
446 
447 --
448 
449   if (paywsdyg_pkg.trigger_enabled('PAY_ELEMENT_ENTRY_VALUES_F_ARU')) then
450     PAY_ELEMENT_ENTRY_VALUES_F_ARU(
451       p_new_EFFECTIVE_END_DATE                 => P_EFFECTIVE_END_DATE
452      ,p_new_EFFECTIVE_START_DATE               => 
453  P_EFFECTIVE_START_DATE
454      ,p_new_ELEMENT_ENTRY_ID                   => P_ELEMENT_ENTRY_ID
455      ,p_new_ELEMENT_ENTRY_VALUE_ID             => P_ELEMENT_ENTRY_VALUE_ID
456      ,p_new_INPUT_VALUE_ID                     => P_INPUT_VALUE_ID
457      
458 ,p_new_SCREEN_ENTRY_VALUE                 => P_SCREEN_ENTRY_VALUE
459      ,p_old_EFFECTIVE_END_DATE                 => P_EFFECTIVE_END_DATE_O
460      ,p_old_EFFECTIVE_START_DATE               => P_EFFECTIVE_START_DATE_O
461      ,p_old_ELEMENT_ENTRY_ID            
462        => P_ELEMENT_ENTRY_ID_O
463      ,p_old_ELEMENT_ENTRY_VALUE_ID             => P_ELEMENT_ENTRY_VALUE_ID_O
464      ,p_old_INPUT_VALUE_ID                     => P_INPUT_VALUE_ID_O
465      ,p_old_SCREEN_ENTRY_VALUE                 => P_SCREEN_ENTRY_VALUE_O
466     
467 );
468   end if;
469 
470 --
471 
472   if (paywsdyg_pkg.trigger_enabled('ES_SS_REP_ELEMENT_U')) then
473     ES_SS_REP_ELEMENT_U_U(
474       p_new_EFFECTIVE_END_DATE                 => P_EFFECTIVE_END_DATE
475      ,p_new_EFFECTIVE_START_DATE               => P_EFFECTIVE_START_DATE
476      
477  ,p_new_ELEMENT_ENTRY_ID                   => P_ELEMENT_ENTRY_ID
478      ,p_new_ELEMENT_ENTRY_VALUE_ID             => P_ELEMENT_ENTRY_VALUE_ID
479      ,p_new_INPUT_VALUE_ID                     => P_INPUT_VALUE_ID
480      ,p_new_SCREEN_ENTRY_VALUE                 
481 => P_SCREEN_ENTRY_VALUE
482      ,p_old_EFFECTIVE_END_DATE                 => P_EFFECTIVE_END_DATE_O
483      ,p_old_EFFECTIVE_START_DATE               => P_EFFECTIVE_START_DATE_O
484      ,p_old_ELEMENT_ENTRY_ID                   => P_ELEMENT_ENTRY_ID_O
485      
486 ,p_old_ELEMENT_ENTRY_VALUE_ID             => P_ELEMENT_ENTRY_VALUE_ID_O
487      ,p_old_INPUT_VALUE_ID                     => P_INPUT_VALUE_ID_O
488      ,p_old_SCREEN_ENTRY_VALUE                 => P_SCREEN_ENTRY_VALUE_O
489     );
490   end if;
491 
492 --
493   
494 pay_dyn_triggers.g_dyt_mode := l_mode;
495 
496 --
497 EXCEPTION
498   WHEN OTHERS THEN
499     hr_utility.set_location('AFTER_UPDATE',ABS(SQLCODE));
500     pay_dyn_triggers.g_dyt_mode := l_mode;
501     RAISE;
502   --
503 END  AFTER_UPDATE;
504 
505 --
506 
507 /*
508   ================================================
509   This is a dynamically generated procedure.      
510   Will be called  by API.                         
511   ================================================
512             ** DO NOT CHANGE MANUALLY **       
513     
514   ------------------------------------------------
515     Name:   AFTER_DELETE
516     Table:  PAY_ELEMENT_ENTRY_VALUES_F
517     Action: DELETE
518     Generated Date:   30/03/2009 04:53
519     Description: Called as part of DELETE process
520   
521 ================================================
522 */
523 
524 --
525 PROCEDURE AFTER_DELETE
526 (
527     P_EFFECTIVE_END_DATE                     in DATE
528    ,P_EFFECTIVE_START_DATE                   in DATE
529    ,P_ELEMENT_ENTRY_ID                       in NUMBER
530    
531 ,P_ELEMENT_ENTRY_VALUE_ID                 in NUMBER
532    ,P_INPUT_VALUE_ID                         in NUMBER
533    ,P_SCREEN_ENTRY_VALUE                     in VARCHAR2
534    ,P_VALIDATION_END_DATE                    in DATE
535    ,P_VALIDATION_START_DATE          
536         in DATE
537    ,P_ELEMENT_ENTRY_ID_O                     in NUMBER
538    ,P_ELEMENT_ENTRY_VALUE_ID_O               in NUMBER
539    ,P_INPUT_VALUE_ID_O                       in NUMBER
540    ,P_SCREEN_ENTRY_VALUE_O                   in VARCHAR2
541    
542 ,P_DATETRACK_MODE                         in VARCHAR2
543  ) IS 
544   l_mode  varchar2(80);
545 
546 --
547  BEGIN
548 
549 --
550     hr_utility.trace(' >DYT: Main entry point from row handler, AFTER_DELETE');
551   /* Mechanism for event capture to know whats occurred */
552   l_mode := 
553 pay_dyn_triggers.g_dyt_mode;
554   pay_dyn_triggers.g_dyt_mode := p_datetrack_mode;
555 
556 --
557   /* no calls => no dynamic triggers of this type on this table */
558   null;
559 
560 --
561   pay_dyn_triggers.g_dyt_mode := l_mode;
562 
563 --
564 EXCEPTION
565   WHEN OTHERS THEN
566     
567 hr_utility.set_location('AFTER_DELETE',ABS(SQLCODE));
568     pay_dyn_triggers.g_dyt_mode := l_mode;
569     RAISE;
570   --
571 END  AFTER_DELETE;
572 
573 --
574 
575 /*    END_PACKAGE     */
576 END PAY_DYT_ELEMENT_ENTRY_VAL_PKG;
577