[Home] [Help]
PACKAGE: APPS.GHR_EXEMP_PURGE
Source
1 PACKAGE GHR_EXEMP_PURGE AUTHID CURRENT_USER AS
2 /* $Header: ghrexpur.pkh 120.3.12020000.1 2012/07/17 05:04:21 vmididho noship $ */
3
4 rep_purge_error EXCEPTION;
5 rep_purge_loop_err EXCEPTION;
6 rep_purge_del_err EXCEPTION;
7 pareq_appr_exist EXCEPTION;
8
9 TYPE t_tag_type IS RECORD
10 (tagname VARCHAR2(240),
11 tagvalue VARCHAR2(4000));
12 TYPE t_tags IS TABLE OF t_tag_type INDEX BY BINARY_INTEGER;
13
14 TYPE EXEMP_PER_DET IS RECORD
15 (slno number
16 ,empno varchar2(30)
17 ,ssn varchar2(30)
18 ,person_id number
19 ,person_name varchar2(240)
20 ,ret_period varchar2(30));
21
22 TYPE exemp_rec IS TABLE OF exemp_per_det INDEX BY BINARY_INTEGER;
23
24 PROCEDURE Main(errbuf OUT NOCOPY VARCHAR2
25 ,retcode OUT NOCOPY NUMBER
26 ,p_retention_period in NUMBER
27 ,p_option in VARCHAR2);
28
29 PROCEDURE DetachAppUser(p_person_id in NUMBER);
30
31 PROCEDURE ChkValPAReq(p_person_id in NUMBER,
32 p_full_name in VARCHAR2);
33
34 PROCEDURE ValCoreTables(p_person_id IN number
35 ,p_effective_date IN DATE);
36
37 PROCEDURE UpdGhrTables(p_person_id in NUMBER,
38 p_full_name in VARCHAR2);
39
40 PROCEDURE DelCoreTables(p_person_id in NUMBER);
41
42 PROCEDURE DelGhrTables(p_person_id in NUMBER);
43
44 PROCEDURE DelBenTables(p_person_id in NUMBER);
45 PROCEDURE ReportExemp(p_exemp_rec EXEMP_PER_DET,
46 p_count number,
47 p_dir varchar2,
48 p_fname varchar2);
49
50 PROCEDURE WriteTagValues(p_exemp_rec EXEMP_PER_DET
51 ,p_tags OUT NOCOPY t_tags);
52
53 PROCEDURE WriteAsciiValues(p_l_fp utl_file.file_type
54 ,p_tags t_tags);
55
56 PROCEDURE WriteHeaderRow(p_l_fp UTL_FILE.FILE_TYPE
57 ,p_tags T_TAGS);
58
59 END GHR_EXEMP_PURGE;