[Home] [Help]
210: BEGIN
211: --
212: --
213: --
214: hr_utility.set_location(' Entering:' || l_proc,5);
215:
216: -- Call the actual API.
217: hr_person_absence_api.create_person_absence
218: (p_validate => hr_java_conv_util_ss.get_boolean (
308: ,p_abs_overlap_warning => lb_abs_overlap_warning
309: ,p_abs_day_after_warning => lb_abs_day_after_warning
310: ,p_dur_overwritten_warning => lb_dur_overwritten_warning
311: );
312: hr_utility.set_location( l_proc,10);
313:
314: p_abs_day_after_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_abs_day_after_warning);
315: p_abs_overlap_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_abs_overlap_warning);
316: p_dur_dys_less_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_dur_dys_less_warning);
318: p_exceeds_pto_entit_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_exceeds_pto_entit_warning);
319: p_exceeds_run_total_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_exceeds_run_total_warning);
320: p_dur_overwritten_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_dur_overwritten_warning);
321:
322: hr_utility.set_location(' Leaving:' || l_proc,15);
323:
324: EXCEPTION
325: WHEN OTHERS THEN
326: hr_utility.trace(' Exception in HR_LOA_SS.create_person_absence: ' || SQLERRM );
322: hr_utility.set_location(' Leaving:' || l_proc,15);
323:
324: EXCEPTION
325: WHEN OTHERS THEN
326: hr_utility.trace(' Exception in HR_LOA_SS.create_person_absence: ' || SQLERRM );
327: hr_utility.set_location(' Leaving:' || l_proc,555);
328:
329: RAISE; -- Raise error here relevant to the new tech stack.
330:
323:
324: EXCEPTION
325: WHEN OTHERS THEN
326: hr_utility.trace(' Exception in HR_LOA_SS.create_person_absence: ' || SQLERRM );
327: hr_utility.set_location(' Leaving:' || l_proc,555);
328:
329: RAISE; -- Raise error here relevant to the new tech stack.
330:
331: END create_person_absence;
436: custom_exc exception;
437: --
438: BEGIN
439:
440: hr_utility.set_location(' Entering:' || l_proc,5);
441:
442: OPEN gc_get_absence_row (p_absence_attendance_id => p_absence_attendance_id);
443:
444: FETCH gc_get_absence_row into l_cur_absence_row;
443:
444: FETCH gc_get_absence_row into l_cur_absence_row;
445: IF gc_get_absence_row%NOTFOUND
446: THEN
447: hr_utility.set_location(l_proc,10);
448: CLOSE gc_get_absence_row;
449: raise g_data_error;
450: ELSE
451: hr_utility.set_location(l_proc,15);
447: hr_utility.set_location(l_proc,10);
448: CLOSE gc_get_absence_row;
449: raise g_data_error;
450: ELSE
451: hr_utility.set_location(l_proc,15);
452: CLOSE gc_get_absence_row;
453: END IF;
454: --
455: ------------------------------------------------------------------------------
459: -- also null.
460: ------------------------------------------------------------------------------
461: IF p_date_projected_start <> hr_api.g_date OR p_date_projected_start IS NULL
462: THEN
463: hr_utility.set_location(l_proc,20);
464: IF nvl(p_date_projected_start, hr_api.g_date) <>
465: nvl(l_cur_absence_row.date_projected_start, hr_api.g_date)
466: THEN
467: hr_utility.set_location(' Leaving:' || l_proc,25);
463: hr_utility.set_location(l_proc,20);
464: IF nvl(p_date_projected_start, hr_api.g_date) <>
465: nvl(l_cur_absence_row.date_projected_start, hr_api.g_date)
466: THEN
467: hr_utility.set_location(' Leaving:' || l_proc,25);
468: return TRUE;
469: END IF;
470: END IF;
471: --
473: THEN
474: IF nvl(p_date_projected_end, hr_api.g_date) <>
475: nvl(l_cur_absence_row.date_projected_end, hr_api.g_date)
476: THEN
477: hr_utility.set_location(' Leaving:' || l_proc,30);
478: return TRUE;
479: END IF;
480: END IF;
481: --
483: THEN
484: IF nvl(p_time_projected_start, hr_api.g_varchar2) <>
485: nvl(l_cur_absence_row.time_projected_start, hr_api.g_varchar2)
486: THEN
487: hr_utility.set_location(' Leaving:' || l_proc,35);
488: return TRUE;
489: END IF;
490: END IF;
491: --
493: THEN
494: IF nvl(p_time_projected_end, hr_api.g_varchar2) <>
495: nvl(l_cur_absence_row.time_projected_end, hr_api.g_varchar2)
496: THEN
497: hr_utility.set_location(' Leaving:' || l_proc,40);
498: return TRUE;
499: END IF;
500: END IF;
501: --
503: THEN
504: IF nvl(p_date_start, hr_api.g_date) <>
505: nvl(l_cur_absence_row.date_start, hr_api.g_date)
506: THEN
507: hr_utility.set_location(' Leaving:' || l_proc,45);
508: return TRUE;
509: END IF;
510: END IF;
511: --
513: THEN
514: IF nvl(p_date_end, hr_api.g_date) <>
515: nvl(l_cur_absence_row.date_end, hr_api.g_date)
516: THEN
517: hr_utility.set_location(' Leaving:' || l_proc,50);
518: return TRUE;
519: END IF;
520: END IF;
521: --
523: THEN
524: IF nvl(p_time_start, hr_api.g_varchar2) <>
525: nvl(l_cur_absence_row.time_start, hr_api.g_varchar2)
526: THEN
527: hr_utility.set_location(' Leaving:' || l_proc,55);
528: return TRUE;
529: END IF;
530: END IF;
531: --
533: THEN
534: IF nvl(p_time_end, hr_api.g_varchar2) <>
535: nvl(l_cur_absence_row.time_end, hr_api.g_varchar2)
536: THEN
537: hr_utility.set_location(' Leaving:' || l_proc,60);
538: return TRUE;
539: END IF;
540: END IF;
541: --
543: THEN
544: IF nvl(p_absence_days, hr_api.g_number) <>
545: nvl(l_cur_absence_row.absence_days, hr_api.g_number)
546: THEN
547: hr_utility.set_location(' Leaving:' || l_proc,65);
548: return TRUE;
549: END IF;
550: END IF;
551: --
553: THEN
554: IF nvl(p_absence_hours, hr_api.g_number) <>
555: nvl(l_cur_absence_row.absence_hours, hr_api.g_number)
556: THEN
557: hr_utility.set_location(' Leaving:' || l_proc,70);
558: return TRUE;
559: END IF;
560: END IF;
561: --
563: THEN
564: IF nvl(p_replacement_person_id, hr_api.g_number) <>
565: nvl(l_cur_absence_row.replacement_person_id, hr_api.g_number)
566: THEN
567: hr_utility.set_location(' Leaving:' || l_proc,70);
568: return TRUE;
569: END IF;
570: END IF;
571: --
573: THEN
574: IF nvl(p_comments, hr_api.g_varchar2) <>
575: nvl(l_cur_absence_row.comments, hr_api.g_varchar2)
576: THEN
577: hr_utility.set_location(' Leaving:' || l_proc,75);
578: return TRUE;
579: END IF;
580: END IF;
581: --
583: THEN
584: IF nvl(p_attribute_category, hr_api.g_varchar2) <>
585: nvl(l_cur_absence_row.attribute_category, hr_api.g_varchar2)
586: THEN
587: hr_utility.set_location(' Leaving:' || l_proc,80);
588: return TRUE;
589: END IF;
590: END IF;
591: --
593: THEN
594: IF nvl(p_attribute1, hr_api.g_varchar2) <>
595: nvl(l_cur_absence_row.attribute1, hr_api.g_varchar2)
596: THEN
597: hr_utility.set_location(' Leaving:' || l_proc,85);
598: return TRUE;
599: END IF;
600: END IF;
601: --
603: THEN
604: IF nvl(p_attribute2, hr_api.g_varchar2) <>
605: nvl(l_cur_absence_row.attribute2, hr_api.g_varchar2)
606: THEN
607: hr_utility.set_location(' Leaving:' || l_proc,90);
608: return TRUE;
609: END IF;
610: END IF;
611: --
613: THEN
614: IF nvl(p_attribute3, hr_api.g_varchar2) <>
615: nvl(l_cur_absence_row.attribute3, hr_api.g_varchar2)
616: THEN
617: hr_utility.set_location(' Leaving:' || l_proc,95);
618: return TRUE;
619: END IF;
620: END IF;
621: --
623: THEN
624: IF nvl(p_attribute4, hr_api.g_varchar2) <>
625: nvl(l_cur_absence_row.attribute4, hr_api.g_varchar2)
626: THEN
627: hr_utility.set_location(' Leaving:' || l_proc,100);
628: return TRUE;
629: END IF;
630: END IF;
631: --
633: THEN
634: IF nvl(p_attribute5, hr_api.g_varchar2) <>
635: nvl(l_cur_absence_row.attribute5, hr_api.g_varchar2)
636: THEN
637: hr_utility.set_location(' Leaving:' || l_proc,105);
638: return TRUE;
639: END IF;
640: END IF;
641: --
643: THEN
644: IF nvl(p_attribute6, hr_api.g_varchar2) <>
645: nvl(l_cur_absence_row.attribute6, hr_api.g_varchar2)
646: THEN
647: hr_utility.set_location(' Leaving:' || l_proc,110);
648: return TRUE;
649: END IF;
650: END IF;
651: --
653: THEN
654: IF nvl(p_attribute7, hr_api.g_varchar2) <>
655: nvl(l_cur_absence_row.attribute7, hr_api.g_varchar2)
656: THEN
657: hr_utility.set_location(' Leaving:' || l_proc,115);
658: return TRUE;
659: END IF;
660: END IF;
661: --
663: THEN
664: IF nvl(p_attribute8, hr_api.g_varchar2) <>
665: nvl(l_cur_absence_row.attribute8, hr_api.g_varchar2)
666: THEN
667: hr_utility.set_location(' Leaving:' || l_proc,120);
668: return TRUE;
669: END IF;
670: END IF;
671: --
673: THEN
674: IF nvl(p_attribute9, hr_api.g_varchar2) <>
675: nvl(l_cur_absence_row.attribute9, hr_api.g_varchar2)
676: THEN
677: hr_utility.set_location(' Leaving:' || l_proc,125);
678: return TRUE;
679: END IF;
680: END IF;
681: --
683: THEN
684: IF nvl(p_attribute10, hr_api.g_varchar2) <>
685: nvl(l_cur_absence_row.attribute10, hr_api.g_varchar2)
686: THEN
687: hr_utility.set_location(' Leaving:' || l_proc,130);
688: return TRUE;
689: END IF;
690: END IF;
691: --
693: THEN
694: IF nvl(p_attribute11, hr_api.g_varchar2) <>
695: nvl(l_cur_absence_row.attribute11, hr_api.g_varchar2)
696: THEN
697: hr_utility.set_location(' Leaving:' || l_proc,135);
698: return TRUE;
699: END IF;
700: END IF;
701: --
703: THEN
704: IF nvl(p_attribute12, hr_api.g_varchar2) <>
705: nvl(l_cur_absence_row.attribute12, hr_api.g_varchar2)
706: THEN
707: hr_utility.set_location(' Leaving:' || l_proc,140);
708: return TRUE;
709: END IF;
710: END IF;
711: --
713: THEN
714: IF nvl(p_attribute13, hr_api.g_varchar2) <>
715: nvl(l_cur_absence_row.attribute13, hr_api.g_varchar2)
716: THEN
717: hr_utility.set_location(' Leaving:' || l_proc,145);
718: return TRUE;
719: END IF;
720: END IF;
721: --
723: THEN
724: IF nvl(p_attribute14, hr_api.g_varchar2) <>
725: nvl(l_cur_absence_row.attribute14, hr_api.g_varchar2)
726: THEN
727: hr_utility.set_location(' Leaving:' || l_proc,150);
728: return TRUE;
729: END IF;
730: END IF;
731: --
733: THEN
734: IF nvl(p_attribute15, hr_api.g_varchar2) <>
735: nvl(l_cur_absence_row.attribute15, hr_api.g_varchar2)
736: THEN
737: hr_utility.set_location(' Leaving:' || l_proc,155);
738: return TRUE;
739: END IF;
740: END IF;
741: --
743: THEN
744: IF nvl(p_attribute16, hr_api.g_varchar2) <>
745: nvl(l_cur_absence_row.attribute16, hr_api.g_varchar2)
746: THEN
747: hr_utility.set_location(' Leaving:' || l_proc,160);
748: return TRUE;
749: END IF;
750: END IF;
751: --
753: THEN
754: IF nvl(p_attribute17, hr_api.g_varchar2) <>
755: nvl(l_cur_absence_row.attribute17, hr_api.g_varchar2)
756: THEN
757: hr_utility.set_location(' Leaving:' || l_proc,165);
758: return TRUE;
759: END IF;
760: END IF;
761: --
763: THEN
764: IF nvl(p_attribute18, hr_api.g_varchar2) <>
765: nvl(l_cur_absence_row.attribute18, hr_api.g_varchar2)
766: THEN
767: hr_utility.set_location(' Leaving:' || l_proc,170);
768: return TRUE;
769: END IF;
770: END IF;
771: --
773: THEN
774: IF nvl(p_attribute19, hr_api.g_varchar2) <>
775: nvl(l_cur_absence_row.attribute19, hr_api.g_varchar2)
776: THEN
777: hr_utility.set_location(' Leaving:' || l_proc,175);
778: return TRUE;
779: END IF;
780: END IF;
781: --
783: THEN
784: IF nvl(p_attribute20, hr_api.g_varchar2) <>
785: nvl(l_cur_absence_row.attribute20, hr_api.g_varchar2)
786: THEN
787: hr_utility.set_location(' Leaving:' || l_proc,180);
788: return TRUE;
789: END IF;
790: END IF;
791: --
793: THEN
794: IF nvl(p_abs_information_category, hr_api.g_varchar2) <>
795: nvl(l_cur_absence_row.abs_information_category, hr_api.g_varchar2)
796: THEN
797: hr_utility.set_location(' Leaving:' || l_proc,185);
798: return TRUE;
799: END IF;
800: END IF;
801: --
803: THEN
804: IF nvl(p_abs_information1, hr_api.g_varchar2) <>
805: nvl(l_cur_absence_row.abs_information1, hr_api.g_varchar2)
806: THEN
807: hr_utility.set_location(' Leaving:' || l_proc,190);
808: return TRUE;
809: END IF;
810: END IF;
811: --
813: THEN
814: IF nvl(p_abs_information2, hr_api.g_varchar2) <>
815: nvl(l_cur_absence_row.abs_information2, hr_api.g_varchar2)
816: THEN
817: hr_utility.set_location(' Leaving:' || l_proc,195);
818: return TRUE;
819: END IF;
820: END IF;
821: --
823: THEN
824: IF nvl(p_abs_information3, hr_api.g_varchar2) <>
825: nvl(l_cur_absence_row.abs_information3, hr_api.g_varchar2)
826: THEN
827: hr_utility.set_location(' Leaving:' || l_proc,200);
828: return TRUE;
829: END IF;
830: END IF;
831: --
833: THEN
834: IF nvl(p_abs_information4, hr_api.g_varchar2) <>
835: nvl(l_cur_absence_row.abs_information4, hr_api.g_varchar2)
836: THEN
837: hr_utility.set_location(' Leaving:' || l_proc,205);
838: return TRUE;
839: END IF;
840: END IF;
841: --
843: THEN
844: IF nvl(p_abs_information5, hr_api.g_varchar2) <>
845: nvl(l_cur_absence_row.abs_information5, hr_api.g_varchar2)
846: THEN
847: hr_utility.set_location(' Leaving:' || l_proc,210);
848: return TRUE;
849: END IF;
850: END IF;
851: --
853: THEN
854: IF nvl(p_abs_information6, hr_api.g_varchar2) <>
855: nvl(l_cur_absence_row.abs_information6, hr_api.g_varchar2)
856: THEN
857: hr_utility.set_location(' Leaving:' || l_proc,215);
858: return TRUE;
859: END IF;
860: END IF;
861: --
863: THEN
864: IF nvl(p_abs_information7, hr_api.g_varchar2) <>
865: nvl(l_cur_absence_row.abs_information7, hr_api.g_varchar2)
866: THEN
867: hr_utility.set_location(' Leaving:' || l_proc,220);
868: return TRUE;
869: END IF;
870: END IF;
871: --
873: THEN
874: IF nvl(p_abs_information8, hr_api.g_varchar2) <>
875: nvl(l_cur_absence_row.abs_information8, hr_api.g_varchar2)
876: THEN
877: hr_utility.set_location(' Leaving:' || l_proc,225);
878: return TRUE;
879: END IF;
880: END IF;
881: --
883: THEN
884: IF nvl(p_abs_information9, hr_api.g_varchar2) <>
885: nvl(l_cur_absence_row.abs_information9, hr_api.g_varchar2)
886: THEN
887: hr_utility.set_location(' Leaving:' || l_proc,230);
888: return TRUE;
889: END IF;
890: END IF;
891: --
893: THEN
894: IF nvl(p_abs_information10, hr_api.g_varchar2) <>
895: nvl(l_cur_absence_row.abs_information10, hr_api.g_varchar2)
896: THEN
897: hr_utility.set_location(' Leaving:' || l_proc,235);
898: return TRUE;
899: END IF;
900: END IF;
901: --
903: THEN
904: IF nvl(p_abs_information11, hr_api.g_varchar2) <>
905: nvl(l_cur_absence_row.abs_information11, hr_api.g_varchar2)
906: THEN
907: hr_utility.set_location(' Leaving:' || l_proc,240);
908: return TRUE;
909: END IF;
910: END IF;
911: --
913: THEN
914: IF nvl(p_abs_information12, hr_api.g_varchar2) <>
915: nvl(l_cur_absence_row.abs_information12, hr_api.g_varchar2)
916: THEN
917: hr_utility.set_location(' Leaving:' || l_proc,245);
918: return TRUE;
919: END IF;
920: END IF;
921: --
923: THEN
924: IF nvl(p_abs_information13, hr_api.g_varchar2) <>
925: nvl(l_cur_absence_row.abs_information13, hr_api.g_varchar2)
926: THEN
927: hr_utility.set_location(' Leaving:' || l_proc,250);
928: return TRUE;
929: END IF;
930: END IF;
931: --
933: THEN
934: IF nvl(p_abs_information14, hr_api.g_varchar2) <>
935: nvl(l_cur_absence_row.abs_information14, hr_api.g_varchar2)
936: THEN
937: hr_utility.set_location(' Leaving:' || l_proc,255);
938: return TRUE;
939: END IF;
940: END IF;
941: --
943: THEN
944: IF nvl(p_abs_information15, hr_api.g_varchar2) <>
945: nvl(l_cur_absence_row.abs_information15, hr_api.g_varchar2)
946: THEN
947: hr_utility.set_location(' Leaving:' || l_proc,260);
948: return TRUE;
949: END IF;
950: END IF;
951: --
953: THEN
954: IF nvl(p_abs_information16, hr_api.g_varchar2) <>
955: nvl(l_cur_absence_row.abs_information16, hr_api.g_varchar2)
956: THEN
957: hr_utility.set_location(' Leaving:' || l_proc,265);
958: return TRUE;
959: END IF;
960: END IF;
961: --
963: THEN
964: IF nvl(p_abs_information17, hr_api.g_varchar2) <>
965: nvl(l_cur_absence_row.abs_information17, hr_api.g_varchar2)
966: THEN
967: hr_utility.set_location(' Leaving:' || l_proc,270);
968: return TRUE;
969: END IF;
970: END IF;
971: --
973: THEN
974: IF nvl(p_abs_information18, hr_api.g_varchar2) <>
975: nvl(l_cur_absence_row.abs_information18, hr_api.g_varchar2)
976: THEN
977: hr_utility.set_location(' Leaving:' || l_proc,275);
978: return TRUE;
979: END IF;
980: END IF;
981: --
983: THEN
984: IF nvl(p_abs_information19, hr_api.g_varchar2) <>
985: nvl(l_cur_absence_row.abs_information19, hr_api.g_varchar2)
986: THEN
987: hr_utility.set_location(' Leaving:' || l_proc,280);
988: return TRUE;
989: END IF;
990: END IF;
991: --
993: THEN
994: IF nvl(p_abs_information20, hr_api.g_varchar2) <>
995: nvl(l_cur_absence_row.abs_information20, hr_api.g_varchar2)
996: THEN
997: hr_utility.set_location(' Leaving:' || l_proc,285);
998: return TRUE;
999: END IF;
1000: END IF;
1001: --
1003: THEN
1004: IF nvl(p_abs_information21, hr_api.g_varchar2) <>
1005: nvl(l_cur_absence_row.abs_information21, hr_api.g_varchar2)
1006: THEN
1007: hr_utility.set_location(' Leaving:' || l_proc,290);
1008: return TRUE;
1009: END IF;
1010: END IF;
1011: --
1013: THEN
1014: IF nvl(p_abs_information22, hr_api.g_varchar2) <>
1015: nvl(l_cur_absence_row.abs_information22, hr_api.g_varchar2)
1016: THEN
1017: hr_utility.set_location(' Leaving:' || l_proc,295);
1018: return TRUE;
1019: END IF;
1020: END IF;
1021: --
1023: THEN
1024: IF nvl(p_abs_information23, hr_api.g_varchar2) <>
1025: nvl(l_cur_absence_row.abs_information23, hr_api.g_varchar2)
1026: THEN
1027: hr_utility.set_location(' Leaving:' || l_proc,300);
1028: return TRUE;
1029: END IF;
1030: END IF;
1031: --
1033: THEN
1034: IF nvl(p_abs_information24, hr_api.g_varchar2) <>
1035: nvl(l_cur_absence_row.abs_information24, hr_api.g_varchar2)
1036: THEN
1037: hr_utility.set_location(' Leaving:' || l_proc,305);
1038: return TRUE;
1039: END IF;
1040: END IF;
1041: --
1043: THEN
1044: IF nvl(p_abs_information25, hr_api.g_varchar2) <>
1045: nvl(l_cur_absence_row.abs_information25, hr_api.g_varchar2)
1046: THEN
1047: hr_utility.set_location(' Leaving:' || l_proc,310);
1048: return TRUE;
1049: END IF;
1050: END IF;
1051: --
1053: THEN
1054: IF nvl(p_abs_information26, hr_api.g_varchar2) <>
1055: nvl(l_cur_absence_row.abs_information26, hr_api.g_varchar2)
1056: THEN
1057: hr_utility.set_location(' Leaving:' || l_proc,315);
1058: return TRUE;
1059: END IF;
1060: END IF;
1061: --
1063: THEN
1064: IF nvl(p_abs_information27, hr_api.g_varchar2) <>
1065: nvl(l_cur_absence_row.abs_information27, hr_api.g_varchar2)
1066: THEN
1067: hr_utility.set_location(' Leaving:' || l_proc,320);
1068: return TRUE;
1069: END IF;
1070: END IF;
1071: --
1073: THEN
1074: IF nvl(p_abs_information28, hr_api.g_varchar2) <>
1075: nvl(l_cur_absence_row.abs_information28, hr_api.g_varchar2)
1076: THEN
1077: hr_utility.set_location(' Leaving:' || l_proc,325);
1078: return TRUE;
1079: END IF;
1080: END IF;
1081: --
1083: THEN
1084: IF nvl(p_abs_information29, hr_api.g_varchar2) <>
1085: nvl(l_cur_absence_row.abs_information29, hr_api.g_varchar2)
1086: THEN
1087: hr_utility.set_location(' Leaving:' || l_proc,330);
1088: return TRUE;
1089: END IF;
1090: END IF;
1091: --
1093: THEN
1094: IF nvl(p_abs_information30, hr_api.g_varchar2) <>
1095: nvl(l_cur_absence_row.abs_information30, hr_api.g_varchar2)
1096: THEN
1097: hr_utility.set_location(' Leaving:' || l_proc,335);
1098: return TRUE;
1099: END IF;
1100: END IF;
1101: --
1098: return TRUE;
1099: END IF;
1100: END IF;
1101: --
1102: hr_utility.set_location(' Leaving:' || l_proc,340);
1103: RETURN FALSE;
1104:
1105:
1106: EXCEPTION
1104:
1105:
1106: EXCEPTION
1107: When g_data_error THEN
1108: hr_utility.set_location(' Leaving:' || l_proc,555);
1109: raise;
1110:
1111: When others THEN
1112: hr_utility.set_location(' Leaving:' || l_proc,560);
1108: hr_utility.set_location(' Leaving:' || l_proc,555);
1109: raise;
1110:
1111: When others THEN
1112: hr_utility.set_location(' Leaving:' || l_proc,560);
1113: raise;
1114:
1115: END is_rec_changed;
1116:
1234: lb_dur_overwritten_warning BOOLEAN;
1235: lb_del_element_entry_warning BOOLEAN;
1236:
1237: BEGIN
1238: hr_utility.set_location(' Entering:' || l_proc,5);
1239:
1240:
1241: -- Call the actual API.
1242: hr_person_absence_api.update_person_absence
1341: p_exceeds_run_total_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_exceeds_run_total_warning);
1342: p_dur_overwritten_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_dur_overwritten_warning);
1343: p_del_element_entry_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_del_element_entry_warning);
1344:
1345: hr_utility.set_location(' Leaving:' || l_proc,10);
1346:
1347: EXCEPTION
1348: WHEN OTHERS THEN
1349: hr_utility.trace(' Exception in HR_LOA_SS.update_person_absence: ' || SQLERRM );
1345: hr_utility.set_location(' Leaving:' || l_proc,10);
1346:
1347: EXCEPTION
1348: WHEN OTHERS THEN
1349: hr_utility.trace(' Exception in HR_LOA_SS.update_person_absence: ' || SQLERRM );
1350: hr_utility.set_location(' Leaving:' || l_proc,555);
1351:
1352: RAISE; -- Raise error here relevant to the new tech stack.
1353:
1346:
1347: EXCEPTION
1348: WHEN OTHERS THEN
1349: hr_utility.trace(' Exception in HR_LOA_SS.update_person_absence: ' || SQLERRM );
1350: hr_utility.set_location(' Leaving:' || l_proc,555);
1351:
1352: RAISE; -- Raise error here relevant to the new tech stack.
1353:
1354: END update_person_absence;
1391:
1392:
1393: BEGIN
1394:
1395: hr_utility.set_location(' Entering:' || l_proc,5);
1396:
1397: hr_util_misc_web.validate_session(p_person_id => lv_creator_person_id);
1398:
1399:
1406:
1407:
1408: IF ln_transaction_id IS NULL
1409: THEN
1410: hr_utility.set_location(l_proc,10);
1411:
1412:
1413: -------------------------------------------------------------------
1414: -- Create a new transaction
1428:
1429:
1430: END IF; -- now we have a valid txn id , let's find out txn steps
1431:
1432: hr_utility.set_location(l_proc,15);
1433: ---------------------------------------------------------------------
1434: -- There is already a transaction for this process.
1435: -- Retieve the transaction step for this current
1436: -- activity. We will update this transaction step with
1446: ,p_rows => ln_trans_step_rows);
1447:
1448:
1449: IF ln_trans_step_rows < 1 THEN
1450: hr_utility.set_location(l_proc,20);
1451:
1452: ---------------------------------------------------------------------
1453: --There is no transaction step for this transaction.
1454: --Create a step within this new transaction
1465: ,p_transaction_step_id => ln_transaction_step_id
1466: ,p_object_version_number =>ln_ovn ) ;
1467:
1468: ELSE
1469: hr_utility.set_location(l_proc,25);
1470: ---------------------------------------------------------------------
1471: --There are transaction steps for this transaction.
1472: --Get the Transaction Step ID for this activity.
1473: ---------------------------------------------------------------------
1477: p_trans_step_id_tbl => ltt_trans_step_ids);
1478:
1479: END IF;
1480:
1481: hr_utility.set_location(l_proc,30);
1482: -- write activity name to txn table
1483: -- review page requires the following information
1484: hr_transaction_api.set_varchar2_value (
1485: p_transaction_step_id =>ln_transaction_step_id,
1502: p_transaction_id := ln_transaction_id ;
1503: p_transaction_step_id := ln_transaction_step_id ;
1504:
1505:
1506: hr_utility.set_location(' Leaving:' || l_proc,35);
1507:
1508: EXCEPTION
1509: WHEN OTHERS THEN
1510: hr_utility.trace(' Exception in HR_LOA_SS.create_transaction:' || SQLERRM );
1506: hr_utility.set_location(' Leaving:' || l_proc,35);
1507:
1508: EXCEPTION
1509: WHEN OTHERS THEN
1510: hr_utility.trace(' Exception in HR_LOA_SS.create_transaction:' || SQLERRM );
1511: hr_utility.set_location(' Leaving:' || l_proc,555);
1512:
1513: raise ;
1514: END create_transaction ;
1507:
1508: EXCEPTION
1509: WHEN OTHERS THEN
1510: hr_utility.trace(' Exception in HR_LOA_SS.create_transaction:' || SQLERRM );
1511: hr_utility.set_location(' Leaving:' || l_proc,555);
1512:
1513: raise ;
1514: END create_transaction ;
1515:
1608: lv_creator_person_id per_all_people_f.person_id%TYPE;
1609:
1610: BEGIN
1611:
1612: hr_utility.set_location(' Entering:' || l_proc,5);
1613:
1614: hr_util_misc_web.validate_session(p_person_id => lv_creator_person_id);
1615:
1616:
2054: p_person_id => lv_creator_person_id ,
2055: p_name => 'p_abs_information30' ,
2056: p_value =>p_abs_information30 ) ;
2057:
2058: hr_utility.set_location(' Leaving:' || l_proc,10);
2059:
2060: EXCEPTION
2061: WHEN OTHERS THEN
2062: hr_utility.trace(' HR_LOA_SS.write_transaction:' || SQLERRM );
2058: hr_utility.set_location(' Leaving:' || l_proc,10);
2059:
2060: EXCEPTION
2061: WHEN OTHERS THEN
2062: hr_utility.trace(' HR_LOA_SS.write_transaction:' || SQLERRM );
2063: hr_utility.set_location(' Leaving:' || l_proc,555);
2064:
2065: raise ;
2066:
2059:
2060: EXCEPTION
2061: WHEN OTHERS THEN
2062: hr_utility.trace(' HR_LOA_SS.write_transaction:' || SQLERRM );
2063: hr_utility.set_location(' Leaving:' || l_proc,555);
2064:
2065: raise ;
2066:
2067: END write_transaction ;
2184: --
2185:
2186: BEGIN
2187: --
2188: hr_utility.set_location(' Entering:' || l_proc,5);
2189:
2190: p_effective_date:= to_char(
2191: hr_transaction_api.get_date_value
2192: (p_transaction_step_id => p_transaction_step_id
2595: (p_transaction_step_id => p_transaction_step_id
2596: ,p_name => 'p_object_version_number');
2597: --2793220 changes end
2598:
2599: hr_utility.set_location(' Leaving:' || l_proc,10);
2600:
2601: EXCEPTION
2602: WHEN OTHERS THEN
2603: hr_utility.trace(' Exception in get_absence_transaction ' || SQLERRM );
2599: hr_utility.set_location(' Leaving:' || l_proc,10);
2600:
2601: EXCEPTION
2602: WHEN OTHERS THEN
2603: hr_utility.trace(' Exception in get_absence_transaction ' || SQLERRM );
2604: hr_utility.set_location(' Leaving:' || l_proc,555);
2605:
2606: RAISE; -- Raise error here relevant to the new tech stack.
2607: END get_absence_transaction;
2600:
2601: EXCEPTION
2602: WHEN OTHERS THEN
2603: hr_utility.trace(' Exception in get_absence_transaction ' || SQLERRM );
2604: hr_utility.set_location(' Leaving:' || l_proc,555);
2605:
2606: RAISE; -- Raise error here relevant to the new tech stack.
2607: END get_absence_transaction;
2608:
2691: --
2692:
2693: BEGIN
2694: --
2695: hr_utility.set_location(' Entering:' || l_proc,5);
2696:
2697: p_effective_date:= to_char(
2698: hr_transaction_api.get_date_value
2699: (p_transaction_step_id => p_transaction_step_id
3003: (p_transaction_step_id => p_transaction_step_id
3004: ,p_name => 'p_abs_information30');
3005: --
3006:
3007: hr_utility.set_location(' Leaving:' || l_proc,10);
3008:
3009: EXCEPTION
3010: WHEN OTHERS THEN
3011: hr_utility.trace(' Exception in get_return_transaction :' || SQLERRM );
3007: hr_utility.set_location(' Leaving:' || l_proc,10);
3008:
3009: EXCEPTION
3010: WHEN OTHERS THEN
3011: hr_utility.trace(' Exception in get_return_transaction :' || SQLERRM );
3012: hr_utility.set_location(' Leaving:' || l_proc,555);
3013:
3014: RAISE; -- Raise error here relevant to the new tech stack.
3015: END get_return_transaction;
3008:
3009: EXCEPTION
3010: WHEN OTHERS THEN
3011: hr_utility.trace(' Exception in get_return_transaction :' || SQLERRM );
3012: hr_utility.set_location(' Leaving:' || l_proc,555);
3013:
3014: RAISE; -- Raise error here relevant to the new tech stack.
3015: END get_return_transaction;
3016:
3100: --
3101:
3102: BEGIN
3103: --
3104: hr_utility.set_location(' Entering:' || l_proc,5);
3105:
3106: p_effective_date:= to_char(
3107: hr_transaction_api.get_date_value
3108: (p_transaction_step_id => p_transaction_step_id
3416: (p_transaction_step_id => p_transaction_step_id
3417: ,p_name => 'p_comments');
3418: --
3419:
3420: hr_utility.set_location(' Leaving:' || l_proc,10);
3421:
3422: EXCEPTION
3423: WHEN OTHERS THEN
3424: hr_utility.trace(' HR_LOA_SS.get_update_transaction ' || SQLERRM );
3420: hr_utility.set_location(' Leaving:' || l_proc,10);
3421:
3422: EXCEPTION
3423: WHEN OTHERS THEN
3424: hr_utility.trace(' HR_LOA_SS.get_update_transaction ' || SQLERRM );
3425: hr_utility.set_location(' Leaving:' || l_proc,555);
3426:
3427: RAISE; -- Raise error here relevant to the new tech stack.
3428: END get_update_transaction;
3421:
3422: EXCEPTION
3423: WHEN OTHERS THEN
3424: hr_utility.trace(' HR_LOA_SS.get_update_transaction ' || SQLERRM );
3425: hr_utility.set_location(' Leaving:' || l_proc,555);
3426:
3427: RAISE; -- Raise error here relevant to the new tech stack.
3428: END get_update_transaction;
3429: /*
3542: BEGIN
3543: --
3544: --
3545: --
3546: hr_utility.set_location(' Entering:' || l_proc,5);
3547:
3548: l_validate := TRUE;
3549: l_authorising_person_id := to_number(p_authorising_person_id);
3550: l_replacement_person_id := to_number(p_replacement_person_id);
3649: p_exceeds_pto_entit_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_exceeds_pto_entit_warning);
3650: p_exceeds_run_total_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_exceeds_run_total_warning);
3651: p_dur_overwritten_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_dur_overwritten_warning);
3652:
3653: hr_utility.set_location(' Leaving:' || l_proc,10);
3654:
3655: EXCEPTION
3656: WHEN g_data_error THEN
3657: hr_utility.trace('Exception in g_data_error in HR_LOA_SS..validate_api ' || SQLERRM );
3653: hr_utility.set_location(' Leaving:' || l_proc,10);
3654:
3655: EXCEPTION
3656: WHEN g_data_error THEN
3657: hr_utility.trace('Exception in g_data_error in HR_LOA_SS..validate_api ' || SQLERRM );
3658: hr_utility.set_location(' Leaving:' || l_proc,555);
3659:
3660: raise;
3661:
3654:
3655: EXCEPTION
3656: WHEN g_data_error THEN
3657: hr_utility.trace('Exception in g_data_error in HR_LOA_SS..validate_api ' || SQLERRM );
3658: hr_utility.set_location(' Leaving:' || l_proc,555);
3659:
3660: raise;
3661:
3662: WHEN OTHERS THEN
3659:
3660: raise;
3661:
3662: WHEN OTHERS THEN
3663: hr_utility.trace('When others exception in HR_LOA_SS..validate_api ' || SQLERRM );
3664: hr_utility.set_location(' Leaving:' || l_proc,560);
3665: raise ;
3666:
3667: END validate_api;
3660: raise;
3661:
3662: WHEN OTHERS THEN
3663: hr_utility.trace('When others exception in HR_LOA_SS..validate_api ' || SQLERRM );
3664: hr_utility.set_location(' Leaving:' || l_proc,560);
3665: raise ;
3666:
3667: END validate_api;
3668:
3804: --2966372 changes end
3805:
3806:
3807: BEGIN
3808: hr_utility.set_location('Entering:'|| l_proc, 10);
3809: --
3810: -- Call API with validate mode
3811: --
3812:
3845: -- Support Save For Later
3846: --
3847: if p_save_mode <> 'SaveForLater' then
3848:
3849: hr_utility.set_location(l_proc, 20);
3850:
3851: hr_person_absence_api.create_person_absence(
3852: p_validate => l_validate
3853: ,p_effective_date => p_effective_date
3957: lb_dur_dys_less_warning OR --2765646
3958: lb_dur_hrs_less_warning OR --2765646
3959: lb_exceeds_run_total_warning) AND --2797220
3960: p_return_on_warning = 'true' then
3961: hr_utility.set_location(l_proc, 40);
3962: return;
3963: else -- BUG 2415512
3964: lb_abs_overlap_warning := chk_overlap(p_person_id,p_business_group_id,p_date_start,p_date_end,p_time_start,p_time_end);
3965:
3963: else -- BUG 2415512
3964: lb_abs_overlap_warning := chk_overlap(p_person_id,p_business_group_id,p_date_start,p_date_end,p_time_start,p_time_end);
3965:
3966: if lb_abs_overlap_warning AND p_return_on_warning = 'true' then
3967: hr_utility.set_location(l_proc, 50);
3968: p_abs_overlap_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_abs_overlap_warning);
3969: return;
3970: end if;
3971: end if;
3971: end if;
3972: -- 2713296 changes ends
3973: end if; -- Support Save For Later
3974:
3975: hr_utility.set_location(l_proc, 60);
3976: --
3977: -- Create transaction
3978: --
3979: create_transaction(
4462: p_value =>p_save_mode ) ;
4463: --
4464: --
4465: --
4466: hr_utility.set_location('Leaving..:' || l_proc, 70);
4467: EXCEPTION
4468: WHEN hr_utility.hr_error then
4469: hr_message.provide_error;
4470: p_page_error := hr_message.last_message_app;
4464: --
4465: --
4466: hr_utility.set_location('Leaving..:' || l_proc, 70);
4467: EXCEPTION
4468: WHEN hr_utility.hr_error then
4469: hr_message.provide_error;
4470: p_page_error := hr_message.last_message_app;
4471: p_page_error_msg := hr_message.get_message_text;
4472: p_page_error_num := hr_message.last_message_number;
4469: hr_message.provide_error;
4470: p_page_error := hr_message.last_message_app;
4471: p_page_error_msg := hr_message.get_message_text;
4472: p_page_error_num := hr_message.last_message_number;
4473: hr_utility.set_location('Leaving..:' || l_proc, 555);
4474: WHEN OTHERS THEN
4475: hr_utility.trace('Exception HR_LOA_SS..process_save:: ' || SQLERRM );
4476: hr_utility.set_location('Leaving..:' || l_proc, 560);
4477: raise ;
4471: p_page_error_msg := hr_message.get_message_text;
4472: p_page_error_num := hr_message.last_message_number;
4473: hr_utility.set_location('Leaving..:' || l_proc, 555);
4474: WHEN OTHERS THEN
4475: hr_utility.trace('Exception HR_LOA_SS..process_save:: ' || SQLERRM );
4476: hr_utility.set_location('Leaving..:' || l_proc, 560);
4477: raise ;
4478:
4479: END process_save;
4472: p_page_error_num := hr_message.last_message_number;
4473: hr_utility.set_location('Leaving..:' || l_proc, 555);
4474: WHEN OTHERS THEN
4475: hr_utility.trace('Exception HR_LOA_SS..process_save:: ' || SQLERRM );
4476: hr_utility.set_location('Leaving..:' || l_proc, 560);
4477: raise ;
4478:
4479: END process_save;
4480:
4509: from per_absence_attendance_types
4510: where absence_attendance_type_id = p_absence_attendance_type_id;
4511:
4512: begin
4513: hr_utility.set_location(' Entering:' || l_proc,5);
4514:
4515: open get_category_code(p_absence_attendance_type_id);
4516: fetch get_category_code into l_absence_category ;
4517: close get_category_code ;
4518:
4519: IF l_absence_category = 'S' THEN
4520: l_legislation_code := hr_api.return_legislation_code(p_business_group_id);
4521: IF l_legislation_code = 'GB' THEN
4522: hr_utility.set_location(l_proc,10);
4523:
4524: populate_sickness_dates := true;
4525: END IF;
4526: END IF;
4523:
4524: populate_sickness_dates := true;
4525: END IF;
4526: END IF;
4527: hr_utility.set_location(' Leaving:' || l_proc,15);
4528:
4529: return populate_sickness_dates;
4530: END is_gb_leg_and_category_s ;
4531: --2966372 changes end
4664: BEGIN
4665: --
4666: --
4667: --
4668: hr_utility.set_location('Entering:'|| l_proc, 10);
4669: open csr_abs_attendances;
4670: fetch csr_abs_attendances into l_absence_rec;
4671: if csr_abs_attendances%notfound then
4672: close csr_abs_attendances;
4669: open csr_abs_attendances;
4670: fetch csr_abs_attendances into l_absence_rec;
4671: if csr_abs_attendances%notfound then
4672: close csr_abs_attendances;
4673: hr_utility.set_location('api error exists', 10);
4674: raise g_data_error;
4675: end if;
4676:
4677:
4759: ,p_object_version_number => p_object_version_number
4760: );
4761:
4762: if l_leave_data_changed = false then
4763: hr_utility.set_location(l_proc||' no data changed:returning', 15);
4764: return;
4765: end if;
4766:
4767: --2793140 changes end
4766:
4767: --2793140 changes end
4768:
4769: l_object_version_number := p_object_version_number; -- WWBUG 2411426
4770: hr_utility.trace(l_proc || ':p_object_version_number =>'|| to_char(l_object_version_number));
4771:
4772: --2966372 changes start
4773: l_populate_sickness_dates := is_gb_leg_and_category_s(p_absence_attendance_type_id
4774: , l_absence_rec.business_group_id);
4783: -- Call API with validate mode
4784: --
4785:
4786: if p_save_mode <> 'SaveForLater' then
4787: hr_utility.set_location(l_proc, 20);
4788:
4789: l_validate := TRUE;
4790:
4791: if p_leave_status = g_confirm then
4789: l_validate := TRUE;
4790:
4791: if p_leave_status = g_confirm then
4792:
4793: hr_utility.set_location(l_proc, 30);
4794:
4795: hr_person_absence_api.update_person_absence(
4796: p_validate => l_validate
4797: ,p_effective_date => p_effective_date
4870: ,p_del_element_entry_warning => lb_del_element_entry_warning
4871: );
4872: else
4873: -- Update absence
4874: hr_utility.set_location(l_proc, 40);
4875:
4876: hr_person_absence_api.update_person_absence(
4877: p_validate => l_validate
4878: ,p_effective_date => p_effective_date
4961:
4962: -- When validate mode is 'TRUE', API always returns null for p_object_version_number
4963: -- p_object_version_number := l_object_version_number; -- WWBUG 2411426
4964:
4965: hr_utility.trace(l_proc || ':p_object_version_number =>'|| to_char(l_object_version_number));
4966:
4967: p_dur_dys_less_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_dur_dys_less_warning);
4968: p_dur_hrs_less_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_dur_hrs_less_warning);
4969: p_exceeds_pto_entit_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_exceeds_pto_entit_warning);
4977: lb_dur_dys_less_warning OR --2765646
4978: lb_dur_hrs_less_warning OR --2765646
4979: lb_exceeds_run_total_warning) AND --2797220
4980: p_return_on_warning = 'true' then
4981: hr_utility.set_location(l_proc, 50);
4982: return;
4983: else -- BUG 2415512
4984: lb_abs_overlap_warning := chk_overlap(p_person_id,l_absence_rec.business_group_id,p_date_start,p_date_end,p_time_start,p_time_end);
4985:
4984: lb_abs_overlap_warning := chk_overlap(p_person_id,l_absence_rec.business_group_id,p_date_start,p_date_end,p_time_start,p_time_end);
4985:
4986:
4987: if lb_abs_overlap_warning AND p_return_on_warning = 'true' then
4988: hr_utility.set_location(l_proc, 55);
4989: p_abs_overlap_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_abs_overlap_warning);
4990: return;
4991: end if;
4992: --2713296 change ends
4990: return;
4991: end if;
4992: --2713296 change ends
4993: end if;
4994: hr_utility.set_location(l_proc, 60);
4995:
4996: end if; -- Support of Save Of Later
4997:
4998: --
5009: ,p_review_proc_call => p_review_proc_call
5010: );
5011:
5012: p_transaction_step_id := l_transaction_step_id;
5013: hr_utility.set_location(l_proc, 70);
5014: hr_utility.trace(l_proc || ':transaction_step_id =>'|| to_char(l_transaction_step_id));
5015:
5016: --
5017: -- Write Transaction
5010: );
5011:
5012: p_transaction_step_id := l_transaction_step_id;
5013: hr_utility.set_location(l_proc, 70);
5014: hr_utility.trace(l_proc || ':transaction_step_id =>'|| to_char(l_transaction_step_id));
5015:
5016: --
5017: -- Write Transaction
5018: --
5109: p_value =>p_time_projected_end ) ;
5110:
5111:
5112:
5113: hr_utility.set_location(l_proc, 90);
5114:
5115: hr_transaction_api.set_number_value (
5116: p_transaction_step_id =>l_transaction_step_id,
5117: p_person_id => l_creator_person_id ,
5480:
5481:
5482: close csr_abs_attendances;
5483:
5484: hr_utility.set_location(l_proc, 100);
5485:
5486: p_absence_days := l_absence_days;
5487: p_absence_hours := l_absence_hours;
5488: --
5486: p_absence_days := l_absence_days;
5487: p_absence_hours := l_absence_hours;
5488: --
5489: --
5490: -- hr_utility.set_location(' Leaving:' || l_proc,105);
5491:
5492: EXCEPTION
5493: WHEN hr_utility.hr_error then
5494: hr_message.provide_error;
5489: --
5490: -- hr_utility.set_location(' Leaving:' || l_proc,105);
5491:
5492: EXCEPTION
5493: WHEN hr_utility.hr_error then
5494: hr_message.provide_error;
5495: p_page_error := hr_message.last_message_app;
5496: p_page_error_msg := hr_message.get_message_text;
5497: p_page_error_num := hr_message.last_message_number;
5494: hr_message.provide_error;
5495: p_page_error := hr_message.last_message_app;
5496: p_page_error_msg := hr_message.get_message_text;
5497: p_page_error_num := hr_message.last_message_number;
5498: hr_utility.set_location(' Leaving:' || l_proc,555);
5499:
5500: WHEN g_data_error THEN
5501: hr_utility.trace( 'g_data_error in .process_update_save: ' || SQLERRM );
5502: hr_utility.set_location(' Leaving:' || l_proc,560);
5497: p_page_error_num := hr_message.last_message_number;
5498: hr_utility.set_location(' Leaving:' || l_proc,555);
5499:
5500: WHEN g_data_error THEN
5501: hr_utility.trace( 'g_data_error in .process_update_save: ' || SQLERRM );
5502: hr_utility.set_location(' Leaving:' || l_proc,560);
5503:
5504: raise ;
5505: WHEN OTHERS THEN
5498: hr_utility.set_location(' Leaving:' || l_proc,555);
5499:
5500: WHEN g_data_error THEN
5501: hr_utility.trace( 'g_data_error in .process_update_save: ' || SQLERRM );
5502: hr_utility.set_location(' Leaving:' || l_proc,560);
5503:
5504: raise ;
5505: WHEN OTHERS THEN
5506: close csr_abs_attendances;
5503:
5504: raise ;
5505: WHEN OTHERS THEN
5506: close csr_abs_attendances;
5507: hr_utility.trace( 'when others in .process_update_save: ' || SQLERRM );
5508: hr_utility.set_location(' Leaving:' || l_proc,565);
5509:
5510: raise ;
5511:
5504: raise ;
5505: WHEN OTHERS THEN
5506: close csr_abs_attendances;
5507: hr_utility.trace( 'when others in .process_update_save: ' || SQLERRM );
5508: hr_utility.set_location(' Leaving:' || l_proc,565);
5509:
5510: raise ;
5511:
5512: END process_update_save;
5723:
5724: --
5725: -- Update Transaction Table
5726: --
5727: hr_utility.set_location(' Entering:' || l_proc,5);
5728:
5729: l_creator_person_id := p_login_person_id;
5730: l_transaction_step_id := p_transaction_step_id;
5731:
5763: if p_save_mode <> 'SaveForLater'
5764: and p_absence_attendance_id <> 0 --2824349
5765: then
5766:
5767: hr_utility.set_location(l_proc, 20);
5768: hr_person_absence_api.update_person_absence(
5769: p_validate => l_validate
5770: ,p_effective_date => p_effective_date
5771: -- ,p_business_group_id => l_absence_rec.business_group_id
5857: lb_dur_dys_less_warning OR --2765646
5858: lb_dur_hrs_less_warning OR --2765646
5859: lb_exceeds_run_total_warning) AND --2797220
5860: p_return_on_warning = 'true' then --2713296
5861: hr_utility.set_location(l_proc, 30);
5862: return;
5863: else
5864: -- Replaced call to chk_overlap function because we should check for overlapping
5865: -- in all but current transaction step id records of hr_api_transaction_values.
5882:
5883: END IF; --Dates Not Null
5884:
5885: if lb_abs_overlap_warning and p_return_on_warning = 'true' then --2713296
5886: hr_utility.set_location(l_proc, 40);
5887: p_abs_overlap_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_abs_overlap_warning);
5888: return;
5889: end if;
5890:
6303: p_value =>p_time_projected_end ) ;
6304:
6305: --
6306: --
6307: hr_utility.set_location(' Leaving:' || l_proc,45);
6308:
6309: --
6310: EXCEPTION
6311:
6309: --
6310: EXCEPTION
6311:
6312: --4064949
6313: WHEN hr_utility.hr_error then
6314: hr_message.provide_error;
6315: p_page_error := hr_message.last_message_app;
6316: p_page_error_msg := hr_message.get_message_text;
6317: p_page_error_num := hr_message.last_message_number;
6314: hr_message.provide_error;
6315: p_page_error := hr_message.last_message_app;
6316: p_page_error_msg := hr_message.get_message_text;
6317: p_page_error_num := hr_message.last_message_number;
6318: hr_utility.set_location(' Leaving:' || l_proc,500);
6319:
6320: WHEN g_data_error THEN
6321: hr_utility.trace('g_data_error exception in .process_update_txn_save: ' || SQLERRM );
6322: hr_utility.set_location(' Leaving:' || l_proc,555);
6317: p_page_error_num := hr_message.last_message_number;
6318: hr_utility.set_location(' Leaving:' || l_proc,500);
6319:
6320: WHEN g_data_error THEN
6321: hr_utility.trace('g_data_error exception in .process_update_txn_save: ' || SQLERRM );
6322: hr_utility.set_location(' Leaving:' || l_proc,555);
6323:
6324: raise ;
6325: WHEN OTHERS THEN
6318: hr_utility.set_location(' Leaving:' || l_proc,500);
6319:
6320: WHEN g_data_error THEN
6321: hr_utility.trace('g_data_error exception in .process_update_txn_save: ' || SQLERRM );
6322: hr_utility.set_location(' Leaving:' || l_proc,555);
6323:
6324: raise ;
6325: WHEN OTHERS THEN
6326: hr_utility.trace(' when others exception in .process_update_txn_save: ' || SQLERRM );
6322: hr_utility.set_location(' Leaving:' || l_proc,555);
6323:
6324: raise ;
6325: WHEN OTHERS THEN
6326: hr_utility.trace(' when others exception in .process_update_txn_save: ' || SQLERRM );
6327: hr_utility.set_location(' Leaving:' || l_proc,560);
6328:
6329: raise ;
6330:
6323:
6324: raise ;
6325: WHEN OTHERS THEN
6326: hr_utility.trace(' when others exception in .process_update_txn_save: ' || SQLERRM );
6327: hr_utility.set_location(' Leaving:' || l_proc,560);
6328:
6329: raise ;
6330:
6331: END process_update_txn_save;
6543: -- Fix 2666959 End
6544: -- For checking dates in transaction tables, we should convert dates into user's date and time format.
6545:
6546: BEGIN
6547: hr_utility.set_location('Entering..:' || l_proc, 10);
6548: --
6549: -- Call API with validate mode
6550: --
6551:
6584: -- Support Save For Later
6585: --
6586: if p_save_mode <> 'SaveForLater' then
6587:
6588: hr_utility.set_location(l_proc, 20);
6589: hr_person_absence_api.create_person_absence(
6590: p_validate => l_validate
6591: ,p_effective_date => p_effective_date
6592: ,p_person_id => p_person_id
6695: lb_dur_dys_less_warning OR --2765646
6696: lb_dur_hrs_less_warning OR --2765646
6697: lb_exceeds_run_total_warning) AND --2797220
6698: p_return_on_warning = 'true' then --2713296
6699: hr_utility.set_location(l_proc, 30);
6700: return;
6701: else -- BUG 2415512
6702:
6703:
6723: END IF;
6724: -- Fix 2666959 End
6725:
6726: if lb_abs_overlap_warning and p_return_on_warning = 'true' then --2713296
6727: hr_utility.set_location(l_proc, 40);
6728: p_abs_overlap_warning := hr_java_conv_util_ss.get_number(p_boolean => lb_abs_overlap_warning);
6729: return;
6730: end if;
6731: end if;
6730: end if;
6731: end if;
6732: end if; -- Support Save For Later
6733:
6734: hr_utility.set_location(l_proc, 50);
6735:
6736: p_absence_days := l_absence_days;
6737: p_absence_hours := l_absence_hours;
6738: --
7204: p_name => 'p_save_mode' ,
7205: p_value =>p_save_mode ) ;
7206: --
7207: --
7208: -- hr_utility.set_location('Leaving..:' || l_proc, 50);
7209: EXCEPTION
7210: WHEN hr_utility.hr_error then
7211: hr_message.provide_error;
7212: p_page_error := hr_message.last_message_app;
7206: --
7207: --
7208: -- hr_utility.set_location('Leaving..:' || l_proc, 50);
7209: EXCEPTION
7210: WHEN hr_utility.hr_error then
7211: hr_message.provide_error;
7212: p_page_error := hr_message.last_message_app;
7213: p_page_error_msg := hr_message.get_message_text;
7214: p_page_error_num := hr_message.last_message_number;
7211: hr_message.provide_error;
7212: p_page_error := hr_message.last_message_app;
7213: p_page_error_msg := hr_message.get_message_text;
7214: p_page_error_num := hr_message.last_message_number;
7215: hr_utility.set_location('Leaving..:' || l_proc, 555);
7216: WHEN OTHERS THEN
7217: hr_utility.trace( ' HR_LOA_SS.process_save ' || SQLERRM );
7218: hr_utility.set_location('Leaving..:' || l_proc, 560);
7219: raise ;
7213: p_page_error_msg := hr_message.get_message_text;
7214: p_page_error_num := hr_message.last_message_number;
7215: hr_utility.set_location('Leaving..:' || l_proc, 555);
7216: WHEN OTHERS THEN
7217: hr_utility.trace( ' HR_LOA_SS.process_save ' || SQLERRM );
7218: hr_utility.set_location('Leaving..:' || l_proc, 560);
7219: raise ;
7220:
7221:
7214: p_page_error_num := hr_message.last_message_number;
7215: hr_utility.set_location('Leaving..:' || l_proc, 555);
7216: WHEN OTHERS THEN
7217: hr_utility.trace( ' HR_LOA_SS.process_save ' || SQLERRM );
7218: hr_utility.set_location('Leaving..:' || l_proc, 560);
7219: raise ;
7220:
7221:
7222: END process_txn_save;
7274: BEGIN
7275:
7276: --
7277: --
7278: hr_utility.set_location('Entering:'|| l_proc, 10);
7279: if (p_effective_date is not null) then
7280: l_effective_date:= to_date(p_effective_date,g_date_format);
7281: else
7282: l_effective_date:= to_date(
7306: --
7307: savepoint loa_process_api;
7308:
7309: if l_activity_name = 'HrLoa' OR l_activity_name = 'HrLoaComp' then
7310: hr_utility.set_location(l_proc, 20);
7311:
7312: get_abs_from_tt
7313: (p_transaction_step_id => p_transaction_step_id
7314: ,p_absence_rec => l_absence_rec);
7420: ,p_dur_overwritten_warning => lb_dur_overwritten_warning
7421: );
7422:
7423: elsif l_activity_name = 'HrLoaReturn' OR l_leave_status = g_confirm then
7424: hr_utility.set_location(l_proc, 30);
7425:
7426: get_rtn_from_tt
7427: (p_transaction_step_id => p_transaction_step_id
7428: ,p_absence_rec => l_absence_rec);
7520: ,p_del_element_entry_warning => lb_del_element_entry_warning
7521: );
7522:
7523: elsif l_activity_name = 'HrLoaUpdate' then
7524: hr_utility.set_location(l_proc, 40);
7525:
7526: get_upd_from_tt
7527: (p_transaction_step_id => p_transaction_step_id
7528: ,p_absence_rec => l_absence_rec);
7638:
7639: -- 2713296
7640: --if lb_abs_overlap_warning = true then
7641: --rollback to loa_process_api;
7642: --hr_utility.set_message(800, 'HR_LOA_ABSENCE_OVERLAP');
7643: --hr_utility.raise_error;
7644: --end if;
7645: -- 2713296
7646:
7639: -- 2713296
7640: --if lb_abs_overlap_warning = true then
7641: --rollback to loa_process_api;
7642: --hr_utility.set_message(800, 'HR_LOA_ABSENCE_OVERLAP');
7643: --hr_utility.raise_error;
7644: --end if;
7645: -- 2713296
7646:
7647: hr_utility.set_location(' Leaving:' || l_proc,45);
7643: --hr_utility.raise_error;
7644: --end if;
7645: -- 2713296
7646:
7647: hr_utility.set_location(' Leaving:' || l_proc,45);
7648:
7649:
7650: EXCEPTION
7651: WHEN OTHERS THEN
7649:
7650: EXCEPTION
7651: WHEN OTHERS THEN
7652: rollback to loa_process_api;
7653: hr_utility.trace('Exception in .process_api:' || SQLERRM );
7654: hr_utility.set_location(' Leaving:' || l_proc,555);
7655:
7656: raise ;
7657: end process_api;
7650: EXCEPTION
7651: WHEN OTHERS THEN
7652: rollback to loa_process_api;
7653: hr_utility.trace('Exception in .process_api:' || SQLERRM );
7654: hr_utility.set_location(' Leaving:' || l_proc,555);
7655:
7656: raise ;
7657: end process_api;
7658:
7677: l_proc varchar2(72) := g_package||'get_abs_from_tt';
7678: --
7679: begin
7680:
7681: --hr_utility.set_location(' Entering:' || l_proc,5);
7682:
7683: p_absence_rec.business_group_id:=
7684: hr_transaction_api.get_number_value
7685: (p_transaction_step_id => p_transaction_step_id
8032: hr_transaction_api.get_varchar2_value
8033: (p_transaction_step_id => p_transaction_step_id
8034: ,p_name => 'p_abs_information30');
8035: --
8036: hr_utility.set_location(' Leaving:' || l_proc,10);
8037:
8038:
8039: EXCEPTION
8040: WHEN OTHERS THEN
8037:
8038:
8039: EXCEPTION
8040: WHEN OTHERS THEN
8041: hr_utility.trace ( 'Exception in .get_abs_from_tt: ' || SQLERRM );
8042: hr_utility.set_location(' Leaving:' || l_proc,15);
8043:
8044: raise ;
8045: end get_abs_from_tt;
8038:
8039: EXCEPTION
8040: WHEN OTHERS THEN
8041: hr_utility.trace ( 'Exception in .get_abs_from_tt: ' || SQLERRM );
8042: hr_utility.set_location(' Leaving:' || l_proc,15);
8043:
8044: raise ;
8045: end get_abs_from_tt;
8046:
8067: --
8068: begin
8069:
8070: --
8071: hr_utility.set_location(' Entering:' || l_proc,5);
8072:
8073: p_absence_rec.person_id:=
8074: hr_transaction_api.get_number_value
8075: (p_transaction_step_id => p_transaction_step_id
8404: hr_transaction_api.get_varchar2_value
8405: (p_transaction_step_id => p_transaction_step_id
8406: ,p_name => 'p_abs_information30');
8407: --
8408: hr_utility.set_location(' Leaving:' || l_proc,10);
8409:
8410: EXCEPTION
8411: WHEN OTHERS THEN
8412: hr_utility.trace(' get_rtn_from_tt: ' || SQLERRM );
8408: hr_utility.set_location(' Leaving:' || l_proc,10);
8409:
8410: EXCEPTION
8411: WHEN OTHERS THEN
8412: hr_utility.trace(' get_rtn_from_tt: ' || SQLERRM );
8413: hr_utility.set_location(' Leaving:' || l_proc,555);
8414:
8415: raise ;
8416: end get_rtn_from_tt;
8409:
8410: EXCEPTION
8411: WHEN OTHERS THEN
8412: hr_utility.trace(' get_rtn_from_tt: ' || SQLERRM );
8413: hr_utility.set_location(' Leaving:' || l_proc,555);
8414:
8415: raise ;
8416: end get_rtn_from_tt;
8417:
8437: l_proc varchar2(72) := g_package||'get_upd_from_tt';
8438: --
8439: begin
8440:
8441: hr_utility.set_location(' Entering:' || l_proc,5);
8442:
8443: --
8444: p_absence_rec.absence_attendance_id:=
8445: hr_transaction_api.get_number_value
8788: hr_transaction_api.get_varchar2_value
8789: (p_transaction_step_id => p_transaction_step_id
8790: ,p_name => 'p_abs_information30');
8791: --
8792: hr_utility.set_location(' Leaving:' || l_proc,10);
8793:
8794: EXCEPTION
8795: WHEN OTHERS THEN
8796: hr_utility.trace(' .get_upd_from_tt: ' || SQLERRM );
8792: hr_utility.set_location(' Leaving:' || l_proc,10);
8793:
8794: EXCEPTION
8795: WHEN OTHERS THEN
8796: hr_utility.trace(' .get_upd_from_tt: ' || SQLERRM );
8797: hr_utility.set_location(' Leaving:' || l_proc,555);
8798:
8799: raise ;
8800: end get_upd_from_tt;
8793:
8794: EXCEPTION
8795: WHEN OTHERS THEN
8796: hr_utility.trace(' .get_upd_from_tt: ' || SQLERRM );
8797: hr_utility.set_location(' Leaving:' || l_proc,555);
8798:
8799: raise ;
8800: end get_upd_from_tt;
8801:
8915: --
8916: e_bad_time_format EXCEPTION;
8917: --
8918: BEGIN
8919: hr_utility.set_location('Entering '||g_package||'.calc_sch_based_dur',10);
8920: p_duration := 0;
8921: l_time_start := p_time_start;
8922: l_time_end := p_time_end;
8923: --
9046: --
9047: END IF;
9048: END IF;
9049: --
9050: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',20);
9051: EXCEPTION
9052: --
9053: WHEN e_bad_time_format THEN
9054: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',30);
9050: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',20);
9051: EXCEPTION
9052: --
9053: WHEN e_bad_time_format THEN
9054: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',30);
9055: hr_utility.set_location(SQLERRM,35);
9056: RAISE;
9057: --
9058: WHEN OTHERS THEN
9051: EXCEPTION
9052: --
9053: WHEN e_bad_time_format THEN
9054: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',30);
9055: hr_utility.set_location(SQLERRM,35);
9056: RAISE;
9057: --
9058: WHEN OTHERS THEN
9059: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',40);
9055: hr_utility.set_location(SQLERRM,35);
9056: RAISE;
9057: --
9058: WHEN OTHERS THEN
9059: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',40);
9060: hr_utility.set_location(SQLERRM,45);
9061: RAISE;
9062: --
9063: END calc_sch_based_dur;
9056: RAISE;
9057: --
9058: WHEN OTHERS THEN
9059: hr_utility.set_location('Leaving '||g_package||'.calc_sch_based_dur',40);
9060: hr_utility.set_location(SQLERRM,45);
9061: RAISE;
9062: --
9063: END calc_sch_based_dur;
9064: --
9196:
9197: --
9198: begin
9199:
9200: hr_utility.set_location('Entering:'|| l_proc, 10);
9201:
9202: /*
9203: --
9204: -- Only proceed with validation if :
9226: end if;
9227:
9228: */
9229:
9230: hr_utility.set_location(l_proc, 15);
9231:
9232: --
9233: -- See if a Fast Formula exists. Here the Fast Formula names
9234: -- are hard-coded. Fast Formulas with these exact names can
9267: l_sch_based_dur_found := FALSE;
9268: --
9269: IF l_sch_based_dur = 'Y' THEN
9270: --
9271: hr_utility.set_location(l_proc, 16);
9272: p_use_formula := hr_java_conv_util_ss.get_number(p_boolean => TRUE);
9273: --
9274: calc_sch_based_dur (p_days_or_hours => l_hours_or_days,
9275: p_date_start => p_date_start,
9284: --
9285: l_sch_based_dur_found := TRUE;
9286: --
9287: IF l_hours_or_days = 'H' THEN
9288: hr_utility.set_location(l_proc, 17);
9289: p_absence_hours := l_absence_duration;
9290: ELSIF l_hours_or_days = 'D' THEN
9291: hr_utility.set_location(l_proc, 18);
9292: p_absence_days := l_absence_duration;
9287: IF l_hours_or_days = 'H' THEN
9288: hr_utility.set_location(l_proc, 17);
9289: p_absence_hours := l_absence_duration;
9290: ELSIF l_hours_or_days = 'D' THEN
9291: hr_utility.set_location(l_proc, 18);
9292: p_absence_days := l_absence_duration;
9293: ELSE
9294: hr_utility.set_location(l_proc, 19);
9295: l_sch_based_dur_found := FALSE;
9290: ELSIF l_hours_or_days = 'D' THEN
9291: hr_utility.set_location(l_proc, 18);
9292: p_absence_days := l_absence_duration;
9293: ELSE
9294: hr_utility.set_location(l_proc, 19);
9295: l_sch_based_dur_found := FALSE;
9296: END IF;
9297: --
9298: END IF;
9303: --
9304: -- Bug 4534572 END
9305: --
9306:
9307: hr_utility.set_location(l_proc, 20);
9308:
9309: begin
9310: --
9311: -- Look for a customer-defined formula
9325: -- a legislative formula.
9326: --
9327: begin
9328:
9329: hr_utility.set_location(l_proc, 25);
9330:
9331: select ff.formula_id
9332: into l_formula_id
9333: from ff_formulas_f ff
9345: -- If none of the two above then select the core formula
9346: --
9347: begin
9348:
9349: hr_utility.set_location(l_proc, 30);
9350:
9351: select ff.formula_id
9352: into l_formula_id
9353: from ff_formulas_f ff
9368: end;
9369: end;
9370: end;
9371:
9372: hr_utility.set_location(l_proc, 35);
9373:
9374: if l_formula_id is not null then
9375: --
9376: -- An absence duration Fast Formula should be used so the
9377: -- formula is called. First, the formula is initialised.
9378: --
9379: l_use_formula := TRUE;
9380:
9381: hr_utility.set_location(l_proc, 40);
9382:
9383: --
9384: -- Initalise the formula.
9385: --
9388: ,p_effective_date => p_effective_date
9389: ,p_inputs => l_inputs
9390: ,p_outputs => l_outputs);
9391:
9392: hr_utility.set_location(l_proc, 45);
9393:
9394: --
9395: -- Assign the inputs.
9396: --
9425: end if;
9426:
9427: end loop;
9428:
9429: hr_utility.set_location(l_proc, 50);
9430:
9431: --
9432: -- Run the formula.
9433: --
9432: -- Run the formula.
9433: --
9434: ff_exec.run_formula(l_inputs, l_outputs);
9435:
9436: hr_utility.set_location(l_proc, 55);
9437:
9438: --
9439: -- Assign the outputs.
9440: --
9474: end if;
9475:
9476: end loop;
9477:
9478: hr_utility.set_location(l_proc, 60);
9479: hr_utility.trace('l_user_message: '||l_user_message);
9480: hr_utility.trace('l_invalid_message: '||l_invalid_message);
9481:
9482: --
9475:
9476: end loop;
9477:
9478: hr_utility.set_location(l_proc, 60);
9479: hr_utility.trace('l_user_message: '||l_user_message);
9480: hr_utility.trace('l_invalid_message: '||l_invalid_message);
9481:
9482: --
9483: -- If the Fast Formula raises a user-defined error message,
9476: end loop;
9477:
9478: hr_utility.set_location(l_proc, 60);
9479: hr_utility.trace('l_user_message: '||l_user_message);
9480: hr_utility.trace('l_invalid_message: '||l_invalid_message);
9481:
9482: --
9483: -- If the Fast Formula raises a user-defined error message,
9484: -- raise the error back to the user. Here the message is
9487: --
9488:
9489: if l_user_message = 'Y' then
9490: raise l_custom_exception; --2695922
9491: --hr_utility.set_message(800, substr(l_invalid_message, 1, 30));
9492: --hr_utility.raise_error;
9493: end if;
9494:
9495: else
9488:
9489: if l_user_message = 'Y' then
9490: raise l_custom_exception; --2695922
9491: --hr_utility.set_message(800, substr(l_invalid_message, 1, 30));
9492: --hr_utility.raise_error;
9493: end if;
9494:
9495: else
9496: --
9498: -- standard hours of the assignment or business group.
9499: --
9500: l_use_formula := FALSE;
9501:
9502: hr_utility.set_location(l_proc, 65);
9503:
9504: --
9505: -- Get the default start and end times. First check the assignment, then
9506: -- the business group. If neither of these, assume 24 hours a day.
9509: fetch c_get_normal_hours into l_normal_time_start,
9510: l_normal_time_end;
9511: close c_get_normal_hours;
9512:
9513: hr_utility.set_location(l_proc, 70);
9514:
9515: --
9516: -- Calculate the number of minutes in each day.
9517: --
9530: --
9531: -- The leave timings are out off the standard timings.
9532: -- So use 24 hours rule to calculate the first day and last day minutes.
9533: --
9534: hr_utility.set_location(l_proc, 72);
9535: l_first_day_minutes := per_abs_bus.convert_to_minutes(nvl(p_time_start,
9536: l_normal_time_start),
9537: '24:00');
9538: l_last_day_minutes := per_abs_bus.convert_to_minutes('00:00', nvl(p_time_end,
9561: --3075512 changes end
9562: end if;
9563: --2943479 changes end
9564:
9565: hr_utility.trace('Normal Day Minutes: ' || to_char(l_normal_day_minutes));
9566: hr_utility.trace('First Day Minutes: ' || to_char(l_first_day_minutes));
9567: hr_utility.trace('Last Day Minutes: ' || to_char(l_last_day_minutes));
9568: hr_utility.trace('Same Day Minutes: ' || to_char(l_same_day_minutes));
9569:
9562: end if;
9563: --2943479 changes end
9564:
9565: hr_utility.trace('Normal Day Minutes: ' || to_char(l_normal_day_minutes));
9566: hr_utility.trace('First Day Minutes: ' || to_char(l_first_day_minutes));
9567: hr_utility.trace('Last Day Minutes: ' || to_char(l_last_day_minutes));
9568: hr_utility.trace('Same Day Minutes: ' || to_char(l_same_day_minutes));
9569:
9570: hr_utility.set_location(l_proc, 75);
9563: --2943479 changes end
9564:
9565: hr_utility.trace('Normal Day Minutes: ' || to_char(l_normal_day_minutes));
9566: hr_utility.trace('First Day Minutes: ' || to_char(l_first_day_minutes));
9567: hr_utility.trace('Last Day Minutes: ' || to_char(l_last_day_minutes));
9568: hr_utility.trace('Same Day Minutes: ' || to_char(l_same_day_minutes));
9569:
9570: hr_utility.set_location(l_proc, 75);
9571:
9564:
9565: hr_utility.trace('Normal Day Minutes: ' || to_char(l_normal_day_minutes));
9566: hr_utility.trace('First Day Minutes: ' || to_char(l_first_day_minutes));
9567: hr_utility.trace('Last Day Minutes: ' || to_char(l_last_day_minutes));
9568: hr_utility.trace('Same Day Minutes: ' || to_char(l_same_day_minutes));
9569:
9570: hr_utility.set_location(l_proc, 75);
9571:
9572: --
9566: hr_utility.trace('First Day Minutes: ' || to_char(l_first_day_minutes));
9567: hr_utility.trace('Last Day Minutes: ' || to_char(l_last_day_minutes));
9568: hr_utility.trace('Same Day Minutes: ' || to_char(l_same_day_minutes));
9569:
9570: hr_utility.set_location(l_proc, 75);
9571:
9572: --
9573: -- Calculate the absence days.
9574: --
9573: -- Calculate the absence days.
9574: --
9575: l_absence_days := (p_date_end - p_date_start) + 1;
9576:
9577: hr_utility.trace('Absence Days: ' || to_char(l_absence_days));
9578:
9579: --
9580: -- Calculate the absence hours.
9581: --
9599: ((l_absence_days - 2) * l_normal_day_minutes)) / 60;
9600:
9601: end if;
9602:
9603: hr_utility.set_location(l_proc, 80);
9604:
9605: --
9606: -- Check that the absence hours are not less than zero. This could
9607: -- happen if the entered start time is after the normal start time or
9629: end if;
9630:
9631: end if;
9632:
9633: hr_utility.set_location(l_proc, 90);
9634: --
9635: -- Check min/max value in input_value for element.(WWBUG #2602856)
9636: --
9637: hr_utility.trace('l_element_link_id is '|| l_element_link_id);
9633: hr_utility.set_location(l_proc, 90);
9634: --
9635: -- Check min/max value in input_value for element.(WWBUG #2602856)
9636: --
9637: hr_utility.trace('l_element_link_id is '|| l_element_link_id);
9638: hr_utility.trace('l_input_value_id is '|| l_input_value_id);
9639: hr_utility.trace('p_effective_date is '|| p_effective_date);
9640: hr_utility.trace('l_screen_format is '|| l_screen_format);
9641:
9634: --
9635: -- Check min/max value in input_value for element.(WWBUG #2602856)
9636: --
9637: hr_utility.trace('l_element_link_id is '|| l_element_link_id);
9638: hr_utility.trace('l_input_value_id is '|| l_input_value_id);
9639: hr_utility.trace('p_effective_date is '|| p_effective_date);
9640: hr_utility.trace('l_screen_format is '|| l_screen_format);
9641:
9642: if l_element_link_id is not null and l_input_value_id is not null then
9635: -- Check min/max value in input_value for element.(WWBUG #2602856)
9636: --
9637: hr_utility.trace('l_element_link_id is '|| l_element_link_id);
9638: hr_utility.trace('l_input_value_id is '|| l_input_value_id);
9639: hr_utility.trace('p_effective_date is '|| p_effective_date);
9640: hr_utility.trace('l_screen_format is '|| l_screen_format);
9641:
9642: if l_element_link_id is not null and l_input_value_id is not null then
9643:
9636: --
9637: hr_utility.trace('l_element_link_id is '|| l_element_link_id);
9638: hr_utility.trace('l_input_value_id is '|| l_input_value_id);
9639: hr_utility.trace('p_effective_date is '|| p_effective_date);
9640: hr_utility.trace('l_screen_format is '|| l_screen_format);
9641:
9642: if l_element_link_id is not null and l_input_value_id is not null then
9643:
9644: hr_entry.check_format
9652: l_warning_or_error,
9653: l_min_value,
9654: l_max_value);
9655:
9656: hr_utility.trace('l_min_max_failure is '|| l_min_max_failure);
9657: hr_utility.trace('l_warning_or_error is '|| l_warning_or_error);
9658: hr_utility.trace('l_min_value is '|| l_min_value);
9659: hr_utility.trace('l_max_value is '|| l_max_value);
9660:
9653: l_min_value,
9654: l_max_value);
9655:
9656: hr_utility.trace('l_min_max_failure is '|| l_min_max_failure);
9657: hr_utility.trace('l_warning_or_error is '|| l_warning_or_error);
9658: hr_utility.trace('l_min_value is '|| l_min_value);
9659: hr_utility.trace('l_max_value is '|| l_max_value);
9660:
9661: else --3403256 changes start
9654: l_max_value);
9655:
9656: hr_utility.trace('l_min_max_failure is '|| l_min_max_failure);
9657: hr_utility.trace('l_warning_or_error is '|| l_warning_or_error);
9658: hr_utility.trace('l_min_value is '|| l_min_value);
9659: hr_utility.trace('l_max_value is '|| l_max_value);
9660:
9661: else --3403256 changes start
9662: -- set absence_hrs to null if absence is not linked with an
9655:
9656: hr_utility.trace('l_min_max_failure is '|| l_min_max_failure);
9657: hr_utility.trace('l_warning_or_error is '|| l_warning_or_error);
9658: hr_utility.trace('l_min_value is '|| l_min_value);
9659: hr_utility.trace('l_max_value is '|| l_max_value);
9660:
9661: else --3403256 changes start
9662: -- set absence_hrs to null if absence is not linked with an
9663: -- element and time values are not entered by user
9671: end if;
9672: p_min_max_failure := l_min_max_failure;
9673: p_warning_or_error := l_warning_or_error;
9674:
9675: hr_utility.set_location(l_proc, 100);
9676: /*
9677: if l_min_max_failure = 'F' and l_warning_or_error = 'E' then
9678: hr_utility.set_message(800, 'PER_6303_INPUT_VALUE_OUT_RANGE');
9679: hr_utility.raise_error;
9674:
9675: hr_utility.set_location(l_proc, 100);
9676: /*
9677: if l_min_max_failure = 'F' and l_warning_or_error = 'E' then
9678: hr_utility.set_message(800, 'PER_6303_INPUT_VALUE_OUT_RANGE');
9679: hr_utility.raise_error;
9680: end if;
9681: --
9682: -- if the warning_or_error flag has been set to 'Error' then only Warn
9675: hr_utility.set_location(l_proc, 100);
9676: /*
9677: if l_min_max_failure = 'F' and l_warning_or_error = 'E' then
9678: hr_utility.set_message(800, 'PER_6303_INPUT_VALUE_OUT_RANGE');
9679: hr_utility.raise_error;
9680: end if;
9681: --
9682: -- if the warning_or_error flag has been set to 'Error' then only Warn
9683: -- but let the processing continue
9682: -- if the warning_or_error flag has been set to 'Error' then only Warn
9683: -- but let the processing continue
9684: --
9685: if l_min_max_failure = 'F' and l_warning_or_error = 'W' then
9686: hr_utility.set_message(800, 'PER_6303_INPUT_VALUE_OUT_RANGE');
9687: hr_utility.set_warning;
9688: end if;
9689:
9690: */
9683: -- but let the processing continue
9684: --
9685: if l_min_max_failure = 'F' and l_warning_or_error = 'W' then
9686: hr_utility.set_message(800, 'PER_6303_INPUT_VALUE_OUT_RANGE');
9687: hr_utility.set_warning;
9688: end if;
9689:
9690: */
9691: p_use_formula := hr_java_conv_util_ss.get_number(p_boolean => l_use_formula);
9697: --
9698: -- Bug 4534572 END
9699: --
9700:
9701: hr_utility.set_location(' Leaving:'|| l_proc, 110);
9702:
9703: EXCEPTION
9704: --2695922
9705: WHEN l_custom_exception THEN
9702:
9703: EXCEPTION
9704: --2695922
9705: WHEN l_custom_exception THEN
9706: hr_utility.set_location(' Leaving:'|| l_proc, 555);
9707: p_page_error_msg := l_invalid_message;
9708: --2695922
9709: WHEN wrong_parameters then
9710: --
9710: --
9711: -- The inputs / outputs of the Fast Formula are incorrect
9712: -- so raise an error.
9713: --
9714: hr_utility.set_location(' Leaving:'|| l_proc, 560);
9715:
9716: hr_utility.set_message(800,'HR_34964_BAD_FF_DEFINITION');
9717: hr_utility.raise_error;
9718:
9712: -- so raise an error.
9713: --
9714: hr_utility.set_location(' Leaving:'|| l_proc, 560);
9715:
9716: hr_utility.set_message(800,'HR_34964_BAD_FF_DEFINITION');
9717: hr_utility.raise_error;
9718:
9719: --3001784
9720: WHEN others THEN
9713: --
9714: hr_utility.set_location(' Leaving:'|| l_proc, 560);
9715:
9716: hr_utility.set_message(800,'HR_34964_BAD_FF_DEFINITION');
9717: hr_utility.raise_error;
9718:
9719: --3001784
9720: WHEN others THEN
9721: hr_utility.set_location(' Leaving:'|| l_proc, 565);
9717: hr_utility.raise_error;
9718:
9719: --3001784
9720: WHEN others THEN
9721: hr_utility.set_location(' Leaving:'|| l_proc, 565);
9722: p_page_error_msg := hr_utility.get_message;
9723: --3001784
9724:
9725: end calculate_absence_duration;
9718:
9719: --3001784
9720: WHEN others THEN
9721: hr_utility.set_location(' Leaving:'|| l_proc, 565);
9722: p_page_error_msg := hr_utility.get_message;
9723: --3001784
9724:
9725: end calculate_absence_duration;
9726:
9752: where paa.absence_attendance_id = p_absence_attendance_id ;
9753: --
9754: BEGIN
9755:
9756: hr_utility.set_location(' Entering:' || l_proc,5);
9757:
9758:
9759: open csr_get_ovn_abs_attendances;
9760: fetch csr_get_ovn_abs_attendances into l_ovn;
9758:
9759: open csr_get_ovn_abs_attendances;
9760: fetch csr_get_ovn_abs_attendances into l_ovn;
9761: if csr_get_ovn_abs_attendances%notfound then
9762: hr_utility.set_location(l_proc,10);
9763:
9764: close csr_get_ovn_abs_attendances;
9765: hr_utility.set_location('api error exists', 10);
9766: raise g_data_error;
9761: if csr_get_ovn_abs_attendances%notfound then
9762: hr_utility.set_location(l_proc,10);
9763:
9764: close csr_get_ovn_abs_attendances;
9765: hr_utility.set_location('api error exists', 10);
9766: raise g_data_error;
9767: end if;
9768:
9769:
9773: p_absence_attendance_id => p_absence_attendance_id
9774: ,p_object_version_number => l_ovn
9775: );
9776:
9777: hr_utility.set_location(' Leaving:' || l_proc,15);
9778:
9779: --
9780:
9781: EXCEPTION
9779: --
9780:
9781: EXCEPTION
9782: WHEN OTHERS THEN
9783: hr_utility.trace('When others exception in .delete_absence: ' || SQLERRM );
9784: --2782075 changes start
9785: --Don't raise the error. just fetch the msg text and return
9786: p_page_error_msg := fnd_message.get;
9787: --2782075 changes start
9886: --
9887:
9888: BEGIN
9889: --
9890: hr_utility.set_location('Entering:'|| l_proc, 10);
9891: --
9892: -- check if this absence overlaps another absence for the same person.
9893: --
9894:
9899: open c_abs_overlap(p_person_id,p_business_group_id,p_date_start,p_date_end,p_time_start,p_time_end);
9900: fetch c_abs_overlap into l_exists;
9901:
9902: if c_abs_overlap%found then
9903: hr_utility.set_location(l_proc, 10);
9904: --
9905: -- Set the warning message
9906: --
9907: l_abs_overlap_warning := TRUE;
9906: --
9907: l_abs_overlap_warning := TRUE;
9908: --
9909: else
9910: hr_utility.set_location(l_proc, 20);
9911: l_abs_overlap_warning := FALSE;
9912:
9913: end if;
9914: --
9911: l_abs_overlap_warning := FALSE;
9912:
9913: end if;
9914: --
9915: hr_utility.set_location('Leaving:'|| l_proc, 30);
9916: return l_abs_overlap_warning;
9917:
9918: --
9919: EXCEPTION
9917:
9918: --
9919: EXCEPTION
9920: WHEN OTHERS THEN
9921: hr_utility.trace(' .chk_overlap: ' || SQLERRM );
9922: hr_utility.set_location('Leaving:'|| l_proc, 555);
9923: raise ;
9924: end chk_overlap;
9925:
9918: --
9919: EXCEPTION
9920: WHEN OTHERS THEN
9921: hr_utility.trace(' .chk_overlap: ' || SQLERRM );
9922: hr_utility.set_location('Leaving:'|| l_proc, 555);
9923: raise ;
9924: end chk_overlap;
9925:
9926: END HR_LOA_SS;