[Home] [Help]
PACKAGE BODY: APPS.PA_EVENT_UTILS
Source
1 PACKAGE BODY PA_EVENT_UTILS AS
2 /* $Header: PAEVAPUB.pls 120.3 2007/02/07 10:44:47 rgandhi ship $ */
3
4 -- ============================================================================
5 --
6 --Name: CHECK_VALID_PROJECT
7 --Type: function
8 --Description: This function validates the project_number and returns the project_id.
9 --
10 --Called subprograms: PA_EVENT_CORE.CHECK_VALID_PROJECT
11 --
12 -- ============================================================================
13 FUNCTION CHECK_VALID_PROJECT
14 (P_project_num IN VARCHAR2
15 ,P_project_id OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
16 RETURN VARCHAR2
17 IS
18 BEGIN
19
20 RETURN PA_EVENT_CORE.CHECK_VALID_PROJECT(
21 P_project_num =>P_project_num
22 ,P_project_id =>p_project_id);
23
24 --handling exceptions
25 Exception
26 When pa_event_core.util_excp then
27 p_project_id := NULL; --NOCOPY
28 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
29 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_PROJECT->';
30 Raise pa_event_pvt.pub_excp;
31
32 When others then
33 p_project_id := NULL; --NOCOPY
34 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
35 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_PROJECT->';
36 Raise pa_event_pvt.pub_excp;
37
38 END CHECK_VALID_PROJECT;
39 -- ============================================================================
40 --
41 --Name: CHECK_VALID_TASK
42 --Type: function
43 --Description: This function validates the task number and returns the task_id.
44 --
45 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_TASK
46 --
47 -- ============================================================================
48 FUNCTION CHECK_VALID_TASK
49 (P_project_id IN NUMBER
50 ,P_task_num IN VARCHAR2
51 ,P_task_id OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
52 RETURN VARCHAR2
53 IS
54 BEGIN
55 RETURN PA_EVENT_CORE.CHECK_VALID_TASK(
56 P_project_id => P_project_id
57 ,P_task_num => P_task_num
58 ,P_task_id => P_task_id );
59
60 --handling exceptions
61 Exception
62 When pa_event_core.util_excp
63 then
64 p_task_id := NULL; --NOCOPY
65 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
66 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_TASK->';
67 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
68
69 When others
70 then
71 p_task_id := NULL; --NOCOPY
72 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
73 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_TASK->';
74 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
75
76 END CHECK_VALID_TASK;
77 -- ============================================================================
78 --
79 --Name: CHECK_VALID_EVENT_TYPE
80 --Type: function
81 --Description: This function validates the user entered event_type
82 -- And returns the event_type_classification.
83 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_EVENT_TYPE
84 --
85 -- ============================================================================
86 FUNCTION CHECK_VALID_EVENT_TYPE
87 (P_event_type IN VARCHAR2
88 ,P_context IN VARCHAR2
89 ,X_event_type_classification OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
90 RETURN VARCHAR2
91 IS
92 BEGIN
93 RETURN PA_EVENT_CORE.CHECK_VALID_EVENT_TYPE(
94 P_event_type => P_event_type
95 ,P_context => P_context
96 ,P_event_type_classification => X_event_type_classification);
97
98 --handling exceptions
99 Exception
100 When pa_event_core.util_excp
101 then
102 x_event_type_classification := NULL; --NOCOPY
103 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
104 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_EVENT_TYPE->';
105 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
106
107 When others
108 then
109 x_event_type_classification := NULL; --NOCOPY
110 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
111 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_EVENT_TYPE->';
112 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
113
114 END CHECK_VALID_EVENT_TYPE;
115 -- ============================================================================
116 --
117 --Name: CHECK_VALID_EVENT_ORG
118 --Type: function
119 --Description: This function validates and
120 -- derive the organisation_id from organisation name.
121 --
122 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_EVENT_ORG
123 --
124 -- ============================================================================
125 FUNCTION CHECK_VALID_EVENT_ORG
126 (P_event_org_name IN VARCHAR2
127 ,P_event_org_id OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
128 RETURN VARCHAR2
129 IS
130 BEGIN
131 RETURN PA_EVENT_CORE.CHECK_VALID_EVENT_ORG(
132 P_event_org_name => P_event_org_name
133 ,P_event_org_id => P_event_org_id );
134
135 --handling exceptions
136 Exception
137 When pa_event_core.util_excp
138 then
139 p_event_org_id := NULL; -- NOCOPY
140 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
141 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_EVENT_ORG->';
142 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
143
144 When others
145 then
146 p_event_org_id := NULL; -- NOCOPY
147 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
148 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_EVENT_ORG->';
149 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
150
151 END CHECK_VALID_EVENT_ORG;
152 -- ============================================================================
153 --
154 --Name: CHECK_VALID_CURR
155 --Type: function
156 --Description: This function validates the currency fields if MCB is enabled.
157 --
158 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_CURR
159 --
160 -- ============================================================================
161 FUNCTION CHECK_VALID_CURR
162 (P_bill_trans_curr IN VARCHAR2)
163 RETURN VARCHAR2
164 IS
165 BEGIN
166 RETURN PA_EVENT_CORE.CHECK_VALID_CURR(
167 P_bill_trans_curr => P_bill_trans_curr);
168
169 --handling exceptions
170 Exception
171 When pa_event_core.util_excp
172 then
173 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
174 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_CURR->';
175 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
176
177 When others
178 then
179 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
180 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_CURR->';
181 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
182
183 END CHECK_VALID_CURR;
184 -- ============================================================================
185 --
186 --Name: CHECK_VALID_FUND_RATE_TYPE
187 --Type: function
188 --Description: This function validates the currency fields if MCB is enabled.
189 --
190 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_FUND_RATE_TYPE
191 --
192 -- ============================================================================
193 FUNCTION CHECK_VALID_FUND_RATE_TYPE
194 (P_fund_rate_type IN VARCHAR2
195 ,x_fund_rate_type OUT NOCOPY VARCHAR2 -- Added for bug 3009307 --File.Sql.39 bug 4440895
196 )
197 RETURN VARCHAR2
198 IS
199 BEGIN
200 RETURN PA_EVENT_CORE.CHECK_VALID_FUND_RATE_TYPE(
201 P_fund_rate_type => P_fund_rate_type,
202 x_fund_rate_type => x_fund_rate_type); -- Added for bug 3009307
203
204 --handling exceptions
205 Exception
206 When pa_event_core.util_excp
207 then
208 x_fund_rate_type := NULL; --NOCOPY
209 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
210 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_FUND_RATE_TYPE->';
211 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
212
213 When others
214 then
215 x_fund_rate_type := NULL; --NOCOPY
216 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
217 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_FUND_RATE_TYPE->';
218 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
219
220 END CHECK_VALID_FUND_RATE_TYPE;
221
222 -- ============================================================================
223 --
224 --Name: CHECK_VALID_PROJ_RATE_TYPE
225 --Type: function
226 --Description: This function validates the currency fields if MCB is enabled.
227 --
228 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_PROJ_RATE_TYPE
229 --
230 -- ============================================================================
231 FUNCTION CHECK_VALID_PROJ_RATE_TYPE
232 (P_proj_rate_type IN VARCHAR2
233 ,P_bill_trans_currency_code IN VARCHAR2
234 ,P_project_currency_code IN VARCHAR2
235 ,P_proj_level_rt_dt_code IN VARCHAR2
236 ,P_project_rate_date IN DATE
237 ,P_event_date IN DATE
238 ,x_proj_rate_type OUT NOCOPY VARCHAR2 -- Added for bug 3009307 --File.Sql.39 bug 4440895
239 )
240 RETURN VARCHAR2
241 IS
242 BEGIN
243 RETURN PA_EVENT_CORE.CHECK_VALID_PROJ_RATE_TYPE(
244 P_proj_rate_type => P_proj_rate_type
245 ,P_bill_trans_currency_code => P_bill_trans_currency_code
246 ,P_project_currency_code => P_project_currency_code
247 ,P_proj_level_rt_dt_cod => P_proj_level_rt_dt_code
248 ,P_project_rate_date => P_project_rate_date
249 ,P_event_date => P_event_date
250 ,x_proj_rate_type => x_proj_rate_type -- Added for bug 3009307
251 );
252
253 --handling exceptions
254 Exception
255 When pa_event_core.util_excp
256 then
257 x_proj_rate_type := NULL; -- NOCOPY
258 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
259 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_PROJ_RATE_TYPE->';
260 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
261
262 When others
263 then
264 x_proj_rate_type := NULL; -- NOCOPY
265 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
266 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_PROJ_RATE_TYPE->';
267 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
268
269 END CHECK_VALID_PROJ_RATE_TYPE;
270 -- ============================================================================
271 --
272 --Name: CHECK_VALID_PFC_RATE_TYPE
273 --Type: function
274 --Description: This function validates the currency fields if MCB is enabled.
275 --
276 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_PFC_RATE_TYPE
277 --
278 -- ============================================================================
279 FUNCTION CHECK_VALID_PFC_RATE_TYPE
280 (P_pfc_rate_type IN VARCHAR2
281 ,P_bill_trans_currency_code IN VARCHAR2
282 ,P_proj_func_currency_code IN VARCHAR2
283 ,P_proj_level_func_rt_dt_code IN VARCHAR2
284 ,P_projfunc_rate_date IN DATE
285 ,P_event_date IN DATE
286 ,x_pfc_rate_type OUT NOCOPY VARCHAR2 -- Added for bug 3009307 --File.Sql.39 bug 4440895
287 )
288 RETURN VARCHAR2
289 IS
290 BEGIN
291 RETURN PA_EVENT_CORE.CHECK_VALID_PFC_RATE_TYPE(
292 P_pfc_rate_type =>P_pfc_rate_type
293 ,P_bill_trans_currency_code =>P_bill_trans_currency_code
294 ,P_proj_func_currency_code =>P_proj_func_currency_code
295 ,P_proj_level_func_rt_dt_cod =>P_proj_level_func_rt_dt_code
296 ,P_proj_func_rate_date =>P_projfunc_rate_date
297 ,P_event_date =>P_event_date
298 ,x_pfc_rate_type =>x_pfc_rate_type -- Added for bug 3009307
299 );
300
301 --handling exceptions
302 Exception
303 When pa_event_core.util_excp
304 then
305 x_pfc_rate_type := NULL; --NOCOPY
306 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
307 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_PFC_RATE_TYPE->';
308 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
309
310 When others
311 then
312 x_pfc_rate_type := NULL; --NOCOPY
313 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
314 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_PFC_RATE_TYPE->';
315 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
316
317 END CHECK_VALID_PFC_RATE_TYPE;
318
319 -- ============================================================================
320 --
321 --Name: CHECK_VALID_REV_AMT
322 --Type: function
323 --Description: This function validates the revenue amount.
324 --
325 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_REV_AMT
326 --
327 -- ============================================================================
328 FUNCTION CHECK_VALID_REV_AMT
329 (P_event_type_classification IN VARCHAR2
330 ,P_rev_amt IN NUMBER)
331 RETURN VARCHAR2
332 IS
333 BEGIN
334 RETURN PA_EVENT_CORE.CHECK_VALID_REV_AMT(
335 p_event_type_classification => P_event_type_classification
336 ,P_rev_amt => P_rev_amt );
337
338 --handling exceptions
339 Exception
340 When pa_event_core.util_excp
341 then
342 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
343 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_REV_AMT->';
344 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
345
346 When others
347 then
348 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
349 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_REV_AMT->';
350 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
351
352 END CHECK_VALID_REV_AMT;
353 -- ============================================================================
354 --
355 --Name: CHECK_VALID_BILL_AMT
356 --Type: function
357 --Description: This function validates the bill amount.
358 --
359 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_BILL_AMT
360 --
361 -- ============================================================================
362 FUNCTION CHECK_VALID_BILL_AMT
363 (P_event_type_classification IN VARCHAR2
364 ,P_bill_amt IN NUMBER)
365 RETURN VARCHAR2
366 IS
367 BEGIN
368 RETURN PA_EVENT_CORE.CHECK_VALID_BILL_AMT(
369 P_event_type_classification => P_event_type_classification
370 ,P_bill_amt => P_bill_amt );
371
372 --handling exceptions
373 Exception
374 When pa_event_core.util_excp
375 then
376 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
377 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_BILL_AMT->';
378 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
379
380 When others
381 then
382 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
383 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_BILL_AMT->';
384 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
385
386 END CHECK_VALID_BILL_AMT;
387 -- ============================================================================
388 --
389 --Name: CHECK_VALID_EVENT_NUM
390 --Type: function
391 --Description: This function validates the event number.
392 --
393 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_EVENT_NUM
394 --
395 -- ============================================================================
396 FUNCTION CHECK_VALID_EVENT_NUM
397 (P_project_id IN NUMBER
398 ,P_task_id IN NUMBER
399 ,P_event_num IN NUMBER)
400 RETURN VARCHAR2
401 IS
402 BEGIN
403 RETURN PA_EVENT_CORE.CHECK_VALID_EVENT_NUM(
404 P_project_id =>P_project_id
405 ,P_task_id =>P_task_id
406 ,P_event_num =>P_event_num);
407
408 --handling exceptions
409 Exception
410 When pa_event_core.util_excp
411 then
412 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
413 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_EVENT_NUM->';
414 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
415
416 When others
417 then
418 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
419 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_EVENT_NUM->';
420 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
421
422 END CHECK_VALID_EVENT_NUM;
423 -- ============================================================================
424 --
425 --Name: CHECK_VALID_INV_ORG
426 --Type: function
427 --Description: This function validates the inventory organization name
428 -- should be valid and active
429 --
430 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_INV_ORG
431 --
432 -- ============================================================================
433 FUNCTION CHECK_VALID_INV_ORG
434 (P_inv_org_name IN VARCHAR2
435 ,P_inv_org_id OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
436 RETURN VARCHAR2
437 IS
438 BEGIN
439 RETURN PA_EVENT_CORE.CHECK_VALID_INV_ORG(
440 P_inv_org_name => P_inv_org_name
441 ,P_inv_org_id => P_inv_org_id);
442
443 --handling exceptions
444 Exception
445 When pa_event_core.util_excp
446 then
447 p_inv_org_id := NULL; -- NOCOPY
448 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
449 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_INV_ORG->';
450 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
451
452 When others
453 then
454 p_inv_org_id := NULL; -- NOCOPY
455 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
456 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_INV_ORG->';
457 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
458
459 END CHECK_VALID_INV_ORG;
460 -- ============================================================================
461 --
462 --Name: CHECK_VALID_INV_ITEM
463 --Type: function
464 --Description: This function validates the inventory item_id
465 --
466 --Called subprograms:PA_EVENT_CORE.CHECK_VALID_INV_ITEM
467 --
468 -- ============================================================================
469 FUNCTION CHECK_VALID_INV_ITEM
470 (P_inv_item_id IN NUMBER)
471 RETURN VARCHAR2
472 IS
473 BEGIN
474 RETURN PA_EVENT_CORE.CHECK_VALID_INV_ITEM(
475 P_inv_item_id =>P_inv_item_id );
476
477 --handling exceptions
478 Exception
479 When pa_event_core.util_excp
480 then
481 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
482 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_INV_ITEM->';
483 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
484
485 When others
486 then
487 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
488 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_INV_ITEM->';
489 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
490
491 END CHECK_VALID_INV_ITEM;
492 -- ============================================================================
493 --
494 --Name: CHECK_EVENT_PROCESSED
495 --Type: function
496 --Description: This function calls core where it is validated whether has been
497 -- processed.
498 --
499 --Called subprograms:PA_EVENT_CORE.CHECK_EVENT_PROCESSED
500 --
501 -- ============================================================================
502 FUNCTION CHECK_EVENT_PROCESSED
503 (P_event_id IN NUMBER)
504 RETURN VARCHAR2
505 IS
506 BEGIN
507 RETURN PA_EVENT_CORE.CHECK_EVENT_PROCESSED(
508 P_event_id => P_event_id);
509
510 --handling exceptions
511 Exception
512 When pa_event_core.util_excp
513 then
514 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
515 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_EVENT_PROCESSED->';
516 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
517
518 When others
519 then
520 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
521 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_EVENT_PROCESSED->';
522 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
523
524 END CHECK_EVENT_PROCESSED;
525 -- ============================================================================
526 --
527 --Name: CHECK_FUNDING
528 --Type: function
529 --Description: This function validates the funding provided.
530 --
531 --Called subprograms:PA_EVENT_CORE.CHECK_FUNDING
532 --
533 -- ============================================================================
534 FUNCTION CHECK_FUNDING
535 (P_project_id IN NUMBER
536 ,P_task_id IN NUMBER)
537 RETURN VARCHAR2
538 IS
539 BEGIN
540 RETURN PA_EVENT_CORE.CHECK_FUNDING(
541 P_project_id => P_project_id
542 ,P_TASK_ID =>P_TASK_ID );
543
544 --handling exceptions
545 Exception
546 When pa_event_core.util_excp
547 then
548 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
549 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_FUNDING->';
550 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
551
552 When others
553 then
554 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
555 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_FUNDING->';
556 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
557
558 END CHECK_FUNDING;
559 -- ============================================================================
560 --
561 --Name: CHECK_WRITE_OFF_AMT
562 --Type: function
563 --Description: This function validates the write-off amount.
564 --
565 --Called subprograms:PA_EVENT_CORE.CHECK_WRITE_OFF_AMT
566 --
567 -- ============================================================================
568 FUNCTION CHECK_WRITE_OFF_AMT(
569 P_project_id IN NUMBER
570 ,P_task_id IN NUMBER
571 ,P_event_id IN NUMBER
572 ,P_rev_amt IN NUMBER
573 ,P_bill_trans_currency IN VARCHAR2
574 ,P_proj_func_currency IN VARCHAR2
575 ,P_proj_func_rate_type IN VARCHAR2
576 ,P_proj_func_rate IN NUMBER
577 ,P_proj_func_rate_date IN DATE
578 ,P_event_date IN DATE ) RETURN VARCHAR2 IS
579
580 BEGIN
581 RETURN PA_EVENT_CORE.CHECK_WRITE_OFF_AMT(
582 P_project_id =>P_project_id
583 ,P_task_id =>P_task_id
584 ,P_event_id =>P_event_id
585 ,P_rev_amt =>P_rev_amt
586 ,P_bill_trans_currency =>P_bill_trans_currency
587 ,P_proj_func_currency =>P_proj_func_currency
588 ,P_proj_func_rate_type =>P_proj_func_rate_type
589 ,P_proj_func_rate =>P_proj_func_rate
590 ,P_proj_func_rate_date =>P_proj_func_rate_date
591 ,P_event_date =>P_event_date );
592
593 --handling exceptions
594 Exception
595 When pa_event_core.util_excp
596 then
597 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
598 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_WRITE_OFF_AMT->';
599 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
600
601 When others
602 then
603 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
604 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_WRITE_OFF_AMT->';
605 Raise pa_event_utils.pvt_excp;--Raising exception to handled in private body.
606
607 END CHECK_WRITE_OFF_AMT;
608
609 -- ============================================================================
610 -- Federal Uptake
611 --Name: CHECK_VALID_AGREEMENT
612 --Type: function
613 --Description: This function validates the agreement_number and returns the agreement_id.
614 --
615 --Called subprograms: PA_EVENT_CORE.CHECK_VALID_AGREEMENT
616 --
617 -- ============================================================================
618 FUNCTION CHECK_VALID_AGREEMENT (
619 P_project_id IN NUMBER
620 ,P_task_id IN NUMBER
621 ,P_agreement_number IN VARCHAR2
622 ,P_agreement_type IN VARCHAR2
623 ,P_customer_number IN VARCHAR2
624 ,P_agreement_id OUT NOCOPY NUMBER) --Federal Uptake
625 RETURN VARCHAR2
626 IS
627 BEGIN
628 RETURN PA_EVENT_CORE.CHECK_VALID_AGREEMENT(
629 P_project_id => P_project_id
630 ,P_task_id => P_task_id
631 ,P_agreement_number => P_agreement_number
632 ,P_agreement_type => P_agreement_type
633 ,P_customer_number => P_customer_number
634 ,P_agreement_id => P_agreement_id );
635
636 --handling exceptions
637 Exception
638 When pa_event_core.util_excp then
639 p_agreement_id := NULL; --NOCOPY
640 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
641 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_AGREEMENT->';
642 Raise pa_event_pvt.pub_excp;
643
644 When others then
645 p_agreement_id := NULL; --NOCOPY
646 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
647 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_AGREEMENT->';
648 Raise pa_event_pvt.pub_excp;
649
650 END CHECK_VALID_AGREEMENT;
651
652
653 -- ============================================================================
654 -- Federal Uptake
655 --Name: CHECK_VALID_EVENT_DATE
656 --Type: function
657 --Description: This function validates if the event date is between the
658 -- agreement start date and end date
659 --Called subprograms: PA_EVENT_CORE.CHECK_VALID_EVENT_DATE
660 --
661 -- ============================================================================
662 FUNCTION CHECK_VALID_EVENT_DATE(
663 P_event_date IN DATE
664 ,P_agreement_id IN NUMBER )
665 RETURN VARCHAR2
666 IS
667 BEGIN
668 RETURN PA_EVENT_CORE.CHECK_VALID_EVENT_DATE (
669 P_event_date => P_event_date
670 ,P_agreement_id => P_agreement_id);
671
672 --handling exceptions
673 Exception
674 When pa_event_core.util_excp then
675 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
676 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||'CHECK_VALID_EVENT_DATE->';
677 Raise pa_event_pvt.pub_excp;
678
679 When others then
680 PA_EVENT_PUB.PACKAGE_NAME:=PA_EVENT_PUB.PACKAGE_NAME||'UTILS->';
681 PA_EVENT_PUB.PROCEDURE_NAME:=PA_EVENT_PUB.PROCEDURE_NAME||substr(sqlerrm,1,80)||'CHECK_VALID_EVENT_DATE->';
682 Raise pa_event_pvt.pub_excp;
683
684 END CHECK_VALID_EVENT_DATE;
685
686 END PA_EVENT_UTILS;