[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
309: --
310: begin
311: select 'Y'
312: into v_delete_permitted
313: from sys.dual
314: where not exists (
315: select null
316: from pay_assignment_actions paa,
317: per_assignments_f ass,
369: --
370: begin
371: select 'Y'
372: into v_delete_permitted
373: from sys.dual
374: where not exists (
375: select null
376: from fnd_user aol
377: where aol.employee_id = P_PERSON_ID
401: --
402: BEGIN
403: select 'Y'
404: into v_delete_permitted
405: from sys.dual
406: where not exists (
407: select null
408: from per_assignments_f ass,
409: hr_assignment_set_amendments asa
491: --
492: begin
493: select 'Y'
494: into v_delete_permitted
495: from sys.dual
496: where not exists (
497: select null
498: from per_assignments_f a
499: , per_contact_relationships c
533: -- the person is deleted
534: --
535: select null
536: into v_delete_permitted
537: from sys.dual
538: where not exists(select null
539: from per_contracts_f
540: where person_id = p_person_id);
541: --
688: -- Select statement modified to improve performance.
689:
690: select 'Y'
691: into v_delete_permitted
692: from sys.dual
693: where not exists (
694: select null
695: from per_letter_request_lines r
696: where r.person_id = P_PERSON_ID
697: and r.date_from >= P_SESSION_DATE );
698:
699: select 'Y'
700: into v_delete_permitted
701: from sys.dual
702: where not exists (
703: select null
704: from per_letter_request_lines r
705: where exists (
711:
712:
713: /* select 'Y'
714: into v_delete_permitted
715: from sys.dual
716: where not exists (
717: select null
718: from per_letter_request_lines r
719: where r.person_id = P_PERSON_ID
736: --
737: begin
738: select 'Y'
739: into v_delete_permitted
740: from sys.dual
741: where not exists (
742: select null
743: from per_contact_relationships r
744: where r.person_id = P_PERSON_ID
753: --
754: begin
755: select 'Y'
756: into v_delete_permitted
757: from sys.dual
758: where not exists (
759: select null
760: from per_events e
761: where e.internal_contact_person_id = P_PERSON_ID);
769: --
770: begin
771: select 'Y'
772: into v_delete_permitted
773: from sys.dual
774: where not exists (
775: select null
776: from per_bookings b
777: where b.person_id = P_PERSON_ID);
786: -- VT 1403481 09/19/00
787: begin
788: select 'Y'
789: into v_delete_permitted
790: from sys.dual
791: where 1 >= (
792: select count(*)
793: from per_assignments_f a
794: where a.person_id = P_PERSON_ID
803: --
804: begin
805: select 'Y'
806: into v_delete_permitted
807: from sys.dual
808: where not exists (
809: select null
810: from per_assignments_f a
811: where a.recruiter_id = P_PERSON_ID
820: --
821: begin
822: select 'Y'
823: into v_delete_permitted
824: from sys.dual
825: where not exists (
826: select null
827: from per_periods_of_service p
828: where p.termination_accepted_person_id = P_PERSON_ID);
836: --
837: begin
838: select 'Y'
839: into v_delete_permitted
840: from sys.dual
841: where not exists (
842: select null
843: from per_person_analyses a
844: where a.person_id = P_PERSON_ID);
852: --
853: begin
854: select 'Y'
855: into v_delete_permitted
856: from sys.dual
857: where not exists (
858: select null
859: from per_absence_attendances a
860: where a.person_id = P_PERSON_ID);
868: --
869: begin
870: select 'Y'
871: into v_delete_permitted
872: from sys.dual
873: where not exists (
874: select null
875: from per_absence_attendances a
876: where a.authorising_person_id = P_PERSON_ID
885: --
886: begin
887: select 'Y'
888: into v_delete_permitted
889: from sys.dual
890: where not exists (
891: select null
892: from per_recruitment_activities r
893: where r.authorising_person_id = P_PERSON_ID
901: hr_utility.set_location('HR_PERSON_DELETE.MODERATE_PREDEL_VALIDATION',13);
902: begin
903: select 'Y'
904: into v_delete_permitted
905: from sys.dual
906: where not exists (
907: select null
908: from per_appraisals apr
909: where apr.appraisee_person_id = P_PERSON_ID
917: hr_utility.set_location('HR_PERSON_DELETE.MODERATE_PREDEL_VALIDATION',13);
918: begin
919: select 'Y'
920: into v_delete_permitted
921: from sys.dual
922: where not exists (
923: select null
924: from per_participants par
925: where par.person_id = P_PERSON_ID);
933: --
934: begin
935: select 'Y'
936: into v_delete_permitted
937: from sys.dual
938: where not exists (
939: select null
940: from per_requisitions r
941: where r.person_id = P_PERSON_ID);
949: --
950: begin
951: select 'Y'
952: into v_delete_permitted
953: from sys.dual
954: where not exists (
955: select null
956: from per_vacancies v
957: where v.recruiter_id = P_PERSON_ID);
967: --
968: begin
969: select 'Y'
970: into v_delete_permitted
971: from sys.dual
972: where not exists (
973: select null
974: from pay_element_entries_f e,
975: per_assignments_f a,
991: --
992: begin
993: select 'Y'
994: into v_delete_permitted
995: from sys.dual
996: where not exists (
997: select null
998: from pay_element_entries_f e,
999: per_assignments_f a
1016: --
1017: begin
1018: select 'Y'
1019: into v_delete_permitted
1020: from sys.dual
1021: where not exists (
1022: select null
1023: from per_assignment_extra_info i
1024: where exists (
1036: --
1037: begin
1038: select 'Y'
1039: into v_delete_permitted
1040: from sys.dual
1041: where not exists (
1042: select null
1043: from per_secondary_ass_statuses s
1044: where exists (
1057: --
1058: begin
1059: select 'Y'
1060: into v_delete_permitted
1061: from sys.dual
1062: where not exists (
1063: select null
1064: from per_events e
1065: where exists (
1077: --
1078: begin
1079: select 'Y'
1080: into v_delete_permitted
1081: from sys.dual
1082: where not exists (
1083: select null
1084: from per_spinal_point_placements_f p
1085: where exists (
1097: --
1098: begin
1099: select 'Y'
1100: into v_delete_permitted
1101: from sys.dual
1102: where not exists (
1103: select null
1104: from per_quickpaint_result_text t
1105: where exists (
1117: --
1118: begin
1119: select 'Y'
1120: into v_delete_permitted
1121: from sys.dual
1122: where not exists (
1123: select null
1124: from per_cobra_cov_enrollments c
1125: where exists (
1324: --
1325: begin
1326: select 'Y'
1327: into v_contact_elsewhere
1328: from sys.dual
1329: where exists (
1330: select null
1331: from per_contact_relationships r
1332: where r.contact_relationship_id <> P_CONTACT_RELATIONSHIP_ID
1343: --
1344: begin
1345: select 'Y'
1346: into v_other_only
1347: from sys.dual
1348: where not exists
1349: (select null
1350: from per_people_f p
1351: where p.person_id = P_CONTACT_PERSON_ID
1649: begin -- Delete from HR_QUEST_ANSWER_VALUES
1650: begin -- Delete from HR_QUEST_ANSWER_VALUES: PARTICIPANTS
1651: select 1
1652: into v_dummy
1653: from sys.dual
1654: where exists (
1655: select null
1656: from per_participants par
1657: where par.person_id = P_PERSON_ID);
1681:
1682: begin -- Delete from HR_QUEST_ANSWER_VALUES: APPRAISALS
1683: select 2
1684: into v_dummy
1685: from sys.dual
1686: where exists (
1687: select null
1688: from per_appraisals apr
1689: where (apr.appraiser_person_id = P_PERSON_ID