[Home] [Help]
180: l_event_id number;
181: l_object_version_number number;
182: l_effective_date date;
183: begin
184: hr_utility.set_location('Entering:'|| l_proc, 10);
185: --
186: -- Issue a savepoint
187: --
188: savepoint CREATE_CLASS;
456: --
457: p_event_id := l_event_id;
458: p_object_version_number := l_object_version_number;
459: --
460: hr_utility.set_location(' Leaving:'||l_proc, 70);
461: exception
462: when hr_api.validate_enabled then
463: --
464: -- As the Validate_Enabled exception has been raised
471: -- when validation only mode is being used.)
472: --
473: p_event_id := null;
474: p_object_version_number := null;
475: hr_utility.set_location(' Leaving:'||l_proc, 80);
476: when others then
477: --
478: -- A validation or unexpected error has occured
479: --
479: --
480: rollback to CREATE_CLASS;
481: p_event_id := null;
482: p_object_version_number := null;
483: hr_utility.set_location(' Leaving:'||l_proc, 90);
484: raise;
485: end create_class;
486: -- ----------------------------------------------------------------------------
487: -- |-------------------------< UPDATE_CLASS >---------------------------------|
568: l_effective_date date;
569: l_object_version_number number := p_object_version_number;
570: l_timezonechanged BOOLEAN := false;
571: begin
572: hr_utility.set_location('Entering:'|| l_proc, 10);
573: --
574: -- Issue a savepoint
575: --
576: savepoint UPDATE_CLASS;
850: end if;
851: --
852: -- Set all output arguments
853: --
854: hr_utility.set_location(' Leaving:'||l_proc, 70);
855: exception
856: when hr_api.validate_enabled then
857: --
858: -- As the Validate_Enabled exception has been raised
864: -- (Any key or derived arguments must be set to null
865: -- when validation only mode is being used.)
866: --
867: p_object_version_number := null;
868: hr_utility.set_location(' Leaving:'||l_proc, 80);
869: when others then
870: --
871: -- A validation or unexpected error has occured
872: --
871: -- A validation or unexpected error has occured
872: --
873: rollback to UPDATE_CLASS;
874: p_object_version_number := l_object_version_number;
875: hr_utility.set_location(' Leaving:'||l_proc, 90);
876: raise;
877: end update_class;
878: --
879: -- ----------------------------------------------------------------------------
892: l_object_version_id number;
893: --
894: --
895: begin
896: hr_utility.set_location('Entering:'|| l_proc, 10);
897: --
898: -- Issue a savepoint
899: --
900: savepoint DELETE_CLASS;
960: --
961: -- Set all output arguments
962: --
963: --
964: hr_utility.set_location(' Leaving:'||l_proc, 170);
965: exception
966: when hr_api.validate_enabled then
967: --
968: -- As the Validate_Enabled exception has been raised
973: -- Only set output warning arguments
974: -- (Any key or derived arguments must be set to null
975: -- when validation only mode is being used.)
976: --
977: hr_utility.set_location(' Leaving:'||l_proc, 180);
978: when others then
979: --
980: -- A validation or unexpected error has occured
981: --
979: --
980: -- A validation or unexpected error has occured
981: --
982: rollback to DELETE_CLASS;
983: hr_utility.set_location(' Leaving:'||l_proc, 190);
984: raise;
985: end delete_class;
986: --
987: -- ----------------------------------------------------------------------------
1002: and object_type = 'A';
1003:
1004: l_proc varchar2(72) := g_package ||'add_evaluation';
1005: Begin
1006: hr_utility.set_location(' Entering:' || l_proc,10);
1007: open c_dflt_eval;
1008: fetch c_dflt_eval into l_eval_id, l_mand_flag;
1009: close c_dflt_eval;
1010: if l_eval_id is not null then
1018: p_event_id,
1019: 'E',
1020: 1);
1021: end if;
1022: hr_utility.set_location(' Exiting:' || l_proc,15);
1023: end add_evaluation;
1024:
1025: end OTA_EVENT_API;