[Home] [Help]
40: l_leg_code per_calendar_entries.legislation_code%TYPE;
41: l_effective_date date;
42: --
43: begin
44: hr_utility.set_location('Entering:'|| l_proc, 10);
45: --
46: -- Issue a savepoint
47: --
48: savepoint create_calendar_entry;
148: --
149: p_calendar_entry_id := l_calendar_entry_id;
150: p_object_version_number := l_object_version_number;
151: --
152: hr_utility.set_location(' Leaving:'||l_proc, 70);
153: exception
154: when hr_api.validate_enabled then
155: --
156: -- As the Validate_Enabled exception has been raised
163: -- when validation only mode is being used.)
164: --
165: p_calendar_entry_id := null;
166: p_object_version_number := null;
167: hr_utility.set_location(' Leaving:'||l_proc, 80);
168: when others then
169: --
170: -- A validation or unexpected error has occured
171: --
169: --
170: -- A validation or unexpected error has occured
171: --
172: rollback to create_calendar_entry;
173: hr_utility.set_location(' Leaving:'||l_proc, 90);
174: raise;
175: end create_calendar_entry;
176: --
177: -- ----------------------------------------------------------------------------
206: l_object_version_number per_calendar_entries.object_version_number%TYPE;
207: l_effective_date date;
208: --
209: begin
210: hr_utility.set_location('Entering:'|| l_proc, 10);
211: --
212: -- Issue a savepoint
213: --
214: savepoint update_calendar_entry;
314: -- Set all output arguments
315: --
316: p_object_version_number := l_object_version_number;
317: --
318: hr_utility.set_location(' Leaving:'||l_proc, 70);
319: exception
320: when hr_api.validate_enabled then
321: --
322: -- As the Validate_Enabled exception has been raised
327: -- Only set output warning arguments
328: -- (Any key or derived arguments must be set to null
329: -- when validation only mode is being used.)
330: --
331: hr_utility.set_location(' Leaving:'||l_proc, 80);
332: when others then
333: --
334: -- A validation or unexpected error has occured
335: --
333: --
334: -- A validation or unexpected error has occured
335: --
336: rollback to update_calendar_entry;
337: hr_utility.set_location(' Leaving:'||l_proc, 90);
338: raise;
339: end update_calendar_entry;
340: --
341: --
360: --
361: l_proc varchar2(72) := g_package||'delete_calendar_entry';
362: --
363: begin
364: hr_utility.set_location('Entering:'|| l_proc, 5);
365: --
366: -- Issue a savepoint if operating in validation only mode.
367: --
368: savepoint delete_calendar_entry;
382: );
383: end;
384: --
385: --
386: hr_utility.set_location(l_proc, 7);
387: --
388: -- First delete any entry value children
389: -- ensuring EVX are removed before EV
390: --
394: ,P_CAL_ENTRY_VALUE_ID => del_rec.CAL_ENTRY_VALUE_ID
395: ,P_OBJECT_VERSION_NUMBER => del_rec.OBJECT_VERSION_NUMBER);
396: end loop;
397:
398: hr_utility.set_location(l_proc, 8);
399:
400: -- Process Logic
401: --
402: per_ent_del.del
403: (p_calendar_entry_id => p_calendar_entry_id
404: ,p_object_version_number => p_object_version_number
405: );
406: --
407: hr_utility.set_location(l_proc, 9);
408: --
409: --
410: -- Call After Process User Hook
411: begin
426: if p_validate then
427: raise hr_api.validate_enabled;
428: end if;
429: --
430: hr_utility.set_location(' Leaving:'||l_proc, 11);
431: exception
432: when hr_api.validate_enabled then
433: --
434: -- As the Validate_Enabled exception has been raised
435: -- we must rollback to the savepoint
436: --
437: ROLLBACK TO delete_calendar_entry;
438: --
439: hr_utility.set_location(' Leaving:'||l_proc, 12);
440: --
441: when others then
442: --
443: --