1 PACKAGE irc_purge_old_data_pkg AUTHID CURRENT_USER AS
2 /* $Header: ircpurge.pkh 120.1.12010000.1 2008/07/28 12:39:07 appldev ship $ */
3
4 -- ----------------------------------------------------------------------------
5 -- |--------------------------< purge_record_process >------------------------|
6 -- ----------------------------------------------------------------------------
7 --
8 --
9 -- Description:
10 -- This procedure will be called from the concurrent program.
11 --
12 procedure purge_record_process
13 (
14 errbuf out nocopy varchar2
15 ,retcode out nocopy varchar2
16 ,p_effective_date in varchar2
17 ,p_process_type in varchar2
18 ,p_measure_type in varchar2
19 ,p_months in number
20 );
21 --
22 --
23 -- ----------------------------------------------------------------------------
24 -- |--------------------------< get_max_updated_date >------------------------|
25 -- ----------------------------------------------------------------------------
26 --
27 -- Description:
28 -- This function will be called to get the maximum updation date. Based
29 -- on this date data of the candidate will be purged
30 --
31 --
32 function get_max_updated_date
33 (
34 p_person_id in number
35 ) return date;
36 function is_free_to_purge(p_party_id number,p_effective_date date) return string;
37 PRAGMA RESTRICT_REFERENCES (is_free_to_purge, WNDS);
38
39 -- ----------------------------------------------------------------------------
40 -- |--------------------------< last_application_date >-----------------------|
41 -- ----------------------------------------------------------------------------
42 -- Description:
43 -- This function will be called to get the last application date. Based
44 -- on this date data of the candidate will be purged
45 --
46 function last_application_date
47 (
48 p_party_id in number
49 ,p_effective_date in date
50 )
51 return date;
52 --
53 -- ----------------------------------------------------------------------------
54 -- |--------------------------< clean_employee_data >------------------------|
55 -- ----------------------------------------------------------------------------
56 -- Description:
57 -- This procedure will be called by the sql script irpurcln.sql for clearing
58 -- the employee_id in fnd_user table which do not have person record in
59 -- per_all_people_f table
60 --
61 procedure clean_employee_data(p_process_ctrl IN varchar2
62 ,p_start_pkid IN number
63 ,p_end_pkid IN number
64 ,p_rows_processed OUT nocopy number
65 );
66 --
67 end irc_purge_old_data_pkg;