[Home] [Help]
36: begin
37: --
38: -- Update all the person records to Anonymous
39: --
40: hr_utility.set_location('Entering Anonymize Candidate Data:'||l_proc, 10);
41: for rec_person in csr_update_person loop
42: hr_utility.set_location(l_proc, 20);
43: l_person_ovn := rec_person.object_version_number;
44: l_employee_number := rec_person.employee_number;
38: -- Update all the person records to Anonymous
39: --
40: hr_utility.set_location('Entering Anonymize Candidate Data:'||l_proc, 10);
41: for rec_person in csr_update_person loop
42: hr_utility.set_location(l_proc, 20);
43: l_person_ovn := rec_person.object_version_number;
44: l_employee_number := rec_person.employee_number;
45: --
46: /* call to hr_person_api.update_person to set the names to Anonymous */
71: -- non-searchable
72: --
73: open csr_update_notif_pref;
74: fetch csr_update_notif_pref into l_notif_pref_ovn,l_notif_pref_id;
75: hr_utility.set_location(l_proc, 40);
76: if csr_update_notif_pref%found
77: then
78: irc_notification_prefs_api.update_notification_prefs
79: (
84: ,p_object_version_number => l_notif_pref_ovn
85: );
86: end if;
87: close csr_update_notif_pref;
88: hr_utility.set_location('Leaving Anonymize Candidate Data:'||l_proc, 100);
89: end anonymize_candidate_data;
90: --
91: --
92: -- ----------------------------------------------------------------------------
118: where employee_id = l_personIdIn;
119: --
120: begin
121: --
122: hr_utility.set_location('Entering Send Notification to Person:'||l_proc, 10);
123: open csr_name;
124: fetch csr_name into l_name;
125: close csr_name;
126: --
144: ,p_subject => l_subject
145: ,p_html_body => l_message_conc_html
146: ,p_text_body => l_message_conc_text
147: );
148: hr_utility.set_location('Leaving Send Notification to Person:'||l_proc, 100);
149: --
150: end send_notification_to_person;
151: -- ----------------------------------------------------------------------------
152: -- |--------------------------< delete_person >-------------------------------|
313: from irc_vacancy_considerations
314: where party_id = p_party_id;
315: --
316: begin
317: hr_utility.set_location('Entering Purge Person Info:'||l_proc, 10);
318: --
319: -- Delete from IRC_DOCUMENTS
320: --
321:
337:
338: --
339: -- Delete from PER_QUALIFICATIONS
340: --
341: hr_utility.set_location(l_proc, 20);
342: for rec_per_qual in csr_per_qual loop
343: per_qualifications_api.delete_qualification
344: (p_qualification_id => rec_per_qual.qualification_id
345: ,p_object_version_number => rec_per_qual.object_version_number
349: -- Delete from PER_ESTABLISHMENT_ATTENDANCES
350: -- There should not be a child record in Per Qualification table mapped
351: -- by Attendance ID
352: --
353: hr_utility.set_location(l_proc, 30);
354: for rec_per_est_att in csr_per_est_att loop
355: per_estab_attendances_api.delete_attended_estab
356: (p_attendance_id => rec_per_est_att.attendance_id
357: ,p_object_version_number => rec_per_est_att.object_version_number
360: --
361: -- Delete from Per_Previous_Employers
362: -- This deletes data from Per_Previous_jobs an per_previous_job_usages also
363: --
364: hr_utility.set_location(l_proc, 40);
365: for rec_per_prev_empl in csr_per_prev_empl loop
366: hr_previous_employment_api.delete_previous_employer
367: (p_previous_employer_id => rec_per_prev_empl.previous_employer_id
368: ,p_object_version_number => rec_per_prev_empl.object_version_number
371: --
372: -- Api checks for competence_element_id being a parent.
373: -- Delete from Per_Competence_Elements
374: --
375: hr_utility.set_location(l_proc, 50);
376: for rec_per_comps in csr_per_comps loop
377: hr_competence_element_api.delete_competence_element
378: (p_competence_element_id => rec_per_comps.competence_element_id
379: ,p_object_version_number => rec_per_comps.object_version_number
381: end loop;
382: --
383: --Delete from Per_Addresses
384: --
385: hr_utility.set_location(l_proc, 60);
386: for rec_per_addr in csr_per_addr loop
387: per_add_del.del
388: (p_address_id => rec_per_addr.address_id
389: ,p_object_version_number => rec_per_addr.object_version_number
391: end loop;
392: --
393: -- Delete from IRC_JOB_BASKET_ITEMS
394: --
395: hr_utility.set_location(l_proc, 80);
396: for rec_jbi in csr_jbi loop
397: irc_job_basket_items_api.delete_job_basket_item
398: (p_job_basket_item_id => rec_jbi.job_basket_item_id
399: ,p_object_version_number => rec_jbi.object_version_number
401: end loop;
402: --
403: -- Delete the work preferences
404: --
405: hr_utility.set_location(l_proc, 90);
406: for rec_isc_work in csr_isc_work loop
407: irc_search_criteria_api.delete_work_choices
408: (p_search_criteria_id => rec_isc_work.search_criteria_id
409: ,p_object_version_number => rec_isc_work.object_version_number
411: end loop;
412: --
413: -- Delete the Job Saved Searches
414: --
415: hr_utility.set_location(l_proc, 100);
416: for rec_isc_party in csr_isc_person loop
417: irc_search_criteria_api.delete_saved_search
418: (p_search_criteria_id => rec_isc_party.search_criteria_id
419: ,p_object_version_number => rec_isc_party.object_version_number
421: end loop;
422: --
423: -- Delete from PER_PHONES
424: --
425: hr_utility.set_location(l_proc, 110);
426: for rec_phn in csr_phn_party loop
427: hr_phone_api.delete_phone
428: (p_phone_id => rec_phn.phone_id
429: ,p_object_version_number => rec_phn.object_version_number
431: end loop;
432: --
433: -- Delete from IRC_VACANCY_CONSIDERATIONS
434: --
435: hr_utility.set_location(l_proc, 112);
436: for rec_ivc in csr_ivc_cons loop
437: irc_vacancy_considerations_api.delete_vacancy_consideration
438: (p_vacancy_consideration_id => rec_ivc.vacancy_consideration_id
439: ,p_object_version_number => rec_ivc.object_version_number
443: if(p_process_type='DEL') then
444: --
445: -- Delete from IRC_NOTIFICATION_PREFERENCES
446: --
447: hr_utility.set_location(l_proc, 115);
448: for rec_irc_notif in csr_irc_notif loop
449: irc_notification_prefs_api.delete_notification_prefs
450: (p_notification_preference_id => rec_irc_notif.notification_preference_id
451: ,p_object_version_number => rec_irc_notif.object_version_number
453: end loop;
454: --
455: -- Call a procedure to delete the person,asignment and the related records
456: --
457: hr_utility.set_location(l_proc, 120);
458: irc_purge_old_data_pkg.delete_person
459: (p_party_id => p_party_id
460: ,p_root_person_id => p_root_person_id
461: ,p_effective_date => p_effective_date
464: elsif(p_process_type ='DELUPD') then
465: --
466: -- Call a procedure to update the person record
467: --
468: hr_utility.set_location(l_proc, 130);
469: irc_purge_old_data_pkg.anonymize_candidate_data
470: (p_party_id => p_party_id
471: ,p_effective_date => p_effective_date
472: );
472: );
473: --
474: end if ;
475: --
476: hr_utility.set_location('Leaving Purge Person Info:'||l_proc,200);
477: end delete_person_child_data;
478: --
479: -- ----------------------------------------------------------------------------
480: -- |--------------------------< notify_or_purge >-----------------------------|
499: and effective_end_date;
500: --
501: begin
502: --
503: hr_utility.set_location('Entering Notify or Purge:'||l_proc, 10);
504: -- Fetch the person full name
505: --
506: open csr_full_name;
507: fetch csr_full_name into l_person_full_name;
508: close csr_full_name;
509: --
510: if(p_process_type = 'NOTIFY') then
511: --
512: hr_utility.set_location(l_proc, 20);
513: irc_purge_old_data_pkg.send_notification_to_person
514: (p_person_id => p_root_person_id
515: );
516: elsif(p_process_type = 'UPD') then
514: (p_person_id => p_root_person_id
515: );
516: elsif(p_process_type = 'UPD') then
517: --
518: hr_utility.set_location(l_proc, 30);
519: irc_purge_old_data_pkg.anonymize_candidate_data
520: (p_party_id => p_party_id
521: ,p_effective_date => p_effective_date
522: );
521: ,p_effective_date => p_effective_date
522: );
523: elsif(p_process_type = 'DEL' or p_process_type = 'DELUPD') then
524: --
525: hr_utility.set_location(l_proc, 40);
526: irc_purge_old_data_pkg.delete_person_child_data
527: (p_party_id => p_party_id
528: ,p_root_person_id => p_root_person_id
529: ,p_effective_date => p_effective_date
539: rpad(nvl(to_char(p_party_id),' '),10)||' '||
540: rpad(nvl('SUCCESS',' '),10);
541: --
542: Fnd_file.put_line(FND_FILE.LOG,l_print_element_info);
543: hr_utility.set_location('Leaving Notify or Purge:'||l_proc, 100);
544: exception
545: when others then
546: l_print_element_info := rpad(nvl(l_person_full_name,' '),60)||' '||
547: rpad(nvl(to_char(p_root_person_id),' '),10)||' '||
548: rpad(nvl(to_char(p_party_id),' '),10)||' '||
549: rpad(nvl('FAILURE',' '),10);
550: Fnd_file.put_line(FND_FILE.LOG,l_print_element_info);
551: Fnd_file.put_line(FND_FILE.LOG,' FAILURE REASON:'||sqlerrm);
552: hr_utility.set_location('Leaving Notify or Purge:'||l_proc, 100);
553: rollback;
554: end notify_or_purge;
555: --
556: -- ----------------------------------------------------------------------------
736: (inp.party_id,p_effective_date)) ;
737: --
738: begin
739: --
740: hr_utility.set_location('Entering Purge Records:'||l_proc, 10);
741: l_header := rpad('FULL_NAME',60)||' '||
742: rpad('PERSON_ID',10)||' '||
743: rpad('PARTY_ID',10)||' '||
744: rpad('RESULT',10);
751: Fnd_file.put_line(FND_FILE.LOG,l_header);
752: Fnd_file.put_line(FND_FILE.LOG,l_underline);
753: if(p_measure_type = 'LOGINDATE') then
754: --
755: hr_utility.set_location(l_proc, 20);
756: for rec_last_login_date in csr_last_login_date loop
757: irc_purge_old_data_pkg.notify_or_purge
758: (p_effective_date => p_effective_date
759: ,p_process_type => p_process_type
762: );
763: end loop;
764: elsif(p_measure_type = 'UPDATEDATE') then
765: --
766: hr_utility.set_location(l_proc, 30);
767: for rec_last_update_date in csr_last_update_date loop
768: irc_purge_old_data_pkg.notify_or_purge
769: (p_effective_date => p_effective_date
770: ,p_process_type => p_process_type
773: );
774: end loop;
775: elsif(p_measure_type = 'APPLDATE') then
776: --
777: hr_utility.set_location(l_proc, 40);
778: for rec_last_appl_date in csr_last_application_date loop
779: irc_purge_old_data_pkg.notify_or_purge
780: (p_effective_date => p_effective_date
781: ,p_process_type => p_process_type
783: ,p_root_person_id => rec_last_appl_date.person_id
784: );
785: end loop;
786: end if;
787: hr_utility.set_location('Leaving Purge Records:'||l_proc, 100);
788: end purge_records;
789: -- ----------------------------------------------------------------------------
790: -- |--------------------------< purge_record_process >------------------------|
791: -- ----------------------------------------------------------------------------
813: where lookup_type = 'IRC_MEASURE_TYPE'
814: and lookup_code = l_msrCodeIn;
815: begin
816: --
817: hr_utility.set_location('Entering Purge Record Process:'||l_proc, 10);
818: --
819: open getprstype(p_process_type);
820: fetch getprstype into l_process_type;
821: close getprstype;
835: ,p_months => p_months
836: ,p_measure_type => p_measure_type
837: );
838: retcode := 0;
839: hr_utility.set_location('Leaving Purge Record Process:'||l_proc, 70);
840: exception
841: when others then
842: --
843: hr_utility.set_location('Leaving Purge Record Process:'||l_proc, 80);
839: hr_utility.set_location('Leaving Purge Record Process:'||l_proc, 70);
840: exception
841: when others then
842: --
843: hr_utility.set_location('Leaving Purge Record Process:'||l_proc, 80);
844: rollback;
845: --
846: -- Set the return parameters to indicate failure
847: --