[Home] [Help]
3: --
4: -- Package Variables
5: --
6: g_package CONSTANT varchar2(33) := ' hr_assignment_api.';
7: g_debug boolean := hr_utility.debug_enabled;
8: --
9: ----------------------------------------------------------------------------
10: -- |----------------------< update_pgp_concat_segs >------------------------|
11: ----------------------------------------------------------------------------
68: l_group_name1 varchar2(2000); --added for bug#7601790
69: --
70: begin
71: if g_debug then
72: hr_utility.set_location('Entering:'|| l_proc, 10);
73: end if;
74: --
75: -- The outer procedure has already establish that an update is
76: -- required. This sub-procedure uses an autonomous transaction
92: if csr_pgp_lock%found then
93: close csr_pgp_lock;
94:
95: if g_debug then
96: hr_utility.set_location(l_proc, 20);
97: end if;
98:
99: --
100: -- Bug#7601790
134: rollback; -- Added for bug 3578845.
135: end if;
136: --
137: if g_debug then
138: hr_utility.set_location('Leaving:'|| l_proc, 30);
139: end if;
140:
141: Exception
142: When HR_Api.Object_Locked then
146: -- row and is performing the update. Hence the error can
147: -- be suppressed without raising it to the end user.
148: --
149: rollback; -- Added for bug 3578845.
150: hr_utility.set_location('Leaving:'|| l_proc, 40);
151: end update_pgp_concat_segs_auto;
152: begin
153: --
154: if g_debug then
151: end update_pgp_concat_segs_auto;
152: begin
153: --
154: if g_debug then
155: hr_utility.set_location('Entering:'|| l_proc, 10);
156: end if;
157: --
158: -- First find out if it is necessary to update the concatenated
159: -- segment string column. This select is being done to avoid the
173: close csr_chk_pgp;
174: end if;
175: --
176: if g_debug then
177: hr_utility.set_location('Leaving:'|| l_proc, 20);
178: end if;
179: --
180: end update_pgp_concat_segs;
181: --
295:
296: --start changes for bug 7217475
297: --
298: -- hr_multi_message.enable_message_list;
299: hr_utility.set_location('Entering:'|| l_proc, 10);
300:
301: --
302: open csr_chk_bg_exists;
303: fetch csr_chk_bg_exists into l_bg_exists;
301: --
302: open csr_chk_bg_exists;
303: fetch csr_chk_bg_exists into l_bg_exists;
304: if csr_chk_bg_exists%notfound then
305: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
306: hr_utility.raise_error;
307: end if;
308: close csr_chk_bg_exists;
309: --
302: open csr_chk_bg_exists;
303: fetch csr_chk_bg_exists into l_bg_exists;
304: if csr_chk_bg_exists%notfound then
305: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
306: hr_utility.raise_error;
307: end if;
308: close csr_chk_bg_exists;
309: --
310: hr_utility.set_location('reverse_term_apln_fut - p_business_group_id:'|| p_business_group_id, 10);
306: hr_utility.raise_error;
307: end if;
308: close csr_chk_bg_exists;
309: --
310: hr_utility.set_location('reverse_term_apln_fut - p_business_group_id:'|| p_business_group_id, 10);
311:
312: --
313: open csr_chk_person_exists;
314: fetch csr_chk_person_exists into l_person_exists;
312: --
313: open csr_chk_person_exists;
314: fetch csr_chk_person_exists into l_person_exists;
315: if csr_chk_person_exists%notfound then
316: hr_utility.set_message(800,'HR_52786_SUC_CHK_PERSON_EXISTS');
317: hr_utility.raise_error;
318: end if;
319: close csr_chk_person_exists;
320: --
313: open csr_chk_person_exists;
314: fetch csr_chk_person_exists into l_person_exists;
315: if csr_chk_person_exists%notfound then
316: hr_utility.set_message(800,'HR_52786_SUC_CHK_PERSON_EXISTS');
317: hr_utility.raise_error;
318: end if;
319: close csr_chk_person_exists;
320: --
321: hr_utility.set_location('reverse_term_apln_fut - p_person_id:'|| p_person_id, 10);
317: hr_utility.raise_error;
318: end if;
319: close csr_chk_person_exists;
320: --
321: hr_utility.set_location('reverse_term_apln_fut - p_person_id:'|| p_person_id, 10);
322:
323: --
324: open csr_chk_asg_exists;
325: fetch csr_chk_asg_exists into l_asg_exists;
323: --
324: open csr_chk_asg_exists;
325: fetch csr_chk_asg_exists into l_asg_exists;
326: if csr_chk_asg_exists%notfound then
327: hr_utility.set_message(801,'HR_52360_ASG_DOES_NOT_EXIST');
328: hr_utility.raise_error;
329: end if;
330: close csr_chk_asg_exists;
331: --
324: open csr_chk_asg_exists;
325: fetch csr_chk_asg_exists into l_asg_exists;
326: if csr_chk_asg_exists%notfound then
327: hr_utility.set_message(801,'HR_52360_ASG_DOES_NOT_EXIST');
328: hr_utility.raise_error;
329: end if;
330: close csr_chk_asg_exists;
331: --
332:
329: end if;
330: close csr_chk_asg_exists;
331: --
332:
333: hr_utility.set_location('reverse_term_apln_fut - p_assignment_id:'|| p_assignment_id, 10);
334:
335: --
336: if p_status_change_reason is not null then
337: if hr_api.not_exists_in_dt_hr_lookups
341: ,p_lookup_type => 'APL_ASSIGN_REASON'
342: ,p_lookup_code => p_status_change_reason
343: )
344: then
345: hr_utility.set_message(801, 'HR_51229_ASG_INV_AASG_CH_REAS');
346: hr_utility.raise_error;
347: end if;
348: end if;
349: --
342: ,p_lookup_code => p_status_change_reason
343: )
344: then
345: hr_utility.set_message(801, 'HR_51229_ASG_INV_AASG_CH_REAS');
346: hr_utility.raise_error;
347: end if;
348: end if;
349: --
350:
362:
363:
364: --fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
365: --fnd_message.raise_error ;
366: -- hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
367: -- hr_utility.raise_error ;
368: --fnd_message.set_token('ATTRIBUTE_NAME','ERROR');
369: -- hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
370: -- , p_message_type => hr_multi_message.g_error_msg);
363:
364: --fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
365: --fnd_message.raise_error ;
366: -- hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
367: -- hr_utility.raise_error ;
368: --fnd_message.set_token('ATTRIBUTE_NAME','ERROR');
369: -- hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
370: -- , p_message_type => hr_multi_message.g_error_msg);
371:
370: -- , p_message_type => hr_multi_message.g_error_msg);
371:
372:
373:
374: hr_utility.set_location('reverse_term_apln_fut - p_effective_date:'|| p_effective_date, 10);
375: hr_utility.set_location('reverse_term_apln_fut - l_date_end:'|| l_date_end, 10);
376:
377:
378: select effective_start_date, effective_end_date,object_version_number into l_asg_start_date,l_asg_end_date,l_ovn
371:
372:
373:
374: hr_utility.set_location('reverse_term_apln_fut - p_effective_date:'|| p_effective_date, 10);
375: hr_utility.set_location('reverse_term_apln_fut - l_date_end:'|| l_date_end, 10);
376:
377:
378: select effective_start_date, effective_end_date,object_version_number into l_asg_start_date,l_asg_end_date,l_ovn
379: from per_all_assignments_f
381: and effective_end_date = (select max(effective_end_date)
382: from per_all_assignments_f
383: where assignment_id = p_assignment_id );
384:
385: hr_utility.set_location('reverse_term_apln_fut - l_asg_end_date:'|| l_asg_end_date, 20);
386:
387: select assignment_status_type_id into l_assignment_status_id
388: from per_all_assignments_f
389: where assignment_id = p_assignment_id
388: from per_all_assignments_f
389: where assignment_id = p_assignment_id
390: and effective_end_date = l_asg_end_date ;
391:
392: hr_utility.set_location('reverse_term_apln_fut - l_assignment_status_id:'|| l_assignment_status_id, 30);
393:
394: if l_date_end is null then
395: -- then the person is currently an Applicant with any flavour of persontype
396: hr_utility.set_location('reverse_term_apln_fut - Entering:'|| l_proc, 40);
392: hr_utility.set_location('reverse_term_apln_fut - l_assignment_status_id:'|| l_assignment_status_id, 30);
393:
394: if l_date_end is null then
395: -- then the person is currently an Applicant with any flavour of persontype
396: hr_utility.set_location('reverse_term_apln_fut - Entering:'|| l_proc, 40);
397: open c2;
398: fetch c2 into l_dummy;
399: if c2%found then
400: close c2 ;
404: close c2;
405: -- make the data in the other tables ( namely tax records , secondary assignments statuses , letter requests )
406: --to be in sync with the assignments data
407:
408: hr_utility.set_location('Entering:'|| l_proc, 50);
409: hr_assignment.tidy_up_ref_int ( p_assignment_id,
410: 'FUTURE',
411: null,
412: l_asg_end_date,
415: l_cost_warning ) ;
416: -- clean up the letter requests.
417: per_app_asg_pkg.cleanup_letters
418: (p_assignment_id => p_assignment_id);
419: hr_utility.set_location('Entering:'|| l_proc, 60);
420:
421: -- calling the IRC packages to maintain the IRC Assignment Statuses
422:
423:
441: p_validation_start_date =>l_validation_start_date,
442: p_validation_end_date => l_validation_end_date);
443:
444:
445: hr_utility.set_location('Entering:'|| l_proc, 70);
446:
447: update per_all_assignments_f
448: set effective_end_date = l_eot
449: where assignment_id = p_assignment_id
450: and person_id=p_person_id
451: and business_group_id= p_business_group_id
452: and effective_end_date = l_asg_end_date;
453:
454: hr_utility.set_location(' Leaving : '||l_proc ,80);
455:
456:
457: else -- CASE 2
458:
455:
456:
457: else -- CASE 2
458:
459: hr_utility.set_location('Entering:'|| l_proc, 90);
460:
461: -- Person is currently an Ex-Applicant with any falvour of Person Type
462: -- Check if the person is currently hired as Emp with that Assignment if so raise an error
463:
464: PER_APPLICATIONS_PKG .cancel_chk_current_emp(p_person_id => p_person_id ,
465: p_business_group_id => p_business_group_id ,
466: p_date_end => l_date_end );
467:
468: hr_utility.set_location('Entering:'|| l_proc, 100);
469:
470: --Check for Future Person type changes
471: -- throw error when EMP or CWK person type is found in the future
472:
473: open c3(l_date_end) ;
474: fetch c3 into l_dummy ;
475: if c3%found then
476: close c3 ;
477: hr_utility.set_location('Entering:'|| l_proc, 105);
478: fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
479: hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
480: hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
481: , p_message_type => hr_multi_message.g_error_msg);
475: if c3%found then
476: close c3 ;
477: hr_utility.set_location('Entering:'|| l_proc, 105);
478: fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
479: hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
480: hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
481: , p_message_type => hr_multi_message.g_error_msg);
482:
483: hr_utility.raise_error ;
479: hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
480: hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
481: , p_message_type => hr_multi_message.g_error_msg);
482:
483: hr_utility.raise_error ;
484: end if;
485: close c3 ;
486:
487: hr_utility.set_location('Entering:'|| l_proc, 110);
483: hr_utility.raise_error ;
484: end if;
485: close c3 ;
486:
487: hr_utility.set_location('Entering:'|| l_proc, 110);
488:
489: -- Maintain the Person data by deleting the Ex-Appl Record and the same with PTU Data.
490:
491: DELETE FROM per_all_people_f papf
493: AND papf.business_group_id + 0 = p_Business_group_id
494: AND papf.effective_start_date > l_date_end;
495: --
496:
497: hr_utility.set_location('reverse_term_apln_fut - l_date_end:'|| l_date_end, 120);
498:
499: UPDATE per_all_people_f papf
500: SET papf.effective_end_date = l_eot
501: WHERE papf.person_id = p_person_id
501: WHERE papf.person_id = p_person_id
502: AND papf.BUSINESS_GROUP_ID + 0 = p_Business_group_id
503: AND papf.effective_end_date = l_date_end;
504:
505: hr_utility.set_location('Entering:'|| l_proc, 130);
506:
507: hr_utility.set_location('reverse_term_apln_fut - l_date_recieved:'|| l_date_recieved, 140);
508: hr_utility.set_location('reverse_term_apln_fut - l_application_id:'|| l_application_id, 140);
509:
503: AND papf.effective_end_date = l_date_end;
504:
505: hr_utility.set_location('Entering:'|| l_proc, 130);
506:
507: hr_utility.set_location('reverse_term_apln_fut - l_date_recieved:'|| l_date_recieved, 140);
508: hr_utility.set_location('reverse_term_apln_fut - l_application_id:'|| l_application_id, 140);
509:
510:
511: for ex_apl_rec in csr_ptu_row (l_date_recieved)
504:
505: hr_utility.set_location('Entering:'|| l_proc, 130);
506:
507: hr_utility.set_location('reverse_term_apln_fut - l_date_recieved:'|| l_date_recieved, 140);
508: hr_utility.set_location('reverse_term_apln_fut - l_application_id:'|| l_application_id, 140);
509:
510:
511: for ex_apl_rec in csr_ptu_row (l_date_recieved)
512: loop
531: set effective_end_date = l_max_ptu_end_date
532: where l_date_recieved between effective_start_date and effective_end_date
533: and person_type_id = l_apl_person_type_id;
534:
535: hr_utility.set_location('At reverse_term_apln_fut',150);
536:
537: delete from per_person_type_usages_f
538: where effective_start_date > l_date_recieved
539: and person_type_id = l_apl_person_type_id;
538: where effective_start_date > l_date_recieved
539: and person_type_id = l_apl_person_type_id;
540: -- merging PTU APL data
541:
542: hr_utility.set_location('Entering:'|| l_proc, 160);
543: hr_utility.set_location('At reverse_term_apln_fut',160);
544:
545: -- Make a call to the IRC packages to maintain the IRC Assignment Statuses hr_utility.set_location('PER_APPLICATIONS_PKG.maintain_irc_ass_status', 30);
546:
539: and person_type_id = l_apl_person_type_id;
540: -- merging PTU APL data
541:
542: hr_utility.set_location('Entering:'|| l_proc, 160);
543: hr_utility.set_location('At reverse_term_apln_fut',160);
544:
545: -- Make a call to the IRC packages to maintain the IRC Assignment Statuses hr_utility.set_location('PER_APPLICATIONS_PKG.maintain_irc_ass_status', 30);
546:
547: irc_asg_status_api.create_irc_asg_status
541:
542: hr_utility.set_location('Entering:'|| l_proc, 160);
543: hr_utility.set_location('At reverse_term_apln_fut',160);
544:
545: -- Make a call to the IRC packages to maintain the IRC Assignment Statuses hr_utility.set_location('PER_APPLICATIONS_PKG.maintain_irc_ass_status', 30);
546:
547: irc_asg_status_api.create_irc_asg_status
548: (p_validate => FALSE,
549: p_assignment_id => p_assignment_id,
552: p_assignment_status_id => l_asg_status_id,
553: p_object_version_number => l_object_version_number,
554: p_status_change_reason => p_status_change_reason);
555:
556: hr_utility.set_location('Entering:'|| l_proc, 170);
557: hr_utility.set_location('At reverse_term_apln_fut',170);
558: -- make the data in the other tables ( namely tax records , secondary assignments statuses , letter requests )
559: --to be in sync with the assignments data
560:
553: p_object_version_number => l_object_version_number,
554: p_status_change_reason => p_status_change_reason);
555:
556: hr_utility.set_location('Entering:'|| l_proc, 170);
557: hr_utility.set_location('At reverse_term_apln_fut',170);
558: -- make the data in the other tables ( namely tax records , secondary assignments statuses , letter requests )
559: --to be in sync with the assignments data
560:
561: hr_assignment.tidy_up_ref_int ( p_assignment_id,
565: null,
566: null,
567: l_cost_warning ) ;
568: -- clean up the letter requests.
569: hr_utility.set_location('Entering:'|| l_proc, 180);
570: hr_utility.set_location('At reverse_term_apln_fut',180);
571:
572: per_app_asg_pkg.cleanup_letters
573: (p_assignment_id => p_assignment_id);
566: null,
567: l_cost_warning ) ;
568: -- clean up the letter requests.
569: hr_utility.set_location('Entering:'|| l_proc, 180);
570: hr_utility.set_location('At reverse_term_apln_fut',180);
571:
572: per_app_asg_pkg.cleanup_letters
573: (p_assignment_id => p_assignment_id);
574:
576: SET date_end =null
577: where APPLICATION_ID =l_application_id
578: and person_id= p_person_id ;
579:
580: hr_utility.set_location('AT REV TERM APL FUTURE',183);
581:
582: -- update the future asgs with the application ID
583: for apl in future_apl(l_date_recieved)
584: loop
589: and application_id =apl.application_id
590: and effective_start_date >= apl.date_received
591: and assignment_type = 'A';
592:
593: hr_utility.set_location('AT REV TERM APL FUTURE',185);
594:
595: per_applications_pkg.delete_row(apl.rowid);
596:
597: end loop;
595: per_applications_pkg.delete_row(apl.rowid);
596:
597: end loop;
598:
599: hr_utility.set_location('At reverse_term_apln_fut',188);
600:
601: -- now update the assignments table
602:
603: update per_all_assignments_f
606: and person_id=p_person_id
607: and business_group_id= p_business_group_id
608: and effective_end_date = l_asg_end_date;
609:
610: hr_utility.set_location('Entering:'|| l_proc, 190);
611: end if;
612: close c1;
613: p_return_status := hr_multi_message.get_return_status_disable;
614: EXCEPTION
615:
616: when hr_multi_message.error_message_exist then
617:
618: p_return_status:='E';
619: hr_utility.set_location(' Leaving:' || l_proc, 30);
620: when others then
621: if c1%isopen then
622: close c1;
623: end if;
621: if c1%isopen then
622: close c1;
623: end if;
624: p_return_status:='E';
625: hr_utility.set_location('Entering:'|| l_proc, 200);
626: raise; --uncommented for bug 7217475
627: end;
628: -- ER FPT
629:
759:
760: --start changes for bug 7217475
761: --
762: -- hr_multi_message.enable_message_list;
763: hr_utility.set_location('Entering:'|| l_proc, 10);
764:
765: --
766: open csr_chk_bg_exists;
767: fetch csr_chk_bg_exists into l_bg_exists;
765: --
766: open csr_chk_bg_exists;
767: fetch csr_chk_bg_exists into l_bg_exists;
768: if csr_chk_bg_exists%notfound then
769: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
770: hr_utility.raise_error;
771: end if;
772: close csr_chk_bg_exists;
773: --
766: open csr_chk_bg_exists;
767: fetch csr_chk_bg_exists into l_bg_exists;
768: if csr_chk_bg_exists%notfound then
769: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
770: hr_utility.raise_error;
771: end if;
772: close csr_chk_bg_exists;
773: --
774: hr_utility.set_location('REVERSE_TERM_APLN - p_business_group_id:'|| p_business_group_id, 10);
770: hr_utility.raise_error;
771: end if;
772: close csr_chk_bg_exists;
773: --
774: hr_utility.set_location('REVERSE_TERM_APLN - p_business_group_id:'|| p_business_group_id, 10);
775:
776: --
777: open csr_chk_person_exists;
778: fetch csr_chk_person_exists into l_person_exists;
776: --
777: open csr_chk_person_exists;
778: fetch csr_chk_person_exists into l_person_exists;
779: if csr_chk_person_exists%notfound then
780: hr_utility.set_message(800,'HR_52786_SUC_CHK_PERSON_EXISTS');
781: hr_utility.raise_error;
782: end if;
783: close csr_chk_person_exists;
784: --
777: open csr_chk_person_exists;
778: fetch csr_chk_person_exists into l_person_exists;
779: if csr_chk_person_exists%notfound then
780: hr_utility.set_message(800,'HR_52786_SUC_CHK_PERSON_EXISTS');
781: hr_utility.raise_error;
782: end if;
783: close csr_chk_person_exists;
784: --
785: hr_utility.set_location('REVERSE_TERM_APLN - p_person_id:'|| p_person_id, 10);
781: hr_utility.raise_error;
782: end if;
783: close csr_chk_person_exists;
784: --
785: hr_utility.set_location('REVERSE_TERM_APLN - p_person_id:'|| p_person_id, 10);
786:
787: --
788: open csr_chk_asg_exists;
789: fetch csr_chk_asg_exists into l_asg_exists;
787: --
788: open csr_chk_asg_exists;
789: fetch csr_chk_asg_exists into l_asg_exists;
790: if csr_chk_asg_exists%notfound then
791: hr_utility.set_message(801,'HR_52360_ASG_DOES_NOT_EXIST');
792: hr_utility.raise_error;
793: end if;
794: close csr_chk_asg_exists;
795: --
788: open csr_chk_asg_exists;
789: fetch csr_chk_asg_exists into l_asg_exists;
790: if csr_chk_asg_exists%notfound then
791: hr_utility.set_message(801,'HR_52360_ASG_DOES_NOT_EXIST');
792: hr_utility.raise_error;
793: end if;
794: close csr_chk_asg_exists;
795: --
796:
793: end if;
794: close csr_chk_asg_exists;
795: --
796:
797: hr_utility.set_location('REVERSE_TERM_APLN - p_assignment_id:'|| p_assignment_id, 10);
798:
799: --
800: if p_status_change_reason is not null then
801: if hr_api.not_exists_in_dt_hr_lookups
805: ,p_lookup_type => 'APL_ASSIGN_REASON'
806: ,p_lookup_code => p_status_change_reason
807: )
808: then
809: hr_utility.set_message(801, 'HR_51229_ASG_INV_AASG_CH_REAS');
810: hr_utility.raise_error;
811: end if;
812: end if;
813: --
806: ,p_lookup_code => p_status_change_reason
807: )
808: then
809: hr_utility.set_message(801, 'HR_51229_ASG_INV_AASG_CH_REAS');
810: hr_utility.raise_error;
811: end if;
812: end if;
813: --
814:
826:
827:
828: --fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
829: --fnd_message.raise_error ;
830: -- hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
831: -- hr_utility.raise_error ;
832: --fnd_message.set_token('ATTRIBUTE_NAME','ERROR');
833: -- hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
834: -- , p_message_type => hr_multi_message.g_error_msg);
827:
828: --fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
829: --fnd_message.raise_error ;
830: -- hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
831: -- hr_utility.raise_error ;
832: --fnd_message.set_token('ATTRIBUTE_NAME','ERROR');
833: -- hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
834: -- , p_message_type => hr_multi_message.g_error_msg);
835:
834: -- , p_message_type => hr_multi_message.g_error_msg);
835:
836:
837:
838: hr_utility.set_location('REVERSE_TERM_APLN - p_effective_date:'|| p_effective_date, 10);
839: hr_utility.set_location('REVERSE_TERM_APLN - l_date_end:'|| l_date_end, 10);
840:
841:
842: select effective_start_date, effective_end_date,object_version_number into l_asg_start_date,l_asg_end_date,l_ovn
835:
836:
837:
838: hr_utility.set_location('REVERSE_TERM_APLN - p_effective_date:'|| p_effective_date, 10);
839: hr_utility.set_location('REVERSE_TERM_APLN - l_date_end:'|| l_date_end, 10);
840:
841:
842: select effective_start_date, effective_end_date,object_version_number into l_asg_start_date,l_asg_end_date,l_ovn
843: from per_all_assignments_f
845: and effective_end_date = (select max(effective_end_date)
846: from per_all_assignments_f
847: where assignment_id = p_assignment_id );
848:
849: hr_utility.set_location('REVERSE_TERM_APLN - l_asg_end_date:'|| l_asg_end_date, 20);
850:
851: select assignment_status_type_id into l_assignment_status_id
852: from per_all_assignments_f
853: where assignment_id = p_assignment_id
852: from per_all_assignments_f
853: where assignment_id = p_assignment_id
854: and effective_end_date = l_asg_end_date ;
855:
856: hr_utility.set_location('REVERSE_TERM_APLN - l_assignment_status_id:'|| l_assignment_status_id, 30);
857:
858: if l_date_end is null then
859: -- then the person is currently an Applicant with any flavour of persontype
860: hr_utility.set_location('REVERSE_TERM_APLN - Entering:'|| l_proc, 40);
856: hr_utility.set_location('REVERSE_TERM_APLN - l_assignment_status_id:'|| l_assignment_status_id, 30);
857:
858: if l_date_end is null then
859: -- then the person is currently an Applicant with any flavour of persontype
860: hr_utility.set_location('REVERSE_TERM_APLN - Entering:'|| l_proc, 40);
861: open c2;
862: fetch c2 into l_dummy;
863: if c2%found then
864: close c2 ;
868: close c2;
869: -- make the data in the other tables ( namely tax records , secondary assignments statuses , letter requests )
870: --to be in sync with the assignments data
871:
872: hr_utility.set_location('Entering:'|| l_proc, 50);
873: hr_assignment.tidy_up_ref_int ( p_assignment_id,
874: 'FUTURE',
875: null,
876: l_asg_end_date,
879: l_cost_warning ) ;
880: -- clean up the letter requests.
881: per_app_asg_pkg.cleanup_letters
882: (p_assignment_id => p_assignment_id);
883: hr_utility.set_location('Entering:'|| l_proc, 60);
884:
885: -- calling the IRC packages to maintain the IRC Assignment Statuses
886:
887:
905: p_validation_start_date =>l_validation_start_date,
906: p_validation_end_date => l_validation_end_date);
907:
908:
909: hr_utility.set_location('Entering:'|| l_proc, 70);
910:
911: update per_all_assignments_f
912: set effective_end_date = l_eot
913: where assignment_id = p_assignment_id
914: and person_id=p_person_id
915: and business_group_id= p_business_group_id
916: and effective_end_date = l_asg_end_date;
917:
918: hr_utility.set_location(' Leaving : '||l_proc ,80);
919:
920:
921: else -- CASE 2
922:
919:
920:
921: else -- CASE 2
922:
923: hr_utility.set_location('Entering:'|| l_proc, 90);
924:
925: -- Person is currently an Ex-Applicant with any falvour of Person Type
926: -- Check if the person is currently hired as Emp with that Assignment if so raise an error
927:
928: PER_APPLICATIONS_PKG .cancel_chk_current_emp(p_person_id => p_person_id ,
929: p_business_group_id => p_business_group_id ,
930: p_date_end => l_date_end );
931:
932: hr_utility.set_location('Entering:'|| l_proc, 100);
933:
934: --Check for Future Person type changes
935:
936: open c3(l_date_end) ;
938: if c3%found then
939: close c3 ;
940: -- ER FPT
941: if (nvl(fnd_profile.value('HR_ALLOW_FPT_UPDATES'),'N') = 'Y') then
942: hr_utility.set_location('Calling reverse_term_apln_fut', 105);
943: reverse_term_apln_fut ( p_effective_date
944: ,p_business_group_id
945: ,p_assignment_id
946: ,p_person_id
948: ,p_return_status);
949: return;
950: else
951: fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
952: hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
953: hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
954: ,p_message_type => hr_multi_message.g_error_msg);
955: hr_utility.raise_error ;
956: end if;
951: fnd_message.set_name ( 'PER', 'HR_6385_APP_TERM_FUT_CHANGES' );
952: hr_utility.set_message(801,'HR_6385_APP_TERM_FUT_CHANGES' );
953: hr_multi_message.add (p_associated_column1 => 'ATTR_NAME'
954: ,p_message_type => hr_multi_message.g_error_msg);
955: hr_utility.raise_error ;
956: end if;
957: -- ER FPT
958: end if;
959: close c3 ;
957: -- ER FPT
958: end if;
959: close c3 ;
960:
961: hr_utility.set_location('Entering:'|| l_proc, 110);
962:
963: -- Maintain the Person data by deleting the Ex-Appl Record and the same with PTU Data.
964:
965: DELETE FROM per_all_people_f papf
967: AND papf.business_group_id + 0 = p_Business_group_id
968: AND papf.effective_start_date = l_date_end + 1;
969: --
970:
971: hr_utility.set_location('REVERSE_TERM_APLN - l_date_end:'|| l_date_end, 120);
972:
973: UPDATE per_all_people_f papf
974: SET papf.effective_end_date = l_eot
975: WHERE papf.person_id = p_person_id
975: WHERE papf.person_id = p_person_id
976: AND papf.BUSINESS_GROUP_ID + 0 = p_Business_group_id
977: AND papf.effective_end_date = l_date_end;
978:
979: hr_utility.set_location('Entering:'|| l_proc, 130);
980:
981: hr_utility.set_location('REVERSE_TERM_APLN - l_date_recieved:'|| l_date_recieved, 140);
982: hr_utility.set_location('REVERSE_TERM_APLN - l_application_id:'|| l_application_id, 140);
983:
977: AND papf.effective_end_date = l_date_end;
978:
979: hr_utility.set_location('Entering:'|| l_proc, 130);
980:
981: hr_utility.set_location('REVERSE_TERM_APLN - l_date_recieved:'|| l_date_recieved, 140);
982: hr_utility.set_location('REVERSE_TERM_APLN - l_application_id:'|| l_application_id, 140);
983:
984: open csr_ptu_row (l_date_recieved );
985: fetch csr_ptu_row into l_ptu_date_end;
978:
979: hr_utility.set_location('Entering:'|| l_proc, 130);
980:
981: hr_utility.set_location('REVERSE_TERM_APLN - l_date_recieved:'|| l_date_recieved, 140);
982: hr_utility.set_location('REVERSE_TERM_APLN - l_application_id:'|| l_application_id, 140);
983:
984: open csr_ptu_row (l_date_recieved );
985: fetch csr_ptu_row into l_ptu_date_end;
986: close csr_ptu_row;
984: open csr_ptu_row (l_date_recieved );
985: fetch csr_ptu_row into l_ptu_date_end;
986: close csr_ptu_row;
987:
988: hr_utility.set_location('REVERSE_TERM_APLN - l_ptu_date_end:'|| l_ptu_date_end, 150);
989:
990: hr_per_type_usage_internal.cancel_person_type_usage
991: (
992: p_effective_date => l_ptu_date_end
993: ,p_person_id => p_person_id
994: ,p_system_person_type => 'EX_APL'
995: );
996:
997: hr_utility.set_location('Entering:'|| l_proc, 160);
998:
999: -- Make a call to the IRC packages to maintain the IRC Assignment Statuses hr_utility.set_location('PER_APPLICATIONS_PKG.maintain_irc_ass_status', 30);
1000:
1001: irc_asg_status_api.create_irc_asg_status
995: );
996:
997: hr_utility.set_location('Entering:'|| l_proc, 160);
998:
999: -- Make a call to the IRC packages to maintain the IRC Assignment Statuses hr_utility.set_location('PER_APPLICATIONS_PKG.maintain_irc_ass_status', 30);
1000:
1001: irc_asg_status_api.create_irc_asg_status
1002: (p_validate => FALSE,
1003: p_assignment_id => p_assignment_id,
1006: p_assignment_status_id => l_asg_status_id,
1007: p_object_version_number => l_object_version_number,
1008: p_status_change_reason => p_status_change_reason);
1009:
1010: hr_utility.set_location('Entering:'|| l_proc, 170);
1011:
1012: -- make the data in the other tables ( namely tax records , secondary assignments statuses , letter requests )
1013: --to be in sync with the assignments data
1014:
1019: null,
1020: null,
1021: l_cost_warning ) ;
1022: -- clean up the letter requests.
1023: hr_utility.set_location('Entering:'|| l_proc, 180);
1024:
1025: per_app_asg_pkg.cleanup_letters
1026: (p_assignment_id => p_assignment_id);
1027:
1047: and person_id=p_person_id
1048: and business_group_id= p_business_group_id
1049: and effective_end_date = l_asg_end_date;
1050:
1051: hr_utility.set_location('Entering:'|| l_proc, 190);
1052: end if;
1053: close c1;
1054: p_return_status := hr_multi_message.get_return_status_disable;
1055: EXCEPTION
1056:
1057: when hr_multi_message.error_message_exist then
1058:
1059: p_return_status:='E';
1060: hr_utility.set_location(' Leaving:' || l_proc, 30);
1061: when others then
1062: if c1%isopen then
1063: close c1;
1064: end if;
1062: if c1%isopen then
1063: close c1;
1064: end if;
1065: p_return_status:='E';
1066: hr_utility.set_location('Entering:'|| l_proc, 200);
1067: raise; --uncommented for bug 7217475
1068: end;
1069: --
1070: --
1130: l_proc varchar2(72) := g_package||'update_scl_concat_segs_auto';
1131: --
1132: begin
1133: if g_debug then
1134: hr_utility.set_location('Entering:'|| l_proc, 10);
1135: end if;
1136: --
1137: -- The outer procedure has already establish that an update is
1138: -- required. This sub-procedure uses an autonomous transaction
1154: if csr_scl_lock%found then
1155: close csr_scl_lock;
1156:
1157: if g_debug then
1158: hr_utility.set_location(l_proc, 20);
1159: end if;
1160: --
1161: -- Lock obtained by this transaction, updating the concatenated
1162: -- segment string should be performed.
1180: rollback; -- Added for bug 3578845.
1181: end if;
1182: --
1183: if g_debug then
1184: hr_utility.set_location('Leaving:'|| l_proc, 30);
1185: end if;
1186:
1187: Exception
1188: When HR_Api.Object_Locked then
1192: -- row and is performing the update. Hence the error can
1193: -- be suppressed without raising it to the end user.
1194: --
1195: rollback; -- Added for bug 3578845.
1196: hr_utility.set_location('Leaving:'|| l_proc, 40);
1197: end update_scl_concat_segs_auto;
1198: begin
1199: --
1200: if g_debug then
1197: end update_scl_concat_segs_auto;
1198: begin
1199: --
1200: if g_debug then
1201: hr_utility.set_location('Entering:'|| l_proc, 10);
1202: end if;
1203: --
1204: -- First find out if it is necessary to update the concatenated
1205: -- segment string column. This select is being done to avoid the
1219: close csr_chk_scl;
1220: end if;
1221: --
1222: if g_debug then
1223: hr_utility.set_location('Leaving:'|| l_proc, 20);
1224: end if;
1225: --
1226: end update_scl_concat_segs;
1227: -----------------------------------------------------------------------
1390:
1391: BEGIN
1392:
1393: if g_debug then
1394: hr_utility.set_location('Entering:'|| l_proc, 5);
1395: end if;
1396:
1397: l_old_conc_segments:=p_concat_segments;
1398:
1445: close c_scl_segments;
1446: else
1447: l_scl_null_ind := 0;
1448: if g_debug then
1449: hr_utility.set_location(l_proc, 16);
1450: end if;
1451: end if;
1452:
1453:
1459: fetch csr_get_soft_coding_keyflex into l_soft_coding_keyflex_id;
1460:
1461:
1462: if g_debug then
1463: hr_utility.set_location('SCL ID' ||l_soft_coding_keyflex_id, 10);
1464: end if;
1465: --
1466: if csr_get_soft_coding_keyflex%NOTFOUND then
1467: close csr_get_soft_coding_keyflex;
1464: end if;
1465: --
1466: if csr_get_soft_coding_keyflex%NOTFOUND then
1467: close csr_get_soft_coding_keyflex;
1468: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1469: hr_utility.raise_error;
1470: --
1471: -- Start of Fix for bug 2643451
1472: --
1465: --
1466: if csr_get_soft_coding_keyflex%NOTFOUND then
1467: close csr_get_soft_coding_keyflex;
1468: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1469: hr_utility.raise_error;
1470: --
1471: -- Start of Fix for bug 2643451
1472: --
1473: else
1531: open csr_scl_idsel;
1532: fetch csr_scl_idsel into l_flex_num;
1533:
1534: if g_debug then
1535: hr_utility.set_location('SCL_ID_SEL'||l_flex_num, 10);
1536: end if;
1537: --
1538: if csr_scl_idsel%NOTFOUND then
1539: close csr_scl_idsel;
1570: or l_scl_segment30 is not null
1571: or p_concat_segments is not null
1572: then
1573: --
1574: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1575: hr_utility.set_message_token('PROCEDURE', l_proc);
1576: hr_utility.set_message_token('STEP','6');
1577: hr_utility.raise_error;
1578: end if;
1571: or p_concat_segments is not null
1572: then
1573: --
1574: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1575: hr_utility.set_message_token('PROCEDURE', l_proc);
1576: hr_utility.set_message_token('STEP','6');
1577: hr_utility.raise_error;
1578: end if;
1579: else -- csr_scl_idsel is found
1572: then
1573: --
1574: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1575: hr_utility.set_message_token('PROCEDURE', l_proc);
1576: hr_utility.set_message_token('STEP','6');
1577: hr_utility.raise_error;
1578: end if;
1579: else -- csr_scl_idsel is found
1580: close csr_scl_idsel;
1573: --
1574: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1575: hr_utility.set_message_token('PROCEDURE', l_proc);
1576: hr_utility.set_message_token('STEP','6');
1577: hr_utility.raise_error;
1578: end if;
1579: else -- csr_scl_idsel is found
1580: close csr_scl_idsel;
1581: --
1625: --
1626: -- update the combinations column
1627: --
1628: if g_debug then
1629: hr_utility.set_location(l_proc, 17);
1630: end if;
1631: update_scl_concat_segs
1632: (p_soft_coding_keyflex_id => l_soft_coding_keyflex_id
1633: ,p_concatenated_segments => l_concatenated_segments
1751: BEGIN
1752: --
1753: if g_debug then
1754: l_proc := g_package||'last_apl_asg';
1755: hr_utility.set_location('Entering:'||l_proc,10);
1756: end if;
1757: --
1758: -- If another applicant assignment exists on this date
1759: -- then this is NOT the last applicant assignment
1766: l_last_apl_asg := csr_last_apl_asg%NOTFOUND;
1767: CLOSE csr_last_apl_asg;
1768: --
1769: if g_debug then
1770: hr_utility.set_location(' Leaving:'||l_proc,10);
1771: end if;
1772: --
1773: RETURN(l_last_apl_asg);
1774: --
1815: --
1816: begin
1817: if g_debug then
1818: l_proc := g_package||'activate_emp_asg';
1819: hr_utility.set_location('Entering:'|| l_proc, 5);
1820: end if;
1821: --
1822: --
1823: l_object_version_number := p_object_version_number;
1831: --
1832: savepoint activate_emp_asg;
1833: --
1834: if g_debug then
1835: hr_utility.set_location(l_proc, 10);
1836: end if;
1837: --
1838: -- Validation in addition to Table Handlers
1839: --
1875: ,p_effective_end_date => l_effective_end_date
1876: );
1877: --
1878: if g_debug then
1879: hr_utility.set_location(l_proc, 20);
1880: end if;
1881: --
1882: -- Start of API User Hook for the after hook of activate_emp_asg.
1883: --
1915: p_effective_start_date := l_effective_start_date;
1916: p_effective_end_date := l_effective_end_date;
1917: --
1918: if g_debug then
1919: hr_utility.set_location(' Leaving:'||l_proc, 100);
1920: end if;
1921: exception
1922: when hr_api.validate_enabled then
1923: --
1983: --
1984: begin
1985: if g_debug then
1986: l_proc := g_package||'activate_cwk_asg';
1987: hr_utility.set_location('Entering:'|| l_proc, 5);
1988: end if;
1989: --
1990: --
1991: l_object_version_number := p_object_version_number;
1999: --
2000: savepoint activate_cwk_asg;
2001: --
2002: if g_debug then
2003: hr_utility.set_location(l_proc, 10);
2004: end if;
2005: --
2006: -- Validation in addition to Table Handlers
2007: --
2043: ,p_effective_end_date => l_effective_end_date
2044: );
2045: --
2046: if g_debug then
2047: hr_utility.set_location(l_proc, 20);
2048: end if;
2049: --
2050: -- Start of API User Hook for the after hook of activate_cwk_asg.
2051: --
2083: p_effective_start_date := l_effective_start_date;
2084: p_effective_end_date := l_effective_end_date;
2085: --
2086: if g_debug then
2087: hr_utility.set_location(' Leaving:'||l_proc, 100);
2088: end if;
2089: exception
2090: when hr_api.validate_enabled then
2091: --
2195: and tpe.end_date;
2196: --
2197: begin
2198: if g_debug then
2199: hr_utility.set_location('Entering:'|| l_proc, 1);
2200: end if;
2201: --
2202: l_assignment_status_type_id := p_assignment_status_type_id;
2203: l_object_version_number := p_object_version_number;
2207: --
2208: savepoint actual_termination_cwk_asg;
2209: --
2210: if g_debug then
2211: hr_utility.set_location(l_proc, 10);
2212: end if;
2213: --
2214: -- Validation in addition to Table Handlers
2215: --
2227: ,p_argument_value => l_actual_termination_date
2228: );
2229: --
2230: if g_debug then
2231: hr_utility.set_location(l_proc, 20);
2232: end if;
2233: --
2234: open csr_get_asg_details;
2235: fetch csr_get_asg_details
2242: if csr_get_asg_details%NOTFOUND
2243: then
2244: --
2245: if g_debug then
2246: hr_utility.set_location(l_proc, 30);
2247: end if;
2248: --
2249: close csr_get_asg_details;
2250: --
2247: end if;
2248: --
2249: close csr_get_asg_details;
2250: --
2251: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
2252: hr_utility.raise_error;
2253: end if;
2254: --
2255: close csr_get_asg_details;
2248: --
2249: close csr_get_asg_details;
2250: --
2251: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
2252: hr_utility.raise_error;
2253: end if;
2254: --
2255: close csr_get_asg_details;
2256: --
2274: --
2275: -- End of API User Hook for the before hook of actual_termination_cwk_asg.
2276: --
2277: if g_debug then
2278: hr_utility.set_location(l_proc, 40);
2279: end if;
2280: --
2281: -- The assignment must not be a primary assignment.
2282: --
2283: if l_primary_flag <> 'N'
2284: then
2285: --
2286: if g_debug then
2287: hr_utility.set_location(l_proc, 50);
2288: end if;
2289: --
2290: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
2291: hr_utility.raise_error;
2286: if g_debug then
2287: hr_utility.set_location(l_proc, 50);
2288: end if;
2289: --
2290: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
2291: hr_utility.raise_error;
2292: end if;
2293: --
2294: if g_debug then
2287: hr_utility.set_location(l_proc, 50);
2288: end if;
2289: --
2290: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
2291: hr_utility.raise_error;
2292: end if;
2293: --
2294: if g_debug then
2295: hr_utility.set_location(l_proc, 60);
2291: hr_utility.raise_error;
2292: end if;
2293: --
2294: if g_debug then
2295: hr_utility.set_location(l_proc, 60);
2296: end if;
2297: --
2298: -- The assignment must be a contingent worker assignment.
2299: --
2300: if l_assignment_type <> 'C'
2301: then
2302: --
2303: if g_debug then
2304: hr_utility.set_location(l_proc, 70);
2305: end if;
2306: --
2307: hr_utility.set_message('PER','HR_289616_ASG_NOT_CWK');
2308: hr_utility.raise_error;
2303: if g_debug then
2304: hr_utility.set_location(l_proc, 70);
2305: end if;
2306: --
2307: hr_utility.set_message('PER','HR_289616_ASG_NOT_CWK');
2308: hr_utility.raise_error;
2309: end if;
2310: --
2311: if g_debug then
2304: hr_utility.set_location(l_proc, 70);
2305: end if;
2306: --
2307: hr_utility.set_message('PER','HR_289616_ASG_NOT_CWK');
2308: hr_utility.raise_error;
2309: end if;
2310: --
2311: if g_debug then
2312: hr_utility.set_location(l_proc, 80);
2308: hr_utility.raise_error;
2309: end if;
2310: --
2311: if g_debug then
2312: hr_utility.set_location(l_proc, 80);
2313: end if;
2314: --
2315: -- The assignment status type must not already be TERM_CWK_ASSIGN on
2316: -- or after the actual termination date.
2322: if csr_invalid_term_assign%FOUND
2323: then
2324: --
2325: if g_debug then
2326: hr_utility.set_location(l_proc, 90);
2327: end if;
2328: --
2329: close csr_invalid_term_assign;
2330: --
2327: end if;
2328: --
2329: close csr_invalid_term_assign;
2330: --
2331: hr_utility.set_message('PER','HR_289617_ASG_ALREADY_TERM');
2332: hr_utility.raise_error;
2333: end if;
2334: --
2335: close csr_invalid_term_assign;
2328: --
2329: close csr_invalid_term_assign;
2330: --
2331: hr_utility.set_message('PER','HR_289617_ASG_ALREADY_TERM');
2332: hr_utility.raise_error;
2333: end if;
2334: --
2335: close csr_invalid_term_assign;
2336: --
2334: --
2335: close csr_invalid_term_assign;
2336: --
2337: if g_debug then
2338: hr_utility.set_location(l_proc, 100);
2339: end if;
2340: --
2341: -- Process Logic
2342: --
2350: ,p_expected_system_status => 'TERM_ASSIGN' --Fix for bug 8337789.
2351: );
2352: --
2353: if g_debug then
2354: hr_utility.set_location(l_proc, 110);
2355: end if;
2356: --
2357: -- Derive the last standard process date.
2358: --
2362: -- if l_legislation_code = 'US'
2363: -- then
2364: --
2365: if g_debug then
2366: hr_utility.set_location(l_proc, 120);
2367: end if;
2368: --
2369: -- l_last_standard_process_date := l_actual_termination_date;
2370: -- else
2369: -- l_last_standard_process_date := l_actual_termination_date;
2370: -- else
2371: --
2372: if g_debug then
2373: hr_utility.set_location(l_proc, 130);
2374: end if;
2375: --
2376: if l_payroll_id is not null
2377: then
2376: if l_payroll_id is not null
2377: then
2378: --
2379: if g_debug then
2380: hr_utility.set_location(l_proc, 140);
2381: end if;
2382: --
2383: -- Assignment is assigned to a payroll, so set the last standard process
2384: -- to date to the payroll's period end date as of the actual termination
2390: --
2391: if csr_get_period_end_date%NOTFOUND then
2392: --
2393: if g_debug then
2394: hr_utility.set_location(l_proc, 150);
2395: end if;
2396: --
2397: -- No payroll period found for the actual termination date.
2398: --
2397: -- No payroll period found for the actual termination date.
2398: --
2399: close csr_get_period_end_date;
2400: --
2401: hr_utility.set_message(801,'HR_51003_ASG_INV_NO_TERM_PRD');
2402: hr_utility.raise_error;
2403: end if;
2404: --
2405: close csr_get_period_end_date;
2398: --
2399: close csr_get_period_end_date;
2400: --
2401: hr_utility.set_message(801,'HR_51003_ASG_INV_NO_TERM_PRD');
2402: hr_utility.raise_error;
2403: end if;
2404: --
2405: close csr_get_period_end_date;
2406: --
2404: --
2405: close csr_get_period_end_date;
2406: --
2407: if g_debug then
2408: hr_utility.set_location(l_proc, 160);
2409: end if;
2410: else
2411: --
2412: if g_debug then
2409: end if;
2410: else
2411: --
2412: if g_debug then
2413: hr_utility.set_location(l_proc, 170);
2414: end if;
2415: --
2416: -- Assignment is not assigned to a payroll, so set the last standard
2417: -- process date to the actual termination date.
2420: end if;
2421: -- end if;
2422: --
2423: if g_debug then
2424: hr_utility.set_location(l_proc, 180);
2425: end if;
2426: --
2427: -- Call the business support process to update assignment and maintain the
2428: -- element entries. We call this procedure for contingent workers
2441: ,p_pay_proposal_warning => l_pay_proposal_warning
2442: );
2443: --
2444: if g_debug then
2445: hr_utility.set_location(l_proc, 190);
2446: end if;
2447: --
2448: -- When in validation only mode raise the Validate_Enabled exception
2449: --
2489: p_pay_proposal_warning := l_pay_proposal_warning;
2490: p_object_version_number := l_object_version_number;
2491: --
2492: if g_debug then
2493: hr_utility.set_location(' Leaving:'||l_proc, 200);
2494: end if;
2495: exception
2496: when hr_api.validate_enabled then
2497: --
2597:
2598: --
2599: begin
2600: if g_debug then
2601: hr_utility.set_location('Entering:'|| l_proc, 1);
2602: end if;
2603: --
2604: l_object_version_number := p_object_version_number;
2605: l_final_process_date := trunc(p_final_process_date);
2608: --
2609: savepoint final_process_cwk_asg;
2610: --
2611: if g_debug then
2612: hr_utility.set_location(l_proc, 10);
2613: end if;
2614: --
2615: -- Validation in addition to Table Handlers
2616: --
2628: ,p_argument_value => l_final_process_date
2629: );
2630: --
2631: if g_debug then
2632: hr_utility.set_location(l_proc, 20);
2633: end if;
2634: --
2635: open csr_get_derived_details;
2636: fetch csr_get_derived_details
2640: if csr_get_derived_details%NOTFOUND
2641: then
2642: --
2643: if g_debug then
2644: hr_utility.set_location(l_proc, 30);
2645: end if;
2646: --
2647: close csr_get_derived_details;
2648: --
2645: end if;
2646: --
2647: close csr_get_derived_details;
2648: --
2649: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
2650: hr_utility.raise_error;
2651: end if;
2652: --
2653: close csr_get_derived_details;
2646: --
2647: close csr_get_derived_details;
2648: --
2649: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
2650: hr_utility.raise_error;
2651: end if;
2652: --
2653: close csr_get_derived_details;
2654: --
2669: end;
2670: --
2671: --
2672: if g_debug then
2673: hr_utility.set_location(l_proc, 40);
2674: end if;
2675: --
2676: -- The assignment must not be a primary assignment.
2677: --
2678: if l_primary_flag <> 'N'
2679: then
2680: --
2681: if g_debug then
2682: hr_utility.set_location(l_proc, 50);
2683: end if;
2684: --
2685: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
2686: hr_utility.raise_error;
2681: if g_debug then
2682: hr_utility.set_location(l_proc, 50);
2683: end if;
2684: --
2685: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
2686: hr_utility.raise_error;
2687: end if;
2688: --
2689: if g_debug then
2682: hr_utility.set_location(l_proc, 50);
2683: end if;
2684: --
2685: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
2686: hr_utility.raise_error;
2687: end if;
2688: --
2689: if g_debug then
2690: hr_utility.set_location(l_proc, 60);
2686: hr_utility.raise_error;
2687: end if;
2688: --
2689: if g_debug then
2690: hr_utility.set_location(l_proc, 60);
2691: end if;
2692: --
2693: -- The assignment must be an contingent worker assignment.
2694: --
2695: if l_assignment_type <> 'C'
2696: then
2697: --
2698: if g_debug then
2699: hr_utility.set_location(l_proc, 70);
2700: end if;
2701: --
2702: hr_utility.set_message('PER','HR_289616_ASG_NOT_CWK');
2703: hr_utility.raise_error;
2698: if g_debug then
2699: hr_utility.set_location(l_proc, 70);
2700: end if;
2701: --
2702: hr_utility.set_message('PER','HR_289616_ASG_NOT_CWK');
2703: hr_utility.raise_error;
2704: end if;
2705:
2706: -- Ensure that the assignment has not been terminated previously
2699: hr_utility.set_location(l_proc, 70);
2700: end if;
2701: --
2702: hr_utility.set_message('PER','HR_289616_ASG_NOT_CWK');
2703: hr_utility.raise_error;
2704: end if;
2705:
2706: -- Ensure that the assignment has not been terminated previously
2707:
2715: if l_max_asg_end_date <> hr_api.g_eot
2716: then
2717: --
2718: if g_debug then
2719: hr_utility.set_location(l_proc, 90);
2720: end if;
2721: --
2722: hr_utility.set_message(801,'HR_7962_PDS_INV_FP_CHANGE');
2723: hr_utility.raise_error;
2718: if g_debug then
2719: hr_utility.set_location(l_proc, 90);
2720: end if;
2721: --
2722: hr_utility.set_message(801,'HR_7962_PDS_INV_FP_CHANGE');
2723: hr_utility.raise_error;
2724: end if;
2725: --
2726: if g_debug then
2719: hr_utility.set_location(l_proc, 90);
2720: end if;
2721: --
2722: hr_utility.set_message(801,'HR_7962_PDS_INV_FP_CHANGE');
2723: hr_utility.raise_error;
2724: end if;
2725: --
2726: if g_debug then
2727: hr_utility.set_location(l_proc, 80);
2723: hr_utility.raise_error;
2724: end if;
2725: --
2726: if g_debug then
2727: hr_utility.set_location(l_proc, 80);
2728: end if;
2729: --
2730: -- Ensure that the the final process date is on or after the actual
2731: -- termination date by checking that the assignment status is
2741: if l_actual_termination_date is null
2742: then
2743: --
2744: if g_debug then
2745: hr_utility.set_location(l_proc, 90);
2746: end if;
2747: --
2748: hr_utility.set_message(801,'HR_51007_ASG_INV_NOT_ACT_TERM');
2749: hr_utility.raise_error;
2744: if g_debug then
2745: hr_utility.set_location(l_proc, 90);
2746: end if;
2747: --
2748: hr_utility.set_message(801,'HR_51007_ASG_INV_NOT_ACT_TERM');
2749: hr_utility.raise_error;
2750: end if;
2751: */
2752:
2745: hr_utility.set_location(l_proc, 90);
2746: end if;
2747: --
2748: hr_utility.set_message(801,'HR_51007_ASG_INV_NOT_ACT_TERM');
2749: hr_utility.raise_error;
2750: end if;
2751: */
2752:
2753: l_actual_termination_date:=l_final_process_date;
2756:
2757: if l_final_process_date < l_actual_termination_date then
2758:
2759: if g_debug then
2760: hr_utility.set_location(l_proc, 95);
2761: end if;
2762:
2763: -- This error message has been set temporarily
2764:
2761: end if;
2762:
2763: -- This error message has been set temporarily
2764:
2765: hr_utility.set_message(801,'HR_7963_PDS_INV_FP_BEFORE_ATT');
2766: hr_utility.raise_error;
2767: end if;
2768: --
2769: --
2762:
2763: -- This error message has been set temporarily
2764:
2765: hr_utility.set_message(801,'HR_7963_PDS_INV_FP_BEFORE_ATT');
2766: hr_utility.raise_error;
2767: end if;
2768: --
2769: --
2770: if g_debug then
2767: end if;
2768: --
2769: --
2770: if g_debug then
2771: hr_utility.set_location(l_proc, 100);
2772: end if;
2773: --
2774: -- Process Logic
2775: --
2789: ,p_entries_changed_warning => l_entries_changed_warning
2790: );
2791: --
2792: if g_debug then
2793: hr_utility.set_location(l_proc, 110);
2794: end if;
2795: --
2796: -- Start of API User Hook for the after hook of final_process_cwk_asg.
2797: --
2832: p_object_version_number := l_object_version_number;
2833: p_org_now_no_manager_warning := l_org_now_no_manager_warning;
2834: --
2835: if g_debug then
2836: hr_utility.set_location(' Leaving:'||l_proc, 300);
2837: end if;
2838: exception
2839: when hr_api.validate_enabled then
2840: --
2904: --
2905: begin
2906: if g_debug then
2907: l_proc := g_package||'suspend_cwk_asg';
2908: hr_utility.set_location('Entering:'|| l_proc, 5);
2909: end if;
2910: --
2911: --
2912: l_object_version_number := p_object_version_number;
2915: --
2916: savepoint suspend_cwk_asg;
2917: --
2918: if g_debug then
2919: hr_utility.set_location(l_proc, 10);
2920: end if;
2921: --
2922: -- Initialise local variable - added 25-Aug-97. RMF.
2923: --
2963: ,p_effective_end_date => l_effective_end_date
2964: );
2965: --
2966: if g_debug then
2967: hr_utility.set_location(l_proc, 20);
2968: end if;
2969: --
2970: -- Start of API User Hook for the after hook of suspend_cwk_asg.
2971: --
3003: p_effective_start_date := l_effective_start_date;
3004: p_effective_end_date := l_effective_end_date;
3005: --
3006: if g_debug then
3007: hr_utility.set_location(' Leaving:'||l_proc, 100);
3008: end if;
3009: exception
3010: when hr_api.validate_enabled then
3011: --
3111: and tpe.end_date;
3112: --
3113: begin
3114: if g_debug then
3115: hr_utility.set_location('Entering:'|| l_proc, 1);
3116: end if;
3117: --
3118: l_assignment_status_type_id := p_assignment_status_type_id;
3119: l_object_version_number := p_object_version_number;
3123: --
3124: savepoint actual_termination_emp_asg;
3125: --
3126: if g_debug then
3127: hr_utility.set_location(l_proc, 10);
3128: end if;
3129: --
3130: -- Validation in addition to Table Handlers
3131: --
3143: ,p_argument_value => l_actual_termination_date
3144: );
3145: --
3146: if g_debug then
3147: hr_utility.set_location(l_proc, 20);
3148: end if;
3149: --
3150: open csr_get_asg_details;
3151: fetch csr_get_asg_details
3158: if csr_get_asg_details%NOTFOUND
3159: then
3160: --
3161: if g_debug then
3162: hr_utility.set_location(l_proc, 30);
3163: end if;
3164: --
3165: close csr_get_asg_details;
3166: --
3163: end if;
3164: --
3165: close csr_get_asg_details;
3166: --
3167: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
3168: hr_utility.raise_error;
3169: end if;
3170: --
3171: close csr_get_asg_details;
3164: --
3165: close csr_get_asg_details;
3166: --
3167: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
3168: hr_utility.raise_error;
3169: end if;
3170: --
3171: close csr_get_asg_details;
3172: --
3190: --
3191: -- End of API User Hook for the before hook of actual_termination_emp_asg.
3192: --
3193: if g_debug then
3194: hr_utility.set_location(l_proc, 40);
3195: end if;
3196: --
3197: -- The assignment must not be a primary assignment.
3198: --
3199: if l_primary_flag <> 'N'
3200: then
3201: --
3202: if g_debug then
3203: hr_utility.set_location(l_proc, 50);
3204: end if;
3205: --
3206: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
3207: hr_utility.raise_error;
3202: if g_debug then
3203: hr_utility.set_location(l_proc, 50);
3204: end if;
3205: --
3206: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
3207: hr_utility.raise_error;
3208: end if;
3209: --
3210: if g_debug then
3203: hr_utility.set_location(l_proc, 50);
3204: end if;
3205: --
3206: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
3207: hr_utility.raise_error;
3208: end if;
3209: --
3210: if g_debug then
3211: hr_utility.set_location(l_proc, 60);
3207: hr_utility.raise_error;
3208: end if;
3209: --
3210: if g_debug then
3211: hr_utility.set_location(l_proc, 60);
3212: end if;
3213: --
3214: -- The assignment must be an employee assignment.
3215: --
3216: if l_assignment_type <> 'E'
3217: then
3218: --
3219: if g_debug then
3220: hr_utility.set_location(l_proc, 70);
3221: end if;
3222: --
3223: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
3224: hr_utility.raise_error;
3219: if g_debug then
3220: hr_utility.set_location(l_proc, 70);
3221: end if;
3222: --
3223: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
3224: hr_utility.raise_error;
3225: end if;
3226: --
3227: if g_debug then
3220: hr_utility.set_location(l_proc, 70);
3221: end if;
3222: --
3223: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
3224: hr_utility.raise_error;
3225: end if;
3226: --
3227: if g_debug then
3228: hr_utility.set_location(l_proc, 80);
3224: hr_utility.raise_error;
3225: end if;
3226: --
3227: if g_debug then
3228: hr_utility.set_location(l_proc, 80);
3229: end if;
3230: --
3231: -- The assignment status type must not already be TERM_ASSIGN on or after
3232: -- the actual termination date.
3238: if csr_invalid_term_assign%FOUND
3239: then
3240: --
3241: if g_debug then
3242: hr_utility.set_location(l_proc, 90);
3243: end if;
3244: --
3245: close csr_invalid_term_assign;
3246: --
3243: end if;
3244: --
3245: close csr_invalid_term_assign;
3246: --
3247: hr_utility.set_message(800,'PER_52108_ASG_INV_TERM_ASSIGN');
3248: hr_utility.raise_error;
3249: end if;
3250: --
3251: close csr_invalid_term_assign;
3244: --
3245: close csr_invalid_term_assign;
3246: --
3247: hr_utility.set_message(800,'PER_52108_ASG_INV_TERM_ASSIGN');
3248: hr_utility.raise_error;
3249: end if;
3250: --
3251: close csr_invalid_term_assign;
3252: --
3250: --
3251: close csr_invalid_term_assign;
3252: --
3253: if g_debug then
3254: hr_utility.set_location(l_proc, 100);
3255: end if;
3256: --
3257: -- Process Logic
3258: --
3266: ,p_expected_system_status => 'TERM_ASSIGN'
3267: );
3268: --
3269: if g_debug then
3270: hr_utility.set_location(l_proc, 110);
3271: end if;
3272: --
3273: -- Derive the last standard process date.
3274: --
3278: -- if l_legislation_code = 'US'
3279: -- then
3280: --
3281: if g_debug then
3282: hr_utility.set_location(l_proc, 120);
3283: end if;
3284: --
3285: -- l_last_standard_process_date := l_actual_termination_date;
3286: -- else
3285: -- l_last_standard_process_date := l_actual_termination_date;
3286: -- else
3287: --
3288: if g_debug then
3289: hr_utility.set_location(l_proc, 130);
3290: end if;
3291: --
3292: if l_payroll_id is not null
3293: then
3292: if l_payroll_id is not null
3293: then
3294: --
3295: if g_debug then
3296: hr_utility.set_location(l_proc, 140);
3297: end if;
3298: --
3299: -- Assignment is assigned to a payroll, so set the last standard process
3300: -- to date to the payroll's period end date as of the actual termination
3306: --
3307: if csr_get_period_end_date%NOTFOUND then
3308: --
3309: if g_debug then
3310: hr_utility.set_location(l_proc, 150);
3311: end if;
3312: --
3313: -- No payroll period found for the actual termination date.
3314: --
3313: -- No payroll period found for the actual termination date.
3314: --
3315: close csr_get_period_end_date;
3316: --
3317: hr_utility.set_message(801,'HR_51003_ASG_INV_NO_TERM_PRD');
3318: hr_utility.raise_error;
3319: end if;
3320: --
3321: close csr_get_period_end_date;
3314: --
3315: close csr_get_period_end_date;
3316: --
3317: hr_utility.set_message(801,'HR_51003_ASG_INV_NO_TERM_PRD');
3318: hr_utility.raise_error;
3319: end if;
3320: --
3321: close csr_get_period_end_date;
3322: --
3320: --
3321: close csr_get_period_end_date;
3322: --
3323: if g_debug then
3324: hr_utility.set_location(l_proc, 160);
3325: end if;
3326: else
3327: --
3328: if g_debug then
3325: end if;
3326: else
3327: --
3328: if g_debug then
3329: hr_utility.set_location(l_proc, 170);
3330: end if;
3331: --
3332: -- Assignment is not assigned to a payroll, so set the last standard
3333: -- process date to the actual termination date.
3336: end if;
3337: -- end if;
3338: --
3339: if g_debug then
3340: hr_utility.set_location(l_proc, 180);
3341: end if;
3342: --
3343: -- Call the business support process to update assignment and maintain the
3344: -- element entries.
3356: ,p_pay_proposal_warning => l_pay_proposal_warning
3357: );
3358: --
3359: if g_debug then
3360: hr_utility.set_location(l_proc, 190);
3361: end if;
3362: --
3363: -- When in validation only mode raise the Validate_Enabled exception
3364: --
3404: p_pay_proposal_warning := l_pay_proposal_warning;
3405: p_object_version_number := l_object_version_number;
3406: --
3407: if g_debug then
3408: hr_utility.set_location(' Leaving:'||l_proc, 200);
3409: end if;
3410: exception
3411: when hr_api.validate_enabled then
3412: --
3651: begin
3652: --
3653: if g_debug then
3654: l_proc := g_package||'create_secondary_emp_asg';
3655: hr_utility.set_location('Entering:'|| l_proc, 5);
3656: end if;
3657: --
3658: l_assignment_number := p_assignment_number;
3659: --
3845: p_group_name := l_group_name;
3846: p_other_manager_warning := l_other_manager_warning;
3847: --
3848: if g_debug then
3849: hr_utility.set_location(' Leaving:'||l_proc, 50);
3850: end if;
3851: end create_secondary_emp_asg;
3852: --
3853: -- ----------------------------------------------------------------------------
4081: begin
4082: --
4083: if g_debug then
4084: l_proc := g_package||'create_secondary_emp_asg';
4085: hr_utility.set_location('Entering:'|| l_proc, 5);
4086: end if;
4087: --
4088: l_assignment_number := p_assignment_number;
4089: --
4282: p_group_name := l_group_name;
4283: p_other_manager_warning := l_other_manager_warning;
4284: --
4285: if g_debug then
4286: hr_utility.set_location(' Leaving:'||l_proc, 50);
4287: end if;
4288: end create_secondary_emp_asg;
4289: --
4290: -- ----------------------------------------------------------------------------
4525: --
4526: begin
4527: --
4528: if g_debug then
4529: hr_utility.set_location('Entering:'|| l_proc, 5);
4530: end if;
4531: --
4532: l_assignment_number := p_assignment_number;
4533: --
4730: p_hourly_salaried_warning := l_hourly_salaried_warning;
4731: --
4732: --
4733: if g_debug then
4734: hr_utility.set_location(' Leaving:'||l_proc, 50);
4735: end if;
4736: end create_secondary_emp_asg;
4737: --
4738: -- ----------------------------------------------------------------------------
5229: --
5230: begin
5231: --
5232: if g_debug then
5233: hr_utility.set_location('Entering:'|| l_proc, 5);
5234: end if;
5235: --
5236: -- Issue a savepoint.
5237: --
5258: -- per_cagr_grades_def
5259: --
5260: --
5261: if g_debug then
5262: hr_utility.set_location(l_proc, 20);
5263: end if;
5264: --
5265: if l_people_group_id is not null
5266: then
5567: --
5568: end;
5569: --
5570: if g_debug then
5571: hr_utility.set_location(l_proc, 10);
5572: end if;
5573: --
5574: -- Validation in addition to Table Handlers
5575: --
5600: --
5601: close csr_get_derived_details;
5602: --
5603: if g_debug then
5604: hr_utility.set_location(l_proc, 15);
5605: end if;
5606: --
5607: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
5608: hr_utility.raise_error;
5603: if g_debug then
5604: hr_utility.set_location(l_proc, 15);
5605: end if;
5606: --
5607: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
5608: hr_utility.raise_error;
5609: end if;
5610: --
5611: close csr_get_derived_details;
5604: hr_utility.set_location(l_proc, 15);
5605: end if;
5606: --
5607: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
5608: hr_utility.raise_error;
5609: end if;
5610: --
5611: close csr_get_derived_details;
5612: --
5610: --
5611: close csr_get_derived_details;
5612: --
5613: if g_debug then
5614: hr_utility.set_location(l_proc, 20);
5615: end if;
5616: --
5617: -- Process Logic
5618: --
5626: --
5627: close csr_get_period_of_service;
5628: --
5629: if g_debug then
5630: hr_utility.set_location(l_proc, 25);
5631: end if;
5632: --
5633: hr_utility.set_message(801,'HR_7436_ASG_NO_PRIM_ASS');
5634: hr_utility.raise_error;
5629: if g_debug then
5630: hr_utility.set_location(l_proc, 25);
5631: end if;
5632: --
5633: hr_utility.set_message(801,'HR_7436_ASG_NO_PRIM_ASS');
5634: hr_utility.raise_error;
5635: end if;
5636: --
5637: close csr_get_period_of_service;
5630: hr_utility.set_location(l_proc, 25);
5631: end if;
5632: --
5633: hr_utility.set_message(801,'HR_7436_ASG_NO_PRIM_ASS');
5634: hr_utility.raise_error;
5635: end if;
5636: --
5637: close csr_get_period_of_service;
5638: if g_debug then
5635: end if;
5636: --
5637: close csr_get_period_of_service;
5638: if g_debug then
5639: hr_utility.set_location(l_proc, 26);
5640: end if;
5641: --
5642: -- insert the profile options and effective date for the flexfield
5643: -- validation to work
5655: open csr_grp_idsel;
5656: fetch csr_grp_idsel into l_grp_flex_num;
5657: if csr_grp_idsel%NOTFOUND then
5658: close csr_grp_idsel;
5659: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5660: hr_utility.set_message_token('PROCEDURE', l_proc);
5661: hr_utility.set_message_token('STEP','5');
5662: hr_utility.raise_error;
5663: else
5656: fetch csr_grp_idsel into l_grp_flex_num;
5657: if csr_grp_idsel%NOTFOUND then
5658: close csr_grp_idsel;
5659: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5660: hr_utility.set_message_token('PROCEDURE', l_proc);
5661: hr_utility.set_message_token('STEP','5');
5662: hr_utility.raise_error;
5663: else
5664: close csr_grp_idsel;
5657: if csr_grp_idsel%NOTFOUND then
5658: close csr_grp_idsel;
5659: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5660: hr_utility.set_message_token('PROCEDURE', l_proc);
5661: hr_utility.set_message_token('STEP','5');
5662: hr_utility.raise_error;
5663: else
5664: close csr_grp_idsel;
5665: end if;
5658: close csr_grp_idsel;
5659: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5660: hr_utility.set_message_token('PROCEDURE', l_proc);
5661: hr_utility.set_message_token('STEP','5');
5662: hr_utility.raise_error;
5663: else
5664: close csr_grp_idsel;
5665: end if;
5666: if g_debug then
5663: else
5664: close csr_grp_idsel;
5665: end if;
5666: if g_debug then
5667: hr_utility.set_location(l_proc, 27);
5668: end if;
5669: --
5670: --
5671: -- Bug 2359997 - if key flex parameters have a value then derive segment
5715: if csr_scl_idsel%NOTFOUND
5716: then
5717: close csr_scl_idsel;
5718: if g_debug then
5719: hr_utility.set_location(l_proc, 28);
5720: end if;
5721: --
5722: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5723: hr_utility.set_message_token('PROCEDURE', l_proc);
5718: if g_debug then
5719: hr_utility.set_location(l_proc, 28);
5720: end if;
5721: --
5722: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5723: hr_utility.set_message_token('PROCEDURE', l_proc);
5724: hr_utility.set_message_token('STEP','10');
5725: hr_utility.raise_error;
5726: else
5719: hr_utility.set_location(l_proc, 28);
5720: end if;
5721: --
5722: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5723: hr_utility.set_message_token('PROCEDURE', l_proc);
5724: hr_utility.set_message_token('STEP','10');
5725: hr_utility.raise_error;
5726: else
5727: close csr_scl_idsel;
5720: end if;
5721: --
5722: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5723: hr_utility.set_message_token('PROCEDURE', l_proc);
5724: hr_utility.set_message_token('STEP','10');
5725: hr_utility.raise_error;
5726: else
5727: close csr_scl_idsel;
5728: --
5721: --
5722: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
5723: hr_utility.set_message_token('PROCEDURE', l_proc);
5724: hr_utility.set_message_token('STEP','10');
5725: hr_utility.raise_error;
5726: else
5727: close csr_scl_idsel;
5728: --
5729: --
5727: close csr_scl_idsel;
5728: --
5729: --
5730: if g_debug then
5731: hr_utility.set_location(l_proc, 30);
5732: end if;
5733: --
5734: -- Insert or select the soft_coding_keyflex_id
5735: --
5830: ,p_concat_segments_out => l_group_name
5831: );
5832: --
5833: if g_debug then
5834: hr_utility.set_location(l_proc, 35);
5835: end if;
5836: --
5837: end if; -- bug 2359997 end if people group id null
5838: --
5878: --
5879: end if; -- l_cag_null_ind = 0 bug 2359997
5880: --
5881: if g_debug then
5882: hr_utility.set_location(l_proc, 35);
5883: end if;
5884: --
5885: --
5886: -- Insert secondary assignment
5987: hr_security_internal.add_to_person_list(l_effective_date,l_assignment_id);
5988: end if;
5989: --
5990: if g_debug then
5991: hr_utility.set_location(l_proc, 40);
5992: end if;
5993: --
5994: begin
5995: --
6237: hr_kflex_utility.unset_session_date
6238: (p_session_id => l_session_id);
6239: --
6240: if g_debug then
6241: hr_utility.set_location(' Leaving:'||l_proc, 50);
6242: end if;
6243: exception
6244: when hr_api.validate_enabled then
6245: --
6551:
6552: BEGIN
6553: --
6554: if g_debug then
6555: hr_utility.set_location('Entering:'|| l_proc, 5);
6556: end if;
6557: --
6558: -- Issue a savepoint.
6559: --
6723: --
6724: END;
6725: --
6726: if g_debug then
6727: hr_utility.set_location(l_proc, 10);
6728: end if;
6729: --
6730: -- Validation in addition to Table Handlers
6731: --
6756: --
6757: close csr_get_derived_details;
6758: --
6759: if g_debug then
6760: hr_utility.set_location(l_proc, 15);
6761: end if;
6762: --
6763: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
6764: hr_utility.raise_error;
6759: if g_debug then
6760: hr_utility.set_location(l_proc, 15);
6761: end if;
6762: --
6763: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
6764: hr_utility.raise_error;
6765: --
6766: end if;
6767: --
6760: hr_utility.set_location(l_proc, 15);
6761: end if;
6762: --
6763: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
6764: hr_utility.raise_error;
6765: --
6766: end if;
6767: --
6768: close csr_get_derived_details;
6767: --
6768: close csr_get_derived_details;
6769: --
6770: if g_debug then
6771: hr_utility.set_location(l_proc, 20);
6772: end if;
6773: --
6774: -- Process Logic
6775: --
6782: --
6783: CLOSE csr_get_period_of_placement;
6784: --
6785: if g_debug then
6786: hr_utility.set_location(l_proc, 25);
6787: end if;
6788: --
6789: hr_utility.set_message(801,'HR_7436_ASG_NO_PRIM_ASS');
6790: hr_utility.raise_error;
6785: if g_debug then
6786: hr_utility.set_location(l_proc, 25);
6787: end if;
6788: --
6789: hr_utility.set_message(801,'HR_7436_ASG_NO_PRIM_ASS');
6790: hr_utility.raise_error;
6791: --
6792: END IF;
6793: --
6786: hr_utility.set_location(l_proc, 25);
6787: end if;
6788: --
6789: hr_utility.set_message(801,'HR_7436_ASG_NO_PRIM_ASS');
6790: hr_utility.raise_error;
6791: --
6792: END IF;
6793: --
6794: CLOSE csr_get_period_of_placement;
6793: --
6794: CLOSE csr_get_period_of_placement;
6795: --
6796: if g_debug then
6797: hr_utility.set_location(l_proc, 26);
6798: end if;
6799: --
6800: -- insert the profile options and effective date for the flexfield
6801: -- validation to work
6816: if csr_grp_idsel%NOTFOUND then
6817: --
6818: close csr_grp_idsel;
6819: --
6820: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6821: hr_utility.set_message_token('PROCEDURE', l_proc);
6822: hr_utility.set_message_token('STEP','5');
6823: hr_utility.raise_error;
6824: --
6817: --
6818: close csr_grp_idsel;
6819: --
6820: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6821: hr_utility.set_message_token('PROCEDURE', l_proc);
6822: hr_utility.set_message_token('STEP','5');
6823: hr_utility.raise_error;
6824: --
6825: else
6818: close csr_grp_idsel;
6819: --
6820: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6821: hr_utility.set_message_token('PROCEDURE', l_proc);
6822: hr_utility.set_message_token('STEP','5');
6823: hr_utility.raise_error;
6824: --
6825: else
6826: --
6819: --
6820: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6821: hr_utility.set_message_token('PROCEDURE', l_proc);
6822: hr_utility.set_message_token('STEP','5');
6823: hr_utility.raise_error;
6824: --
6825: else
6826: --
6827: close csr_grp_idsel;
6828: --
6829: end if;
6830: --
6831: if g_debug then
6832: hr_utility.set_location(l_proc, 27);
6833: end if;
6834: --
6835: if p_scl_segment1 is not null
6836: or p_scl_segment2 is not null
6871: --
6872: close csr_scl_idsel;
6873: --
6874: if g_debug then
6875: hr_utility.set_location(l_proc, 28);
6876: end if;
6877: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6878: hr_utility.set_message_token('PROCEDURE', l_proc);
6879: hr_utility.set_message_token('STEP','10');
6873: --
6874: if g_debug then
6875: hr_utility.set_location(l_proc, 28);
6876: end if;
6877: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6878: hr_utility.set_message_token('PROCEDURE', l_proc);
6879: hr_utility.set_message_token('STEP','10');
6880: hr_utility.raise_error;
6881: --
6874: if g_debug then
6875: hr_utility.set_location(l_proc, 28);
6876: end if;
6877: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6878: hr_utility.set_message_token('PROCEDURE', l_proc);
6879: hr_utility.set_message_token('STEP','10');
6880: hr_utility.raise_error;
6881: --
6882: else
6875: hr_utility.set_location(l_proc, 28);
6876: end if;
6877: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6878: hr_utility.set_message_token('PROCEDURE', l_proc);
6879: hr_utility.set_message_token('STEP','10');
6880: hr_utility.raise_error;
6881: --
6882: else
6883: --
6876: end if;
6877: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
6878: hr_utility.set_message_token('PROCEDURE', l_proc);
6879: hr_utility.set_message_token('STEP','10');
6880: hr_utility.raise_error;
6881: --
6882: else
6883: --
6884: close csr_scl_idsel;
6883: --
6884: close csr_scl_idsel;
6885: --
6886: if g_debug then
6887: hr_utility.set_location(l_proc, 30);
6888: end if;
6889: --
6890: -- Insert or select the soft_coding_keyflex_id
6891: --
6979: ,p_concat_segments_out => l_group_name
6980: );
6981: --
6982: if g_debug then
6983: hr_utility.set_location(l_proc, 35);
6984: end if;
6985:
6986: --
6987: -- Default the PO Header if the line is passed in and the
7032:
7033: END IF;
7034:
7035: if g_debug then
7036: hr_utility.set_location(l_proc, 37);
7037: end if;
7038:
7039: --
7040: -- update the combinations column
7167: --
7168: end if;
7169: --
7170: if g_debug then
7171: hr_utility.set_location(l_proc, 40);
7172: end if;
7173: --
7174: BEGIN
7175: --
7362: hr_kflex_utility.unset_session_date
7363: (p_session_id => l_session_id);
7364: --
7365: if g_debug then
7366: hr_utility.set_location(' Leaving:'||l_proc, 999);
7367: end if;
7368: --
7369: EXCEPTION
7370: --
7442:
7443: BEGIN
7444:
7445: IF g_debug THEN
7446: hr_utility.set_location('Entering: ' || l_proc, 10);
7447: END IF;
7448:
7449: --
7450: -- If the header is not null, fetch the Supplier info.
7451: --
7452: IF p_po_header_id IS NOT NULL THEN
7453:
7454: IF g_debug THEN
7455: hr_utility.set_location(l_proc, 20);
7456: END IF;
7457:
7458: OPEN csr_get_supplier_info;
7459: FETCH csr_get_supplier_info INTO p_vendor_id
7462:
7463: END IF;
7464:
7465: IF g_debug THEN
7466: hr_utility.set_location('Leaving: ' || l_proc, 999);
7467: END IF;
7468:
7469: END get_supplier_info_for_po;
7470: --
7489:
7490: BEGIN
7491:
7492: IF g_debug THEN
7493: hr_utility.set_location('Entering: ' || l_proc, 10);
7494: END IF;
7495:
7496: --
7497: -- If the Supplier Site is not null, fetch the Supplier.
7498: --
7499: IF p_vendor_site_id IS NOT NULL THEN
7500:
7501: IF g_debug THEN
7502: hr_utility.set_location(l_proc, 20);
7503: END IF;
7504:
7505: OPEN csr_get_supplier;
7506: FETCH csr_get_supplier INTO l_vendor_id;
7508:
7509: END IF;
7510:
7511: IF g_debug THEN
7512: hr_utility.set_location('Leaving: ' || l_proc, 999);
7513: END IF;
7514:
7515: RETURN l_vendor_id;
7516:
7537:
7538: BEGIN
7539:
7540: IF g_debug THEN
7541: hr_utility.set_location('Entering: ' || l_proc, 10);
7542: END IF;
7543:
7544: --
7545: -- If the PO Line is not null, fetch the PO (header).
7546: --
7547: IF p_po_line_id IS NOT NULL THEN
7548:
7549: IF g_debug THEN
7550: hr_utility.set_location(l_proc, 20);
7551: END IF;
7552:
7553: OPEN csr_get_po;
7554: FETCH csr_get_po INTO l_po_header_id;
7556:
7557: END IF;
7558:
7559: IF g_debug THEN
7560: hr_utility.set_location('Leaving: ' || l_proc, 999);
7561: END IF;
7562:
7563: RETURN l_po_header_id;
7564:
7585:
7586: BEGIN
7587:
7588: IF g_debug THEN
7589: hr_utility.set_location('Entering: ' || l_proc, 10);
7590: END IF;
7591:
7592: --
7593: -- If the PO Line is not null, fetch the Job.
7594: --
7595: IF p_po_line_id IS NOT NULL THEN
7596:
7597: IF g_debug THEN
7598: hr_utility.set_location(l_proc, 20);
7599: END IF;
7600:
7601: OPEN csr_get_job;
7602: FETCH csr_get_job INTO l_job_id;
7604:
7605: END IF;
7606:
7607: IF g_debug THEN
7608: hr_utility.set_location('Leaving: ' || l_proc, 999);
7609: END IF;
7610:
7611: RETURN l_job_id;
7612:
7759: --
7760: begin
7761: if g_debug then
7762: l_proc := g_package||'create_gb_secondary_emp_asg';
7763: hr_utility.set_location('Entering:'|| l_proc, 10);
7764: end if;
7765: --
7766: -- Initialise local variable
7767: --
7775: fetch csr_legislation
7776: into l_legislation_code;
7777: if csr_legislation%notfound then
7778: close csr_legislation;
7779: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
7780: hr_utility.set_message_token('LEG_CODE', 'GB');
7781: hr_utility.raise_error;
7782: end if;
7783: close csr_legislation;
7776: into l_legislation_code;
7777: if csr_legislation%notfound then
7778: close csr_legislation;
7779: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
7780: hr_utility.set_message_token('LEG_CODE', 'GB');
7781: hr_utility.raise_error;
7782: end if;
7783: close csr_legislation;
7784: --
7777: if csr_legislation%notfound then
7778: close csr_legislation;
7779: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
7780: hr_utility.set_message_token('LEG_CODE', 'GB');
7781: hr_utility.raise_error;
7782: end if;
7783: close csr_legislation;
7784: --
7785: if g_debug then
7782: end if;
7783: close csr_legislation;
7784: --
7785: if g_debug then
7786: hr_utility.set_location(l_proc, 20);
7787: end if;
7788: --
7789: -- Call create_secondary_emp_asg
7790: --
7909: ,p_supervisor_assignment_id => p_supervisor_assignment_id
7910: );
7911: --
7912: if g_debug then
7913: hr_utility.set_location(' Leaving:'||l_proc, 30);
7914: end if;
7915: --
7916: end create_gb_secondary_emp_asg;
7917:
8068: --
8069: begin
8070: if g_debug then
8071: l_proc := g_package||'create_gb_secondary_emp_asg';
8072: hr_utility.set_location('Entering:'|| l_proc, 10);
8073: end if;
8074: --
8075: -- Initialise local variable
8076: --
8084: fetch csr_legislation
8085: into l_legislation_code;
8086: if csr_legislation%notfound then
8087: close csr_legislation;
8088: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8089: hr_utility.set_message_token('LEG_CODE', 'GB');
8090: hr_utility.raise_error;
8091: end if;
8092: close csr_legislation;
8085: into l_legislation_code;
8086: if csr_legislation%notfound then
8087: close csr_legislation;
8088: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8089: hr_utility.set_message_token('LEG_CODE', 'GB');
8090: hr_utility.raise_error;
8091: end if;
8092: close csr_legislation;
8093: --
8086: if csr_legislation%notfound then
8087: close csr_legislation;
8088: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8089: hr_utility.set_message_token('LEG_CODE', 'GB');
8090: hr_utility.raise_error;
8091: end if;
8092: close csr_legislation;
8093: --
8094: if g_debug then
8091: end if;
8092: close csr_legislation;
8093: --
8094: if g_debug then
8095: hr_utility.set_location(l_proc, 20);
8096: end if;
8097: --
8098: -- Call create_secondary_emp_asg
8099: --
8221: ,p_supervisor_assignment_id => p_supervisor_assignment_id
8222: );
8223: --
8224: if g_debug then
8225: hr_utility.set_location(' Leaving:'||l_proc, 30);
8226: end if;
8227: --
8228: end create_gb_secondary_emp_asg;
8229:
8390: --
8391: begin
8392: if g_debug then
8393: l_proc := g_package||'create_secondary_us_emp_asg';
8394: hr_utility.set_location('Entering:'|| l_proc, 10);
8395: end if;
8396: --
8397: -- Initialise local variable
8398: --
8406: fetch csr_legislation
8407: into l_legislation_code;
8408: if csr_legislation%notfound then
8409: close csr_legislation;
8410: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8411: hr_utility.set_message_token('LEG_CODE', 'US');
8412: hr_utility.raise_error;
8413: end if;
8414: close csr_legislation;
8407: into l_legislation_code;
8408: if csr_legislation%notfound then
8409: close csr_legislation;
8410: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8411: hr_utility.set_message_token('LEG_CODE', 'US');
8412: hr_utility.raise_error;
8413: end if;
8414: close csr_legislation;
8415: --
8408: if csr_legislation%notfound then
8409: close csr_legislation;
8410: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8411: hr_utility.set_message_token('LEG_CODE', 'US');
8412: hr_utility.raise_error;
8413: end if;
8414: close csr_legislation;
8415: --
8416: --
8550: ,p_supervisor_assignment_id => p_supervisor_assignment_id
8551: );
8552: --
8553: if g_debug then
8554: hr_utility.set_location(' Leaving:'||l_proc, 30);
8555: end if;
8556: --
8557: end create_us_secondary_emp_asg;
8558:
8723: --
8724: begin
8725: if g_debug then
8726: l_proc := g_package||'create_secondary_us_emp_asg';
8727: hr_utility.set_location('Entering:'|| l_proc, 10);
8728: end if;
8729: --
8730: -- Initialise local variable
8731: --
8739: fetch csr_legislation
8740: into l_legislation_code;
8741: if csr_legislation%notfound then
8742: close csr_legislation;
8743: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8744: hr_utility.set_message_token('LEG_CODE', 'US');
8745: hr_utility.raise_error;
8746: end if;
8747: close csr_legislation;
8740: into l_legislation_code;
8741: if csr_legislation%notfound then
8742: close csr_legislation;
8743: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8744: hr_utility.set_message_token('LEG_CODE', 'US');
8745: hr_utility.raise_error;
8746: end if;
8747: close csr_legislation;
8748: --
8741: if csr_legislation%notfound then
8742: close csr_legislation;
8743: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
8744: hr_utility.set_message_token('LEG_CODE', 'US');
8745: hr_utility.raise_error;
8746: end if;
8747: close csr_legislation;
8748: --
8749: --
8886: ,p_supervisor_assignment_id => p_supervisor_assignment_id
8887: );
8888: --
8889: if g_debug then
8890: hr_utility.set_location(' Leaving:'||l_proc, 30);
8891: end if;
8892: --
8893: end create_us_secondary_emp_asg;
8894:
8961:
8962: --
8963: begin
8964: if g_debug then
8965: hr_utility.set_location('Entering:'|| l_proc, 1);
8966: end if;
8967: --
8968: l_object_version_number := p_object_version_number;
8969: l_final_process_date := trunc(p_final_process_date);
8972: --
8973: savepoint final_process_emp_asg;
8974: --
8975: if g_debug then
8976: hr_utility.set_location(l_proc, 10);
8977: end if;
8978: --
8979: -- Validation in addition to Table Handlers
8980: --
8992: ,p_argument_value => l_final_process_date
8993: );
8994: --
8995: if g_debug then
8996: hr_utility.set_location(l_proc, 20);
8997: end if;
8998: --
8999: open csr_get_derived_details;
9000: fetch csr_get_derived_details
9004: if csr_get_derived_details%NOTFOUND
9005: then
9006: --
9007: if g_debug then
9008: hr_utility.set_location(l_proc, 30);
9009: end if;
9010: --
9011: close csr_get_derived_details;
9012: --
9009: end if;
9010: --
9011: close csr_get_derived_details;
9012: --
9013: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
9014: hr_utility.raise_error;
9015: end if;
9016: --
9017: close csr_get_derived_details;
9010: --
9011: close csr_get_derived_details;
9012: --
9013: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
9014: hr_utility.raise_error;
9015: end if;
9016: --
9017: close csr_get_derived_details;
9018: --
9033: end;
9034: --
9035: --
9036: if g_debug then
9037: hr_utility.set_location(l_proc, 40);
9038: end if;
9039: --
9040: -- The assignment must not be a primary assignment.
9041: --
9042: if l_primary_flag <> 'N'
9043: then
9044: --
9045: if g_debug then
9046: hr_utility.set_location(l_proc, 50);
9047: end if;
9048: --
9049: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
9050: hr_utility.raise_error;
9045: if g_debug then
9046: hr_utility.set_location(l_proc, 50);
9047: end if;
9048: --
9049: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
9050: hr_utility.raise_error;
9051: end if;
9052: --
9053: if g_debug then
9046: hr_utility.set_location(l_proc, 50);
9047: end if;
9048: --
9049: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
9050: hr_utility.raise_error;
9051: end if;
9052: --
9053: if g_debug then
9054: hr_utility.set_location(l_proc, 60);
9050: hr_utility.raise_error;
9051: end if;
9052: --
9053: if g_debug then
9054: hr_utility.set_location(l_proc, 60);
9055: end if;
9056: --
9057: -- The assignment must be an employee assignment.
9058: --
9059: if l_assignment_type <> 'E'
9060: then
9061: --
9062: if g_debug then
9063: hr_utility.set_location(l_proc, 70);
9064: end if;
9065: --
9066: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
9067: hr_utility.raise_error;
9062: if g_debug then
9063: hr_utility.set_location(l_proc, 70);
9064: end if;
9065: --
9066: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
9067: hr_utility.raise_error;
9068: end if;
9069:
9070: -- Ensure that the assignment has not been terminated previously
9063: hr_utility.set_location(l_proc, 70);
9064: end if;
9065: --
9066: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
9067: hr_utility.raise_error;
9068: end if;
9069:
9070: -- Ensure that the assignment has not been terminated previously
9071:
9079: if l_max_asg_end_date <> hr_api.g_eot
9080: then
9081: --
9082: if g_debug then
9083: hr_utility.set_location(l_proc, 90);
9084: end if;
9085: --
9086: hr_utility.set_message(801,'HR_7962_PDS_INV_FP_CHANGE');
9087: hr_utility.raise_error;
9082: if g_debug then
9083: hr_utility.set_location(l_proc, 90);
9084: end if;
9085: --
9086: hr_utility.set_message(801,'HR_7962_PDS_INV_FP_CHANGE');
9087: hr_utility.raise_error;
9088: end if;
9089: --
9090: if g_debug then
9083: hr_utility.set_location(l_proc, 90);
9084: end if;
9085: --
9086: hr_utility.set_message(801,'HR_7962_PDS_INV_FP_CHANGE');
9087: hr_utility.raise_error;
9088: end if;
9089: --
9090: if g_debug then
9091: hr_utility.set_location(l_proc, 80);
9087: hr_utility.raise_error;
9088: end if;
9089: --
9090: if g_debug then
9091: hr_utility.set_location(l_proc, 80);
9092: end if;
9093: --
9094: -- Ensure that the the final process date is on or after the actual
9095: -- termination date by checking that the assignment status is TERM_ASSIGN for
9104: if l_actual_termination_date is null
9105: then
9106: --
9107: if g_debug then
9108: hr_utility.set_location(l_proc, 90);
9109: end if;
9110: --
9111: hr_utility.set_message(801,'HR_51007_ASG_INV_NOT_ACT_TERM');
9112: hr_utility.raise_error;
9107: if g_debug then
9108: hr_utility.set_location(l_proc, 90);
9109: end if;
9110: --
9111: hr_utility.set_message(801,'HR_51007_ASG_INV_NOT_ACT_TERM');
9112: hr_utility.raise_error;
9113: end if;
9114:
9115: if l_final_process_date < l_actual_termination_date then
9108: hr_utility.set_location(l_proc, 90);
9109: end if;
9110: --
9111: hr_utility.set_message(801,'HR_51007_ASG_INV_NOT_ACT_TERM');
9112: hr_utility.raise_error;
9113: end if;
9114:
9115: if l_final_process_date < l_actual_termination_date then
9116:
9114:
9115: if l_final_process_date < l_actual_termination_date then
9116:
9117: if g_debug then
9118: hr_utility.set_location(l_proc, 95);
9119: end if;
9120:
9121: -- This error message has been set temporarily
9122:
9119: end if;
9120:
9121: -- This error message has been set temporarily
9122:
9123: hr_utility.set_message(801,'HR_7963_PDS_INV_FP_BEFORE_ATT');
9124: hr_utility.raise_error;
9125: end if;
9126: --
9127: --
9120:
9121: -- This error message has been set temporarily
9122:
9123: hr_utility.set_message(801,'HR_7963_PDS_INV_FP_BEFORE_ATT');
9124: hr_utility.raise_error;
9125: end if;
9126: --
9127: --
9128: if g_debug then
9125: end if;
9126: --
9127: --
9128: if g_debug then
9129: hr_utility.set_location(l_proc, 100);
9130: end if;
9131: --
9132: -- Process Logic
9133: --
9146: ,p_entries_changed_warning => l_entries_changed_warning
9147: );
9148: --
9149: if g_debug then
9150: hr_utility.set_location(l_proc, 110);
9151: end if;
9152: --
9153: -- Start of API User Hook for the after hook of final_process_emp_asg.
9154: --
9189: p_object_version_number := l_object_version_number;
9190: p_org_now_no_manager_warning := l_org_now_no_manager_warning;
9191: --
9192: if g_debug then
9193: hr_utility.set_location(' Leaving:'||l_proc, 300);
9194: end if;
9195: exception
9196: when hr_api.validate_enabled then
9197: --
9266: --
9267: begin
9268: if g_debug then
9269: l_proc := g_package||'suspend_emp_asg';
9270: hr_utility.set_location('Entering:'|| l_proc, 5);
9271: end if;
9272: --
9273: --
9274: l_object_version_number := p_object_version_number;
9277: --
9278: savepoint suspend_emp_asg;
9279: --
9280: if g_debug then
9281: hr_utility.set_location(l_proc, 10);
9282: end if;
9283: --
9284: -- Initialise local variable - added 25-Aug-97. RMF.
9285: --
9325: ,p_effective_end_date => l_effective_end_date
9326: );
9327: --
9328: if g_debug then
9329: hr_utility.set_location(l_proc, 20);
9330: end if;
9331: --
9332: -- Start of API User Hook for the after hook of suspend_emp_asg.
9333: --
9365: p_effective_start_date := l_effective_start_date;
9366: p_effective_end_date := l_effective_end_date;
9367: --
9368: if g_debug then
9369: hr_utility.set_location(' Leaving:'||l_proc, 100);
9370: end if;
9371: exception
9372: when hr_api.validate_enabled then
9373: --
9541: l_object_version_number := p_object_version_number;
9542: --
9543: if g_debug then
9544: l_proc := g_package||'update_emp_asg';
9545: hr_utility.set_location('Entering:'|| l_proc, 5);
9546: end if;
9547: ---- Call the new code
9548: hr_assignment_api.update_emp_asg
9549: (p_validate => p_validate
9685: p_other_manager_warning := l_other_manager_warning;
9686:
9687: --
9688: if g_debug then
9689: hr_utility.set_location(' Leaving:'||l_proc, 30);
9690: end if;
9691: end update_emp_asg;
9692: -- ----------------------------------------------------------------------------
9693: -- |--------------------------< update_emp_asg >--NEW--------------------------|
9866: l_object_version_number := p_object_version_number;
9867: --
9868: if g_debug then
9869: l_proc := g_package||'update_emp_asg';
9870: hr_utility.set_location('Entering:'|| l_proc, 5);
9871: end if;
9872: ---- Call the new code
9873: -- Added notice_period through to job_post_source_name in this call as they
9874: -- were missing
10020: p_no_managers_warning := l_no_managers_warning;
10021: p_other_manager_warning := l_other_manager_warning;
10022: --
10023: if g_debug then
10024: hr_utility.set_location(' Leaving:'||l_proc, 30);
10025: end if;
10026: end update_emp_asg;
10027: -- ----------------------------------------------------------------------------
10028: -- |-------------------------< update_emp_asg >--NEW2-------------------------|
10217: --
10218: l_object_version_number := p_object_version_number;
10219:
10220: if g_debug then
10221: hr_utility.set_location(' Entering:'||l_proc, 10);
10222: end if;
10223: --
10224: -- Call the new code
10225: -- Added p_gsp_post_process_warning
10376: p_hourly_salaried_warning := l_hourly_salaried_warning;
10377: --
10378: --
10379: if g_debug then
10380: hr_utility.set_location(' Leaving:'||l_proc, 30);
10381: end if;
10382: end update_emp_asg;
10383: -- ----------------------------------------------------------------------------
10384: -- |-------------------------< update_emp_asg >--NEW3-------------------------|
10757: --
10758: begin
10759: --
10760: if g_debug then
10761: hr_utility.set_location('Entering:'|| l_proc, 5);
10762: end if;
10763: if g_debug then
10764: hr_utility.set_location('XXX'||l_proc||'/'||p_concat_segments,6);
10765: end if;
10760: if g_debug then
10761: hr_utility.set_location('Entering:'|| l_proc, 5);
10762: end if;
10763: if g_debug then
10764: hr_utility.set_location('XXX'||l_proc||'/'||p_concat_segments,6);
10765: end if;
10766: --
10767: -- Truncate date and date_probation_end values,
10768: -- effectively removing time element.
10998: --
10999: end;
11000: --
11001: if g_debug then
11002: hr_utility.set_location(l_proc, 10);
11003: end if;
11004: --
11005: -- Validation in addition to Table Handlers
11006: --
11025: , l_location_id;
11026: --
11027: if csr_get_assignment_type%NOTFOUND then
11028: close csr_get_assignment_type;
11029: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
11030: hr_utility.raise_error;
11031: end if;
11032: --
11033: close csr_get_assignment_type;
11026: --
11027: if csr_get_assignment_type%NOTFOUND then
11028: close csr_get_assignment_type;
11029: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
11030: hr_utility.raise_error;
11031: end if;
11032: --
11033: close csr_get_assignment_type;
11034: --
11032: --
11033: close csr_get_assignment_type;
11034: --
11035: if g_debug then
11036: hr_utility.set_location(l_proc, 20);
11037: end if;
11038: --
11039: if l_assignment_type <> 'E' then
11040: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
11036: hr_utility.set_location(l_proc, 20);
11037: end if;
11038: --
11039: if l_assignment_type <> 'E' then
11040: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
11041: hr_utility.raise_error;
11042: end if;
11043: --
11044: if g_debug then
11037: end if;
11038: --
11039: if l_assignment_type <> 'E' then
11040: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
11041: hr_utility.raise_error;
11042: end if;
11043: --
11044: if g_debug then
11045: hr_utility.set_location(l_proc, 21);
11041: hr_utility.raise_error;
11042: end if;
11043: --
11044: if g_debug then
11045: hr_utility.set_location(l_proc, 21);
11046: end if;
11047: --
11048: --added validation for bug 1867720
11049: --
11064: close csr_new_asg_status;
11065: end if;
11066: --
11067: if g_debug then
11068: hr_utility.set_location(l_proc, 21);
11069: end if;
11070: --
11071: -- insert the profile options and effective date for the flexfield
11072: -- validation to work
11071: -- insert the profile options and effective date for the flexfield
11072: -- validation to work
11073: --
11074: if g_debug then
11075: hr_utility.set_location('EMP Asg B Profile:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11076: hr_utility.set_location('EMP Asg l_organization_id:' || l_organization_id, 13163);
11077: end if;
11078: hr_kflex_utility.set_profiles
11079: (p_business_group_id => l_business_group_id
11072: -- validation to work
11073: --
11074: if g_debug then
11075: hr_utility.set_location('EMP Asg B Profile:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11076: hr_utility.set_location('EMP Asg l_organization_id:' || l_organization_id, 13163);
11077: end if;
11078: hr_kflex_utility.set_profiles
11079: (p_business_group_id => l_business_group_id
11080: ,p_assignment_id => p_assignment_id
11085: hr_kflex_utility.set_session_date
11086: (p_effective_date => l_effective_date
11087: ,p_session_id => l_session_id);
11088: if g_debug then
11089: hr_utility.set_location('EMP Asg A Profile:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11090: end if;
11091: --
11092: -- Bug 944911
11093: -- Added to next 2 ifs check for p_concatenated_segments also
11104: into l_soft_coding_keyflex_id;
11105: --
11106: if csr_get_soft_coding_keyflex%NOTFOUND then
11107: close csr_get_soft_coding_keyflex;
11108: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
11109: hr_utility.raise_error;
11110: end if;
11111: --
11112: close csr_get_soft_coding_keyflex;
11105: --
11106: if csr_get_soft_coding_keyflex%NOTFOUND then
11107: close csr_get_soft_coding_keyflex;
11108: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
11109: hr_utility.raise_error;
11110: end if;
11111: --
11112: close csr_get_soft_coding_keyflex;
11113: --
11188: or l_scl_segment30 is not null
11189: or p_concat_segments is not null
11190: then
11191: --
11192: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
11193: hr_utility.set_message_token('PROCEDURE', l_proc);
11194: hr_utility.set_message_token('STEP','5');
11195: hr_utility.raise_error;
11196: end if;
11189: or p_concat_segments is not null
11190: then
11191: --
11192: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
11193: hr_utility.set_message_token('PROCEDURE', l_proc);
11194: hr_utility.set_message_token('STEP','5');
11195: hr_utility.raise_error;
11196: end if;
11197: else -- csr_scl_idsel is found
11190: then
11191: --
11192: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
11193: hr_utility.set_message_token('PROCEDURE', l_proc);
11194: hr_utility.set_message_token('STEP','5');
11195: hr_utility.raise_error;
11196: end if;
11197: else -- csr_scl_idsel is found
11198: close csr_scl_idsel;
11191: --
11192: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
11193: hr_utility.set_message_token('PROCEDURE', l_proc);
11194: hr_utility.set_message_token('STEP','5');
11195: hr_utility.raise_error;
11196: end if;
11197: else -- csr_scl_idsel is found
11198: close csr_scl_idsel;
11199: --
11260: --
11261: -- Start of fix for Bug 2622747
11262: --
11263: if g_debug then
11264: hr_utility.set_location('EMP Asg B V_SCL:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11265: end if;
11266: validate_SCL (
11267: p_validate => FALSE --Changed from p_validate to false for fix of #3180527
11268: ,p_assignment_id => p_assignment_id
11304: );
11305: --End of fix for Bug 2622747
11306: --
11307: if g_debug then
11308: hr_utility.set_location('EMP Asg A V_SCL:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11309: end if;
11310: if g_debug then
11311: hr_utility.set_location(l_proc, 23);
11312: end if;
11307: if g_debug then
11308: hr_utility.set_location('EMP Asg A V_SCL:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11309: end if;
11310: if g_debug then
11311: hr_utility.set_location(l_proc, 23);
11312: end if;
11313: --
11314: --
11315: -- Update or select the cagr_grade_def_id
11377: ,p_concatenated_segments => l_cagr_concatenated_segments
11378: );
11379: --
11380: if g_debug then
11381: hr_utility.set_location(l_proc, 24);
11382: end if;
11383: --
11384: end if; -- l_cagr_grade_def_id is null
11385: --
11383: --
11384: end if; -- l_cagr_grade_def_id is null
11385: --
11386: if g_debug then
11387: hr_utility.set_location(l_proc, 25);
11388: end if;
11389:
11390: -- fix for bug 6595592 starts here.
11391: if (p_projected_assignment_end = to_char(hr_api.g_date) OR p_projected_assignment_end = hr_api.g_varchar2) then --fix for 6862763
11402: --
11403: -- Update assignment.
11404: --
11405: if g_debug then
11406: hr_utility.set_location('EMP Asg B UPD:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11407: end if;
11408: per_asg_upd.upd
11409: (p_assignment_id => p_assignment_id
11410: ,p_effective_start_date => l_effective_start_date
11493: ,p_supervisor_assignment_id => p_supervisor_assignment_id
11494: );
11495: --
11496: if g_debug then
11497: hr_utility.set_location('EMP Asg A UPD:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11498: end if;
11499: if g_debug then
11500: hr_utility.set_location(l_proc, 25);
11501: end if;
11496: if g_debug then
11497: hr_utility.set_location('EMP Asg A UPD:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11498: end if;
11499: if g_debug then
11500: hr_utility.set_location(l_proc, 25);
11501: end if;
11502: --
11503: /* auto fte calculation bug#14700032 code changes starts */
11504:
11505: hr_assignment_internal.auto_calc_fte
11506: (p_assignment_id => p_assignment_id,
11507: p_effective_start_date => l_effective_start_date
11508: );
11509: hr_utility.set_location(l_proc|| ' passed hr_assignment_internal.auto_calc_fte ', 281);
11510:
11511: /* auto fte calculation bug#14700032 code changes ends */
11512: --
11513: begin
11697: hr_kflex_utility.unset_session_date
11698: (p_session_id => l_session_id);
11699: --
11700: if g_debug then
11701: hr_utility.set_location(' Leaving:'||l_proc, 30);
11702: hr_utility.set_location('EMP Asg Leaving:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11703: end if;
11704: exception
11705: when hr_api.validate_enabled then
11698: (p_session_id => l_session_id);
11699: --
11700: if g_debug then
11701: hr_utility.set_location(' Leaving:'||l_proc, 30);
11702: hr_utility.set_location('EMP Asg Leaving:' || fnd_profile.value('PER_ORGANIZATION_ID'), 13163);
11703: end if;
11704: exception
11705: when hr_api.validate_enabled then
11706: --
11980: --
11981: BEGIN
11982: --
11983: if g_debug then
11984: hr_utility.set_location('Entering:'|| l_proc, 5);
11985: end if;
11986: --
11987: -- Truncate date and date_probation_end values, effectively removing time element.
11988: --
12111: --
12112: END;
12113: --
12114: if g_debug then
12115: hr_utility.set_location(l_proc, 10);
12116: end if;
12117: --
12118: -- Validation in addition to Table Handlers
12119: --
12140: IF csr_get_assignment_type%NOTFOUND THEN
12141: --
12142: CLOSE csr_get_assignment_type;
12143: --
12144: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
12145: hr_utility.raise_error;
12146: --
12147: END IF;
12148: --
12141: --
12142: CLOSE csr_get_assignment_type;
12143: --
12144: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
12145: hr_utility.raise_error;
12146: --
12147: END IF;
12148: --
12149: CLOSE csr_get_assignment_type;
12148: --
12149: CLOSE csr_get_assignment_type;
12150: --
12151: if g_debug then
12152: hr_utility.set_location(l_proc, 20);
12153: end if;
12154: --
12155: IF l_assignment_type <> 'C' THEN
12156: --
12153: end if;
12154: --
12155: IF l_assignment_type <> 'C' THEN
12156: --
12157: hr_utility.set_message(801,'HR_289575_ASG_ASG_NOT_EMP');
12158: hr_utility.raise_error;
12159: --
12160: END IF;
12161: --
12154: --
12155: IF l_assignment_type <> 'C' THEN
12156: --
12157: hr_utility.set_message(801,'HR_289575_ASG_ASG_NOT_EMP');
12158: hr_utility.raise_error;
12159: --
12160: END IF;
12161: --
12162: if g_debug then
12159: --
12160: END IF;
12161: --
12162: if g_debug then
12163: hr_utility.set_location(l_proc, 21);
12164: end if;
12165: --
12166: --added validation for bug 1867720
12167: --
12275: or p_scl_segment29 is not null
12276: or p_scl_segment30 is not null
12277: or p_concat_segments is not null then
12278: --
12279: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
12280: hr_utility.set_message_token('PROCEDURE', l_proc);
12281: hr_utility.set_message_token('STEP','5');
12282: hr_utility.raise_error;
12283: --
12276: or p_scl_segment30 is not null
12277: or p_concat_segments is not null then
12278: --
12279: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
12280: hr_utility.set_message_token('PROCEDURE', l_proc);
12281: hr_utility.set_message_token('STEP','5');
12282: hr_utility.raise_error;
12283: --
12284: END IF;
12277: or p_concat_segments is not null then
12278: --
12279: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
12280: hr_utility.set_message_token('PROCEDURE', l_proc);
12281: hr_utility.set_message_token('STEP','5');
12282: hr_utility.raise_error;
12283: --
12284: END IF;
12285: --
12278: --
12279: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
12280: hr_utility.set_message_token('PROCEDURE', l_proc);
12281: hr_utility.set_message_token('STEP','5');
12282: hr_utility.raise_error;
12283: --
12284: END IF;
12285: --
12286: ELSE
12340: --
12341: END IF;
12342:
12343: if g_debug then
12344: hr_utility.set_location(l_proc, 22);
12345: end if;
12346:
12347: --
12348: -- Default the PO Header if the line is passed in and the
12388: --end code for bug 6961562
12389:
12390:
12391: if g_debug then
12392: hr_utility.set_location(l_proc, 23);
12393: end if;
12394:
12395: /*
12396: --
12394:
12395: /*
12396: --
12397: if g_debug then
12398: hr_utility.set_location(l_proc, 24);
12399: end if;
12400: --
12401: -- Update or select the cagr_grade_def_id
12402: --
12454: ,p_concatenated_segments => l_cagr_concatenated_segments);
12455: --
12456: */
12457: if g_debug then
12458: hr_utility.set_location(l_proc, 25);
12459: end if;
12460: --
12461: -- Update assignment.
12462: --
12556: ,p_supervisor_assignment_id => p_supervisor_assignment_id
12557: );
12558: --
12559: if g_debug then
12560: hr_utility.set_location(l_proc, 26);
12561: end if;
12562: --
12563: BEGIN
12564: --
12706: hr_kflex_utility.unset_session_date
12707: (p_session_id => l_session_id);
12708: --
12709: if g_debug then
12710: hr_utility.set_location(' Leaving:'||l_proc, 999);
12711: end if;
12712: --
12713: EXCEPTION
12714: --
12923: -- End of 3553286
12924: BEGIN
12925: --
12926: if g_debug then
12927: hr_utility.set_location('Entering:'|| l_proc, 1);
12928: end if;
12929: --
12930: IF p_called_from_mass_update THEN
12931: --
12929: --
12930: IF p_called_from_mass_update THEN
12931: --
12932: if g_debug then
12933: hr_utility.set_location(l_proc,40);
12934: end if;
12935: --
12936: l_dt_update_mode := 'CORRECTION';
12937: l_new_dt_update_mode := p_datetrack_update_mode;
12938: --
12939: ELSE
12940: --
12941: if g_debug then
12942: hr_utility.set_location(l_proc,50);
12943: end if;
12944: --
12945: l_dt_update_mode := p_datetrack_update_mode;
12946: l_new_dt_update_mode := p_datetrack_update_mode;
12971: IF csr_get_assignment_type%NOTFOUND THEN
12972: --
12973: CLOSE csr_get_assignment_type;
12974: --
12975: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
12976: hr_utility.raise_error;
12977: --
12978: END IF;
12979: --
12972: --
12973: CLOSE csr_get_assignment_type;
12974: --
12975: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
12976: hr_utility.raise_error;
12977: --
12978: END IF;
12979: --
12980: CLOSE csr_get_assignment_type;
12979: --
12980: CLOSE csr_get_assignment_type;
12981: --
12982: if g_debug then
12983: hr_utility.set_location(l_proc, 20);
12984: end if;
12985: --
12986: IF l_assignment_type <> 'C' THEN
12987: --
12984: end if;
12985: --
12986: IF l_assignment_type <> 'C' THEN
12987: --
12988: hr_utility.set_message(801,'HR_289575_ASG_ASG_NOT_EMP');
12989: hr_utility.raise_error;
12990: --
12991: END IF;
12992: --
12985: --
12986: IF l_assignment_type <> 'C' THEN
12987: --
12988: hr_utility.set_message(801,'HR_289575_ASG_ASG_NOT_EMP');
12989: hr_utility.raise_error;
12990: --
12991: END IF;
12992: --
12993: BEGIN
13050: --
13051: END;
13052: --
13053: if g_debug then
13054: hr_utility.set_location(l_proc, 10);
13055: end if;
13056: --
13057: l_object_version_number := p_object_version_number;
13058: --
13065: ,p_effective_date => l_effective_date
13066: ,p_object_version_number => l_object_version_number);
13067: --
13068: if g_debug then
13069: hr_utility.set_location(l_proc, 20);
13070: end if;
13071: --
13072: IF NOT l_api_updating THEN
13073: --
13071: --
13072: IF NOT l_api_updating THEN
13073: --
13074: if g_debug then
13075: hr_utility.set_location(l_proc, 30);
13076: end if;
13077: --
13078: -- As this is an updating API, the assignment should already exist.
13079: --
13076: end if;
13077: --
13078: -- As this is an updating API, the assignment should already exist.
13079: --
13080: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
13081: hr_utility.raise_error;
13082: --
13083: ELSE
13084: --
13077: --
13078: -- As this is an updating API, the assignment should already exist.
13079: --
13080: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
13081: hr_utility.raise_error;
13082: --
13083: ELSE
13084: --
13085: if g_debug then
13082: --
13083: ELSE
13084: --
13085: if g_debug then
13086: hr_utility.set_location(l_proc, 40);
13087: end if;
13088: --
13089: l_people_group_id := per_asg_shd.g_old_rec.people_group_id;
13090: --
13090: --
13091: END IF;
13092: --
13093: if g_debug then
13094: hr_utility.set_location(l_proc, 50);
13095: end if;
13096: --
13097: -- Check that the assignment is an employee assignment.
13098: --
13098: --
13099: IF per_asg_shd.g_old_rec.assignment_type <> 'C' THEN
13100: --
13101: if g_debug then
13102: hr_utility.set_location(l_proc, 60);
13103: end if;
13104: --
13105: hr_utility.set_message(801, 'HR_289575_ASG_ASG_NOT_EMP');
13106: hr_utility.raise_error;
13101: if g_debug then
13102: hr_utility.set_location(l_proc, 60);
13103: end if;
13104: --
13105: hr_utility.set_message(801, 'HR_289575_ASG_ASG_NOT_EMP');
13106: hr_utility.raise_error;
13107: --
13108: END IF;
13109: --
13102: hr_utility.set_location(l_proc, 60);
13103: end if;
13104: --
13105: hr_utility.set_message(801, 'HR_289575_ASG_ASG_NOT_EMP');
13106: hr_utility.raise_error;
13107: --
13108: END IF;
13109: --
13110: if g_debug then
13107: --
13108: END IF;
13109: --
13110: if g_debug then
13111: hr_utility.set_location(l_proc, 70);
13112: end if;
13113: --
13114: -- Process Logic
13115: --
13167: IF csr_grp_idsel%NOTFOUND THEN
13168: --
13169: CLOSE csr_grp_idsel;
13170: --
13171: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13172: hr_utility.set_message_token('PROCEDURE', l_proc);
13173: hr_utility.set_message_token('STEP','5');
13174: hr_utility.raise_error;
13175: --
13168: --
13169: CLOSE csr_grp_idsel;
13170: --
13171: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13172: hr_utility.set_message_token('PROCEDURE', l_proc);
13173: hr_utility.set_message_token('STEP','5');
13174: hr_utility.raise_error;
13175: --
13176: END IF;
13169: CLOSE csr_grp_idsel;
13170: --
13171: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13172: hr_utility.set_message_token('PROCEDURE', l_proc);
13173: hr_utility.set_message_token('STEP','5');
13174: hr_utility.raise_error;
13175: --
13176: END IF;
13177: --
13170: --
13171: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13172: hr_utility.set_message_token('PROCEDURE', l_proc);
13173: hr_utility.set_message_token('STEP','5');
13174: hr_utility.raise_error;
13175: --
13176: END IF;
13177: --
13178: CLOSE csr_grp_idsel;
13177: --
13178: CLOSE csr_grp_idsel;
13179: --
13180: if g_debug then
13181: hr_utility.set_location(l_proc, 120);
13182: end if;
13183: --
13184: -- Maintain the people group key flexfields.
13185: --
13258: --
13259: END IF;
13260: --
13261: if g_debug then
13262: hr_utility.set_location(l_proc, 130);
13263: end if;
13264: --
13265: -- update the combinations column
13266: --
13303: ,p_validate => FALSE
13304: ,p_hourly_salaried_warning => l_hourly_salaried_warning);
13305: --
13306: if g_debug then
13307: hr_utility.set_location(l_proc, 140);
13308: end if;
13309: --
13310: -- add to the security lists if neccesary
13311: --
13329: --
13330: END IF;
13331: --
13332: if g_debug then
13333: hr_utility.set_location(l_proc, 145);
13334: end if;
13335: --
13336: -- Bug 560185 fix starts
13337: --
13376: if p_payroll_id = hr_api.g_number
13377: then
13378: --
13379: if g_debug then
13380: hr_utility.set_location(l_proc, 150);
13381: end if;
13382: --
13383: l_new_payroll_id := per_asg_shd.g_old_rec.payroll_id;
13384: else
13383: l_new_payroll_id := per_asg_shd.g_old_rec.payroll_id;
13384: else
13385: --
13386: if g_debug then
13387: hr_utility.set_location(l_proc, 160);
13388: end if;
13389: --
13390: l_new_payroll_id := p_payroll_id;
13391: end if;
13390: l_new_payroll_id := p_payroll_id;
13391: end if;
13392: --
13393: if g_debug then
13394: hr_utility.set_location(l_proc, 170);
13395: end if;
13396: --
13397: hrentmnt.maintain_entries_asg
13398: (p_assignment_id => p_assignment_id
13411: --
13412: -- Bug 630826 fix ends
13413: --
13414: if g_debug then
13415: hr_utility.set_location(l_proc, 180);
13416: end if;
13417: --
13418: if l_entries_changed_warning <> 'S' then
13419: l_entries_changed_warning := nvl(l_entries_changed, 'N');
13429: per_asg_shd.g_old_rec.grade_id <> p_grade_id AND
13430: p_grade_id <> hr_api.g_number) THEN
13431: --
13432: if g_debug then
13433: hr_utility.set_location(l_proc, 190);
13434: end if;
13435: --
13436: -- Maintain spinal point placements.
13437: --
13445: --
13446: ELSE
13447: --
13448: if g_debug then
13449: hr_utility.set_location(l_proc, 200);
13450: end if;
13451: --
13452: -- No SPPs to maintain.
13453: --
13458: */
13459: -- End of bug 3545065
13460: --
13461: if g_debug then
13462: hr_utility.set_location(l_proc, 210);
13463: end if;
13464: --
13465: -- IF GB legislation and payroll has changed, then delete latest balance
13466: -- values,
13472: --
13473: CLOSE csr_get_legislation_code;
13474: --
13475: if g_debug then
13476: hr_utility.set_location(l_proc, 220);
13477: end if;
13478: --
13479: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13480: hr_utility.set_message_token('PROCEDURE', l_proc);
13475: if g_debug then
13476: hr_utility.set_location(l_proc, 220);
13477: end if;
13478: --
13479: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13480: hr_utility.set_message_token('PROCEDURE', l_proc);
13481: hr_utility.set_message_token('STEP', '215');
13482: hr_utility.raise_error;
13483: --
13476: hr_utility.set_location(l_proc, 220);
13477: end if;
13478: --
13479: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13480: hr_utility.set_message_token('PROCEDURE', l_proc);
13481: hr_utility.set_message_token('STEP', '215');
13482: hr_utility.raise_error;
13483: --
13484: END IF;
13477: end if;
13478: --
13479: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13480: hr_utility.set_message_token('PROCEDURE', l_proc);
13481: hr_utility.set_message_token('STEP', '215');
13482: hr_utility.raise_error;
13483: --
13484: END IF;
13485: --
13478: --
13479: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
13480: hr_utility.set_message_token('PROCEDURE', l_proc);
13481: hr_utility.set_message_token('STEP', '215');
13482: hr_utility.raise_error;
13483: --
13484: END IF;
13485: --
13486: CLOSE csr_get_legislation_code;
13485: --
13486: CLOSE csr_get_legislation_code;
13487: --
13488: if g_debug then
13489: hr_utility.set_location(l_proc, 230);
13490: end if;
13491: --
13492: IF l_legislation_code = 'GB' AND l_payroll_id_updated THEN
13493: --
13491: --
13492: IF l_legislation_code = 'GB' AND l_payroll_id_updated THEN
13493: --
13494: if g_debug then
13495: hr_utility.set_location(l_proc, 240);
13496: end if;
13497: --
13498: -- Delete latest balance values.
13499: --
13509: --
13510: ELSE
13511: --
13512: if g_debug then
13513: hr_utility.set_location(l_proc, 250);
13514: end if;
13515: --
13516: l_tax_district_changed_warning := FALSE;
13517: --
13517: --
13518: END IF;
13519: --
13520: if g_debug then
13521: hr_utility.set_location(l_proc, 260);
13522: end if;
13523: --
13524: BEGIN
13525: --
13617: hr_kflex_utility.unset_session_date
13618: (p_session_id => l_session_id);
13619: --
13620: if g_debug then
13621: hr_utility.set_location(' Leaving:'||l_proc, 999);
13622: end if;
13623: --
13624: EXCEPTION
13625: --
13747: --
13748: begin
13749: if g_debug then
13750: l_proc := g_package||'update_gb_emp_asg';
13751: hr_utility.set_location('Entering:'|| l_proc, 10);
13752: end if;
13753: --
13754: -- Call the overloaded procedure
13755: --
13825: ,p_other_manager_warning => p_other_manager_warning
13826: ,p_supervisor_assignment_id => p_supervisor_assignment_id
13827: );
13828: if g_debug then
13829: hr_utility.set_location(' Leaving:'||l_proc, 20);
13830: end if;
13831: end update_gb_emp_asg;
13832: --
13833: -- ----------------------------------------------------------------------------
13942: --
13943: begin
13944: if g_debug then
13945: l_proc := g_package||'update_gb_emp_asg';
13946: hr_utility.set_location('Entering:'|| l_proc, 10);
13947: end if;
13948: --
13949: -- Truncate date variables
13950: --
13957: open check_legislation(p_assignment_id, l_effective_date);
13958: fetch check_legislation into l_legislation_code;
13959: if check_legislation%notfound then
13960: close check_legislation;
13961: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
13962: hr_utility.raise_error;
13963: end if;
13964: close check_legislation;
13965: if g_debug then
13958: fetch check_legislation into l_legislation_code;
13959: if check_legislation%notfound then
13960: close check_legislation;
13961: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
13962: hr_utility.raise_error;
13963: end if;
13964: close check_legislation;
13965: if g_debug then
13966: hr_utility.set_location(l_proc, 20);
13962: hr_utility.raise_error;
13963: end if;
13964: close check_legislation;
13965: if g_debug then
13966: hr_utility.set_location(l_proc, 20);
13967: end if;
13968: --
13969: -- Check that the legislation of the specified business group is 'GB'.
13970: --
13968: --
13969: -- Check that the legislation of the specified business group is 'GB'.
13970: --
13971: if l_legislation_code <> 'GB' then
13972: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
13973: hr_utility.set_message_token('LEG_CODE','GB');
13974: hr_utility.raise_error;
13975: end if;
13976: if g_debug then
13969: -- Check that the legislation of the specified business group is 'GB'.
13970: --
13971: if l_legislation_code <> 'GB' then
13972: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
13973: hr_utility.set_message_token('LEG_CODE','GB');
13974: hr_utility.raise_error;
13975: end if;
13976: if g_debug then
13977: hr_utility.set_location(l_proc, 30);
13970: --
13971: if l_legislation_code <> 'GB' then
13972: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
13973: hr_utility.set_message_token('LEG_CODE','GB');
13974: hr_utility.raise_error;
13975: end if;
13976: if g_debug then
13977: hr_utility.set_location(l_proc, 30);
13978: end if;
13973: hr_utility.set_message_token('LEG_CODE','GB');
13974: hr_utility.raise_error;
13975: end if;
13976: if g_debug then
13977: hr_utility.set_location(l_proc, 30);
13978: end if;
13979: --
13980: -- Call update_emp_asg business process
13981: --
14060: ,p_other_manager_warning => p_other_manager_warning
14061: ,p_supervisor_assignment_id => p_supervisor_assignment_id
14062: );
14063: if g_debug then
14064: hr_utility.set_location(' Leaving:'||l_proc, 40);
14065: end if;
14066: end update_gb_emp_asg;
14067:
14068: --
14179: --
14180: begin
14181: if g_debug then
14182: l_proc := g_package||'update_gb_emp_asg';
14183: hr_utility.set_location('Entering:'|| l_proc, 10);
14184: end if;
14185: --
14186: -- Truncate date variables
14187: --
14194: open check_legislation(p_assignment_id, l_effective_date);
14195: fetch check_legislation into l_legislation_code;
14196: if check_legislation%notfound then
14197: close check_legislation;
14198: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
14199: hr_utility.raise_error;
14200: end if;
14201: close check_legislation;
14202: if g_debug then
14195: fetch check_legislation into l_legislation_code;
14196: if check_legislation%notfound then
14197: close check_legislation;
14198: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
14199: hr_utility.raise_error;
14200: end if;
14201: close check_legislation;
14202: if g_debug then
14203: hr_utility.set_location(l_proc, 20);
14199: hr_utility.raise_error;
14200: end if;
14201: close check_legislation;
14202: if g_debug then
14203: hr_utility.set_location(l_proc, 20);
14204: end if;
14205: --
14206: -- Check that the legislation of the specified business group is 'GB'.
14207: --
14205: --
14206: -- Check that the legislation of the specified business group is 'GB'.
14207: --
14208: if l_legislation_code <> 'GB' then
14209: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14210: hr_utility.set_message_token('LEG_CODE','GB');
14211: hr_utility.raise_error;
14212: end if;
14213: if g_debug then
14206: -- Check that the legislation of the specified business group is 'GB'.
14207: --
14208: if l_legislation_code <> 'GB' then
14209: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14210: hr_utility.set_message_token('LEG_CODE','GB');
14211: hr_utility.raise_error;
14212: end if;
14213: if g_debug then
14214: hr_utility.set_location(l_proc, 30);
14207: --
14208: if l_legislation_code <> 'GB' then
14209: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14210: hr_utility.set_message_token('LEG_CODE','GB');
14211: hr_utility.raise_error;
14212: end if;
14213: if g_debug then
14214: hr_utility.set_location(l_proc, 30);
14215: end if;
14210: hr_utility.set_message_token('LEG_CODE','GB');
14211: hr_utility.raise_error;
14212: end if;
14213: if g_debug then
14214: hr_utility.set_location(l_proc, 30);
14215: end if;
14216: --
14217: -- Call update_emp_asg business process
14218: --
14298: ,p_hourly_salaried_warning => p_hourly_salaried_warning
14299: ,p_supervisor_assignment_id => p_supervisor_assignment_id
14300: );
14301: if g_debug then
14302: hr_utility.set_location(' Leaving:'||l_proc, 40);
14303: end if;
14304: end update_gb_emp_asg;
14305:
14306: -- End of OVERLOADED procedure update_gb_emp_asg
14404: --
14405: begin
14406: if g_debug then
14407: l_proc := g_package||'update_us_emp_asg';
14408: hr_utility.set_location('Entering:'|| l_proc, 10);
14409: end if;
14410: --
14411: -- Call the overloaded procedure update_us_emp_asg
14412: --
14495: ,p_other_manager_warning => p_other_manager_warning
14496: ,p_supervisor_assignment_id => p_supervisor_assignment_id
14497: );
14498: if g_debug then
14499: hr_utility.set_location(' Leaving:'||l_proc, 40);
14500: end if;
14501: end update_us_emp_asg;
14502: --
14503: -- ----------------------------------------------------------------------------
14627: --
14628: begin
14629: if g_debug then
14630: l_proc := g_package||'update_us_emp_asg';
14631: hr_utility.set_location('Entering:'|| l_proc, 10);
14632: end if;
14633: --
14634: -- Truncate date variables
14635: --
14642: open check_legislation(p_assignment_id, l_effective_date);
14643: fetch check_legislation into l_legislation_code;
14644: if check_legislation%notfound then
14645: close check_legislation;
14646: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
14647: hr_utility.raise_error;
14648: end if;
14649: close check_legislation;
14650: if g_debug then
14643: fetch check_legislation into l_legislation_code;
14644: if check_legislation%notfound then
14645: close check_legislation;
14646: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
14647: hr_utility.raise_error;
14648: end if;
14649: close check_legislation;
14650: if g_debug then
14651: hr_utility.set_location(l_proc, 20);
14647: hr_utility.raise_error;
14648: end if;
14649: close check_legislation;
14650: if g_debug then
14651: hr_utility.set_location(l_proc, 20);
14652: end if;
14653: --
14654: -- Check that the legislation of the specified business group is 'US'.
14655: --
14653: --
14654: -- Check that the legislation of the specified business group is 'US'.
14655: --
14656: if l_legislation_code <> 'US' then
14657: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14658: hr_utility.set_message_token('LEG_CODE','US');
14659: hr_utility.raise_error;
14660: end if;
14661: if g_debug then
14654: -- Check that the legislation of the specified business group is 'US'.
14655: --
14656: if l_legislation_code <> 'US' then
14657: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14658: hr_utility.set_message_token('LEG_CODE','US');
14659: hr_utility.raise_error;
14660: end if;
14661: if g_debug then
14662: hr_utility.set_location(l_proc, 30);
14655: --
14656: if l_legislation_code <> 'US' then
14657: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14658: hr_utility.set_message_token('LEG_CODE','US');
14659: hr_utility.raise_error;
14660: end if;
14661: if g_debug then
14662: hr_utility.set_location(l_proc, 30);
14663: end if;
14658: hr_utility.set_message_token('LEG_CODE','US');
14659: hr_utility.raise_error;
14660: end if;
14661: if g_debug then
14662: hr_utility.set_location(l_proc, 30);
14663: end if;
14664: --
14665: -- Call update_emp_asg business process
14666: --
14757: ,p_other_manager_warning => p_other_manager_warning
14758: ,p_supervisor_assignment_id => p_supervisor_assignment_id
14759: );
14760: if g_debug then
14761: hr_utility.set_location(' Leaving:'||l_proc, 40);
14762: end if;
14763: end update_us_emp_asg;
14764: -- End of update_us_emp_asg OVERLOADED procedure
14765:
14893: --
14894: begin
14895: if g_debug then
14896: l_proc := g_package||'update_us_emp_asg';
14897: hr_utility.set_location('Entering:'|| l_proc, 10);
14898: end if;
14899: --
14900: -- Truncate date variables
14901: --
14908: open check_legislation(p_assignment_id, l_effective_date);
14909: fetch check_legislation into l_legislation_code;
14910: if check_legislation%notfound then
14911: close check_legislation;
14912: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
14913: hr_utility.raise_error;
14914: end if;
14915: close check_legislation;
14916: if g_debug then
14909: fetch check_legislation into l_legislation_code;
14910: if check_legislation%notfound then
14911: close check_legislation;
14912: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
14913: hr_utility.raise_error;
14914: end if;
14915: close check_legislation;
14916: if g_debug then
14917: hr_utility.set_location(l_proc, 20);
14913: hr_utility.raise_error;
14914: end if;
14915: close check_legislation;
14916: if g_debug then
14917: hr_utility.set_location(l_proc, 20);
14918: end if;
14919: --
14920: -- Check that the legislation of the specified business group is 'US'.
14921: --
14919: --
14920: -- Check that the legislation of the specified business group is 'US'.
14921: --
14922: if l_legislation_code <> 'US' then
14923: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14924: hr_utility.set_message_token('LEG_CODE','US');
14925: hr_utility.raise_error;
14926: end if;
14927: if g_debug then
14920: -- Check that the legislation of the specified business group is 'US'.
14921: --
14922: if l_legislation_code <> 'US' then
14923: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14924: hr_utility.set_message_token('LEG_CODE','US');
14925: hr_utility.raise_error;
14926: end if;
14927: if g_debug then
14928: hr_utility.set_location(l_proc, 30);
14921: --
14922: if l_legislation_code <> 'US' then
14923: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
14924: hr_utility.set_message_token('LEG_CODE','US');
14925: hr_utility.raise_error;
14926: end if;
14927: if g_debug then
14928: hr_utility.set_location(l_proc, 30);
14929: end if;
14924: hr_utility.set_message_token('LEG_CODE','US');
14925: hr_utility.raise_error;
14926: end if;
14927: if g_debug then
14928: hr_utility.set_location(l_proc, 30);
14929: end if;
14930: --
14931: -- Call update_emp_asg business process
14932: --
15025: ,p_gsp_post_process_warning => l_gsp_post_process_warning -- bug 2999562
15026: ,p_supervisor_assignment_id => p_supervisor_assignment_id
15027: );
15028: if g_debug then
15029: hr_utility.set_location(' Leaving:'||l_proc, 40);
15030: end if;
15031: end update_us_emp_asg;
15032: -- End of update_us_emp_asg OVERLOADED procedure
15033:
15161: --
15162: begin
15163: if g_debug then
15164: l_proc := g_package||'update_us_emp_asg';
15165: hr_utility.set_location('Entering:'|| l_proc, 10);
15166: end if;
15167: --
15168: -- Truncate date variables
15169: --
15176: open check_legislation(p_assignment_id, l_effective_date);
15177: fetch check_legislation into l_legislation_code;
15178: if check_legislation%notfound then
15179: close check_legislation;
15180: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
15181: hr_utility.raise_error;
15182: end if;
15183: close check_legislation;
15184: if g_debug then
15177: fetch check_legislation into l_legislation_code;
15178: if check_legislation%notfound then
15179: close check_legislation;
15180: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
15181: hr_utility.raise_error;
15182: end if;
15183: close check_legislation;
15184: if g_debug then
15185: hr_utility.set_location(l_proc, 20);
15181: hr_utility.raise_error;
15182: end if;
15183: close check_legislation;
15184: if g_debug then
15185: hr_utility.set_location(l_proc, 20);
15186: end if;
15187: --
15188: -- Check that the legislation of the specified business group is 'US'.
15189: --
15187: --
15188: -- Check that the legislation of the specified business group is 'US'.
15189: --
15190: if l_legislation_code <> 'US' then
15191: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
15192: hr_utility.set_message_token('LEG_CODE','US');
15193: hr_utility.raise_error;
15194: end if;
15195: if g_debug then
15188: -- Check that the legislation of the specified business group is 'US'.
15189: --
15190: if l_legislation_code <> 'US' then
15191: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
15192: hr_utility.set_message_token('LEG_CODE','US');
15193: hr_utility.raise_error;
15194: end if;
15195: if g_debug then
15196: hr_utility.set_location(l_proc, 30);
15189: --
15190: if l_legislation_code <> 'US' then
15191: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
15192: hr_utility.set_message_token('LEG_CODE','US');
15193: hr_utility.raise_error;
15194: end if;
15195: if g_debug then
15196: hr_utility.set_location(l_proc, 30);
15197: end if;
15192: hr_utility.set_message_token('LEG_CODE','US');
15193: hr_utility.raise_error;
15194: end if;
15195: if g_debug then
15196: hr_utility.set_location(l_proc, 30);
15197: end if;
15198: --
15199: -- Call update_emp_asg business process
15200: --
15293: ,p_gsp_post_process_warning => p_gsp_post_process_warning
15294: ,p_supervisor_assignment_id => p_supervisor_assignment_id
15295: );
15296: if g_debug then
15297: hr_utility.set_location(' Leaving:'||l_proc, 40);
15298: end if;
15299: end update_us_emp_asg;
15300: -- End of update_us_emp_asg OVERLOADED procedure
15301:
15406:
15407: l_object_version_number := p_object_version_number;
15408: --
15409: if g_debug then
15410: hr_utility.set_location('Entering:'|| l_proc, 5);
15411: end if;
15412:
15413: -- Start of fix 3553286
15414: -- Start of bug fix 2656155
15517: p_spp_delete_warning := l_spp_delete_warning;
15518: p_tax_district_changed_warning := l_tax_district_changed_warning;
15519:
15520: if g_debug then
15521: hr_utility.set_location('Leaving:'|| l_proc, 20);
15522: end if;
15523:
15524: End update_emp_asg_criteria;
15525:
15642:
15643: l_object_version_number := p_object_version_number;
15644: --
15645: if g_debug then
15646: hr_utility.set_location('Entering:'|| l_proc, 5);
15647: end if;
15648:
15649: --
15650: -- Calling New Overloaded Procedure
15732: p_tax_district_changed_warning := l_tax_district_changed_warning;
15733: --
15734: --
15735: if g_debug then
15736: hr_utility.set_location(' Leaving:'||l_proc, 997);
15737: end if;
15738: --
15739: end update_emp_asg_criteria;
15740: -- ----------------------------------------------------------------------------
16104: -- End changes for bug 12911607
16105: --
16106: begin
16107: if g_debug then
16108: hr_utility.set_location('Entering:'|| l_proc, 30);
16109: end if;
16110:
16111: --
16112: -- Truncate the p_effective_date value to remove time element.
16125: --
16126: IF p_called_from_mass_update THEN
16127: --
16128: if g_debug then
16129: hr_utility.set_location(l_proc,40);
16130: end if;
16131: --
16132: l_dt_update_mode := 'CORRECTION';
16133: l_new_dt_update_mode := p_datetrack_update_mode;
16134: --
16135: ELSE
16136: --
16137: if g_debug then
16138: hr_utility.set_location(l_proc,50);
16139: end if;
16140: --
16141: l_dt_update_mode := p_datetrack_update_mode;
16142: l_new_dt_update_mode := p_datetrack_update_mode;
16146: -- Bug 2359997 - if p_people_group_id enters with
16147: -- a value then get segment values from pay_people_groups.
16148: --
16149: if g_debug then
16150: hr_utility.set_location(l_proc, 60);
16151: end if;
16152: --
16153: if l_people_group_id is null
16154: then
16268: --
16269: end;
16270: --
16271: if g_debug then
16272: hr_utility.set_location(l_proc, 70);
16273: end if;
16274: --
16275: l_object_version_number := p_object_version_number;
16276: --
16283: ,p_effective_date => l_effective_date
16284: ,p_object_version_number => l_object_version_number);
16285: --
16286: if g_debug then
16287: hr_utility.set_location(l_proc, 80);
16288: end if;
16289: --
16290: if not l_api_updating
16291: then
16290: if not l_api_updating
16291: then
16292: --
16293: if g_debug then
16294: hr_utility.set_location(l_proc, 90);
16295: end if;
16296: --
16297: -- As this is an updating API, the assignment should already exist.
16298: --
16295: end if;
16296: --
16297: -- As this is an updating API, the assignment should already exist.
16298: --
16299: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
16300: hr_utility.raise_error;
16301: -- else
16302: --
16303: if g_debug then
16296: --
16297: -- As this is an updating API, the assignment should already exist.
16298: --
16299: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
16300: hr_utility.raise_error;
16301: -- else
16302: --
16303: if g_debug then
16304: hr_utility.set_location(l_proc, 100);
16300: hr_utility.raise_error;
16301: -- else
16302: --
16303: if g_debug then
16304: hr_utility.set_location(l_proc, 100);
16305: end if;
16306: --
16307: -- l_people_group_id := per_asg_shd.g_old_rec.people_group_id; bug 2359997
16308: end if;
16307: -- l_people_group_id := per_asg_shd.g_old_rec.people_group_id; bug 2359997
16308: end if;
16309: --
16310: if g_debug then
16311: hr_utility.set_location(l_proc, 110);
16312: end if;
16313: --
16314: -- Check that the assignment is an employee assignment.
16315: --
16316: if per_asg_shd.g_old_rec.assignment_type <> 'E'
16317: then
16318: --
16319: if g_debug then
16320: hr_utility.set_location(l_proc, 120);
16321: end if;
16322: --
16323: hr_utility.set_message(801, 'HR_7948_ASG_ASG_NOT_EMP');
16324: hr_utility.raise_error;
16319: if g_debug then
16320: hr_utility.set_location(l_proc, 120);
16321: end if;
16322: --
16323: hr_utility.set_message(801, 'HR_7948_ASG_ASG_NOT_EMP');
16324: hr_utility.raise_error;
16325: end if;
16326: --
16327: if g_debug then
16320: hr_utility.set_location(l_proc, 120);
16321: end if;
16322: --
16323: hr_utility.set_message(801, 'HR_7948_ASG_ASG_NOT_EMP');
16324: hr_utility.raise_error;
16325: end if;
16326: --
16327: if g_debug then
16328: hr_utility.set_location(l_proc, 130);
16324: hr_utility.raise_error;
16325: end if;
16326: --
16327: if g_debug then
16328: hr_utility.set_location(l_proc, 130);
16329: end if;
16330: --
16331: -- Removed as part of fix for bug
16332: --
16377: p_grade_id <> hr_api.g_number AND -- 3485599
16378: p_special_ceiling_step_id IS NOT NULL) then
16379: --
16380: if g_debug then
16381: hr_utility.set_location(l_proc, 140);
16382: end if;
16383: --
16384: open csr_chk_grade_and_ceiling;
16385: fetch csr_chk_grade_and_ceiling into l_step_id;
16389: --
16390: if csr_chk_grade_and_ceiling%NOTFOUND then
16391: --
16392: if g_debug then
16393: hr_utility.set_location(l_proc, 150);
16394: end if;
16395: --
16396: close csr_chk_grade_and_ceiling;
16397: --
16402: --
16403: else
16404: --
16405: if g_debug then
16406: hr_utility.set_location(l_proc, 160);
16407: end if;
16408: --
16409: close csr_chk_grade_and_ceiling;
16410: --
16417: --
16418: elsif p_grade_id is null then
16419: --
16420: if g_debug then
16421: hr_utility.set_location(l_proc, 170);
16422: end if;
16423: --
16424: l_special_ceiling_step_id := null;
16425: --
16425: --
16426: else
16427: --
16428: if g_debug then
16429: hr_utility.set_location(l_proc, 180);
16430: end if;
16431: --
16432: if p_special_ceiling_step_id = hr_api.g_number then
16433: --
16431: --
16432: if p_special_ceiling_step_id = hr_api.g_number then
16433: --
16434: if g_debug then
16435: hr_utility.set_location(l_proc, 190);
16436: end if;
16437: --
16438: l_special_ceiling_step_id := per_asg_shd.g_old_rec.special_ceiling_step_id;
16439: --
16439: --
16440: else
16441: --
16442: if g_debug then
16443: hr_utility.set_location(l_proc, 200);
16444: end if;
16445: --
16446: l_special_ceiling_step_id := p_special_ceiling_step_id;
16447: --
16448: end if;
16449: --
16450: end if;
16451: if g_debug then
16452: hr_utility.set_location(l_proc, 210);
16453: end if;
16454: --
16455: -- Populate l_business_group_id from g_old_rec for cursor csr_grp_idsel
16456: --
16482: l_location_id:=p_location_id;
16483: end if;
16484: --
16485: if g_debug then
16486: hr_utility.set_location(l_proc, 220);
16487: end if;
16488: --
16489: hr_kflex_utility.set_profiles
16490: (p_business_group_id => l_business_group_id
16492: ,p_organization_id => l_organization_id
16493: ,p_location_id => l_location_id);
16494: --
16495: if g_debug then
16496: hr_utility.set_location(l_proc, 230);
16497: end if;
16498: --
16499: hr_kflex_utility.set_session_date
16500: (p_effective_date => l_effective_date
16500: (p_effective_date => l_effective_date
16501: ,p_session_id => l_session_id);
16502: --
16503: if g_debug then
16504: hr_utility.set_location(l_proc, 240);
16505: end if;
16506: --
16507: open csr_grp_idsel;
16508: fetch csr_grp_idsel
16508: fetch csr_grp_idsel
16509: into l_flex_num;
16510: if csr_grp_idsel%NOTFOUND then
16511: close csr_grp_idsel;
16512: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
16513: hr_utility.set_message_token('PROCEDURE', l_proc);
16514: hr_utility.set_message_token('STEP','5');
16515: hr_utility.raise_error;
16516: end if;
16509: into l_flex_num;
16510: if csr_grp_idsel%NOTFOUND then
16511: close csr_grp_idsel;
16512: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
16513: hr_utility.set_message_token('PROCEDURE', l_proc);
16514: hr_utility.set_message_token('STEP','5');
16515: hr_utility.raise_error;
16516: end if;
16517: close csr_grp_idsel;
16510: if csr_grp_idsel%NOTFOUND then
16511: close csr_grp_idsel;
16512: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
16513: hr_utility.set_message_token('PROCEDURE', l_proc);
16514: hr_utility.set_message_token('STEP','5');
16515: hr_utility.raise_error;
16516: end if;
16517: close csr_grp_idsel;
16518: --
16511: close csr_grp_idsel;
16512: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
16513: hr_utility.set_message_token('PROCEDURE', l_proc);
16514: hr_utility.set_message_token('STEP','5');
16515: hr_utility.raise_error;
16516: end if;
16517: close csr_grp_idsel;
16518: --
16519: if g_debug then
16516: end if;
16517: close csr_grp_idsel;
16518: --
16519: if g_debug then
16520: hr_utility.set_location(l_proc, 250);
16521: end if;
16522: --
16523: -- Maintain the people group key flexfields.
16524: --
16623: --
16624: --end if;--fix for bug 4633742.
16625: --
16626: if g_debug then
16627: hr_utility.set_location(l_proc, 260);
16628: end if;
16629: --
16630: -- update the combinations column
16631: --
16637: end if;
16638: end if;--fix for bug 4633742.
16639: --
16640: if g_debug then
16641: hr_utility.set_location(l_proc, 270);
16642: end if;
16643: --
16644: --
16645: -- Start of fix for Bug 2622747
16721: ,p_supervisor_assignment_id => p_supervisor_assignment_id
16722: );
16723: --
16724: if g_debug then
16725: hr_utility.set_location(l_proc, 280);
16726: end if;
16727: --
16728: -- add to the security lists if neccesary
16729: --
16742: hr_security_internal.add_to_person_list(l_effective_date,p_assignment_id);
16743: end if;
16744: --
16745: if g_debug then
16746: hr_utility.set_location(l_proc, 290);
16747: end if;
16748: --
16749: -- Bug 560185 fix starts
16750: --
16837: -- Start changes for bug 12911607
16838: OPEN csr_get_salary; -- Check any salary proposal exists on the given dates.
16839: FETCH csr_get_salary INTO l_element_entry_id;
16840:
16841: hr_utility.set_location('l_element_entry_id:'|| l_element_entry_id, 291);
16842:
16843: IF csr_get_salary%found THEN
16844: IF p_create_salary_proposal = 'Y' and p_pay_basis_id is not null THEN -- if 1 Check for Pay Proposal
16845: CLOSE csr_get_salary;
16843: IF csr_get_salary%found THEN
16844: IF p_create_salary_proposal = 'Y' and p_pay_basis_id is not null THEN -- if 1 Check for Pay Proposal
16845: CLOSE csr_get_salary;
16846:
16847: hr_utility.set_location('P_CREATE_SALARY_PROPOSAL is Y. Update SP', 292);
16848:
16849: OPEN csr_chk_rec_exists; -- Check any salary proposal exists on the given date - 1.
16850: FETCH csr_chk_rec_exists INTO l_element_entry_id1;
16851:
16848:
16849: OPEN csr_chk_rec_exists; -- Check any salary proposal exists on the given date - 1.
16850: FETCH csr_chk_rec_exists INTO l_element_entry_id1;
16851:
16852: hr_utility.set_location('l_element_entry_id1:'|| l_element_entry_id1, 293);
16853:
16854: IF csr_chk_rec_exists%found THEN -- if 2 Check for Previous Pay Proposal
16855: CLOSE csr_chk_rec_exists;
16856:
16859: CLOSE csr_pay_proposal_exists;
16860:
16861: IF l_pay_proposal_id IS NULL THEN -- if 3
16862: -- no salary proposal exists on this date. Go create it .
16863: hr_utility.set_location('Creating new salary proposal', 292);
16864:
16865: if p_datetrack_update_mode in ('CORRECTION','UPDATE') then
16866:
16867: open future_pay_proposals;
16894: P_PROPOSED_SALARY_WARNING => L_PROPOSED_SALARY_WARNING,
16895: P_APPROVED_WARNING => L_APPROVED_WARNING,
16896: P_PAYROLL_WARNING => L_PAYROLL_WARNING);
16897:
16898: hr_utility.set_location('l_Pay_Proposal_Id:' || l_Pay_Proposal_Id, 293);
16899:
16900: else
16901: --
16902: -- Can't allow the change. Close the cursor, reset the
16903: -- salary basis values, and raise an error.
16904: --
16905: close future_pay_proposals;
16906: --
16907: hr_utility.set_message('PAY', 'HR_51033_ASS_FUT_SAL_ADMIN');
16908: hr_utility.raise_error;
16909: end if;
16910:
16911: end if; --check furture_pay_proposals
16904: --
16905: close future_pay_proposals;
16906: --
16907: hr_utility.set_message('PAY', 'HR_51033_ASS_FUT_SAL_ADMIN');
16908: hr_utility.raise_error;
16909: end if;
16910:
16911: end if; --check furture_pay_proposals
16912:
16911: end if; --check furture_pay_proposals
16912:
16913: ELSE -- if 3
16914: IF l_element_entry_id = l_element_entry_id1 THEN -- if 4
16915: hr_utility.set_location('End-Dating the salary proposal element.', 294);
16916: hr_utility.set_location('l_element_entry_id:' || l_element_entry_id, 294);
16917: hr_entry_api.delete_element_entry
16918: ('DELETE',
16919: l_validation_start_date - 1,
16912:
16913: ELSE -- if 3
16914: IF l_element_entry_id = l_element_entry_id1 THEN -- if 4
16915: hr_utility.set_location('End-Dating the salary proposal element.', 294);
16916: hr_utility.set_location('l_element_entry_id:' || l_element_entry_id, 294);
16917: hr_entry_api.delete_element_entry
16918: ('DELETE',
16919: l_validation_start_date - 1,
16920: l_element_entry_id);
16919: l_validation_start_date - 1,
16920: l_element_entry_id);
16921: ELSE
16922: -- Zapping the latest salary proposal if no prior salary proposal exists.
16923: hr_utility.set_location('Zaping the element of latest salary proposal.', 295);
16924: hr_utility.set_location('l_element_entry_id' || l_element_entry_id, 295);
16925: hr_entry_api.delete_element_entry
16926: ('ZAP',
16927: l_validation_start_date,
16920: l_element_entry_id);
16921: ELSE
16922: -- Zapping the latest salary proposal if no prior salary proposal exists.
16923: hr_utility.set_location('Zaping the element of latest salary proposal.', 295);
16924: hr_utility.set_location('l_element_entry_id' || l_element_entry_id, 295);
16925: hr_entry_api.delete_element_entry
16926: ('ZAP',
16927: l_validation_start_date,
16928: l_element_entry_id);
16929: END IF; --if 4
16930: END IF; -- if 3
16931: ELSE -- else 2 Check for Previous Pay Proposal
16932: -- Zapping the salary proposal if no prior salary proposal exists.
16933: hr_utility.set_location('Zaping the only salary proposal element.', 297);
16934: hr_entry_api.delete_element_entry
16935: ('ZAP',
16936: l_validation_start_date,
16937: l_element_entry_id);
16939: CLOSE csr_chk_rec_exists;
16940: END IF; -- if 2 Check for Previous Pay Proposal
16941: l_entries_changed_warning := 'S';
16942: ELSE -- else 1 Check for Pay Proposal
16943: hr_utility.set_location('P_CREATE_SALARY_PROPOSAL is N, End-date Salary Proposal', 298);
16944: CLOSE csr_get_salary;
16945:
16946: hr_entry_api.delete_element_entry
16947: ('DELETE'
16950: --
16951: l_entries_changed_warning := 'S';
16952: END IF; -- if 1 Check for Pay Proposal
16953: ELSE
16954: hr_utility.set_location('No Salary Proposal found', 299);
16955: CLOSE csr_get_salary;
16956: END IF;
16957: --End changes for #12911607
16958:
16969: if p_payroll_id = hr_api.g_number
16970: then
16971: --
16972: if g_debug then
16973: hr_utility.set_location(l_proc, 300);
16974: end if;
16975: --
16976: l_new_payroll_id := per_asg_shd.g_old_rec.payroll_id;
16977: else
16976: l_new_payroll_id := per_asg_shd.g_old_rec.payroll_id;
16977: else
16978: --
16979: if g_debug then
16980: hr_utility.set_location(l_proc, 310);
16981: end if;
16982: --
16983: l_new_payroll_id := p_payroll_id;
16984: end if;
16983: l_new_payroll_id := p_payroll_id;
16984: end if;
16985: --
16986: if g_debug then
16987: hr_utility.set_location(l_proc, 320);
16988: end if;
16989: --
16990: hr_utility.set_location('p_old_pg_id :'||to_char(per_asg_shd.g_old_rec.payroll_id),325);
16991: hr_utility.set_location('p_new_pg_id :'||to_char(l_people_group_id),325);
16986: if g_debug then
16987: hr_utility.set_location(l_proc, 320);
16988: end if;
16989: --
16990: hr_utility.set_location('p_old_pg_id :'||to_char(per_asg_shd.g_old_rec.payroll_id),325);
16991: hr_utility.set_location('p_new_pg_id :'||to_char(l_people_group_id),325);
16992: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16987: hr_utility.set_location(l_proc, 320);
16988: end if;
16989: --
16990: hr_utility.set_location('p_old_pg_id :'||to_char(per_asg_shd.g_old_rec.payroll_id),325);
16991: hr_utility.set_location('p_new_pg_id :'||to_char(l_people_group_id),325);
16992: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16989: --
16990: hr_utility.set_location('p_old_pg_id :'||to_char(per_asg_shd.g_old_rec.payroll_id),325);
16991: hr_utility.set_location('p_new_pg_id :'||to_char(l_people_group_id),325);
16992: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16996: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_org_id:' || l_organization_id,11);
16997: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_emp_cat:' || per_asg_shd.g_old_rec.employment_category,11);
16990: hr_utility.set_location('p_old_pg_id :'||to_char(per_asg_shd.g_old_rec.payroll_id),325);
16991: hr_utility.set_location('p_new_pg_id :'||to_char(l_people_group_id),325);
16992: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16996: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_org_id:' || l_organization_id,11);
16997: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_emp_cat:' || per_asg_shd.g_old_rec.employment_category,11);
16998: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_emp_cat:' || p_employment_category,11); -- Bug#13960540
16991: hr_utility.set_location('p_new_pg_id :'||to_char(l_people_group_id),325);
16992: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16996: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_org_id:' || l_organization_id,11);
16997: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_emp_cat:' || per_asg_shd.g_old_rec.employment_category,11);
16998: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_emp_cat:' || p_employment_category,11); -- Bug#13960540
16999:
16992: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16996: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_org_id:' || l_organization_id,11);
16997: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_emp_cat:' || per_asg_shd.g_old_rec.employment_category,11);
16998: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_emp_cat:' || p_employment_category,11); -- Bug#13960540
16999:
17000: --
16993: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_grade_id:' || p_grade_id,11); -- Bug#13960540
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16996: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_org_id:' || l_organization_id,11);
16997: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_emp_cat:' || per_asg_shd.g_old_rec.employment_category,11);
16998: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_emp_cat:' || p_employment_category,11); -- Bug#13960540
16999:
17000: --
17001: hrentmnt.maintain_entries_asg
16994: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_s_grd_id:' || per_asg_shd.g_old_rec.grade_id,11);
16995: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_org_id:' || per_asg_shd.g_old_rec.organization_id,11);
16996: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_org_id:' || l_organization_id,11);
16997: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_old_emp_cat:' || per_asg_shd.g_old_rec.employment_category,11);
16998: hr_utility.set_location('peasgapi.pkb.hrentmnt.maintain_entries_asg..p_new_emp_cat:' || p_employment_category,11); -- Bug#13960540
16999:
17000: --
17001: hrentmnt.maintain_entries_asg
17002: (p_assignment_id => p_assignment_id
17023: --
17024: -- Bug 630826 fix ends
17025: --
17026: if g_debug then
17027: hr_utility.set_location(l_proc, 330);
17028: end if;
17029:
17030:
17031: /* commented the code for Bug#14248434 */
17054: AND p_grade_id <> hr_api.g_number)
17055: then
17056: --
17057: if g_debug then
17058: hr_utility.set_location(l_proc, 340);
17059: end if;
17060: --
17061: -- Maintain spinal point placements.
17062: --
17070: );
17071: else
17072: --
17073: if g_debug then
17074: hr_utility.set_location(l_proc, 350);
17075: end if;
17076: --
17077: -- No SPPs to maintain.
17078: --
17079: l_spp_delete_warning := FALSE;
17080: end if;
17081: --
17082: if g_debug then
17083: hr_utility.set_location(l_proc, 360);
17084: end if;
17085: --
17086: -- IF GB legislation and payroll has changed, then delete latest balance
17087: -- values,
17094: --
17095: close csr_get_legislation_code;
17096: --
17097: if g_debug then
17098: hr_utility.set_location(l_proc, 370);
17099: end if;
17100: --
17101: -- This should never happen!
17102: --
17099: end if;
17100: --
17101: -- This should never happen!
17102: --
17103: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
17104: hr_utility.set_message_token('PROCEDURE', l_proc);
17105: hr_utility.set_message_token('STEP', '215');
17106: hr_utility.raise_error;
17107: end if;
17100: --
17101: -- This should never happen!
17102: --
17103: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
17104: hr_utility.set_message_token('PROCEDURE', l_proc);
17105: hr_utility.set_message_token('STEP', '215');
17106: hr_utility.raise_error;
17107: end if;
17108: --
17101: -- This should never happen!
17102: --
17103: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
17104: hr_utility.set_message_token('PROCEDURE', l_proc);
17105: hr_utility.set_message_token('STEP', '215');
17106: hr_utility.raise_error;
17107: end if;
17108: --
17109: close csr_get_legislation_code;
17102: --
17103: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
17104: hr_utility.set_message_token('PROCEDURE', l_proc);
17105: hr_utility.set_message_token('STEP', '215');
17106: hr_utility.raise_error;
17107: end if;
17108: --
17109: close csr_get_legislation_code;
17110: --
17108: --
17109: close csr_get_legislation_code;
17110: --
17111: if g_debug then
17112: hr_utility.set_location(l_proc, 380);
17113: end if;
17114: --
17115: if l_legislation_code = 'GB'
17116: and l_payroll_id_updated
17116: and l_payroll_id_updated
17117: then
17118: --
17119: if g_debug then
17120: hr_utility.set_location(l_proc, 390);
17121: end if;
17122: --
17123: -- Delete latest balance values.
17124: --
17133: l_tax_district_changed_warning := FALSE;
17134: else
17135: --
17136: if g_debug then
17137: hr_utility.set_location(l_proc, 400);
17138: end if;
17139: --
17140: l_tax_district_changed_warning := FALSE;
17141: end if;
17140: l_tax_district_changed_warning := FALSE;
17141: end if;
17142: --
17143: if g_debug then
17144: hr_utility.set_location(l_proc, 410);
17145: end if;
17146: --
17147: --
17148: begin
17264: hr_kflex_utility.unset_session_date
17265: (p_session_id => l_session_id);
17266: --
17267: if g_debug then
17268: hr_utility.set_location(' Leaving:'||l_proc, 997);
17269: end if;
17270: --
17271: exception
17272: when hr_api.validate_enabled then
17271: exception
17272: when hr_api.validate_enabled then
17273: --
17274: if g_debug then
17275: hr_utility.set_location(' Leaving:'||l_proc, 998);
17276: end if;
17277: --
17278: -- As the Validate_Enabled exception has been raised
17279: -- we must rollback to the savepoint
17307: --
17308: when others then
17309: --
17310: if g_debug then
17311: hr_utility.set_location(' Leaving:'||l_proc, 999);
17312: end if;
17313: --
17314: -- A validation or unexpected error has occurred
17315: --
17853: --
17854: begin
17855: --
17856: if g_debug then
17857: hr_utility.set_location('Entering:'|| l_proc, 10);
17858: end if;
17859: --
17860: --Truncate the parameter p_effective_date to a local variable
17861: --
17875: --
17876: savepoint update_apl_asg;
17877: --
17878: if g_debug then
17879: hr_utility.set_location(l_proc, 20);
17880: end if;
17881: --
17882: l_object_version_number := p_object_version_number;
17883: --
17912: ,p_effective_date => l_effective_date
17913: ,p_object_version_number => l_object_version_number);
17914: --
17915: if g_debug then
17916: hr_utility.set_location(l_proc, 30);
17917: end if;
17918: --
17919: if not l_api_updating
17920: then
17919: if not l_api_updating
17920: then
17921: --
17922: if g_debug then
17923: hr_utility.set_location(l_proc, 40);
17924: end if;
17925: --
17926: -- As this is an updating API, the assignment should already exist.
17927: --
17924: end if;
17925: --
17926: -- As this is an updating API, the assignment should already exist.
17927: --
17928: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
17929: hr_utility.raise_error;
17930: end if;
17931: --
17932: -- Populate l_business_group_id from g_old_rec for cursor csr_grp_idsel
17925: --
17926: -- As this is an updating API, the assignment should already exist.
17927: --
17928: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
17929: hr_utility.raise_error;
17930: end if;
17931: --
17932: -- Populate l_business_group_id from g_old_rec for cursor csr_grp_idsel
17933: -- Populate l_people_group_id from g_old_rec for upd_or_sel_key_flex
17939: --
17940: l_business_group_id := per_asg_shd.g_old_rec.business_group_id;
17941: --
17942: if g_debug then
17943: hr_utility.set_location(l_proc, 45);
17944: end if;
17945: --
17946: if l_people_group_id is null
17947: then
18056: l_cag_null_ind := 0;
18057: end if;
18058: --
18059: if g_debug then
18060: hr_utility.set_location(l_proc, 60);
18061: end if;
18062: --
18063: -- Check that the assignment is an applicant assignment.
18064: --
18065: if per_asg_shd.g_old_rec.assignment_type <> 'A'
18066: then
18067: --
18068: if g_debug then
18069: hr_utility.set_location(l_proc, 70);
18070: end if;
18071: --
18072: hr_utility.set_message(801, 'HR_51036_ASG_ASG_NOT_APL');
18073: hr_utility.raise_error;
18068: if g_debug then
18069: hr_utility.set_location(l_proc, 70);
18070: end if;
18071: --
18072: hr_utility.set_message(801, 'HR_51036_ASG_ASG_NOT_APL');
18073: hr_utility.raise_error;
18074: end if;
18075: --
18076: -- Start of API User Hook for the before hook of update_apl_asg.
18069: hr_utility.set_location(l_proc, 70);
18070: end if;
18071: --
18072: hr_utility.set_message(801, 'HR_51036_ASG_ASG_NOT_APL');
18073: hr_utility.raise_error;
18074: end if;
18075: --
18076: -- Start of API User Hook for the before hook of update_apl_asg.
18077: --
18259: end;
18260: --
18261: --
18262: if g_debug then
18263: hr_utility.set_location(l_proc, 80);
18264: end if;
18265: --
18266: --added validation for bug 1867720
18267: --
18314: fetch csr_grp_idsel
18315: into l_flex_num;
18316: if csr_grp_idsel%NOTFOUND then
18317: close csr_grp_idsel;
18318: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18319: hr_utility.set_message_token('PROCEDURE', l_proc);
18320: hr_utility.set_message_token('STEP','10');
18321: hr_utility.raise_error;
18322: end if;
18315: into l_flex_num;
18316: if csr_grp_idsel%NOTFOUND then
18317: close csr_grp_idsel;
18318: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18319: hr_utility.set_message_token('PROCEDURE', l_proc);
18320: hr_utility.set_message_token('STEP','10');
18321: hr_utility.raise_error;
18322: end if;
18323: close csr_grp_idsel;
18316: if csr_grp_idsel%NOTFOUND then
18317: close csr_grp_idsel;
18318: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18319: hr_utility.set_message_token('PROCEDURE', l_proc);
18320: hr_utility.set_message_token('STEP','10');
18321: hr_utility.raise_error;
18322: end if;
18323: close csr_grp_idsel;
18324: --
18317: close csr_grp_idsel;
18318: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18319: hr_utility.set_message_token('PROCEDURE', l_proc);
18320: hr_utility.set_message_token('STEP','10');
18321: hr_utility.raise_error;
18322: end if;
18323: close csr_grp_idsel;
18324: --
18325: if l_pgp_null_ind = 0
18453: -- Bug 944911
18454: -- Added this additional check
18455: or p_scl_concat_segments is not null
18456: then
18457: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18458: hr_utility.set_message_token('PROCEDURE', l_proc);
18459: hr_utility.set_message_token('STEP','5');
18460: hr_utility.raise_error;
18461: end if; -- p_scl_segment1 is not null
18454: -- Added this additional check
18455: or p_scl_concat_segments is not null
18456: then
18457: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18458: hr_utility.set_message_token('PROCEDURE', l_proc);
18459: hr_utility.set_message_token('STEP','5');
18460: hr_utility.raise_error;
18461: end if; -- p_scl_segment1 is not null
18462: else -- csr_scl_idsel is found
18455: or p_scl_concat_segments is not null
18456: then
18457: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18458: hr_utility.set_message_token('PROCEDURE', l_proc);
18459: hr_utility.set_message_token('STEP','5');
18460: hr_utility.raise_error;
18461: end if; -- p_scl_segment1 is not null
18462: else -- csr_scl_idsel is found
18463: close csr_scl_idsel;
18456: then
18457: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
18458: hr_utility.set_message_token('PROCEDURE', l_proc);
18459: hr_utility.set_message_token('STEP','5');
18460: hr_utility.raise_error;
18461: end if; -- p_scl_segment1 is not null
18462: else -- csr_scl_idsel is found
18463: close csr_scl_idsel;
18464: --
18578: ,p_concatenated_segments => l_cagr_concatenated_segments
18579: );
18580: --
18581: if g_debug then
18582: hr_utility.set_location(l_proc, 90);
18583: end if;
18584: --
18585: end if; -- l_cagr_grade_def_id is null
18586: --
18584: --
18585: end if; -- l_cagr_grade_def_id is null
18586: --
18587: if g_debug then
18588: hr_utility.set_location(l_proc, 95);
18589: end if;
18590: --
18591: -- Update assignment.
18592: --
19036: hr_kflex_utility.unset_session_date
19037: (p_session_id => l_session_id);
19038: --
19039: if g_debug then
19040: hr_utility.set_location(' Leaving:'||l_proc, 6);
19041: end if;
19042: exception
19043: when hr_api.validate_enabled then
19044: --
19253: --
19254: begin
19255: if g_debug then
19256: l_proc := g_package||'update_apl_asg';
19257: hr_utility.set_location('Entering:'|| l_proc, 1);
19258: end if;
19259: --
19260: l_object_version_number := p_object_version_number ;
19261: -- bug 944911
19378: p_effective_end_date := l_effective_end_date;
19379: p_people_group_id := l_people_group_id;
19380: --
19381: if g_debug then
19382: hr_utility.set_location(' Leaving:'||l_proc, 6);
19383: end if;
19384: end update_apl_asg;
19385: --
19386: -- OLD
20239: --
20240: begin
20241: --
20242: if g_debug then
20243: hr_utility.set_location('Entering:'|| l_proc, 5);
20244: end if;
20245: --
20246: -- Truncate date value p_effective_date to remove time element.
20247: --
20261: --
20262: savepoint create_secondary_apl_asg;
20263: --
20264: if g_debug then
20265: hr_utility.set_location(l_proc, 10);
20266: end if;
20267: --
20268: -- Validation in addition to Table Handlers
20269: --
20293: --
20294: close csr_get_derived_details;
20295: --
20296: if g_debug then
20297: hr_utility.set_location(l_proc, 15);
20298: end if;
20299: --
20300: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
20301: hr_utility.raise_error;
20296: if g_debug then
20297: hr_utility.set_location(l_proc, 15);
20298: end if;
20299: --
20300: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
20301: hr_utility.raise_error;
20302: end if;
20303: --
20304: close csr_get_derived_details;
20297: hr_utility.set_location(l_proc, 15);
20298: end if;
20299: --
20300: hr_utility.set_message(801,'HR_7432_ASG_INVALID_PERSON');
20301: hr_utility.raise_error;
20302: end if;
20303: --
20304: close csr_get_derived_details;
20305: --
20309: -- per_cagr_grades_def
20310: --
20311: --
20312: if g_debug then
20313: hr_utility.set_location(l_proc, 20);
20314: end if;
20315: --
20316: if l_people_group_id is not null
20317: then
20616: end;
20617: --
20618: --
20619: if g_debug then
20620: hr_utility.set_location(l_proc, 20);
20621: end if;
20622: --
20623: -- Process Logic
20624: --
20638: --
20639: close csr_get_application;
20640: --
20641: if g_debug then
20642: hr_utility.set_location(l_proc, 25);
20643: end if;
20644: --
20645: hr_utility.set_message(801,'HR_51231_ASG_MISSING_ASG');
20646: hr_utility.raise_error;
20641: if g_debug then
20642: hr_utility.set_location(l_proc, 25);
20643: end if;
20644: --
20645: hr_utility.set_message(801,'HR_51231_ASG_MISSING_ASG');
20646: hr_utility.raise_error;
20647: end if;
20648: --
20649: close csr_get_application;
20642: hr_utility.set_location(l_proc, 25);
20643: end if;
20644: --
20645: hr_utility.set_message(801,'HR_51231_ASG_MISSING_ASG');
20646: hr_utility.raise_error;
20647: end if;
20648: --
20649: close csr_get_application;
20650: -- <<
20648: --
20649: close csr_get_application;
20650: -- <<
20651: if g_debug then
20652: hr_utility.set_location(l_proc, 30);
20653: end if;
20654: --
20655: --
20656: -- insert the profile options and effective date for the flexfield
20673: fetch csr_grp_idsel
20674: into l_flex_num;
20675: if csr_grp_idsel%NOTFOUND then
20676: close csr_grp_idsel;
20677: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20678: hr_utility.set_message_token('PROCEDURE', l_proc);
20679: hr_utility.set_message_token('STEP','10');
20680: hr_utility.raise_error;
20681: end if;
20674: into l_flex_num;
20675: if csr_grp_idsel%NOTFOUND then
20676: close csr_grp_idsel;
20677: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20678: hr_utility.set_message_token('PROCEDURE', l_proc);
20679: hr_utility.set_message_token('STEP','10');
20680: hr_utility.raise_error;
20681: end if;
20682: close csr_grp_idsel;
20675: if csr_grp_idsel%NOTFOUND then
20676: close csr_grp_idsel;
20677: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20678: hr_utility.set_message_token('PROCEDURE', l_proc);
20679: hr_utility.set_message_token('STEP','10');
20680: hr_utility.raise_error;
20681: end if;
20682: close csr_grp_idsel;
20683: --
20676: close csr_grp_idsel;
20677: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20678: hr_utility.set_message_token('PROCEDURE', l_proc);
20679: hr_utility.set_message_token('STEP','10');
20680: hr_utility.raise_error;
20681: end if;
20682: close csr_grp_idsel;
20683: --
20684: --
20688: fetch csr_grp_idsel
20689: into l_flex_num;
20690: if csr_grp_idsel%NOTFOUND then
20691: close csr_grp_idsel;
20692: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20693: hr_utility.set_message_token('PROCEDURE', l_proc);
20694: hr_utility.set_message_token('STEP','10');
20695: hr_utility.raise_error;
20696: end if;
20689: into l_flex_num;
20690: if csr_grp_idsel%NOTFOUND then
20691: close csr_grp_idsel;
20692: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20693: hr_utility.set_message_token('PROCEDURE', l_proc);
20694: hr_utility.set_message_token('STEP','10');
20695: hr_utility.raise_error;
20696: end if;
20697: close csr_grp_idsel;
20690: if csr_grp_idsel%NOTFOUND then
20691: close csr_grp_idsel;
20692: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20693: hr_utility.set_message_token('PROCEDURE', l_proc);
20694: hr_utility.set_message_token('STEP','10');
20695: hr_utility.raise_error;
20696: end if;
20697: close csr_grp_idsel;
20698: --
20691: close csr_grp_idsel;
20692: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20693: hr_utility.set_message_token('PROCEDURE', l_proc);
20694: hr_utility.set_message_token('STEP','10');
20695: hr_utility.raise_error;
20696: end if;
20697: close csr_grp_idsel;
20698: --
20699: -- Bug 2230915 - if key flex parameters have a value then derive segment
20751: --
20752: -- select or insert the Collective Agreement grade
20753: --
20754: if g_debug then
20755: hr_utility.set_location(l_proc, 36);
20756: end if;
20757: --
20758: if l_cagr_grade_def_id is null
20759: then
20829: if csr_scl_idsel%NOTFOUND
20830: then
20831: close csr_scl_idsel;
20832: if g_debug then
20833: hr_utility.set_location(l_proc, 28);
20834: end if;
20835: --
20836: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20837: hr_utility.set_message_token('PROCEDURE', l_proc);
20832: if g_debug then
20833: hr_utility.set_location(l_proc, 28);
20834: end if;
20835: --
20836: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20837: hr_utility.set_message_token('PROCEDURE', l_proc);
20838: hr_utility.set_message_token('STEP','10');
20839: hr_utility.raise_error;
20840: else
20833: hr_utility.set_location(l_proc, 28);
20834: end if;
20835: --
20836: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20837: hr_utility.set_message_token('PROCEDURE', l_proc);
20838: hr_utility.set_message_token('STEP','10');
20839: hr_utility.raise_error;
20840: else
20841: close csr_scl_idsel;
20834: end if;
20835: --
20836: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20837: hr_utility.set_message_token('PROCEDURE', l_proc);
20838: hr_utility.set_message_token('STEP','10');
20839: hr_utility.raise_error;
20840: else
20841: close csr_scl_idsel;
20842: --
20835: --
20836: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
20837: hr_utility.set_message_token('PROCEDURE', l_proc);
20838: hr_utility.set_message_token('STEP','10');
20839: hr_utility.raise_error;
20840: else
20841: close csr_scl_idsel;
20842: --
20843: --
20841: close csr_scl_idsel;
20842: --
20843: --
20844: if g_debug then
20845: hr_utility.set_location(l_proc, 30);
20846: end if;
20847: --
20848: -- Insert or select the soft_coding_keyflex_id
20849: --
20899: --
20900: end if;
20901: --
20902: if g_debug then
20903: hr_utility.set_location(l_proc, 35);
20904: end if;
20905: --
20906: -- 3652025: if application is end dated then call internal procedure
20907: --
20909: --
20910: -- Application is end dated
20911: --
20912: if g_debug then
20913: hr_utility.set_location(l_proc, 40);
20914: end if;
20915:
20916: hr_applicant_internal.create_applicant_anytime
20917: (p_effective_date => l_effective_date
20931: ,p_appl_override_warning => l_appl_override_warning
20932: );
20933:
20934: if g_debug then
20935: hr_utility.set_location(l_proc, 45);
20936: end if;
20937: --
20938: -- 3972045: If p_assignment_status_type_id is null, derive default status for
20939: -- person's business group.
21129: ,p_soft_coding_keyflex_id => l_soft_coding_keyflex_id
21130: );
21131:
21132: if g_debug then
21133: hr_utility.set_location(l_proc, 50);
21134: end if;
21135: else -- application is not end dated
21136: --
21137: -- Insert secondary assignment
21233: ,p_supervisor_assignment_id => p_supervisor_assignment_id
21234: );
21235: --
21236: if g_debug then
21237: hr_utility.set_location(l_proc, 40);
21238: end if;
21239:
21240: end if; -- application is end dated?
21241: --
21476: hr_kflex_utility.unset_session_date
21477: (p_session_id => l_session_id);
21478: --
21479: if g_debug then
21480: hr_utility.set_location(' Leaving:'||l_proc, 50);
21481: end if;
21482: exception
21483: when hr_api.validate_enabled then
21484: --
21689: begin
21690: --
21691: if g_debug then
21692: l_proc := g_package||'create_secondary_apl_asg';
21693: hr_utility.set_location('Entering:'|| l_proc, 5);
21694: end if;
21695: -- Call the new code
21696: -- Bug 944911
21697: -- No change to call point as all outs are present while the ins have defaults
21811: p_comment_id := l_comment_id;
21812: p_group_name := l_group_name;
21813: --
21814: if g_debug then
21815: hr_utility.set_location(' Leaving:'||l_proc, 50);
21816: end if;
21817: end create_secondary_apl_asg;
21818: --
21819: -- ----------------------------------------------------------------------------
21849: --
21850: begin
21851: if g_debug then
21852: l_proc := g_package||'offer_apl_asg';
21853: hr_utility.set_location('Entering:'|| l_proc, 5);
21854: end if;
21855: --
21856: -- Initialise local variable - added 25-Aug-97. RMF.
21857: --
21866: l_object_version_number_orig := p_object_version_number;
21867: l_object_version_number := p_object_version_number;
21868: --
21869: if g_debug then
21870: hr_utility.set_location(l_proc, 10);
21871: end if;
21872: --
21873: -- Process Logic
21874: --
21904: ,p_effective_end_date => l_effective_end_date
21905: );
21906: --
21907: if g_debug then
21908: hr_utility.set_location(l_proc, 20);
21909: end if;
21910: --
21911: -- Start of API User Hook for the after hook of offer_apl_asg.
21912: --
21944: p_effective_start_date := l_effective_start_date;
21945: p_effective_end_date := l_effective_end_date;
21946: --
21947: if g_debug then
21948: hr_utility.set_location(' Leaving:'||l_proc, 50);
21949: end if;
21950: exception
21951: when hr_api.validate_enabled then
21952: --
22014: --
22015: begin
22016: if g_debug then
22017: l_proc := g_package||'accept_apl_asg';
22018: hr_utility.set_location('Entering:'|| l_proc, 5);
22019: end if;
22020: --
22021: --
22022: l_effective_date := trunc(p_effective_date);
22028: l_object_version_number_orig := p_object_version_number;
22029: l_object_version_number := p_object_version_number;
22030: --
22031: if g_debug then
22032: hr_utility.set_location(l_proc, 10);
22033: end if;
22034: --
22035: -- Process Logic
22036: --
22067: ,p_effective_end_date => l_effective_end_date
22068: );
22069: --
22070: if g_debug then
22071: hr_utility.set_location(l_proc, 20);
22072: end if;
22073: --
22074: -- Start of API User Hook for the after hook of accept_apl_asg.
22075: --
22108: p_effective_start_date := l_effective_start_date;
22109: p_effective_end_date := l_effective_end_date;
22110: --
22111: if g_debug then
22112: hr_utility.set_location(' Leaving:'||l_proc, 50);
22113: end if;
22114: exception
22115: when hr_api.validate_enabled then
22116: -- As the Validate_Enabled exception has been raised
22171: BEGIN
22172: --
22173: if g_debug then
22174: l_proc := g_package||'activate_apl_asg';
22175: hr_utility.set_location('Entering:'||l_proc,10);
22176: end if;
22177: --
22178: -- Truncate all date parameters passed in
22179: --
22183: --
22184: SAVEPOINT activate_apl_asg;
22185: --
22186: if g_debug then
22187: hr_utility.set_location(l_proc,20);
22188: end if;
22189: --
22190: -- Call Before Process User Hook
22191: --
22207: );
22208: END;
22209: --
22210: if g_debug then
22211: hr_utility.set_location(l_proc,30);
22212: end if;
22213: --
22214: -- Call business support process to update status type
22215: --
22225: ,p_effective_end_date => l_effective_end_date
22226: );
22227: --
22228: if g_debug then
22229: hr_utility.set_location(l_proc,40);
22230: end if;
22231: --
22232: -- Call After Process User Hook
22233: --
22251: );
22252: END;
22253: --
22254: if g_debug then
22255: hr_utility.set_location(l_proc,50);
22256: end if;
22257: --
22258: -- When in validation only mode raise validate_enabled exception
22259: --
22267: p_effective_start_date := l_effective_start_date;
22268: p_effective_end_date := l_effective_end_date;
22269: --
22270: if g_debug then
22271: hr_utility.set_location(' Leaving:'||l_proc,100);
22272: end if;
22273: --
22274: EXCEPTION
22275: WHEN hr_api.validate_enabled
22535: ,p_org_now_no_manager_warning => l_org_now_no_manager_warning
22536: );
22537: --
22538: if g_debug then
22539: hr_utility.set_location(l_proc,70);
22540: end if;
22541: --
22542: per_asg_bus1.chk_assignment_status_type
22543: (p_assignment_status_type_id => l_assignment_status_type_id
22608: THEN
22609: l_manager_terminates:='Y';
22610: END IF;
22611: CLOSE csr_applicant_userid;
22612: hr_utility.set_location('l_user_id: '||l_user_id,71);
22613: hr_utility.set_location('g_user_id: '||fnd_global.user_id,72);
22614: if l_user_id=fnd_global.user_id then
22615: l_manager_terminates:='N';
22616: else
22609: l_manager_terminates:='Y';
22610: END IF;
22611: CLOSE csr_applicant_userid;
22612: hr_utility.set_location('l_user_id: '||l_user_id,71);
22613: hr_utility.set_location('g_user_id: '||fnd_global.user_id,72);
22614: if l_user_id=fnd_global.user_id then
22615: l_manager_terminates:='N';
22616: else
22617: l_manager_terminates:='Y';
22656: --
22657: BEGIN
22658: --
22659: if g_debug then
22660: hr_utility.set_location('Entering:'||l_proc,10);
22661: end if;
22662: --
22663: -- Ensure mandatory arguments have been passed
22664: --
22684: --
22685: SAVEPOINT terminate_apl_asg;
22686: --
22687: if g_debug then
22688: hr_utility.set_location(l_proc,20);
22689: end if;
22690: --
22691: -- Call Before Process User Hook
22692: --
22705: );
22706: END;
22707: --
22708: if g_debug then
22709: hr_utility.set_location(l_proc,30);
22710: end if;
22711: --
22712: -- Retrieve derived assignment details
22713: --
22718: FETCH csr_assignments INTO l_assignment;
22719: IF csr_assignments%NOTFOUND
22720: THEN
22721: CLOSE csr_assignments;
22722: hr_utility.set_message(801,'HR_52360_ASG_DOES_NOT_EXIST');
22723: hr_utility.raise_error;
22724: END IF;
22725: CLOSE csr_assignments;
22726: --
22719: IF csr_assignments%NOTFOUND
22720: THEN
22721: CLOSE csr_assignments;
22722: hr_utility.set_message(801,'HR_52360_ASG_DOES_NOT_EXIST');
22723: hr_utility.raise_error;
22724: END IF;
22725: CLOSE csr_assignments;
22726: --
22727: if g_debug then
22724: END IF;
22725: CLOSE csr_assignments;
22726: --
22727: if g_debug then
22728: hr_utility.set_location(l_proc,40);
22729: end if;
22730: --
22731: -- Ensure this is an applicant assignment
22732: --
22731: -- Ensure this is an applicant assignment
22732: --
22733: IF l_assignment.assignment_type <> 'A'
22734: THEN
22735: hr_utility.set_message(801,'HR_51036_ASG_ASG_NOT_APL');
22736: hr_utility.raise_error;
22737: END IF;
22738: --
22739: if g_debug then
22732: --
22733: IF l_assignment.assignment_type <> 'A'
22734: THEN
22735: hr_utility.set_message(801,'HR_51036_ASG_ASG_NOT_APL');
22736: hr_utility.raise_error;
22737: END IF;
22738: --
22739: if g_debug then
22740: hr_utility.set_location(l_proc,50);
22736: hr_utility.raise_error;
22737: END IF;
22738: --
22739: if g_debug then
22740: hr_utility.set_location(l_proc,50);
22741: end if;
22742: --
22743: -- 3652025 >> Ensure this is not the last applicant assignment
22744: --
22747: -- ,p_effective_date => l_effective_date + 1
22748: -- )
22749: --THEN
22750: --
22751: -- hr_utility.set_message(800,'HR_7987_PER_INV_TYPE_CHANGE');
22752: -- hr_utility.raise_error;
22753: --
22754: --END IF; <<
22755: --
22748: -- )
22749: --THEN
22750: --
22751: -- hr_utility.set_message(800,'HR_7987_PER_INV_TYPE_CHANGE');
22752: -- hr_utility.raise_error;
22753: --
22754: --END IF; <<
22755: --
22756: open csr_get_current_apl_asg(p_assignment_id, l_effective_date+1);
22756: open csr_get_current_apl_asg(p_assignment_id, l_effective_date+1);
22757: fetch csr_get_current_apl_asg into l_cur_asg;
22758: if csr_get_current_apl_asg%NOTFOUND then -- no current
22759: if g_debug then
22760: hr_utility.set_location(l_proc,60);
22761: end if;
22762: --
22763: close csr_get_current_apl_asg;
22764: open csr_get_future_apl_asg(p_assignment_id, l_effective_date);
22764: open csr_get_future_apl_asg(p_assignment_id, l_effective_date);
22765: fetch csr_get_future_apl_asg into l_fut_asg;
22766: if csr_get_future_apl_asg%NOTFOUND then -- no current, no future
22767: close csr_get_future_apl_asg;
22768: hr_utility.set_message(800,'HR_7987_PER_INV_TYPE_CHANGE');
22769: hr_utility.raise_error;
22770: else -- no current, yes future
22771: if g_debug then
22772: hr_utility.set_location(l_proc,62);
22765: fetch csr_get_future_apl_asg into l_fut_asg;
22766: if csr_get_future_apl_asg%NOTFOUND then -- no current, no future
22767: close csr_get_future_apl_asg;
22768: hr_utility.set_message(800,'HR_7987_PER_INV_TYPE_CHANGE');
22769: hr_utility.raise_error;
22770: else -- no current, yes future
22771: if g_debug then
22772: hr_utility.set_location(l_proc,62);
22773: end if;
22768: hr_utility.set_message(800,'HR_7987_PER_INV_TYPE_CHANGE');
22769: hr_utility.raise_error;
22770: else -- no current, yes future
22771: if g_debug then
22772: hr_utility.set_location(l_proc,62);
22773: end if;
22774: hr_utility.trace(' ex_apl date = '||to_char(l_effective_date+1));
22775: hr_utility.trace(' apl date = '||to_char(l_fut_asg.effective_start_date));
22776: -- End assignment
22770: else -- no current, yes future
22771: if g_debug then
22772: hr_utility.set_location(l_proc,62);
22773: end if;
22774: hr_utility.trace(' ex_apl date = '||to_char(l_effective_date+1));
22775: hr_utility.trace(' apl date = '||to_char(l_fut_asg.effective_start_date));
22776: -- End assignment
22777: end_assignment;
22778: -- update the person and PTU records
22771: if g_debug then
22772: hr_utility.set_location(l_proc,62);
22773: end if;
22774: hr_utility.trace(' ex_apl date = '||to_char(l_effective_date+1));
22775: hr_utility.trace(' apl date = '||to_char(l_fut_asg.effective_start_date));
22776: -- End assignment
22777: end_assignment;
22778: -- update the person and PTU records
22779: hr_applicant_internal.upd_person_ex_apl_and_apl(
22785: ,p_per_effective_end_date => l_per_effective_end_date);
22786: --
22787: -- terminate current application
22788: --
22789: hr_utility.trace(' terminate current application on '||to_char(l_effective_date));
22790: --
22791: UPDATE per_applications
22792: SET date_end = l_effective_date
22793: where application_id = l_fut_asg.application_id;
22833: ,p_appl_attribute18 => l_appl_details.appl_attribute18
22834: ,p_appl_attribute19 => l_appl_details.appl_attribute19
22835: ,p_appl_attribute20 => l_appl_details.appl_attribute20
22836: );
22837: hr_utility.trace(' new application ID = '||to_char(l_new_application_id));
22838:
22839: -- update future assignments with new application ID
22840: hr_utility.trace(' update all future assignments');
22841: -- update first assignment found
22836: );
22837: hr_utility.trace(' new application ID = '||to_char(l_new_application_id));
22838:
22839: -- update future assignments with new application ID
22840: hr_utility.trace(' update all future assignments');
22841: -- update first assignment found
22842: l_asg_ovn := l_fut_asg.object_version_number;
22843: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
22844: --
22841: -- update first assignment found
22842: l_asg_ovn := l_fut_asg.object_version_number;
22843: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
22844: --
22845: hr_utility.trace(' => asg id = '||l_fut_asg.assignment_id);
22846: hr_utility.trace(' => SD = '||to_char(l_fut_asg.effective_start_date));
22847: hr_utility.trace(' => ED = '||to_char(l_fut_asg.effective_end_date));
22848: per_asg_upd.upd
22849: (p_assignment_id => l_fut_asg.assignment_id
22842: l_asg_ovn := l_fut_asg.object_version_number;
22843: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
22844: --
22845: hr_utility.trace(' => asg id = '||l_fut_asg.assignment_id);
22846: hr_utility.trace(' => SD = '||to_char(l_fut_asg.effective_start_date));
22847: hr_utility.trace(' => ED = '||to_char(l_fut_asg.effective_end_date));
22848: per_asg_upd.upd
22849: (p_assignment_id => l_fut_asg.assignment_id
22850: ,p_effective_start_date => l_fut_asg.effective_start_date
22843: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
22844: --
22845: hr_utility.trace(' => asg id = '||l_fut_asg.assignment_id);
22846: hr_utility.trace(' => SD = '||to_char(l_fut_asg.effective_start_date));
22847: hr_utility.trace(' => ED = '||to_char(l_fut_asg.effective_end_date));
22848: per_asg_upd.upd
22849: (p_assignment_id => l_fut_asg.assignment_id
22850: ,p_effective_start_date => l_fut_asg.effective_start_date
22851: ,p_effective_end_date => l_fut_asg.effective_end_date
22863: ,p_datetrack_mode => hr_api.g_correction
22864: ,p_validate => FALSE
22865: ,p_hourly_salaried_warning => l_hourly_salaried_warning);
22866: -- update all other future assignments
22867: hr_utility.trace(' update all other assignments');
22868: LOOP
22869: fetch csr_get_future_apl_asg into l_fut_asg;
22870: exit when csr_get_future_apl_asg%NOTFOUND;
22871: l_asg_ovn := l_fut_asg.object_version_number;
22891: END LOOP;
22892: --
22893: close csr_get_future_apl_asg;
22894: if g_debug then
22895: hr_utility.set_location(l_proc,68);
22896: end if;
22897: -- Start changes for bug#9875744
22898: l_ae_assignment_id := null;
22899: l_apl_min_start_date := null;
22916: from per_all_assignments_f
22917: where assignment_id = l_ae_assignment_id
22918: and assignment_type = 'E';
22919:
22920: hr_utility.set_location('l_ae_assignment_id:'||l_ae_assignment_id,68);
22921: hr_utility.set_location('l_apl_min_start_date:'||l_apl_min_start_date,68);
22922: hr_utility.set_location('l_emp_min_start_date:'||l_emp_min_start_date,68);
22923: hr_utility.set_location('l_assignment.effective_start_date'||l_assignment.effective_start_date,68);
22924:
22917: where assignment_id = l_ae_assignment_id
22918: and assignment_type = 'E';
22919:
22920: hr_utility.set_location('l_ae_assignment_id:'||l_ae_assignment_id,68);
22921: hr_utility.set_location('l_apl_min_start_date:'||l_apl_min_start_date,68);
22922: hr_utility.set_location('l_emp_min_start_date:'||l_emp_min_start_date,68);
22923: hr_utility.set_location('l_assignment.effective_start_date'||l_assignment.effective_start_date,68);
22924:
22925: If p_effective_date < l_apl_min_start_date then
22918: and assignment_type = 'E';
22919:
22920: hr_utility.set_location('l_ae_assignment_id:'||l_ae_assignment_id,68);
22921: hr_utility.set_location('l_apl_min_start_date:'||l_apl_min_start_date,68);
22922: hr_utility.set_location('l_emp_min_start_date:'||l_emp_min_start_date,68);
22923: hr_utility.set_location('l_assignment.effective_start_date'||l_assignment.effective_start_date,68);
22924:
22925: If p_effective_date < l_apl_min_start_date then
22926: l_person_type_id :=
22919:
22920: hr_utility.set_location('l_ae_assignment_id:'||l_ae_assignment_id,68);
22921: hr_utility.set_location('l_apl_min_start_date:'||l_apl_min_start_date,68);
22922: hr_utility.set_location('l_emp_min_start_date:'||l_emp_min_start_date,68);
22923: hr_utility.set_location('l_assignment.effective_start_date'||l_assignment.effective_start_date,68);
22924:
22925: If p_effective_date < l_apl_min_start_date then
22926: l_person_type_id :=
22927: hr_person_type_usage_info.get_default_person_type_id(l_assignment.business_group_id,'EX_APL');
22924:
22925: If p_effective_date < l_apl_min_start_date then
22926: l_person_type_id :=
22927: hr_person_type_usage_info.get_default_person_type_id(l_assignment.business_group_id,'EX_APL');
22928: hr_utility.set_location('l_person_type_id:'||l_person_type_id,69);
22929:
22930: --Transform person onto EX-APL on "min no end dated" - 1
22931: hr_applicant_internal.Update_PER_PTU_to_EX_APL(
22932: p_business_group_id => l_assignment.business_group_id
22934: ,p_effective_date => l_emp_min_start_date
22935: ,p_person_type_id => l_person_type_id
22936: ,p_per_effective_start_date => l_per_effective_start_date
22937: ,p_per_effective_end_date => l_per_effective_end_date);
22938: hr_utility.set_location('Converted Ex-Applicant',70);
22939: --
22940: UPDATE per_applications
22941: SET date_end = l_emp_min_start_date - 1
22942: where application_id = l_new_application_id;
22940: UPDATE per_applications
22941: SET date_end = l_emp_min_start_date - 1
22942: where application_id = l_new_application_id;
22943:
22944: hr_utility.set_location('Terminated new application on '||l_emp_min_start_date - 1,71);
22945:
22946: End if;
22947: End if;
22948: -- End changes for bug#9875744
22954: --
22955: -- current assignment is end dated
22956: --
22957: if g_debug then
22958: hr_utility.set_location(l_proc,100);
22959: end if;
22960: select max(effective_end_date) into l_mx_end_dated
22961: from per_assignments_f
22962: where person_id = l_assignment.person_id
22970: and assignment_type = 'A'
22971: and effective_end_date = hr_general.end_of_time
22972: and assignment_id <> p_assignment_id;
22973:
22974: hr_utility.set_location('l_mx_end_dated:'||l_mx_end_dated,72);
22975: hr_utility.set_location('l_min_no_end_dated:'||l_min_no_end_dated,73);
22976: --
22977: if l_mx_end_dated is not null then -- if A
22978: --
22971: and effective_end_date = hr_general.end_of_time
22972: and assignment_id <> p_assignment_id;
22973:
22974: hr_utility.set_location('l_mx_end_dated:'||l_mx_end_dated,72);
22975: hr_utility.set_location('l_min_no_end_dated:'||l_min_no_end_dated,73);
22976: --
22977: if l_mx_end_dated is not null then -- if A
22978: --
22979: if l_min_no_end_dated is not null then -- if B
22981: if l_mx_end_dated + 1 = l_min_no_end_dated then -- if C
22982: --
22983: -- end assignment as normal
22984: if g_debug then
22985: hr_utility.set_location(l_proc,110);
22986: end if;
22987: end_assignment;
22988: --
22989: else -- else C
22996: -- 2. Transform person onto EX-APL after "max end date" and before "min sd"
22997: -- 3. Create new application and update all future applicant assignments
22998: -- on "min sd"
22999: if g_debug then
23000: hr_utility.set_location(l_proc,120);
23001: end if;
23002: -- End assignment
23003: end_assignment;
23004: -- update the person and PTU records
23011: ,p_per_effective_end_date => l_per_effective_end_date);
23012: --
23013: -- terminate current application
23014: --
23015: hr_utility.trace(' terminate current application on '||to_char(l_mx_end_dated));
23016: --
23017: UPDATE per_applications
23018: SET date_end = l_mx_end_dated
23019: where application_id = l_assignment.application_id;
23059: ,p_appl_attribute18 => l_appl_details.appl_attribute18
23060: ,p_appl_attribute19 => l_appl_details.appl_attribute19
23061: ,p_appl_attribute20 => l_appl_details.appl_attribute20
23062: );
23063: hr_utility.trace(' new application ID = '||to_char(l_new_application_id));
23064:
23065: -- update future assignments with new application ID
23066: hr_utility.trace(' update all future assignments');
23067: -- update first assignment found
23062: );
23063: hr_utility.trace(' new application ID = '||to_char(l_new_application_id));
23064:
23065: -- update future assignments with new application ID
23066: hr_utility.trace(' update all future assignments');
23067: -- update first assignment found
23068: open csr_get_future_apl_asg(p_assignment_id, l_mx_end_dated+1);
23069: fetch csr_get_future_apl_asg into l_fut_asg;
23070: l_asg_ovn := l_fut_asg.object_version_number;
23069: fetch csr_get_future_apl_asg into l_fut_asg;
23070: l_asg_ovn := l_fut_asg.object_version_number;
23071: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
23072: --
23073: hr_utility.trace(' => asg id = '||l_fut_asg.assignment_id);
23074: hr_utility.trace(' => SD = '||to_char(l_fut_asg.effective_start_date));
23075: hr_utility.trace(' => ED = '||to_char(l_fut_asg.effective_end_date));
23076: per_asg_upd.upd
23077: (p_assignment_id => l_fut_asg.assignment_id
23070: l_asg_ovn := l_fut_asg.object_version_number;
23071: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
23072: --
23073: hr_utility.trace(' => asg id = '||l_fut_asg.assignment_id);
23074: hr_utility.trace(' => SD = '||to_char(l_fut_asg.effective_start_date));
23075: hr_utility.trace(' => ED = '||to_char(l_fut_asg.effective_end_date));
23076: per_asg_upd.upd
23077: (p_assignment_id => l_fut_asg.assignment_id
23078: ,p_effective_start_date => l_fut_asg.effective_start_date
23071: l_asg_eff_date := trunc(l_fut_asg.effective_start_date);
23072: --
23073: hr_utility.trace(' => asg id = '||l_fut_asg.assignment_id);
23074: hr_utility.trace(' => SD = '||to_char(l_fut_asg.effective_start_date));
23075: hr_utility.trace(' => ED = '||to_char(l_fut_asg.effective_end_date));
23076: per_asg_upd.upd
23077: (p_assignment_id => l_fut_asg.assignment_id
23078: ,p_effective_start_date => l_fut_asg.effective_start_date
23079: ,p_effective_end_date => l_fut_asg.effective_end_date
23091: ,p_datetrack_mode => hr_api.g_correction
23092: ,p_validate => FALSE
23093: ,p_hourly_salaried_warning => l_hourly_salaried_warning);
23094: -- update all other future assignments
23095: hr_utility.trace(' update all other assignments');
23096: LOOP
23097: fetch csr_get_future_apl_asg into l_fut_asg;
23098: exit when csr_get_future_apl_asg%NOTFOUND;
23099: l_asg_ovn := l_fut_asg.object_version_number;
23119: END LOOP;
23120: --
23121: close csr_get_future_apl_asg;
23122: if g_debug then
23123: hr_utility.set_location(l_proc,150);
23124: end if;
23125: --
23126: end if; -- end if D
23127: end if; -- end if C
23130: -- assignment being terminated is the only one available
23131: -- 1. End assignment as normal
23132: -- 2. Transform person onto EX-APL on "max end date" + 1
23133: if g_debug then
23134: hr_utility.set_location(l_proc,160);
23135: end if;
23136: /*Start of code added for bug#9875744*/
23137: hr_utility.set_location(l_proc||' else -B',71);
23138:
23133: if g_debug then
23134: hr_utility.set_location(l_proc,160);
23135: end if;
23136: /*Start of code added for bug#9875744*/
23137: hr_utility.set_location(l_proc||' else -B',71);
23138:
23139: open csr_other_asgs(p_assignment_id, l_assignment.application_id);
23140: fetch csr_other_asgs into l_exists;
23141: if csr_other_asgs%NOTFOUND then
23139: open csr_other_asgs(p_assignment_id, l_assignment.application_id);
23140: fetch csr_other_asgs into l_exists;
23141: if csr_other_asgs%NOTFOUND then
23142: close csr_other_asgs;
23143: hr_utility.set_message(800,'HR_6382_APP_TERM_FUTURE_PPT');
23144: hr_utility.raise_error;
23145: else
23146: close csr_other_asgs;
23147: end if;
23140: fetch csr_other_asgs into l_exists;
23141: if csr_other_asgs%NOTFOUND then
23142: close csr_other_asgs;
23143: hr_utility.set_message(800,'HR_6382_APP_TERM_FUTURE_PPT');
23144: hr_utility.raise_error;
23145: else
23146: close csr_other_asgs;
23147: end if;
23148:
23146: close csr_other_asgs;
23147: end if;
23148:
23149: if g_debug then
23150: hr_utility.set_location(l_proc,165);
23151: end if;
23152: -- null; -- not implemented.
23153:
23154:
23156: --
23157: else -- else A
23158: --
23159: if g_debug then
23160: hr_utility.set_location(l_proc,170);
23161: end if;
23162:
23163: end if; -- end if A
23164: else
23162:
23163: end if; -- end if A
23164: else
23165: if g_debug then
23166: hr_utility.set_location(l_proc,180);
23167: end if;
23168: -- terminate assignment as normal
23169: end_assignment;
23170: end if;
23171:
23172: end if; -- end "yes current"
23173: --
23174: if g_debug then
23175: hr_utility.set_location(l_proc,200);
23176: end if;
23177: --
23178: -- Call After Process User Hook
23179: --
23194: );
23195: END;
23196: --
23197: if g_debug then
23198: hr_utility.set_location(l_proc,300);
23199: end if;
23200: --
23201: -- When in validation only mode raise validate enabled exception
23202: --
23210: p_effective_start_date := l_effective_start_date;
23211: p_effective_end_date := l_effective_end_date;
23212: --
23213: if g_debug then
23214: hr_utility.set_location(' Leaving:'||l_proc,1000);
23215: end if;
23216: --
23217: EXCEPTION
23218: WHEN hr_api.validate_enabled
23322: --
23323: BEGIN
23324: --
23325: if g_debug then
23326: hr_utility.set_location('Entering:'||l_proc,10);
23327: end if;
23328: --
23329: -- Ensure mandatory parameters have been passed
23330: --
23354: --
23355: SAVEPOINT set_new_primary_asg;
23356: --
23357: if g_debug then
23358: hr_utility.set_location(l_proc,20);
23359: end if;
23360: --
23361: -- Call Before Process User Hook
23362: --
23376: );
23377: END;
23378: --
23379: if g_debug then
23380: hr_utility.set_location(l_proc,30);
23381: end if;
23382: --
23383: -- Retrieve old primary assignment details
23384: --
23389: FETCH csr_old_assignment INTO l_old_assignment;
23390: IF csr_old_assignment%NOTFOUND
23391: THEN
23392: CLOSE csr_old_assignment;
23393: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23394: hr_utility.raise_error;
23395: END IF;
23396: CLOSE csr_old_assignment;
23397: --
23390: IF csr_old_assignment%NOTFOUND
23391: THEN
23392: CLOSE csr_old_assignment;
23393: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23394: hr_utility.raise_error;
23395: END IF;
23396: CLOSE csr_old_assignment;
23397: --
23398: if g_debug then
23395: END IF;
23396: CLOSE csr_old_assignment;
23397: --
23398: if g_debug then
23399: hr_utility.set_location(l_proc,40);
23400: end if;
23401: --
23402: -- Retrieve new primary assignment details
23403: --
23408: FETCH csr_new_assignment INTO l_new_assignment;
23409: IF csr_new_assignment%NOTFOUND
23410: THEN
23411: CLOSE csr_new_assignment;
23412: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23413: hr_utility.raise_error;
23414: END IF;
23415: CLOSE csr_new_assignment;
23416: --
23409: IF csr_new_assignment%NOTFOUND
23410: THEN
23411: CLOSE csr_new_assignment;
23412: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23413: hr_utility.raise_error;
23414: END IF;
23415: CLOSE csr_new_assignment;
23416: --
23417: if g_debug then
23414: END IF;
23415: CLOSE csr_new_assignment;
23416: --
23417: if g_debug then
23418: hr_utility.set_location(l_proc,50);
23419: end if;
23420: --
23421: -- Validate assignment selected to be new primary
23422: --
23421: -- Validate assignment selected to be new primary
23422: --
23423: IF l_new_assignment.person_id <> p_person_id
23424: THEN
23425: hr_utility.set_message(801,'HR_51253_PYP_ASS__NOT_VALID');
23426: hr_utility.raise_error;
23427: END IF;
23428: IF l_new_assignment.assignment_type <> 'E'
23429: THEN
23422: --
23423: IF l_new_assignment.person_id <> p_person_id
23424: THEN
23425: hr_utility.set_message(801,'HR_51253_PYP_ASS__NOT_VALID');
23426: hr_utility.raise_error;
23427: END IF;
23428: IF l_new_assignment.assignment_type <> 'E'
23429: THEN
23430: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
23426: hr_utility.raise_error;
23427: END IF;
23428: IF l_new_assignment.assignment_type <> 'E'
23429: THEN
23430: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
23431: hr_utility.raise_error;
23432: END IF;
23433: IF l_new_assignment.primary_flag = 'Y'
23434: THEN
23427: END IF;
23428: IF l_new_assignment.assignment_type <> 'E'
23429: THEN
23430: hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
23431: hr_utility.raise_error;
23432: END IF;
23433: IF l_new_assignment.primary_flag = 'Y'
23434: THEN
23435: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
23431: hr_utility.raise_error;
23432: END IF;
23433: IF l_new_assignment.primary_flag = 'Y'
23434: THEN
23435: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
23436: hr_utility.raise_error;
23437: END IF;
23438: IF l_new_assignment.max_effective_end_date <> NVL(l_new_assignment.actual_termination_date,hr_api.g_eot)
23439: THEN
23432: END IF;
23433: IF l_new_assignment.primary_flag = 'Y'
23434: THEN
23435: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
23436: hr_utility.raise_error;
23437: END IF;
23438: IF l_new_assignment.max_effective_end_date <> NVL(l_new_assignment.actual_termination_date,hr_api.g_eot)
23439: THEN
23440: hr_utility.set_message(800,'HR_6438_EMP_ASS_NOT_CONTIN');
23436: hr_utility.raise_error;
23437: END IF;
23438: IF l_new_assignment.max_effective_end_date <> NVL(l_new_assignment.actual_termination_date,hr_api.g_eot)
23439: THEN
23440: hr_utility.set_message(800,'HR_6438_EMP_ASS_NOT_CONTIN');
23441: hr_utility.raise_error;
23442: END IF;
23443: --
23444: if g_debug then
23437: END IF;
23438: IF l_new_assignment.max_effective_end_date <> NVL(l_new_assignment.actual_termination_date,hr_api.g_eot)
23439: THEN
23440: hr_utility.set_message(800,'HR_6438_EMP_ASS_NOT_CONTIN');
23441: hr_utility.raise_error;
23442: END IF;
23443: --
23444: if g_debug then
23445: hr_utility.set_location(l_proc,60);
23441: hr_utility.raise_error;
23442: END IF;
23443: --
23444: if g_debug then
23445: hr_utility.set_location(l_proc,60);
23446: end if;
23447: --
23448: -- End the previous primary assignment
23449: --
23461: -- ,p_last_update_login => TO_NUMBER(NULL)
23462: -- );
23463: --
23464: if g_debug then
23465: hr_utility.set_location(l_proc,70);
23466: end if;
23467: --
23468: -- Start the new primary assignment
23469: --
23478: ,p_last_update_login => TO_NUMBER(NULL)
23479: );
23480: --
23481: if g_debug then
23482: hr_utility.set_location(l_proc,75);
23483: end if;
23484: --
23485: -- #2468916: End previous assignment
23486: --
23493: );
23494: -- end #2468916
23495: --
23496: if g_debug then
23497: hr_utility.set_location(l_proc,80);
23498: end if;
23499: --
23500: -- Retrieve new primary assignment details
23501: --
23506: FETCH csr_new_assignment INTO l_new_assignment;
23507: IF csr_new_assignment%NOTFOUND
23508: THEN
23509: CLOSE csr_new_assignment;
23510: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23511: hr_utility.raise_error;
23512: END IF;
23513: CLOSE csr_new_assignment;
23514: --
23507: IF csr_new_assignment%NOTFOUND
23508: THEN
23509: CLOSE csr_new_assignment;
23510: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23511: hr_utility.raise_error;
23512: END IF;
23513: CLOSE csr_new_assignment;
23514: --
23515: if g_debug then
23512: END IF;
23513: CLOSE csr_new_assignment;
23514: --
23515: if g_debug then
23516: hr_utility.set_location(l_proc,90);
23517: end if;
23518: --
23519: -- Call After Process User Hook
23520: --
23536: );
23537: END;
23538: --
23539: if g_debug then
23540: hr_utility.set_location(l_proc,100);
23541: end if;
23542: --
23543: -- When in validation only mode raise validate enabled exception
23544: --
23553: p_effective_start_date := l_new_assignment.effective_start_date;
23554: p_effective_end_date := l_new_assignment.effective_end_date;
23555: --
23556: if g_debug then
23557: hr_utility.set_location(' Leaving:'||l_proc,1000);
23558: end if;
23559: --
23560: EXCEPTION
23561: WHEN hr_api.validate_enabled
23663: --
23664: BEGIN
23665: --
23666: if g_debug then
23667: hr_utility.set_location('Entering:'||l_proc,10);
23668: end if;
23669: --
23670: -- Ensure mandatory parameters have been passed
23671: --
23695: --
23696: SAVEPOINT set_new_primary_cwk_asg;
23697: --
23698: if g_debug then
23699: hr_utility.set_location(l_proc,20);
23700: end if;
23701: --
23702: -- Call Before Process User Hook
23703: --
23719: --
23720: END;
23721: --
23722: if g_debug then
23723: hr_utility.set_location(l_proc,30);
23724: end if;
23725: --
23726: -- Retrieve old primary assignment details
23727: --
23734: IF csr_old_assignment%NOTFOUND THEN
23735: --
23736: CLOSE csr_old_assignment;
23737: --
23738: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23739: hr_utility.raise_error;
23740: --
23741: END IF;
23742: --
23735: --
23736: CLOSE csr_old_assignment;
23737: --
23738: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23739: hr_utility.raise_error;
23740: --
23741: END IF;
23742: --
23743: CLOSE csr_old_assignment;
23742: --
23743: CLOSE csr_old_assignment;
23744: --
23745: if g_debug then
23746: hr_utility.set_location(l_proc,40);
23747: end if;
23748: --
23749: -- Retrieve new primary assignment details
23750: --
23757: IF csr_new_assignment%NOTFOUND THEN
23758: --
23759: CLOSE csr_new_assignment;
23760: --
23761: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23762: hr_utility.raise_error;
23763: --
23764: END IF;
23765: --
23758: --
23759: CLOSE csr_new_assignment;
23760: --
23761: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23762: hr_utility.raise_error;
23763: --
23764: END IF;
23765: --
23766: CLOSE csr_new_assignment;
23765: --
23766: CLOSE csr_new_assignment;
23767: --
23768: if g_debug then
23769: hr_utility.set_location(l_proc,50);
23770: end if;
23771: --
23772: -- Validate assignment selected to be new primary
23773: --
23772: -- Validate assignment selected to be new primary
23773: --
23774: IF l_new_assignment.person_id <> p_person_id THEN
23775: --
23776: hr_utility.set_message(801,'HR_51253_PYP_ASS__NOT_VALID');
23777: hr_utility.raise_error;
23778: --
23779: END IF;
23780: --
23773: --
23774: IF l_new_assignment.person_id <> p_person_id THEN
23775: --
23776: hr_utility.set_message(801,'HR_51253_PYP_ASS__NOT_VALID');
23777: hr_utility.raise_error;
23778: --
23779: END IF;
23780: --
23781: IF l_new_assignment.assignment_type <> 'C' THEN
23779: END IF;
23780: --
23781: IF l_new_assignment.assignment_type <> 'C' THEN
23782: --
23783: --hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
23784: hr_utility.set_message(801,'XXX');
23785: hr_utility.raise_error;
23786: --
23787: END IF;
23780: --
23781: IF l_new_assignment.assignment_type <> 'C' THEN
23782: --
23783: --hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
23784: hr_utility.set_message(801,'XXX');
23785: hr_utility.raise_error;
23786: --
23787: END IF;
23788: --
23781: IF l_new_assignment.assignment_type <> 'C' THEN
23782: --
23783: --hr_utility.set_message(801,'HR_7948_ASG_ASG_NOT_EMP');
23784: hr_utility.set_message(801,'XXX');
23785: hr_utility.raise_error;
23786: --
23787: END IF;
23788: --
23789: IF l_new_assignment.primary_flag = 'Y' THEN
23787: END IF;
23788: --
23789: IF l_new_assignment.primary_flag = 'Y' THEN
23790: --
23791: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
23792: hr_utility.raise_error;
23793: --
23794: END IF;
23795: --
23788: --
23789: IF l_new_assignment.primary_flag = 'Y' THEN
23790: --
23791: hr_utility.set_message(801,'HR_7999_ASG_INV_PRIM_ASG');
23792: hr_utility.raise_error;
23793: --
23794: END IF;
23795: --
23796: IF l_new_assignment.max_effective_end_date <>
23795: --
23796: IF l_new_assignment.max_effective_end_date <>
23797: NVL(l_new_assignment.actual_termination_date,hr_api.g_eot) THEN
23798: --
23799: hr_utility.set_message(800,'HR_6438_EMP_ASS_NOT_CONTIN');
23800: hr_utility.raise_error;
23801: --
23802: END IF;
23803: --
23796: IF l_new_assignment.max_effective_end_date <>
23797: NVL(l_new_assignment.actual_termination_date,hr_api.g_eot) THEN
23798: --
23799: hr_utility.set_message(800,'HR_6438_EMP_ASS_NOT_CONTIN');
23800: hr_utility.raise_error;
23801: --
23802: END IF;
23803: --
23804: if g_debug then
23801: --
23802: END IF;
23803: --
23804: if g_debug then
23805: hr_utility.set_location(l_proc,60);
23806: end if;
23807: --
23808: -- End the previous primary assignment
23809: --
23819: ,p_last_update_login => TO_NUMBER(NULL)
23820: );
23821: --
23822: if g_debug then
23823: hr_utility.set_location(l_proc,70);
23824: end if;
23825: --
23826: -- Start the new primary assignment
23827: --
23837: ,p_last_update_login => TO_NUMBER(NULL)
23838: );
23839: --
23840: if g_debug then
23841: hr_utility.set_location(l_proc,80);
23842: end if;
23843: --
23844: -- Retrieve new primary assignment details
23845: --
23852: IF csr_new_assignment%NOTFOUND THEN
23853: --
23854: CLOSE csr_new_assignment;
23855: --
23856: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23857: hr_utility.raise_error;
23858: --
23859: END IF;
23860: --
23853: --
23854: CLOSE csr_new_assignment;
23855: --
23856: hr_utility.set_message(800,'HR_51253_PYP_ASS__NOT_VALID');
23857: hr_utility.raise_error;
23858: --
23859: END IF;
23860: --
23861: CLOSE csr_new_assignment;
23860: --
23861: CLOSE csr_new_assignment;
23862: --
23863: if g_debug then
23864: hr_utility.set_location(l_proc,90);
23865: end if;
23866: --
23867: -- Call After Process User Hook
23868: --
23886: --
23887: END;
23888: --
23889: if g_debug then
23890: hr_utility.set_location(l_proc,100);
23891: end if;
23892: --
23893: -- When in validation only mode raise validate enabled exception
23894: --
23904: p_effective_start_date := l_new_assignment.effective_start_date;
23905: p_effective_end_date := l_new_assignment.effective_end_date;
23906: --
23907: if g_debug then
23908: hr_utility.set_location(' Leaving:'||l_proc,999);
23909: end if;
23910: --
23911: EXCEPTION
23912: --
23973: BEGIN
23974: --
23975: if g_debug then
23976: l_proc := g_package||'interview1_apl_asg';
23977: hr_utility.set_location('Entering:'||l_proc,10);
23978: end if;
23979: --
23980: -- Truncate all date parameters passed in
23981: --
23985: --
23986: SAVEPOINT interview1_apl_asg;
23987: --
23988: if g_debug then
23989: hr_utility.set_location(l_proc,20);
23990: end if;
23991: --
23992: -- Call Before Process User Hook
23993: --
24009: );
24010: END;
24011: --
24012: if g_debug then
24013: hr_utility.set_location(l_proc,30);
24014: end if;
24015: --
24016: -- Call business support process to update status type
24017: --
24027: ,p_effective_end_date => l_effective_end_date
24028: );
24029: --
24030: if g_debug then
24031: hr_utility.set_location(l_proc,40);
24032: end if;
24033: --
24034: -- Call After Process User Hook
24035: --
24053: );
24054: END;
24055: --
24056: if g_debug then
24057: hr_utility.set_location(l_proc,50);
24058: end if;
24059: --
24060: -- When in validation only mode raise validate_enabled exception
24061: --
24069: p_effective_start_date := l_effective_start_date;
24070: p_effective_end_date := l_effective_end_date;
24071: --
24072: if g_debug then
24073: hr_utility.set_location(' Leaving:'||l_proc,100);
24074: end if;
24075: --
24076: EXCEPTION
24077: WHEN hr_api.validate_enabled
24137: BEGIN
24138: --
24139: if g_debug then
24140: l_proc := g_package||'interview2_apl_asg';
24141: hr_utility.set_location('Entering:'||l_proc,10);
24142: end if;
24143: --
24144: -- Truncate all date parameters passed in
24145: --
24149: --
24150: SAVEPOINT interview2_apl_asg;
24151: --
24152: if g_debug then
24153: hr_utility.set_location(l_proc,20);
24154: end if;
24155: --
24156: -- Call Before Process User Hook
24157: --
24173: );
24174: END;
24175: --
24176: if g_debug then
24177: hr_utility.set_location(l_proc,30);
24178: end if;
24179: --
24180: -- Call business support process to update status type
24181: --
24191: ,p_effective_end_date => l_effective_end_date
24192: );
24193: --
24194: if g_debug then
24195: hr_utility.set_location(l_proc,40);
24196: end if;
24197: --
24198: -- Call After Process User Hook
24199: --
24217: );
24218: END;
24219: --
24220: if g_debug then
24221: hr_utility.set_location(l_proc,50);
24222: end if;
24223: --
24224: -- When in validation only mode raise validate_enabled exception
24225: --
24233: p_effective_start_date := l_effective_start_date;
24234: p_effective_end_date := l_effective_end_date;
24235: --
24236: if g_debug then
24237: hr_utility.set_location(' Leaving:'||l_proc,100);
24238: end if;
24239: --
24240: EXCEPTION
24241: WHEN hr_api.validate_enabled
24305: --
24306: BEGIN
24307: --
24308: if g_debug then
24309: hr_utility.set_location('Entering:'|| l_proc, 5);
24310: hr_utility.set_location('p_effective_date:'|| to_char(p_effective_date,'DD/MM/YYYY'), 5);
24311: hr_utility.set_location('p_assignment_id :'|| p_assignment_id, 5);
24312: end if;
24313: --
24306: BEGIN
24307: --
24308: if g_debug then
24309: hr_utility.set_location('Entering:'|| l_proc, 5);
24310: hr_utility.set_location('p_effective_date:'|| to_char(p_effective_date,'DD/MM/YYYY'), 5);
24311: hr_utility.set_location('p_assignment_id :'|| p_assignment_id, 5);
24312: end if;
24313: --
24314: l_effective_date := trunc(p_effective_date);
24307: --
24308: if g_debug then
24309: hr_utility.set_location('Entering:'|| l_proc, 5);
24310: hr_utility.set_location('p_effective_date:'|| to_char(p_effective_date,'DD/MM/YYYY'), 5);
24311: hr_utility.set_location('p_assignment_id :'|| p_assignment_id, 5);
24312: end if;
24313: --
24314: l_effective_date := trunc(p_effective_date);
24315: l_validate := p_validate ;
24318: --
24319: savepoint hr_delete_assignment;
24320: --
24321: if g_debug then
24322: hr_utility.set_location(l_proc, 6);
24323: end if;
24324: --
24325: open get_asgt_type;
24326: fetch get_asgt_type into asg_type;
24330: --
24331: close get_asgt_type;
24332: if asg_type = 'B' then
24333: if g_debug then
24334: hr_utility.set_location('Selected assignment is of type Benifit', 10);
24335: end if;
24336: --
24337: fnd_message.set_name('PER', 'HR_449746_DEL_BEN_ASG');
24338: fnd_message.raise_error;
24414: raise hr_api.validate_enabled;
24415: end if;
24416: --
24417: if g_debug then
24418: hr_utility.set_location(' Leaving:'||l_proc, 100);
24419: end if;
24420: --
24421: exception
24422: when hr_api.validate_enabled then