1 PACKAGE IGF_AP_LI_ISIR_IMP_PROC AUTHID CURRENT_USER AS
2 /* $Header: IGFAP34S.pls 115.3 2003/12/10 07:35:54 rasahoo noship $ */
3
4
5
6
7 TYPE message_rec IS RECORD
8 (field_name VARCHAR2(30),
9 msg_text VARCHAR2(2000));
10
11
12 TYPE igf_ap_message_table IS TABLE OF message_rec
13 INDEX BY BINARY_INTEGER;
14
15
16 TYPE igf_ap_meaning_table IS TABLE OF message_rec
17 INDEX BY BINARY_INTEGER;
18
19 TYPE lookup_meaning_tab IS TABLE OF message_rec
20 INDEX BY BINARY_INTEGER;
21
22 lookup_meaning_table lookup_meaning_tab;
23
24 TYPE igf_ap_lookups_table IS TABLE OF VARCHAR2(227)
25 INDEX BY BINARY_INTEGER;
26
27 lookups_table DBMS_UTILITY.uncl_array;
28
29
30 TYPE igf_ap_lkup_hash_table IS TABLE OF NUMBER
31 INDEX BY BINARY_INTEGER;
32 lookup_hash_table igf_ap_lkup_hash_table;
33
34 PROCEDURE put_meaning(list IN VARCHAR2);
35
36
37
38 PROCEDURE main ( errbuf IN OUT NOCOPY VARCHAR2,
39 retcode IN OUT NOCOPY NUMBER,
40 p_award_year IN VARCHAR2,
41 p_batch_id IN NUMBER,
42 p_del_int IN VARCHAR2,
43 p_cps_import IN VARCHAR2 DEFAULT NULL) ;
44
45
46
47
48 PROCEDURE put_hash_values(list IN VARCHAR2,
49 p_award_year IN VARCHAR2);
50
51 FUNCTION is_lookup_code_exist(p_lookup_code IN VARCHAR2,
52 p_lookup_type IN VARCHAR2)
53 RETURN BOOLEAN;
54
55
56 PROCEDURE create_base_rec(p_ci_cal_type IN VARCHAR2,
57 p_person_id IN NUMBER,
58 p_ci_sequence_number IN NUMBER,
59 p_nslds_match_type IN VARCHAR2,
60 l_fa_base_id OUT NOCOPY NUMBER,
61 p_award_fmly_contribution_type IN VARCHAR2
62 );
63 PROCEDURE cps_import(errbuf IN OUT NOCOPY VARCHAR2,
64 retcode IN OUT NOCOPY NUMBER,
65 p_award_year IN VARCHAR2);
66
67 g_person_print VARCHAR2(1);
68
69 FUNCTION Val_Name (l_length IN NUMBER,
70 l_value IN VARCHAR2
71 ) RETURN BOOLEAN ;
72
73 FUNCTION Val_Char (l_length IN NUMBER,
74 l_value IN VARCHAR2
75 ) RETURN BOOLEAN;
76
77
78
79 FUNCTION Val_Date ( l_value IN VARCHAR2)
80 RETURN BOOLEAN;
81
82
83 FUNCTION Val_Date_2(l_value IN VARCHAR2
84 ) RETURN BOOLEAN;
85
86
87
88 FUNCTION Val_Email(l_length IN NUMBER,
89 l_value IN VARCHAR2
90 ) RETURN BOOLEAN;
91
92
93 FUNCTION Val_Input_Rec_type(l_value IN VARCHAR2
94 ) RETURN BOOLEAN;
95
96
97
98 FUNCTION Val_Int(l_value IN VARCHAR2
99 ) RETURN BOOLEAN;
100
101
102 FUNCTION Val_Alpha(l_value IN VARCHAR2,
103 l_length IN NUMBER
104 ) RETURN BOOLEAN;
105
106
107
108 FUNCTION Val_Add(l_length IN NUMBER,
109 l_value IN VARCHAR2
110 ) RETURN BOOLEAN;
111
112 FUNCTION Val_Num(l_length IN NUMBER,
113 l_value IN VARCHAR2
114 ) RETURN BOOLEAN;
115
116
117 FUNCTION Val_Num_NonZero( l_value IN VARCHAR2,
118 l_length IN NUMBER
119 ) RETURN BOOLEAN;
120
121
122 FUNCTION Val_Num_1(l_value IN VARCHAR2)
123 RETURN BOOLEAN;
124
125 FUNCTION Val_Num_12(l_value IN VARCHAR2)
126 RETURN BOOLEAN;
127
128
129 FUNCTION Val_Num_2(l_value IN VARCHAR2)
130 RETURN BOOLEAN;
131
132
133 FUNCTION Val_Num_3( l_value IN VARCHAR2)
134 RETURN BOOLEAN;
135
136
137 FUNCTION Val_Num_4( l_value IN VARCHAR2)
138 RETURN BOOLEAN;
139
140
141
142 FUNCTION Val_Num_5( l_value IN VARCHAR2)
143 RETURN BOOLEAN;
144
145
146 FUNCTION Val_Num_7( l_value IN VARCHAR2)
147 RETURN BOOLEAN;
148
149
150 FUNCTION Val_Num_9( l_value IN VARCHAR2)
151 RETURN BOOLEAN;
152
153 FUNCTION Val_School_Cd( l_value IN VARCHAR2,
154 l_length IN NUMBER
155 ) RETURN BOOLEAN;
156
157
158 FUNCTION Val_Signed_By( l_value IN VARCHAR2)
159 RETURN BOOLEAN;
160
161
162 FUNCTION Val_SSN(l_value IN VARCHAR2)
163 RETURN BOOLEAN;
164 PROCEDURE is_number (
165 p_number IN VARCHAR2 ,
166 ret_num OUT NOCOPY NUMBER
167 ) ;
168
169
170
171
172
173
174 END IGF_AP_LI_ISIR_IMP_PROC;