[Home] [Help]
PACKAGE BODY: APPS.PQH_PSB_INTERFACE_API
Source
1 PACKAGE BODY PQH_PSB_INTERFACE_API AS
2 /* $Header: pqhpqps.pkb 115.6 2002/12/06 18:06:37 rpasapul noship $ */
3
4 -- ----------------------------------------------------------------------------
5 -- |------------------------< create_budget_version >------------------------|
6 -- ----------------------------------------------------------------------------
7 procedure create_budget_version
8 (
9 p_validate in boolean default false
10 ,p_budget_version_id out nocopy number
11 ,p_budget_id in number default null
12 ,p_version_number in number default null
13 ,p_date_from in date default null
14 ,p_date_to in date default null
15 ,p_transfered_to_gl_flag in varchar2 default null
16 ,p_gl_status in varchar2 default null
17 ,p_xfer_to_other_apps_cd in varchar2 default null
18 ,p_object_version_number out nocopy number
19 ,p_budget_unit1_value in number default null
20 ,p_budget_unit2_value in number default null
21 ,p_budget_unit3_value in number default null
22 ,p_budget_unit1_available in number default null
23 ,p_budget_unit2_available in number default null
24 ,p_budget_unit3_available in number default null
25 ,p_effective_date in date
26 ) is
27 begin
28 pqh_budget_versions_api.create_budget_version
29 (p_validate => p_validate,
30 p_budget_version_id => p_budget_version_id,
31 p_budget_id => p_budget_id,
32 p_version_number => p_version_number,
33 p_date_from => p_date_from,
34 p_date_to => p_date_to,
35 p_transfered_to_gl_flag => p_transfered_to_gl_flag,
36 p_gl_status => p_gl_status,
37 p_xfer_to_other_apps_cd => p_xfer_to_other_apps_cd,
38 p_object_version_number => p_object_version_number,
39 p_budget_unit1_value => p_budget_unit1_value,
40 p_budget_unit2_value => p_budget_unit2_value,
41 p_budget_unit3_value => p_budget_unit3_value,
42 p_budget_unit1_available => p_budget_unit1_available,
43 p_budget_unit2_available => p_budget_unit2_available,
44 p_budget_unit3_available => p_budget_unit3_available,
45 p_effective_date => p_effective_date
46 );
47 exception when others then
48 p_budget_version_id := null;
49 p_object_version_number := null;
50 raise;
51 end create_budget_version;
52 -- ----------------------------------------------------------------------------
53 -- |------------------------< update_budget_version >------------------------|
54 -- ----------------------------------------------------------------------------
55 procedure update_budget_version
56 (
57 p_validate in boolean default false
58 ,p_budget_version_id in number
59 ,p_budget_id in number default hr_api.g_number
60 ,p_version_number in number default hr_api.g_number
61 ,p_date_from in date default hr_api.g_date
62 ,p_date_to in date default hr_api.g_date
63 ,p_transfered_to_gl_flag in varchar2 default hr_api.g_varchar2
64 ,p_gl_status in varchar2 default hr_api.g_varchar2
65 ,p_xfer_to_other_apps_cd in varchar2 default hr_api.g_varchar2
66 ,p_object_version_number in out nocopy number
67 ,p_budget_unit1_value in number default hr_api.g_number
68 ,p_budget_unit2_value in number default hr_api.g_number
69 ,p_budget_unit3_value in number default hr_api.g_number
70 ,p_budget_unit1_available in number default hr_api.g_number
71 ,p_budget_unit2_available in number default hr_api.g_number
72 ,p_budget_unit3_available in number default hr_api.g_number
73 ,p_effective_date in date
74 ) is
75 l_object_version_number number := p_object_version_number;
76 begin
77 pqh_budget_versions_api.update_budget_version
78 (p_validate => p_validate,
79 p_budget_version_id => p_budget_version_id,
80 p_budget_id => p_budget_id,
81 p_version_number => p_version_number,
82 p_date_from => p_date_from,
83 p_date_to => p_date_to,
84 p_transfered_to_gl_flag => p_transfered_to_gl_flag,
85 p_gl_status => p_gl_status,
86 p_xfer_to_other_apps_cd => p_xfer_to_other_apps_cd,
87 p_object_version_number => p_object_version_number,
88 p_budget_unit1_value => p_budget_unit1_value,
89 p_budget_unit2_value => p_budget_unit2_value,
90 p_budget_unit3_value => p_budget_unit3_value,
91 p_budget_unit1_available => p_budget_unit1_available,
92 p_budget_unit2_available => p_budget_unit2_available,
93 p_budget_unit3_available => p_budget_unit3_available,
94 p_effective_date => p_effective_date
95 );
96 exception when others then
97 p_object_version_number := l_object_version_number;
98 raise;
99 end update_budget_version;
100 -- ----------------------------------------------------------------------------
101 -- |------------------------< create_budget_element >------------------------|
102 -- ----------------------------------------------------------------------------
103 procedure create_budget_element
104 (
105 p_validate in boolean default false
106 ,p_budget_element_id out nocopy number
107 ,p_budget_set_id in number default null
108 ,p_element_type_id in number default null
109 ,p_distribution_percentage in number default null
110 ,p_object_version_number out nocopy number
111 ) is
112 begin
113 pqh_budget_elements_api.create_budget_element
114 (p_validate => p_validate,
115 p_budget_element_id => p_budget_element_id,
116 p_budget_set_id => p_budget_set_id,
117 p_element_type_id => p_element_type_id,
118 p_distribution_percentage => p_distribution_percentage,
119 p_object_version_number => p_object_version_number
120 );
121 exception when others then
122 p_budget_element_id := null;
123 p_object_version_number := null;
124 raise;
125 end create_budget_element;
126 -- ----------------------------------------------------------------------------
127 -- |------------------------< update_budget_element >------------------------|
128 -- ----------------------------------------------------------------------------
129 procedure update_budget_element
130 (
131 p_validate in boolean default false
132 ,p_budget_element_id in number
133 ,p_budget_set_id in number default hr_api.g_number
134 ,p_element_type_id in number default hr_api.g_number
135 ,p_distribution_percentage in number default hr_api.g_number
136 ,p_object_version_number in out nocopy number
137 ) is
138 l_object_version_number number := p_object_version_number;
139 begin
140 pqh_budget_elements_api.update_budget_element
141 (p_validate => p_validate,
142 p_budget_element_id => p_budget_element_id,
143 p_budget_set_id => p_budget_set_id,
144 p_element_type_id => p_element_type_id,
145 p_distribution_percentage => p_distribution_percentage,
146 p_object_version_number => p_object_version_number
147 );
148 exception when others then
149 p_object_version_number := l_object_version_number;
150 raise;
151 end update_budget_element;
152 -- ----------------------------------------------------------------------------
153 -- |------------------------< create_budget_fund_src >------------------------|
154 -- ----------------------------------------------------------------------------
155 procedure create_budget_fund_src
156 (
157 p_validate in boolean default false
158 ,p_budget_fund_src_id out nocopy number
159 ,p_budget_element_id in number default null
160 ,p_cost_allocation_keyflex_id in number default null
161 ,p_project_id in number default null
162 ,p_award_id in number default null
163 ,p_task_id in number default null
164 ,p_expenditure_type in varchar2 default null
165 ,p_organization_id in number default null
166 ,p_distribution_percentage in number default null
167 ,p_object_version_number out nocopy number
168 ) is
169 begin
170 pqh_budget_fund_srcs_api.create_budget_fund_src
171 (p_validate => p_validate,
172 p_budget_fund_src_id => p_budget_fund_src_id ,
173 p_budget_element_id => p_budget_element_id,
174 p_cost_allocation_keyflex_id => p_cost_allocation_keyflex_id,
175 p_project_id => p_project_id,
176 p_award_id => p_award_id,
177 p_task_id => p_task_id,
178 p_expenditure_type => p_expenditure_type,
179 p_organization_id => p_organization_id,
180 p_distribution_percentage => p_distribution_percentage,
181 p_object_version_number => p_object_version_number
182 );
183 exception when others then
184 p_budget_fund_src_id := null;
185 p_object_version_number := null;
186 raise;
187 end create_budget_fund_src;
188 -- ----------------------------------------------------------------------------
189 -- |------------------------< update_budget_fund_src >------------------------|
190 -- ----------------------------------------------------------------------------
191 procedure update_budget_fund_src
192 (
193 p_validate in boolean default false
194 ,p_budget_fund_src_id in number
195 ,p_budget_element_id in number default hr_api.g_number
196 ,p_cost_allocation_keyflex_id in number default hr_api.g_number
197 ,p_project_id in number default hr_api.g_number
198 ,p_award_id in number default hr_api.g_number
199 ,p_task_id in number default hr_api.g_number
200 ,p_expenditure_type in varchar2 default hr_api.g_varchar2
201 ,p_organization_id in number default hr_api.g_number
202 ,p_distribution_percentage in number default hr_api.g_number
203 ,p_object_version_number in out nocopy number
204 ) is
205 l_object_version_number number := p_object_version_number;
206 begin
207 pqh_budget_fund_srcs_api.update_budget_fund_src
208 (p_validate => p_validate,
209 p_budget_fund_src_id => p_budget_fund_src_id ,
210 p_budget_element_id => p_budget_element_id,
211 p_cost_allocation_keyflex_id => p_cost_allocation_keyflex_id,
212 p_project_id => p_project_id,
213 p_award_id => p_award_id,
214 p_task_id => p_task_id,
215 p_expenditure_type => p_expenditure_type,
216 p_organization_id => p_organization_id,
217 p_distribution_percentage => p_distribution_percentage,
218 p_object_version_number => p_object_version_number
219 );
220 exception when others then
221 p_object_version_number := l_object_version_number;
222 raise;
223 end update_budget_fund_src;
224 -- ----------------------------------------------------------------------------
225 -- |------------------------< create_budget_period >------------------------|
226 -- ----------------------------------------------------------------------------
227 procedure create_budget_period
228 (
229 p_validate in boolean default false
230 ,p_budget_period_id out nocopy number
231 ,p_budget_detail_id in number default null
232 ,p_start_time_period_id in number default null
233 ,p_end_time_period_id in number default null
234 ,p_budget_unit1_percent in number default null
235 ,p_budget_unit2_percent in number default null
236 ,p_budget_unit3_percent in number default null
237 ,p_budget_unit1_value in number default null
238 ,p_budget_unit2_value in number default null
239 ,p_budget_unit3_value in number default null
240 ,p_budget_unit1_value_type_cd in varchar2 default null
241 ,p_budget_unit2_value_type_cd in varchar2 default null
242 ,p_budget_unit3_value_type_cd in varchar2 default null
243 ,p_budget_unit1_available in number default null
244 ,p_budget_unit2_available in number default null
245 ,p_budget_unit3_available in number default null
246 ,p_object_version_number out nocopy number
247 ) is
248 begin
249 pqh_budget_periods_api.create_budget_period
250 (p_validate => p_validate,
251 p_budget_period_id => p_budget_period_id,
252 p_budget_detail_id => p_budget_detail_id,
253 p_start_time_period_id => p_start_time_period_id,
254 p_end_time_period_id => p_end_time_period_id,
255 p_budget_unit1_percent => p_budget_unit1_percent,
256 p_budget_unit2_percent => p_budget_unit2_percent,
257 p_budget_unit3_percent => p_budget_unit3_percent,
258 p_budget_unit1_value => p_budget_unit1_value,
259 p_budget_unit2_value => p_budget_unit2_value,
260 p_budget_unit3_value => p_budget_unit3_value,
261 p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd,
262 p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd,
263 p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd,
264 p_budget_unit1_available => p_budget_unit1_available,
265 p_budget_unit2_available => p_budget_unit2_available,
266 p_budget_unit3_available => p_budget_unit3_available,
267 p_object_version_number => p_object_version_number
268 );
269 exception when others then
270 p_budget_period_id := null;
271 p_object_version_number := null;
272 raise;
273 end create_budget_period;
274 -- ----------------------------------------------------------------------------
275 -- |------------------------< update_budget_period >------------------------|
276 -- ----------------------------------------------------------------------------
277 procedure update_budget_period
278 (
279 p_validate in boolean default false
280 ,p_budget_period_id in number
281 ,p_budget_detail_id in number default hr_api.g_number
282 ,p_start_time_period_id in number default hr_api.g_number
283 ,p_end_time_period_id in number default hr_api.g_number
284 ,p_budget_unit1_percent in number default hr_api.g_number
285 ,p_budget_unit2_percent in number default hr_api.g_number
286 ,p_budget_unit3_percent in number default hr_api.g_number
287 ,p_budget_unit1_value in number default hr_api.g_number
288 ,p_budget_unit2_value in number default hr_api.g_number
289 ,p_budget_unit3_value in number default hr_api.g_number
290 ,p_budget_unit1_value_type_cd in varchar2 default hr_api.g_varchar2
291 ,p_budget_unit2_value_type_cd in varchar2 default hr_api.g_varchar2
292 ,p_budget_unit3_value_type_cd in varchar2 default hr_api.g_varchar2
293 ,p_budget_unit1_available in number default hr_api.g_number
294 ,p_budget_unit2_available in number default hr_api.g_number
295 ,p_budget_unit3_available in number default hr_api.g_number
296 ,p_object_version_number in out nocopy number
297 ) is
298 l_object_version_number number := p_object_version_number;
299 begin
300 pqh_budget_periods_api.update_budget_period
301 (p_validate => p_validate,
302 p_budget_period_id => p_budget_period_id,
303 p_budget_detail_id => p_budget_detail_id,
304 p_start_time_period_id => p_start_time_period_id,
305 p_end_time_period_id => p_end_time_period_id,
306 p_budget_unit1_percent => p_budget_unit1_percent,
307 p_budget_unit2_percent => p_budget_unit2_percent,
308 p_budget_unit3_percent => p_budget_unit3_percent,
309 p_budget_unit1_value => p_budget_unit1_value,
310 p_budget_unit2_value => p_budget_unit2_value,
311 p_budget_unit3_value => p_budget_unit3_value,
312 p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd,
313 p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd,
314 p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd,
315 p_budget_unit1_available => p_budget_unit1_available,
316 p_budget_unit2_available => p_budget_unit2_available,
317 p_budget_unit3_available => p_budget_unit3_available,
318 p_object_version_number => p_object_version_number
319 );
320 exception when others then
321 p_object_version_number := l_object_version_number;
322 raise;
323 end update_budget_period;
324 -- ----------------------------------------------------------------------------
325 -- |------------------------< create_budget_set >------------------------|
326 -- ----------------------------------------------------------------------------
327 procedure create_budget_set
328 (
329 p_validate in boolean default false
330 ,p_budget_set_id out nocopy number
331 ,p_dflt_budget_set_id in number default null
332 ,p_budget_period_id in number default null
333 ,p_budget_unit1_percent in number default null
334 ,p_budget_unit2_percent in number default null
335 ,p_budget_unit3_percent in number default null
336 ,p_budget_unit1_value in number default null
337 ,p_budget_unit2_value in number default null
338 ,p_budget_unit3_value in number default null
339 ,p_budget_unit1_available in number default null
340 ,p_budget_unit2_available in number default null
341 ,p_budget_unit3_available in number default null
342 ,p_object_version_number out nocopy number
343 ,p_budget_unit1_value_type_cd in varchar2 default null
344 ,p_budget_unit2_value_type_cd in varchar2 default null
345 ,p_budget_unit3_value_type_cd in varchar2 default null
346 ,p_effective_date in date
347 ) is
348 begin
349 pqh_budget_sets_api.create_budget_set
350 (p_validate => p_validate,
351 p_budget_set_id => p_budget_set_id,
352 p_dflt_budget_set_id => p_dflt_budget_set_id,
353 p_budget_period_id => p_budget_period_id,
354 p_budget_unit1_percent => p_budget_unit1_percent,
355 p_budget_unit2_percent => p_budget_unit2_percent,
356 p_budget_unit3_percent => p_budget_unit3_percent,
357 p_budget_unit1_value => p_budget_unit1_value,
358 p_budget_unit2_value => p_budget_unit2_value,
359 p_budget_unit3_value => p_budget_unit3_value,
360 p_budget_unit1_available => p_budget_unit1_available,
361 p_budget_unit2_available => p_budget_unit2_available,
362 p_budget_unit3_available => p_budget_unit3_available,
363 p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd,
364 p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd,
365 p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd,
366 p_object_version_number => p_object_version_number,
367 p_effective_date => p_effective_date
368 );
369 exception when others then
370 p_budget_set_id := null;
371 p_object_version_number := null;
372 raise;
373 end create_budget_set;
374 -- ----------------------------------------------------------------------------
375 -- |------------------------< update_budget_set >------------------------|
376 -- ----------------------------------------------------------------------------
377 procedure update_budget_set
378 (
379 p_validate in boolean default false
380 ,p_budget_set_id in number
381 ,p_dflt_budget_set_id in number default hr_api.g_number
382 ,p_budget_period_id in number default hr_api.g_number
383 ,p_budget_unit1_percent in number default hr_api.g_number
384 ,p_budget_unit2_percent in number default hr_api.g_number
385 ,p_budget_unit3_percent in number default hr_api.g_number
386 ,p_budget_unit1_value in number default hr_api.g_number
387 ,p_budget_unit2_value in number default hr_api.g_number
388 ,p_budget_unit3_value in number default hr_api.g_number
389 ,p_budget_unit1_available in number default hr_api.g_number
390 ,p_budget_unit2_available in number default hr_api.g_number
391 ,p_budget_unit3_available in number default hr_api.g_number
392 ,p_object_version_number in out nocopy number
393 ,p_budget_unit1_value_type_cd in varchar2 default hr_api.g_varchar2
394 ,p_budget_unit2_value_type_cd in varchar2 default hr_api.g_varchar2
395 ,p_budget_unit3_value_type_cd in varchar2 default hr_api.g_varchar2
396 ,p_effective_date in date
397 ) is
398 l_object_version_number number := p_object_version_number;
399 begin
400 pqh_budget_sets_api.update_budget_set
401 (p_validate => p_validate,
402 p_budget_set_id => p_budget_set_id,
403 p_dflt_budget_set_id => p_dflt_budget_set_id,
404 p_budget_period_id => p_budget_period_id,
405 p_budget_unit1_percent => p_budget_unit1_percent,
406 p_budget_unit2_percent => p_budget_unit2_percent,
407 p_budget_unit3_percent => p_budget_unit3_percent,
408 p_budget_unit1_value => p_budget_unit1_value,
409 p_budget_unit2_value => p_budget_unit2_value,
410 p_budget_unit3_value => p_budget_unit3_value,
411 p_budget_unit1_available => p_budget_unit1_available,
412 p_budget_unit2_available => p_budget_unit2_available,
413 p_budget_unit3_available => p_budget_unit3_available,
414 p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd,
415 p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd,
416 p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd,
417 p_object_version_number => p_object_version_number,
418 p_effective_date => p_effective_date
419 );
420 exception when others then
421 p_object_version_number := l_object_version_number;
422 raise;
423 end update_budget_set;
424 -- ----------------------------------------------------------------------------
425 -- |------------------------< create_budget_detail >------------------------|
426 -- ----------------------------------------------------------------------------
427 procedure create_budget_detail
428 (
429 p_validate in boolean default false
430 ,p_budget_detail_id out nocopy number
431 ,p_organization_id in number default null
432 ,p_job_id in number default null
433 ,p_position_id in number default null
434 ,p_grade_id in number default null
435 ,p_budget_version_id in number default null
436 ,p_budget_unit1_percent in number default null
437 ,p_budget_unit1_value_type_cd in varchar2 default null
438 ,p_budget_unit1_value in number default null
439 ,p_budget_unit1_available in number default null
440 ,p_budget_unit2_percent in number default null
441 ,p_budget_unit2_value_type_cd in varchar2 default null
442 ,p_budget_unit2_value in number default null
443 ,p_budget_unit2_available in number default null
444 ,p_budget_unit3_percent in number default null
445 ,p_budget_unit3_value_type_cd in varchar2 default null
446 ,p_budget_unit3_value in number default null
447 ,p_budget_unit3_available in number default null
448 ,p_gl_status in varchar2 default null
449 ,p_object_version_number out nocopy number
450 ) is
451 begin
452 pqh_budget_details_api.create_budget_detail
453 (p_validate => p_validate,
454 p_budget_detail_id => p_budget_detail_id,
455 p_organization_id => p_organization_id,
456 p_job_id => p_job_id,
457 p_position_id => p_position_id,
458 p_grade_id => p_grade_id,
459 p_budget_version_id => p_budget_version_id,
460 p_budget_unit1_percent => p_budget_unit1_percent,
461 p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd,
462 p_budget_unit1_value => p_budget_unit1_value,
463 p_budget_unit1_available => p_budget_unit1_available,
464 p_budget_unit2_percent => p_budget_unit2_percent,
465 p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd,
466 p_budget_unit2_value => p_budget_unit2_value,
467 p_budget_unit2_available => p_budget_unit2_available,
468 p_budget_unit3_percent => p_budget_unit3_percent,
469 p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd,
470 p_budget_unit3_value => p_budget_unit3_value,
471 p_budget_unit3_available => p_budget_unit3_available,
472 p_gl_status => p_gl_status,
473 p_object_version_number => p_object_version_number
474 );
475 exception when others then
476 p_budget_detail_id := null;
477 p_object_version_number := null;
478 raise;
479 end create_budget_detail;
480 -- ----------------------------------------------------------------------------
481 -- |------------------------< update_budget_detail >------------------------|
482 -- ----------------------------------------------------------------------------
483 procedure update_budget_detail
484 (
485 p_validate in boolean default false
486 ,p_budget_detail_id in number
487 ,p_organization_id in number default hr_api.g_number
488 ,p_job_id in number default hr_api.g_number
489 ,p_position_id in number default hr_api.g_number
490 ,p_grade_id in number default hr_api.g_number
491 ,p_budget_version_id in number default hr_api.g_number
492 ,p_budget_unit1_percent in number default hr_api.g_number
493 ,p_budget_unit1_value_type_cd in varchar2 default hr_api.g_varchar2
494 ,p_budget_unit1_value in number default hr_api.g_number
495 ,p_budget_unit1_available in number default hr_api.g_number
496 ,p_budget_unit2_percent in number default hr_api.g_number
497 ,p_budget_unit2_value_type_cd in varchar2 default hr_api.g_varchar2
498 ,p_budget_unit2_value in number default hr_api.g_number
499 ,p_budget_unit2_available in number default hr_api.g_number
500 ,p_budget_unit3_percent in number default hr_api.g_number
501 ,p_budget_unit3_value_type_cd in varchar2 default hr_api.g_varchar2
502 ,p_budget_unit3_value in number default hr_api.g_number
503 ,p_budget_unit3_available in number default hr_api.g_number
504 ,p_gl_status in varchar2 default hr_api.g_varchar2
505 ,p_object_version_number in out nocopy number
506 ) is
507 l_object_version_number number := p_object_version_number;
508 begin
509 pqh_budget_details_api.update_budget_detail
510 (p_validate => p_validate,
511 p_budget_detail_id => p_budget_detail_id,
512 p_organization_id => p_organization_id,
513 p_job_id => p_job_id,
514 p_position_id => p_position_id,
515 p_grade_id => p_grade_id,
516 p_budget_version_id => p_budget_version_id,
517 p_budget_unit1_percent => p_budget_unit1_percent,
518 p_budget_unit1_value_type_cd => p_budget_unit1_value_type_cd,
519 p_budget_unit1_value => p_budget_unit1_value,
520 p_budget_unit1_available => p_budget_unit1_available,
521 p_budget_unit2_percent => p_budget_unit2_percent,
522 p_budget_unit2_value_type_cd => p_budget_unit2_value_type_cd,
523 p_budget_unit2_value => p_budget_unit2_value,
524 p_budget_unit2_available => p_budget_unit2_available,
525 p_budget_unit3_percent => p_budget_unit3_percent,
526 p_budget_unit3_value_type_cd => p_budget_unit3_value_type_cd,
527 p_budget_unit3_value => p_budget_unit3_value,
528 p_budget_unit3_available => p_budget_unit3_available,
529 p_gl_status => p_gl_status,
530 p_object_version_number => p_object_version_number
531 );
532 exception when others then
533 p_object_version_number := l_object_version_number;
534 raise;
535 end update_budget_detail;
536 -- ---------------------------------------------------------------------------
537 -- |-----------------< POSITION_CONTROL_ENABLED >---------------------|
538 -- ---------------------------------------------------------------------------
539 function position_control_enabled(p_organization_id number default null,
540 p_effective_date in date default sysdate,
541 p_assignment_id number default null
542 )RETURN VARCHAR2 is
543 l_pc_enabled VARCHAR2(1);
544 begin
545 l_pc_enabled := pqh_psf_bus.position_control_enabled
546 (p_organization_id => p_organization_id,
547 p_effective_date => p_effective_date,
548 p_assignment_id => p_assignment_id
549 );
550 return l_pc_enabled;
551 end position_control_enabled;
552 -- ---------------------------------------------------------------------------
553 -- |---------------------< create_app_api_hook_call >-------------------------|
554 -- ---------------------------------------------------------------------------
555 procedure create_app_api_hook_call
556 (p_validate in boolean default false,
557 p_effective_date in date,
558 p_api_hook_id in number,
559 p_api_hook_call_type in varchar2,
560 p_sequence in number,
561 p_application_id in number,
562 p_app_install_status in varchar2,
563 p_enabled_flag in varchar2 default 'N',
564 p_call_package in varchar2 default null,
565 p_call_procedure in varchar2 default null,
566 p_api_hook_call_id out nocopy number,
567 p_object_version_number out nocopy number
568 ) is
569 begin
570 hr_app_api_hook_call_internal.create_app_api_hook_call
571 (p_validate => p_validate,
572 p_effective_date => p_effective_date,
573 p_api_hook_id => p_api_hook_id,
574 p_api_hook_call_type => p_api_hook_call_type,
575 p_sequence => p_sequence,
576 p_application_id => p_application_id,
577 p_app_install_status => p_app_install_status,
578 p_enabled_flag => p_enabled_flag,
579 p_call_package => p_call_package,
580 p_call_procedure => p_call_procedure,
581 p_api_hook_call_id => p_api_hook_call_id,
582 p_object_version_number => p_object_version_number
583 );
584 exception when others then
585 p_api_hook_call_id := null;
586 p_object_version_number := null;
587 raise;
588 end create_app_api_hook_call;
589 END PQH_PSB_INTERFACE_API;