[Home] [Help]
218: and LOOKUP_CODE = 'TERMINATION_HOLIDAY_PAY';
219:
220: Begin
221: /* Create the element */
222: hr_utility.set_location('Step '||g_package,810);
223: open csr_name_translation('FR_TERM_PAYMENT');
224: fetch csr_name_translation into l_item_suffix;
225: close csr_name_translation;
226:
228:
229: /* Create element */
230: -- for testing ... waiting for API availability
231:
232: hr_utility.set_location('Step '||g_package,815);
233: select hl.meaning
234: into l_act_term_date
235: from hr_lookups hl
236: where hl.lookup_type='TERMINATION_RULE'
235: from hr_lookups hl
236: where hl.lookup_type='TERMINATION_RULE'
237: and hl.lookup_code='A';
238:
239: hr_utility.set_location('Step '||g_package,816);
240: select event_group_id
241: into l_proration_group_id
242: from pay_event_groups
243: where
265: If element_group%notfound Then
266: close element_group;
267: fnd_message.set_token('LOOKUP_CODE','TERMINATION_HOLIDAY_PAY');
268: fnd_message.set_token('LOOKUP_TYPE','FR_ELEMENT_GROUP');
269: hr_utility.set_message(801,'PAY_75051_ELEMENT_GROUP');
270: hr_utility.raise_error;
271: Else
272: update pay_element_types_f
273: set element_information1 = 'TERMINATION_HOLIDAY_PAY' -- l_element_group
266: close element_group;
267: fnd_message.set_token('LOOKUP_CODE','TERMINATION_HOLIDAY_PAY');
268: fnd_message.set_token('LOOKUP_TYPE','FR_ELEMENT_GROUP');
269: hr_utility.set_message(801,'PAY_75051_ELEMENT_GROUP');
270: hr_utility.raise_error;
271: Else
272: update pay_element_types_f
273: set element_information1 = 'TERMINATION_HOLIDAY_PAY' -- l_element_group
274: ,element_information_category = 'FR_EARNINGS'
276: where element_type_id = l_element_id;
277: End if;
278: close element_group;
279:
280: hr_utility.set_location('Step '||g_package,820);
281: open csr_name_translation('FR_ACCRUAL_PLAN');
282: fetch csr_name_translation into l_input_value_name;
283: close csr_name_translation;
284:
287: l_input_value(1).result_rule_type := 'I';
288: l_input_value(1).base_name := 'Accrual Plan ID';
289: l_input_value(1).meaning_iv_name := l_input_value_name;
290:
291: hr_utility.set_location('Step '||g_package,830);
292:
293: /* store the details of the 6 input values in a table */
294: open csr_name_translation('START_DATE');
295: fetch csr_name_translation into l_input_value_name;
294: open csr_name_translation('START_DATE');
295: fetch csr_name_translation into l_input_value_name;
296: close csr_name_translation;
297:
298: hr_utility.set_location('Step '||g_package,860);
299: l_input_value(2).result_name := 'START_DATE';
300: l_input_value(2).uom := 'D';
301: l_input_value(2).result_rule_type := 'D';
302: l_input_value(2).base_name := 'Start Date';
311: l_input_value(3).result_rule_type := 'D';
312: l_input_value(3).base_name := 'Base';
313: l_input_value(3).meaning_iv_name := l_input_value_name;
314:
315: hr_utility.set_location('Step '||g_package,870);
316:
317: open csr_name_translation('RATE');
318: fetch csr_name_translation into l_input_value_name;
319: close csr_name_translation;
324: l_input_value(4).result_rule_type := 'I';
325: l_input_value(4).base_name := 'Rate';
326: l_input_value(4).meaning_iv_name := l_input_value_name;
327:
328: hr_utility.set_location('Step '||g_package,890);
329:
330: open csr_name_translation('FR_PAYMENT_INDEX');
331: fetch csr_name_translation into l_input_value_name;
332: close csr_name_translation;
336: l_input_value(5).result_rule_type := 'I';
337: l_input_value(5).base_name := 'Payment Index';
338: l_input_value(5).meaning_iv_name := l_input_value_name;
339:
340: hr_utility.set_location('Step '||g_package,910);
341:
342: l_input_value(6).result_name := 'PAY_VALUE';
343: l_input_value(6).uom := 'N';
344: l_input_value(6).result_rule_type := 'D';
343: l_input_value(6).uom := 'N';
344: l_input_value(6).result_rule_type := 'D';
345: l_input_value(6).base_name := 'Pay Value';
346:
347: hr_utility.set_location('Step '||g_package,920);
348:
349: /* 4538139 - dummy rate is not used here after */
350: /* l_input_value(7).result_name := 'L_DUMMY_RATE';
351: l_input_value(7).uom := 'N';
360: OPEN csr_formula_exists;
361: FETCH csr_formula_exists INTO l_formula_id;
362: close csr_formula_exists;
363:
364: hr_utility.set_location('Step '||g_package,920);
365:
366: If l_formula_id IS NOT null then
367: l_process_rule_id := pay_formula_results.ins_stat_proc_rule (
368: p_business_group_id => p_business_group_id,
374: p_assignment_status_type_id => NULL,
375: p_formula_id => l_formula_id,
376: p_processing_rule => 'P');
377: Else
378: hr_utility.set_message(801,'PAY_75050_TERM_MISSG_FORMULA');
379: hr_utility.raise_error;
380: END IF;
381:
382: open earnings_class_id;
375: p_formula_id => l_formula_id,
376: p_processing_rule => 'P');
377: Else
378: hr_utility.set_message(801,'PAY_75050_TERM_MISSG_FORMULA');
379: hr_utility.raise_error;
380: END IF;
381:
382: open earnings_class_id;
383: fetch earnings_class_id into l_earnings_class_id;
382: open earnings_class_id;
383: fetch earnings_class_id into l_earnings_class_id;
384: close earnings_class_id;
385:
386: hr_utility.set_location('Step '||g_package,930);
387: For l_index in 1..5 loop -- only loop 5 times as we don't want to create pay value
388: hr_utility.trace ('input value = ' || l_input_value(l_index).base_name);
389: l_seq_no :=l_index * 10;
390: l_input_value(l_index).input_value_id :=
384: close earnings_class_id;
385:
386: hr_utility.set_location('Step '||g_package,930);
387: For l_index in 1..5 loop -- only loop 5 times as we don't want to create pay value
388: hr_utility.trace ('input value = ' || l_input_value(l_index).base_name);
389: l_seq_no :=l_index * 10;
390: l_input_value(l_index).input_value_id :=
391: create_input_value(l_element_name
392: ,l_input_value(l_index).meaning_iv_name
411: /* Rate input value is target for 2 results so set the dummy rate input_value_id */
412: /* Bug 4538139 - Since l_input_value(7) is not used anymore, code is commented out */
413: -- l_input_value(7).input_value_id := l_input_value(4).input_value_id;
414:
415: hr_utility.set_location('Step '||g_package,940);
416:
417: For l_index in 1..6 loop /* Bug 4538139 - Since only 6 records are used, loop is cut short to 6 */
418: -- 115.16 Set the element_type_id on direct result rules for
419: -- consistency with the form behaviour.
436: END IF;
437: End loop;
438: /* Now store the input value id's for the rate and date in the Accrual plan DDF */
439:
440: hr_utility.set_location('Step '||g_package,950);
441:
442: IF p_accrual_category = 'FR_MAIN_HOLIDAY' Then
443: hr_utility.set_location('Step '||g_package,960);
444: update pay_accrual_plans set
439:
440: hr_utility.set_location('Step '||g_package,950);
441:
442: IF p_accrual_category = 'FR_MAIN_HOLIDAY' Then
443: hr_utility.set_location('Step '||g_package,960);
444: update pay_accrual_plans set
445: information28 = l_input_value(3).input_value_id -- index 3 holds rate
446: ,information29 = l_input_value(2).input_value_id -- index 2 holds date
447: where accrual_plan_id = p_accrual_plan_id;
447: where accrual_plan_id = p_accrual_plan_id;
448:
449: ELSE
450: IF (p_accrual_category = 'FR_RTT_HOLIDAY') OR (p_accrual_category = 'FR_ADDITIONAL_HOLIDAY') Then
451: hr_utility.set_location('Step '||g_package,970);
452: update pay_accrual_plans set
453: information28 = l_input_value(3).input_value_id
454: ,information29 = l_input_value(2).input_value_id
455: where accrual_plan_id = p_accrual_plan_id;
458:
459:
460: /* create element link for the termination element */
461:
462: hr_utility.set_location('Step '||g_package,980);
463: PAY_ELEMENT_LINK_API.create_element_link
464: (
465: p_effective_date => p_effective_date
466: ,p_element_type_id => l_element_id
477: );
478:
479: Exception
480: when no_data_found then
481: hr_utility.trace(g_package||'.Create_Termination_element when no_data_found');
482: hr_utility.set_message(801,'HR_NO_F_TERM_RULE');
483: hr_utility.raise_error;
484:
485: when others then
478:
479: Exception
480: when no_data_found then
481: hr_utility.trace(g_package||'.Create_Termination_element when no_data_found');
482: hr_utility.set_message(801,'HR_NO_F_TERM_RULE');
483: hr_utility.raise_error;
484:
485: when others then
486: hr_utility.trace(g_package||'.Create_Termination_element when others exception');
479: Exception
480: when no_data_found then
481: hr_utility.trace(g_package||'.Create_Termination_element when no_data_found');
482: hr_utility.set_message(801,'HR_NO_F_TERM_RULE');
483: hr_utility.raise_error;
484:
485: when others then
486: hr_utility.trace(g_package||'.Create_Termination_element when others exception');
487: hr_utility.trace(SQLCODE);
482: hr_utility.set_message(801,'HR_NO_F_TERM_RULE');
483: hr_utility.raise_error;
484:
485: when others then
486: hr_utility.trace(g_package||'.Create_Termination_element when others exception');
487: hr_utility.trace(SQLCODE);
488: hr_utility.trace(SQLERRM);
489: Raise;
490:
483: hr_utility.raise_error;
484:
485: when others then
486: hr_utility.trace(g_package||'.Create_Termination_element when others exception');
487: hr_utility.trace(SQLCODE);
488: hr_utility.trace(SQLERRM);
489: Raise;
490:
491: End Create_Termination_element;
484:
485: when others then
486: hr_utility.trace(g_package||'.Create_Termination_element when others exception');
487: hr_utility.trace(SQLCODE);
488: hr_utility.trace(SQLERRM);
489: Raise;
490:
491: End Create_Termination_element;
492:
493:
494: begin
495:
496: /* Added for GSI Bug 5472781 */
497: IF NOT hr_utility.chk_product_install('Oracle Human Resources', 'FR') THEN
498: hr_utility.set_location('Leaving '||g_package , 10);
499: return;
500: END IF;
501:
494: begin
495:
496: /* Added for GSI Bug 5472781 */
497: IF NOT hr_utility.chk_product_install('Oracle Human Resources', 'FR') THEN
498: hr_utility.set_location('Leaving '||g_package , 10);
499: return;
500: END IF;
501:
502: --
499: return;
500: END IF;
501:
502: --
503: --hr_utility.trace_on(null,'EXTRA');
504: hr_utility.set_location('Entering '||g_package , 10);
505: IF (p_accrual_category = 'FR_RTT_HOLIDAY') OR (p_accrual_category = 'FR_ADDITIONAL_HOLIDAY')
506: OR (p_accrual_category = 'FR_MAIN_HOLIDAY') Then
507:
500: END IF;
501:
502: --
503: --hr_utility.trace_on(null,'EXTRA');
504: hr_utility.set_location('Entering '||g_package , 10);
505: IF (p_accrual_category = 'FR_RTT_HOLIDAY') OR (p_accrual_category = 'FR_ADDITIONAL_HOLIDAY')
506: OR (p_accrual_category = 'FR_MAIN_HOLIDAY') Then
507:
508: --
507:
508: --
509: -- Get value for variables
510: --
511: hr_utility.set_location('Step '||g_package,20);
512:
513: open class_id;
514: fetch class_id into l_primary_class_id;
515: close class_id;
517: open accrual_class_id;
518: fetch accrual_class_id into l_accrual_class_id;
519: close accrual_class_id;
520:
521: hr_utility.set_location('Step '||g_package,30);
522:
523: begin
524: --
525: select hl.meaning
537: --
538: exception
539: --
540: when no_data_found then
541: hr_utility.set_message(801,'HR_NO_F_TERM_RULE');
542: hr_utility.raise_error;
543: --
544: --
545: end;
538: exception
539: --
540: when no_data_found then
541: hr_utility.set_message(801,'HR_NO_F_TERM_RULE');
542: hr_utility.raise_error;
543: --
544: --
545: end;
546: hr_utility.set_location('Step '||g_package,40);
542: hr_utility.raise_error;
543: --
544: --
545: end;
546: hr_utility.set_location('Step '||g_package,40);
547: for i in 1..3 loop
548: hr_utility.set_location('Step '||g_package,50);
549: --
550: if i = 1 then
544: --
545: end;
546: hr_utility.set_location('Step '||g_package,40);
547: for i in 1..3 loop
548: hr_utility.set_location('Step '||g_package,50);
549: --
550: if i = 1 then
551:
552: hr_utility.set_location('Step '||g_package,60);
548: hr_utility.set_location('Step '||g_package,50);
549: --
550: if i = 1 then
551:
552: hr_utility.set_location('Step '||g_package,60);
553: open csr_name_translation('FR_ENTITLEMENT');
554: fetch csr_name_translation into l_item_suffix;
555: close csr_name_translation;
556:
553: open csr_name_translation('FR_ENTITLEMENT');
554: fetch csr_name_translation into l_item_suffix;
555: close csr_name_translation;
556:
557: hr_utility.set_location('Step '||g_package,70);
558: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
559: j := 0;
560:
561: elsif i = 2 then
559: j := 0;
560:
561: elsif i = 2 then
562:
563: hr_utility.set_location('Step '||g_package,80);
564: open csr_name_translation('FR_OBSOLETE');
565: fetch csr_name_translation into l_item_suffix;
566: close csr_name_translation;
567:
564: open csr_name_translation('FR_OBSOLETE');
565: fetch csr_name_translation into l_item_suffix;
566: close csr_name_translation;
567:
568: hr_utility.set_location('Step '||g_package,90);
569: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
570: j := 9;
571:
572: elsif i = 3 then
570: j := 9;
571:
572: elsif i = 3 then
573:
574: hr_utility.set_location('Step '||g_package,100);
575: open csr_name_translation('FR_ADJUSTMENT');
576: fetch csr_name_translation into l_item_suffix;
577: close csr_name_translation;
578:
575: open csr_name_translation('FR_ADJUSTMENT');
576: fetch csr_name_translation into l_item_suffix;
577: close csr_name_translation;
578:
579: hr_utility.set_location('Step '||g_package,110);
580: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
581: j := 18;
582: end if;
583: --
581: j := 18;
582: end if;
583: --
584:
585: hr_utility.set_location('Step '||g_package,120);
586: l_element_id := hr_accrual_plan_api.create_element
587: (p_element_name => l_element_name
588: ,p_element_description => ''
589: ,p_processing_type => 'N'
596: ,p_indirect_only_flag => 'N'
597: ,p_formula_id => NULL
598: ,p_processing_priority => NULL);
599:
600: hr_utility.set_location('Step '||g_package,130);
601: open csr_name_translation('FR_ACCRUAL_PLAN');
602: fetch csr_name_translation into l_input_value_name;
603: close csr_name_translation;
604:
601: open csr_name_translation('FR_ACCRUAL_PLAN');
602: fetch csr_name_translation into l_input_value_name;
603: close csr_name_translation;
604:
605: hr_utility.set_location('Step '||g_package,140);
606: l_uom_code := 'N';
607:
608: input_value_table(j+1) := create_input_value
609: (l_element_name
616: ,l_leg_code
617: ,'N'
618: ,10);
619:
620: hr_utility.set_location('Step '||g_package,150);
621: open csr_name_translation('FR_ACCRUAL_DATE');
622: fetch csr_name_translation into l_input_value_name;
623: close csr_name_translation;
624:
621: open csr_name_translation('FR_ACCRUAL_DATE');
622: fetch csr_name_translation into l_input_value_name;
623: close csr_name_translation;
624:
625: hr_utility.set_location('Step '||g_package,160);
626: l_uom_code := 'D';
627:
628: input_value_table(j+2) := create_input_value
629: (l_element_name
636: ,l_leg_code
637: ,'N'
638: ,20);
639:
640: hr_utility.set_location('Step '||g_package,170);
641: open csr_name_translation('FR_MAIN_DAY');
642: fetch csr_name_translation into l_input_value_name;
643: close csr_name_translation;
644:
641: open csr_name_translation('FR_MAIN_DAY');
642: fetch csr_name_translation into l_input_value_name;
643: close csr_name_translation;
644:
645: hr_utility.set_location('Step '||g_package,180);
646: l_uom_code := 'ND';
647:
648: input_value_table(j+3) := create_input_value
649: (l_element_name
656: ,l_leg_code
657: ,'N'
658: ,30);
659:
660: hr_utility.set_location('Step '||g_package,190);
661: --
662: IF p_accrual_category = 'FR_MAIN_HOLIDAY' Then
663:
664: hr_utility.set_location('Step '||g_package,200);
660: hr_utility.set_location('Step '||g_package,190);
661: --
662: IF p_accrual_category = 'FR_MAIN_HOLIDAY' Then
663:
664: hr_utility.set_location('Step '||g_package,200);
665: open csr_name_translation('FR_PROTECT_DAY');
666: fetch csr_name_translation into l_input_value_name;
667: close csr_name_translation;
668:
665: open csr_name_translation('FR_PROTECT_DAY');
666: fetch csr_name_translation into l_input_value_name;
667: close csr_name_translation;
668:
669: hr_utility.set_location('Step '||g_package,210);
670: l_uom_code := 'ND';
671:
672: input_value_table(j+4) := create_input_value
673: (l_element_name
680: ,l_leg_code
681: ,'N'
682: ,40);
683:
684: hr_utility.set_location('Step '||g_package,220);
685: open csr_name_translation('FR_CONVEN_DAY');
686: fetch csr_name_translation into l_input_value_name;
687: close csr_name_translation;
688:
685: open csr_name_translation('FR_CONVEN_DAY');
686: fetch csr_name_translation into l_input_value_name;
687: close csr_name_translation;
688:
689: hr_utility.set_location('Step '||g_package,230);
690: l_uom_code := 'ND';
691:
692: input_value_table(j+5) := create_input_value
693: (l_element_name
701: ,'N'
702: ,50);
703:
704:
705: hr_utility.set_location('Step '||g_package,240);
706: open csr_name_translation('FR_SENIORITY_DAY');
707: fetch csr_name_translation into l_input_value_name;
708: close csr_name_translation;
709:
706: open csr_name_translation('FR_SENIORITY_DAY');
707: fetch csr_name_translation into l_input_value_name;
708: close csr_name_translation;
709:
710: hr_utility.set_location('Step '||g_package,250);
711: l_uom_code := 'ND';
712:
713: input_value_table(j+6) := create_input_value
714: (l_element_name
722: ,'N'
723: ,60);
724:
725:
726: hr_utility.set_location('Step '||g_package,260);
727: open csr_name_translation('FR_YMOTHER_DAY');
728: fetch csr_name_translation into l_input_value_name;
729: close csr_name_translation;
730:
727: open csr_name_translation('FR_YMOTHER_DAY');
728: fetch csr_name_translation into l_input_value_name;
729: close csr_name_translation;
730:
731: hr_utility.set_location('Step '||g_package,270);
732: l_uom_code := 'ND';
733:
734: input_value_table(j+7) := create_input_value
735: (l_element_name
743: ,'N'
744: ,70);
745:
746:
747: hr_utility.set_location('Step '||g_package,280);
748: --
749: IF i = 1 THEN
750: hr_utility.set_location('Step '||g_package,290);
751: open csr_name_translation('FR_REF_SALARY');
746:
747: hr_utility.set_location('Step '||g_package,280);
748: --
749: IF i = 1 THEN
750: hr_utility.set_location('Step '||g_package,290);
751: open csr_name_translation('FR_REF_SALARY');
752: fetch csr_name_translation into l_input_value_name;
753: close csr_name_translation;
754:
751: open csr_name_translation('FR_REF_SALARY');
752: fetch csr_name_translation into l_input_value_name;
753: close csr_name_translation;
754:
755: hr_utility.set_location('Step '||g_package,300);
756: l_uom_code := 'M';
757:
758: input_value_table(j+8) := create_input_value
759: (l_element_name
767: ,'N'
768: ,80);
769:
770:
771: hr_utility.set_location('Step '||g_package,310);
772: open csr_name_translation('FR_REF_DAY');
773: fetch csr_name_translation into l_input_value_name;
774: close csr_name_translation;
775:
772: open csr_name_translation('FR_REF_DAY');
773: fetch csr_name_translation into l_input_value_name;
774: close csr_name_translation;
775:
776: hr_utility.set_location('Step '||g_package,320);
777: l_uom_code := 'ND';
778:
779: input_value_table(j+9) := create_input_value
780: (l_element_name
786: ,p_business_group_id
787: ,l_leg_code
788: ,'N'
789: ,90);
790: hr_utility.set_location('Step '||g_package,330);
791:
792: END IF;
793: --
794: hr_utility.set_location('Step '||g_package,340);
790: hr_utility.set_location('Step '||g_package,330);
791:
792: END IF;
793: --
794: hr_utility.set_location('Step '||g_package,340);
795: END IF;
796: --
797:
798: for l_element_link_rec in c_absence_element_link_id
809: --
810: end loop;
811:
812:
813: hr_utility.set_location('Step '||g_package,350);
814: end loop;
815: --
816: hr_utility.set_location('Step '||g_package,360);
817: open csr_name_translation('FR_WORK_DAY');
812:
813: hr_utility.set_location('Step '||g_package,350);
814: end loop;
815: --
816: hr_utility.set_location('Step '||g_package,360);
817: open csr_name_translation('FR_WORK_DAY');
818: fetch csr_name_translation into l_input_value_name;
819: close csr_name_translation;
820:
817: open csr_name_translation('FR_WORK_DAY');
818: fetch csr_name_translation into l_input_value_name;
819: close csr_name_translation;
820:
821: hr_utility.set_location('Step '||g_package,370);
822: l_uom_code := 'ND';
823:
824: input_value_table(28) := create_input_value
825: (p_accrual_plan_name
832: ,l_leg_code
833: ,'N'
834: ,20);
835:
836: hr_utility.set_location('Step '||g_package,380);
837: --
838: IF p_accrual_category = 'FR_MAIN_HOLIDAY' then
839: hr_utility.set_location('Step '||g_package,390);
840: open csr_name_translation('FR_PROTECT_DAY');
835:
836: hr_utility.set_location('Step '||g_package,380);
837: --
838: IF p_accrual_category = 'FR_MAIN_HOLIDAY' then
839: hr_utility.set_location('Step '||g_package,390);
840: open csr_name_translation('FR_PROTECT_DAY');
841: fetch csr_name_translation into l_input_value_name;
842: close csr_name_translation;
843:
840: open csr_name_translation('FR_PROTECT_DAY');
841: fetch csr_name_translation into l_input_value_name;
842: close csr_name_translation;
843:
844: hr_utility.set_location('Step '||g_package,400);
845: l_uom_code := 'ND';
846:
847: input_value_table(29) := create_input_value
848: (p_accrual_plan_name
854: ,p_business_group_id
855: ,l_leg_code
856: ,'N'
857: ,30);
858: hr_utility.set_location('Step '||g_package,410);
859: END IF;
860: --
861: --
862: IF p_accrual_category = 'FR_MAIN_HOLIDAY' Then
859: END IF;
860: --
861: --
862: IF p_accrual_category = 'FR_MAIN_HOLIDAY' Then
863: hr_utility.set_location('Step '||g_package,420);
864: update pay_accrual_plans set
865: information8 = input_value_table(3)
866: ,information9 = input_value_table(4)
867: ,information10 = input_value_table(5)
885: where accrual_plan_id = p_accrual_plan_id;
886:
887: ELSE
888: IF (p_accrual_category = 'FR_RTT_HOLIDAY') OR (p_accrual_category = 'FR_ADDITIONAL_HOLIDAY') Then
889: hr_utility.set_location('Step '||g_package,430);
890: update pay_accrual_plans set
891: information8 = input_value_table(3)
892: ,information13 = input_value_table(12)
893: ,information18 = input_value_table(21)
896: ,information25 = input_value_table(20)
897: ,information26 = input_value_table(28)
898: where accrual_plan_id = p_accrual_plan_id;
899: END IF;
900: hr_utility.set_location('Step '||g_package,440);
901: END IF;
902: --
903: --
904: -- Now create the extra Accounting Accrual elements
902: --
903: --
904: -- Now create the extra Accounting Accrual elements
905: --
906: hr_utility.set_location('Step '||g_package,450);
907: l_uom_code := 'M';
908:
909: open csr_name_translation('PAY VALUE');
910: fetch csr_name_translation into l_input_value_name;
909: open csr_name_translation('PAY VALUE');
910: fetch csr_name_translation into l_input_value_name;
911: close csr_name_translation;
912:
913: hr_utility.set_location('Step '||g_package,460);
914: --
915: -- AMOUNT, Current Year
916: --
917: open csr_name_translation('FR_ACC_Y_AMOUNT');
919: close csr_name_translation;
920:
921: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
922:
923: hr_utility.trace('****l_element_name****'||l_element_name);
924: hr_utility.set_location('Step '||g_package,470);
925:
926: l_element_id := hr_accrual_plan_api.create_element
927: (p_element_name => p_accrual_plan_name||' '||l_item_suffix
920:
921: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
922:
923: hr_utility.trace('****l_element_name****'||l_element_name);
924: hr_utility.set_location('Step '||g_package,470);
925:
926: l_element_id := hr_accrual_plan_api.create_element
927: (p_element_name => p_accrual_plan_name||' '||l_item_suffix
928: ,p_element_description => ''
936: ,p_indirect_only_flag => 'N'
937: ,p_formula_id => NULL
938: ,p_processing_priority => NULL);
939:
940: hr_utility.set_location('Step '||g_package,480);
941:
942: l_unused_number := create_input_value
943: (l_element_name
944: ,l_input_value_name
950: ,l_leg_code
951: ,'N'
952: ,10);
953:
954: hr_utility.set_location('Step '||g_package,490);
955: --
956: -- Create the links for this record
957: --
958: for l_element_link_rec in c_absence_element_link_id loop
962: ,p_legislation_code => l_leg_code);
963:
964: end loop;
965: --
966: hr_utility.set_location('Step '||g_package,500);
967: --
968: -- AMOUNT, Current year minus one
969: --
970: open csr_name_translation('FR_ACC_Y1_AMOUNT');
971: fetch csr_name_translation into l_item_suffix;
972: close csr_name_translation;
973:
974: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
975: hr_utility.set_location('Step '||g_package,510);
976:
977: l_element_id := hr_accrual_plan_api.create_element
978: (p_element_name => l_element_name
979: ,p_element_description => ''
987: ,p_indirect_only_flag => 'N'
988: ,p_formula_id => NULL
989: ,p_processing_priority => NULL);
990:
991: hr_utility.set_location('Step '||g_package,520);
992:
993: l_unused_number := create_input_value
994: (l_element_name
995: ,l_input_value_name
1001: ,l_leg_code
1002: ,'N'
1003: ,10);
1004:
1005: hr_utility.set_location('Step '||g_package,530);
1006: --
1007: -- Create the links for this record
1008: --
1009: for l_element_link_rec in c_absence_element_link_id loop
1012: ,p_legislation_code => l_leg_code);
1013: --
1014: end loop;
1015:
1016: hr_utility.set_location('Step '||g_package,540);
1017: --
1018: -- AMOUNT, Current Year minus two
1019: --
1020: open csr_name_translation('FR_ACC_Y2_AMOUNT');
1021: fetch csr_name_translation into l_item_suffix;
1022: close csr_name_translation;
1023:
1024: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
1025: hr_utility.set_location('Step '||g_package,550);
1026:
1027: l_element_id := hr_accrual_plan_api.create_element
1028: (p_element_name => l_element_name
1029: ,p_element_description => ''
1037: ,p_indirect_only_flag => 'N'
1038: ,p_formula_id => NULL
1039: ,p_processing_priority => NULL);
1040:
1041: hr_utility.set_location('Step '||g_package,560);
1042:
1043: l_unused_number := create_input_value
1044: (l_element_name
1045: ,l_input_value_name
1051: ,l_leg_code
1052: ,'N'
1053: ,10);
1054:
1055: hr_utility.set_location('Step '||g_package,570);
1056: --
1057: -- Create the links for this record
1058: --
1059: for l_element_link_rec in c_absence_element_link_id loop
1062: ,p_legislation_code => l_leg_code);
1063:
1064: end loop;
1065: --
1066: hr_utility.set_location('Step '||g_package,580);
1067: --
1068: -- AMOUNT, year - 3
1069: --
1070: open csr_name_translation('FR_ACC_Y3_AMOUNT');
1071: fetch csr_name_translation into l_item_suffix;
1072: close csr_name_translation;
1073:
1074: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
1075: hr_utility.set_location('Step '||g_package,590);
1076:
1077: l_element_id := hr_accrual_plan_api.create_element
1078: (p_element_name => l_element_name
1079: ,p_element_description => ''
1087: ,p_indirect_only_flag => 'N'
1088: ,p_formula_id => NULL
1089: ,p_processing_priority => NULL);
1090:
1091: hr_utility.set_location('Step '||g_package,600);
1092:
1093: l_unused_number := create_input_value
1094: (l_element_name
1095: ,l_input_value_name
1101: ,l_leg_code
1102: ,'N'
1103: ,10);
1104:
1105: hr_utility.set_location('Step '||g_package,610);
1106: --
1107: -- Create the links for this record
1108: --
1109: for l_element_link_rec in c_absence_element_link_id loop
1112: ,p_legislation_code => l_leg_code);
1113:
1114: end loop;
1115: --
1116: hr_utility.set_location('Step '||g_package,620);
1117: --
1118: -- CHARGES, Current Year
1119: --
1120: open csr_name_translation('FR_ACC_Y_CHARGES');
1121: fetch csr_name_translation into l_item_suffix;
1122: close csr_name_translation;
1123:
1124: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
1125: hr_utility.set_location('Step '||g_package,630);
1126:
1127: l_element_id := hr_accrual_plan_api.create_element
1128: (p_element_name => l_element_name
1129: ,p_element_description => ''
1137: ,p_indirect_only_flag => 'N'
1138: ,p_formula_id => NULL
1139: ,p_processing_priority => NULL);
1140:
1141: hr_utility.set_location('Step '||g_package,640);
1142:
1143: l_unused_number := create_input_value
1144: ( l_element_name
1145: ,l_input_value_name
1151: ,l_leg_code
1152: ,'N'
1153: ,10);
1154:
1155: hr_utility.set_location('Step '||g_package,650);
1156: --
1157: -- Create the links for this record
1158: --
1159: for l_element_link_rec in c_absence_element_link_id loop
1162: ,p_legislation_code => l_leg_code);
1163: end loop;
1164: --
1165:
1166: hr_utility.set_location('Step '||g_package,660);
1167: --
1168: -- CHARGES, Current Year minus one
1169: --
1170: open csr_name_translation('FR_ACC_Y1_CHARGES');
1171: fetch csr_name_translation into l_item_suffix;
1172: close csr_name_translation;
1173:
1174: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
1175: hr_utility.set_location('Step '||g_package,670);
1176:
1177: l_element_id := hr_accrual_plan_api.create_element
1178: (p_element_name => l_element_name
1179: ,p_element_description => ''
1187: ,p_indirect_only_flag => 'N'
1188: ,p_formula_id => NULL
1189: ,p_processing_priority => NULL);
1190:
1191: hr_utility.set_location('Step '||g_package,680);
1192:
1193: l_unused_number := create_input_value
1194: (l_element_name
1195: ,l_input_value_name
1201: ,l_leg_code
1202: ,'N'
1203: ,10);
1204:
1205: hr_utility.set_location('Step '||g_package,690);
1206: --
1207: -- Create the links for this record
1208: --
1209: for l_element_link_rec in c_absence_element_link_id loop
1212: ,p_legislation_code => l_leg_code);
1213: end loop;
1214: --
1215:
1216: hr_utility.set_location('Step '||g_package,700);
1217: --
1218: -- CHARGES, Current Year minus two
1219: --
1220: open csr_name_translation('FR_ACC_Y2_CHARGES');
1221: fetch csr_name_translation into l_item_suffix;
1222: close csr_name_translation;
1223:
1224: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
1225: hr_utility.set_location('Step '||g_package,710);
1226:
1227: l_element_id := hr_accrual_plan_api.create_element
1228: (p_element_name => l_element_name
1229: ,p_element_description => ''
1237: ,p_indirect_only_flag => 'N'
1238: ,p_formula_id => NULL
1239: ,p_processing_priority => NULL);
1240:
1241: hr_utility.set_location('Step '||g_package,720);
1242:
1243: l_unused_number := create_input_value
1244: (l_element_name
1245: ,l_input_value_name
1251: ,l_leg_code
1252: ,'N'
1253: ,10);
1254:
1255: hr_utility.set_location('Step '||g_package,730);
1256: --
1257: -- Create the links for this record
1258: --
1259: for l_element_link_rec in c_absence_element_link_id loop
1262: ,p_legislation_code => l_leg_code);
1263: end loop;
1264: --
1265:
1266: hr_utility.set_location('Step '||g_package,740);
1267: --
1268: -- CHARGES, Current Year minus 3
1269: --
1270: open csr_name_translation('FR_ACC_Y3_CHARGES');
1271: fetch csr_name_translation into l_item_suffix;
1272: close csr_name_translation;
1273:
1274: l_element_name := p_accrual_plan_name||' '||l_item_suffix;
1275: hr_utility.set_location('Step '||g_package,750);
1276:
1277: l_element_id := hr_accrual_plan_api.create_element
1278: (p_element_name => l_element_name
1279: ,p_element_description => ''
1287: ,p_indirect_only_flag => 'N'
1288: ,p_formula_id => NULL
1289: ,p_processing_priority => NULL);
1290:
1291: hr_utility.set_location('Step '||g_package,760);
1292:
1293: l_unused_number := create_input_value
1294: (l_element_name
1295: ,l_input_value_name
1301: ,l_leg_code
1302: ,'N'
1303: ,10);
1304:
1305: hr_utility.set_location('Step '||g_package,780);
1306: --
1307: -- Create the links for this record
1308: --
1309: for l_element_link_rec in c_absence_element_link_id loop
1310: hr_accrual_plan_api.create_element_link(p_element_type_id => l_element_id
1311: ,p_absence_link_rec => l_element_link_rec
1312: ,p_legislation_code => l_leg_code);
1313: end loop;
1314: hr_utility.set_location('Step '||g_package,785);
1315: --
1316: -- get the new skip rule id, if it exists.
1317: --
1318: BEGIN
1325: END;
1326: --
1327: -- Now update the main acp element to have a processing priority of 9590
1328: --
1329: hr_utility.set_location('Step '||g_package,790);
1330: begin
1331: update pay_element_types_f
1332: set processing_priority = 9590
1333: ,formula_id = nvl(l_new_skip_rule_id, formula_id)
1335: and business_group_id = p_business_group_id;
1336: end;
1337: --
1338:
1339: hr_utility.trace('Creating Termination element');
1340: Create_Termination_Element;
1341:
1342: hr_utility.set_location('Leaving '||g_package,800);
1343: END IF;
1338:
1339: hr_utility.trace('Creating Termination element');
1340: Create_Termination_Element;
1341:
1342: hr_utility.set_location('Leaving '||g_package,800);
1343: END IF;
1344:
1345: END create_extra_elements;
1346: --