[Home] [Help]
25: Description : This package declares procedures required to DELETE
26: people on Oracle Human Resources. Note, this
27: does not include extra validation provided by calling programs (such
28: as screen QuickPicks and HRLink validation) OR that provided by use
29: of constraints and triggers held against individual tables.
30: Change List
31: -----------
32:
33: Version Date Author ER/CR No. Description of Change
308: --
309: begin
310: select 'Y'
311: into v_delete_permitted
312: from sys.dual
313: where not exists (
314: select null
315: from pay_assignment_actions paa,
316: per_assignments_f ass,
368: --
369: begin
370: select 'Y'
371: into v_delete_permitted
372: from sys.dual
373: where not exists (
374: select null
375: from fnd_user aol
376: where aol.employee_id = P_PERSON_ID
400: --
401: BEGIN
402: select 'Y'
403: into v_delete_permitted
404: from sys.dual
405: where not exists (
406: select null
407: from per_assignments_f ass,
408: hr_assignment_set_amendments asa
490: --
491: begin
492: select 'Y'
493: into v_delete_permitted
494: from sys.dual
495: where not exists (
496: select null
497: from per_assignments_f a
498: , per_contact_relationships c
532: -- the person is deleted
533: --
534: select null
535: into v_delete_permitted
536: from sys.dual
537: where not exists(select null
538: from per_contracts_f
539: where person_id = p_person_id);
540: --
687: -- Select statement modified to improve performance.
688:
689: select 'Y'
690: into v_delete_permitted
691: from sys.dual
692: where not exists (
693: select null
694: from per_letter_request_lines r
695: where r.person_id = P_PERSON_ID
696: and r.date_from >= P_SESSION_DATE );
697:
698: select 'Y'
699: into v_delete_permitted
700: from sys.dual
701: where not exists (
702: select null
703: from per_letter_request_lines r
704: where exists (
710:
711:
712: /* select 'Y'
713: into v_delete_permitted
714: from sys.dual
715: where not exists (
716: select null
717: from per_letter_request_lines r
718: where r.person_id = P_PERSON_ID
735: --
736: begin
737: select 'Y'
738: into v_delete_permitted
739: from sys.dual
740: where not exists (
741: select null
742: from per_contact_relationships r
743: where r.person_id = P_PERSON_ID
752: --
753: begin
754: select 'Y'
755: into v_delete_permitted
756: from sys.dual
757: where not exists (
758: select null
759: from per_events e
760: where e.internal_contact_person_id = P_PERSON_ID);
768: --
769: begin
770: select 'Y'
771: into v_delete_permitted
772: from sys.dual
773: where not exists (
774: select null
775: from per_bookings b
776: where b.person_id = P_PERSON_ID);
785: -- VT 1403481 09/19/00
786: begin
787: select 'Y'
788: into v_delete_permitted
789: from sys.dual
790: where 1 >= (
791: select count(*)
792: from per_assignments_f a
793: where a.person_id = P_PERSON_ID
802: --
803: begin
804: select 'Y'
805: into v_delete_permitted
806: from sys.dual
807: where not exists (
808: select null
809: from per_assignments_f a
810: where a.recruiter_id = P_PERSON_ID
819: --
820: begin
821: select 'Y'
822: into v_delete_permitted
823: from sys.dual
824: where not exists (
825: select null
826: from per_periods_of_service p
827: where p.termination_accepted_person_id = P_PERSON_ID);
835: --
836: begin
837: select 'Y'
838: into v_delete_permitted
839: from sys.dual
840: where not exists (
841: select null
842: from per_person_analyses a
843: where a.person_id = P_PERSON_ID);
851: --
852: begin
853: select 'Y'
854: into v_delete_permitted
855: from sys.dual
856: where not exists (
857: select null
858: from per_absence_attendances a
859: where a.person_id = P_PERSON_ID);
867: --
868: begin
869: select 'Y'
870: into v_delete_permitted
871: from sys.dual
872: where not exists (
873: select null
874: from per_absence_attendances a
875: where a.authorising_person_id = P_PERSON_ID
884: --
885: begin
886: select 'Y'
887: into v_delete_permitted
888: from sys.dual
889: where not exists (
890: select null
891: from per_recruitment_activities r
892: where r.authorising_person_id = P_PERSON_ID
900: hr_utility.set_location('HR_PERSON_DELETE.MODERATE_PREDEL_VALIDATION',13);
901: begin
902: select 'Y'
903: into v_delete_permitted
904: from sys.dual
905: where not exists (
906: select null
907: from per_appraisals apr
908: where apr.appraisee_person_id = P_PERSON_ID
916: hr_utility.set_location('HR_PERSON_DELETE.MODERATE_PREDEL_VALIDATION',13);
917: begin
918: select 'Y'
919: into v_delete_permitted
920: from sys.dual
921: where not exists (
922: select null
923: from per_participants par
924: where par.person_id = P_PERSON_ID);
932: --
933: begin
934: select 'Y'
935: into v_delete_permitted
936: from sys.dual
937: where not exists (
938: select null
939: from per_requisitions r
940: where r.person_id = P_PERSON_ID);
948: --
949: begin
950: select 'Y'
951: into v_delete_permitted
952: from sys.dual
953: where not exists (
954: select null
955: from per_vacancies v
956: where v.recruiter_id = P_PERSON_ID);
966: --
967: begin
968: select 'Y'
969: into v_delete_permitted
970: from sys.dual
971: where not exists (
972: select null
973: from pay_element_entries_f e,
974: per_assignments_f a,
990: --
991: begin
992: select 'Y'
993: into v_delete_permitted
994: from sys.dual
995: where not exists (
996: select null
997: from pay_element_entries_f e,
998: per_assignments_f a
1015: --
1016: begin
1017: select 'Y'
1018: into v_delete_permitted
1019: from sys.dual
1020: where not exists (
1021: select null
1022: from per_assignment_extra_info i
1023: where exists (
1035: --
1036: begin
1037: select 'Y'
1038: into v_delete_permitted
1039: from sys.dual
1040: where not exists (
1041: select null
1042: from per_secondary_ass_statuses s
1043: where exists (
1056: --
1057: begin
1058: select 'Y'
1059: into v_delete_permitted
1060: from sys.dual
1061: where not exists (
1062: select null
1063: from per_events e
1064: where exists (
1076: --
1077: begin
1078: select 'Y'
1079: into v_delete_permitted
1080: from sys.dual
1081: where not exists (
1082: select null
1083: from per_spinal_point_placements_f p
1084: where exists (
1096: --
1097: begin
1098: select 'Y'
1099: into v_delete_permitted
1100: from sys.dual
1101: where not exists (
1102: select null
1103: from per_quickpaint_result_text t
1104: where exists (
1116: --
1117: begin
1118: select 'Y'
1119: into v_delete_permitted
1120: from sys.dual
1121: where not exists (
1122: select null
1123: from per_cobra_cov_enrollments c
1124: where exists (
1323: --
1324: begin
1325: select 'Y'
1326: into v_contact_elsewhere
1327: from sys.dual
1328: where exists (
1329: select null
1330: from per_contact_relationships r
1331: where r.contact_relationship_id <> P_CONTACT_RELATIONSHIP_ID
1342: --
1343: begin
1344: select 'Y'
1345: into v_other_only
1346: from sys.dual
1347: where not exists
1348: (select null
1349: from per_people_f p
1350: where p.person_id = P_CONTACT_PERSON_ID
1648: begin -- Delete from HR_QUEST_ANSWER_VALUES
1649: begin -- Delete from HR_QUEST_ANSWER_VALUES: PARTICIPANTS
1650: select 1
1651: into v_dummy
1652: from sys.dual
1653: where exists (
1654: select null
1655: from per_participants par
1656: where par.person_id = P_PERSON_ID);
1680:
1681: begin -- Delete from HR_QUEST_ANSWER_VALUES: APPRAISALS
1682: select 2
1683: into v_dummy
1684: from sys.dual
1685: where exists (
1686: select null
1687: from per_appraisals apr
1688: where (apr.appraiser_person_id = P_PERSON_ID