68: l_form_tab_page_id number;
69: l_tab_page_property_id number;
70: l_override_value_warning boolean := FALSE;
71: begin
72: hr_utility.set_location('Entering:'|| l_proc, 10);
73: --
74: -- Issue a savepoint
75: --
76: savepoint create_form_tab_page;
85: --
86: l_language_code := p_language_code;
87: hr_api.validate_language_code(p_language_code => l_language_code);
88: --
89: hr_utility.set_location(l_proc, 20);
90: --
91: --
92: -- Call Before Process User Hook
93: --
149: --
150: IF (p_visible is not null AND p_visible_override is not null) THEN
151: l_override_value_warning := TRUE;
152: END IF;
153: hr_utility.set_location('At:'|| l_proc, 15);
154:
155: hr_ftp_ins.ins( p_effective_date => TRUNC(p_effective_date)
156: ,p_form_canvas_id => p_form_canvas_id
157: ,p_tab_page_name => p_tab_page_name
159: ,p_visible_override => p_visible_override
160: ,p_form_tab_page_id => l_form_tab_page_id
161: ,p_object_version_number => l_object_version_number);
162:
163: hr_utility.set_location('At:'|| l_proc, 20);
164:
165: hr_ftt_ins.ins_tl( p_language_code => l_language_code
166: ,p_form_tab_page_id => l_form_tab_page_id
167: ,p_user_tab_page_name => p_user_tab_page_name
166: ,p_form_tab_page_id => l_form_tab_page_id
167: ,p_user_tab_page_name => p_user_tab_page_name
168: ,p_description => p_description);
169:
170: hr_utility.set_location('At:'|| l_proc, 30);
171:
172: hr_tab_page_properties_bsi.create_tab_page_property(
173: p_effective_date => TRUNC(p_effective_date)
174: ,p_language_code => l_language_code
213:
214: --
215: -- Call After Process User Hook
216: --
217: hr_utility.set_location('At:'|| l_proc, 35);
218:
219: begin
220: hr_form_tab_pages_api_bk1.create_form_tab_page_a(
221: p_effective_date => TRUNC(p_effective_date)
274: end;
275: --
276: -- When in validation only mode raise the Validate_Enabled exception
277: --
278: hr_utility.set_location('At:'|| l_proc, 40);
279:
280: if p_validate then
281: raise hr_api.validate_enabled;
282: end if;
286: p_form_tab_page_id := l_form_tab_page_id;
287: p_object_version_number := l_object_version_number;
288: p_override_value_warning := l_override_value_warning;
289: --
290: hr_utility.set_location(' Leaving:'||l_proc, 70);
291: exception
292: when hr_api.validate_enabled then
293: --
294: -- As the Validate_Enabled exception has been raised
302: --
303: p_form_tab_page_id := null;
304: p_object_version_number := null;
305: p_override_value_warning := l_override_value_warning;
306: hr_utility.set_location(' Leaving:'||l_proc, 80);
307: when others then
308: --
309: -- A validation or unexpected error has occured
310: --
312: -- Set out parameters.
313: p_form_tab_page_id := null;
314: p_object_version_number := null;
315: p_override_value_warning := null;
316: hr_utility.set_location(' Leaving:'||l_proc, 90);
317: raise;
318: end create_form_tab_page;
319: --
320: -- ----------------------------------------------------------------------------
331: --
332:
333: l_proc varchar2(72) := g_package||'delete_form_tab_page';
334: begin
335: hr_utility.set_location('Entering:'|| l_proc, 10);
336: --
337: -- Issue a savepoint
338: --
339: savepoint delete_form_tab_page;
356:
357: --
358: -- Process Logic
359: --
360: hr_utility.set_location('At:'|| l_proc, 15);
361:
362: hr_ftp_shd.lck( p_form_tab_page_id => p_form_tab_page_id
363: ,p_object_version_number => p_object_version_number);
364:
361:
362: hr_ftp_shd.lck( p_form_tab_page_id => p_form_tab_page_id
363: ,p_object_version_number => p_object_version_number);
364:
365: hr_utility.set_location('At:'|| l_proc, 20);
366:
367: hr_tab_page_properties_bsi.delete_tab_page_property
368: (p_form_tab_page_id => p_form_tab_page_id
369: ,p_object_version_number => p_object_version_number);
367: hr_tab_page_properties_bsi.delete_tab_page_property
368: (p_form_tab_page_id => p_form_tab_page_id
369: ,p_object_version_number => p_object_version_number);
370:
371: hr_utility.set_location('At:'|| l_proc, 25);
372:
373: hr_ftt_del.del_tl( p_form_tab_page_id => p_form_tab_page_id);
374:
375: hr_utility.set_location('At:'|| l_proc, 30);
371: hr_utility.set_location('At:'|| l_proc, 25);
372:
373: hr_ftt_del.del_tl( p_form_tab_page_id => p_form_tab_page_id);
374:
375: hr_utility.set_location('At:'|| l_proc, 30);
376:
377: hr_ftp_del.del( p_form_tab_page_id => p_form_tab_page_id
378: ,p_object_version_number => p_object_version_number);
379:
376:
377: hr_ftp_del.del( p_form_tab_page_id => p_form_tab_page_id
378: ,p_object_version_number => p_object_version_number);
379:
380: hr_utility.set_location('At:'|| l_proc, 35);
381:
382: --
383: -- Call After Process User Hook
384: --
396: end;
397: --
398: -- When in validation only mode raise the Validate_Enabled exception
399: --
400: hr_utility.set_location('At:'|| l_proc, 40);
401:
402: if p_validate then
403: raise hr_api.validate_enabled;
404: end if;
402: if p_validate then
403: raise hr_api.validate_enabled;
404: end if;
405: --
406: hr_utility.set_location(' Leaving:'||l_proc, 70);
407: exception
408: when hr_api.validate_enabled then
409: --
410: -- As the Validate_Enabled exception has been raised
415: -- Only set output warning arguments
416: -- (Any key or derived arguments must be set to null
417: -- when validation only mode is being used.)
418: --
419: hr_utility.set_location(' Leaving:'||l_proc, 80);
420: when others then
421: --
422: -- A validation or unexpected error has occured
423: --
421: --
422: -- A validation or unexpected error has occured
423: --
424: rollback to delete_form_tab_page;
425: hr_utility.set_location(' Leaving:'||l_proc, 90);
426: raise;
427: end delete_form_tab_page;
428: --
429: -- ----------------------------------------------------------------------------
497: l_override_value_warning boolean := FALSE;
498:
499: l_temp_ovn number := p_object_version_number;
500: begin
501: hr_utility.set_location('Entering:'|| l_proc, 10);
502: --
503: -- Issue a savepoint
504: --
505: savepoint update_form_tab_page;
515: --
516: l_language_code := p_language_code;
517: hr_api.validate_language_code(p_language_code => l_language_code);
518: --
519: hr_utility.set_location(l_proc, 20);
520: --
521: --
522: -- Call Before Process User Hook
523: --
584: IF (l_visible is not null AND l_visible_override is not null) THEN
585: l_override_value_warning := TRUE;
586: END IF;
587:
588: hr_utility.set_location('At:'|| l_proc, 20);
589:
590: hr_ftp_upd.upd(p_effective_date => TRUNC(p_effective_date)
591: ,p_form_tab_page_id => p_form_tab_page_id
592: ,p_tab_page_name => p_tab_page_name
593: ,p_display_order => p_display_order
594: ,p_visible_override => p_visible_override
595: ,p_object_version_number => l_object_version_number);
596:
597: hr_utility.set_location('At:'|| l_proc, 25);
598:
599: hr_ftt_upd.upd_tl(p_language_code => l_language_code
600: ,p_form_tab_page_id => p_form_tab_page_id
601: ,p_user_tab_page_name => p_user_tab_page_name
600: ,p_form_tab_page_id => p_form_tab_page_id
601: ,p_user_tab_page_name => p_user_tab_page_name
602: ,p_description => p_description);
603:
604: hr_utility.set_location('At:'|| l_proc, 30);
605:
606: hr_tab_page_properties_bsi.update_tab_page_property
607: (p_effective_date => TRUNC(p_effective_date)
608: ,p_object_version_number => l_object_version_number
643: ,p_information29 => p_information29
644: ,p_information30 => p_information30);
645: --,p_override_value_warning => l_override_value_warning);
646:
647: hr_utility.set_location('At:'|| l_proc, 35);
648:
649: --
650: -- Call After Process User Hook
651: --
705: end;
706: --
707: -- When in validation only mode raise the Validate_Enabled exception
708: --
709: hr_utility.set_location('At:'|| l_proc, 40);
710:
711: if p_validate then
712: raise hr_api.validate_enabled;
713: end if;
716: --
717: p_object_version_number := l_object_version_number;
718: p_override_value_warning := l_override_value_warning;
719: --
720: hr_utility.set_location(' Leaving:'||l_proc, 70);
721: exception
722: when hr_api.validate_enabled then
723: --
724: -- As the Validate_Enabled exception has been raised
731: -- when validation only mode is being used.)
732: --
733: p_object_version_number := l_temp_ovn;
734: p_override_value_warning := l_override_value_warning;
735: hr_utility.set_location(' Leaving:'||l_proc, 80);
736: when others then
737: --
738: -- A validation or unexpected error has occured
739: --
740: rollback to update_form_tab_page;
741: -- Reset IN OUT and set OUT parameters.
742: p_object_version_number := l_temp_ovn;
743: p_override_value_warning := null;
744: hr_utility.set_location(' Leaving:'||l_proc, 90);
745: raise;
746: end update_form_tab_page;
747: --
748: end hr_form_tab_pages_api;