[Home] [Help]
PACKAGE BODY: APPS.PAY_DATETRACKED_EVENTS_API
Source
1 Package Body pay_datetracked_events_api as
2 /* $Header: pydteapi.pkb 115.6 2002/12/06 14:45:55 jford noship $ */
3 -- ----------------------------------------------------------------------------
4 -- |--------------------------<create_datetracked_event >-------------------------|
5 -- ----------------------------------------------------------------------------
6 -- {Start Of Comments}
7 --
8 -- Description:
9 -- This API creates enforcing the required business rules.
10 --
11 g_package varchar2(33) := ' pay_datetracked_events_api.';
12 --
13 procedure create_datetracked_event
14 (
15 p_validate in boolean default false
16 ,p_effective_date in date
17 ,p_event_group_id in number
18 ,p_dated_table_id in number
19 ,p_update_type in varchar2
20 ,p_column_name in varchar2
21 ,p_business_group_id in number
22 ,p_legislation_code in varchar2
23 ,p_proration_style in varchar2 default null
24 ,p_datetracked_event_id out nocopy number
25 ,p_object_version_number out nocopy number
26 ) IS
27 --
28 -- Declare cursors and local variables
29 --
30 l_proc varchar2(72) := g_package||'create_datetracked_event';
31 l_datetracked_event_id number;
32 l_object_version_number number;
33 --
34 begin
35 hr_utility.set_location('Entering:'|| l_proc, 10);
36 --
37 If p_validate then
38 savepoint create_datetracked_event;
39 End If;
40 --
41 hr_utility.set_location(l_proc, 20);
42 --
43 -- Start of API User Hook for the before hook of create_dateteacked_event.
44 --
45 begin
46 pay_datetracked_events_bk1.create_datetracked_event_b
47 (
48 p_effective_date => p_effective_date
49 ,p_event_group_id => p_event_group_id
50 ,p_dated_table_id => p_dated_table_id
51 ,p_update_type => p_update_type
52 ,p_column_name => p_column_name
53 ,p_business_group_id => p_business_group_id
54 ,p_legislation_code => p_legislation_code
55 ,p_proration_style => p_proration_style
56 );
57 exception
58 when hr_api.cannot_find_prog_unit then
59 hr_api.cannot_find_prog_unit_error
60 (p_module_name => 'CREATE_DATETRACKED_EVENT',
61 p_hook_type => 'BP'
62 );
63 end;
64 --
65 -- Process Logic
66 --
67 pay_dte_ins.ins
68 (p_effective_date => p_effective_date
69 ,p_event_group_id => p_event_group_id
70 ,p_dated_table_id => p_dated_table_id
71 ,p_update_type => p_update_type
72 ,p_column_name => p_column_name
73 ,p_business_group_id => p_business_group_id
74 ,p_legislation_code => p_legislation_code
75 ,p_datetracked_event_id => l_datetracked_event_id
76 ,p_object_version_number => l_object_version_number
77 ,p_proration_style => p_proration_style
78 );
79 --
80 -- Start of API User Hook for the after hook of create_datetracked_events
81 --
82 begin
83 pay_datetracked_events_bk1. create_datetracked_event_a
84 (p_effective_date => p_effective_date
85 ,p_event_group_id => p_event_group_id
86 ,p_dated_table_id => p_dated_table_id
87 ,p_update_type => p_update_type
88 ,p_column_name => p_column_name
89 ,p_business_group_id => p_business_group_id
90 ,p_legislation_code => p_legislation_code
91 ,p_datetracked_event_id => l_datetracked_event_id
92 ,p_object_version_number => l_object_version_number
93 ,p_proration_style => p_proration_style
94 );
95 exception
96 when hr_api.cannot_find_prog_unit then
97 hr_api.cannot_find_prog_unit_error
98 (p_module_name => 'CREATE_DATETRACKED_EVENT',
99 p_hook_type => 'AP'
100 );
101 end;
102 --
103 If p_validate then
104 Raise HR_Api.Validate_Enabled;
105 End If;
106 --
107 p_object_version_number := l_object_version_number;
108 p_datetracked_event_id := l_datetracked_event_id;
109 --
110 exception
111 --
112 when HR_Api.Validate_Enabled then
113 --
114 -- A validation or unexpected error has occured
115 --
116 ROLLBACK TO create_datetracked_event;
117 --
118 end create_datetracked_event;
119 --
120 -- ----------------------------------------------------------------------------
121 -- |--------------------------<update_datetracked_event >----------------------|
122 -- ----------------------------------------------------------------------------
123 -- {Start Of Comments}
124 --
125 -- Description:
126 -- This API updates an existing datetracked event.
127 --
128 procedure update_datetracked_event
129 (p_validate in boolean default false
130 ,p_effective_date in date
131 ,p_datetracked_event_id in number
132 ,p_object_version_number in out nocopy number
133 ,p_event_group_id in number default hr_api.g_number
134 ,p_dated_table_id in number default hr_api.g_number
135 ,p_update_type in varchar2 default hr_api.g_varchar2
136 ,p_column_name in varchar2 default hr_api.g_varchar2
137 ,p_business_group_id in number default hr_api.g_number
138 ,p_legislation_code in varchar2 default hr_api.g_varchar2
139 ,p_proration_style in varchar2 default hr_api.g_varchar2
140 ) IS
141 --
142 -- Declare cursors and local variables
143 --
144 l_proc varchar2(72) := g_package ||'update_datetracked_event';
145 l_object_version_number number;
146 --
147 begin
148 --
149 hr_utility.set_location('Entering:'|| l_proc, 10);
150 --
151 If p_validate then
152 savepoint update_datetracked_event;
153 End If;
154 --
155 l_object_version_number := p_object_version_number;
156 --
157 -- Start of API User Hook for the before hook of update_DATETRACKED_EVENT.
158 --
159 begin
160 pay_datetracked_events_bk2.update_datetracked_event_b
161 (p_effective_date => p_effective_date
162 ,p_datetracked_event_id => p_datetracked_event_id
163 ,p_object_version_number => l_object_version_number
164 ,p_event_group_id => p_event_group_id
165 ,p_dated_table_id => p_dated_table_id
166 ,p_update_type => p_update_type
167 ,p_column_name => p_column_name
168 ,p_business_group_id => p_business_group_id
169 ,p_legislation_code => p_legislation_code
170 ,p_proration_style => p_proration_style
171 );
172 exception
173 when hr_api.cannot_find_prog_unit then
174 hr_api.cannot_find_prog_unit_error
175 (p_module_name => 'UPDATE_DATETRACKED_EVENT',
176 p_hook_type => 'BP'
177 );
178 end;
179 --
180 pay_dte_upd.upd
181 (p_effective_date => p_effective_date
182 ,p_datetracked_event_id => p_datetracked_event_id
183 ,p_object_version_number => l_object_version_number
184 ,p_event_group_id => p_event_group_id
185 ,p_dated_table_id => p_dated_table_id
186 ,p_update_type => p_update_type
187 ,p_column_name => p_column_name
188 ,p_business_group_id => p_business_group_id
189 ,p_legislation_code => p_legislation_code
190 ,p_proration_style => p_proration_style
191 );
192 hr_utility.set_location('Entering:'|| l_proc, 20);
193 --
194 --
195 -- Start of API User Hook for the after hook of update_DATETRACKED_EVENT.
196 --
197 begin
198 pay_datetracked_events_bk2.update_datetracked_event_a
199 (p_effective_date => p_effective_date
200 ,p_datetracked_event_id => p_datetracked_event_id
201 ,p_object_version_number => l_object_version_number
202 ,p_event_group_id => p_event_group_id
203 ,p_dated_table_id => p_dated_table_id
204 ,p_update_type => p_update_type
205 ,p_column_name => p_column_name
206 ,p_business_group_id => p_business_group_id
207 ,p_legislation_code => p_legislation_code
208 ,p_proration_style => p_proration_style
209 );
210
211 exception
212 when hr_api.cannot_find_prog_unit then
213 hr_api.cannot_find_prog_unit_error
214 (p_module_name => 'UPDATE_DATETRACKED_EVENT',
215 p_hook_type => 'AP'
216 );
217 end;
218 --
219 -- End of API User Hook for the after hook of update_DATETRACKED_EVENT.
220 --
221 If p_validate then
222 Raise HR_Api.Validate_Enabled;
223 End If;
224 --
225 p_object_version_number := l_object_version_number;
226 --
227 exception
228 --
229 when HR_Api.Validate_Enabled then
230 --
231 -- A validation or unexpected error has occured
232 --
233 ROLLBACK TO update_datetracked_event;
234 --
235 end update_datetracked_event;
236 --
237 -- ----------------------------------------------------------------------------
238 -- |--------------------------< delete_datetracked_event ---------------------|
239 -- ----------------------------------------------------------------------------
240 -- {Start Of Comments}
241 --
242 -- Description:
243 -- This API deletes an existing datetracked event.
244 --
245 procedure delete_datetracked_event
246 (p_validate in boolean default false
247 ,p_datetracked_event_id in number
248 ,p_object_version_number in number
249 ) IS
250 --
251 -- Declare cursors and local variables
252 --
253 l_proc varchar2(72) := g_package||'delete_datetracked_event';
254 l_object_version_number number;
255 --
256 begin
257 hr_utility.set_location('Entering:'|| l_proc, 10);
258 --
259 If p_validate then
260 savepoint delete_datetracked_event;
261 End If;
262 --
263 l_object_version_number:= p_object_version_number;
264 --
265 --
266 -- Start of API User Hook for the before hook of delete_DATETRACKED_EVENT.
267 --
268 begin
269 pay_datetracked_events_bk3.delete_datetracked_event_b
270 ( p_datetracked_event_id => p_datetracked_event_id
271 ,p_object_version_number => l_object_version_number
272 );
273 exception
274 when hr_api.cannot_find_prog_unit then
275 hr_api.cannot_find_prog_unit_error
276 (p_module_name => 'DELETE_DATETRACKED_EVENT',
277 p_hook_type => 'BP'
278 );
279 end;
280 --
281 pay_dte_del.del
282 ( p_datetracked_event_id => p_datetracked_event_id
283 ,p_object_version_number => l_object_version_number
284 );
285 hr_utility.set_location(' Leaving:'||l_proc, 70);
286 --
287 --
288 -- Start of API User Hook for the after hook of DELETE_DATETRACKED_EVENT.
289 --
290 begin
291 pay_datetracked_events_bk3.delete_datetracked_event_a
292 ( p_datetracked_event_id => p_datetracked_event_id
293 ,p_object_version_number => l_object_version_number
294 );
295 exception
296 when hr_api.cannot_find_prog_unit then
297 hr_api.cannot_find_prog_unit_error
298 (p_module_name => 'DELETE_DATETRACKED_EVENT',
299 p_hook_type => 'AP'
300 );
301 end;
302 If p_validate then
303 Raise HR_Api.Validate_Enabled;
304 End If;
305 --
306 exception
307 when HR_Api.Validate_Enabled then
308 --
309 -- A validation or unexpected error has occured
310 --
311 ROLLBACK TO delete_datetracked_event;
312 --
313 end delete_datetracked_event;
314
315 --
316 end pay_datetracked_events_api;