[Home] [Help]
PACKAGE BODY: APPS.BIS_TARGET_LEVEL_VALIDATE_PVT
Source
1 PACKAGE BODY BIS_TARGET_LEVEL_VALIDATE_PVT AS
2 /* $Header: BISVTLVB.pls 115.15 2003/01/27 13:30:12 arhegde ship $ */
3 /*
4 REM +=======================================================================+
5 REM | Copyright (c) 1998 Oracle Corporation, Redwood Shores, CA, USA |
6 REM | All rights reserved. |
7 REM +=======================================================================+
8 REM | FILENAME |
9 REM | BISVTVLS.pls |
10 REM | |
11 REM | DESCRIPTION |
12 REM | Private API for validating items in the MEASUREs record
13 REM | NOTES |
14 REM | |
15 REM |
16 REM | 27-JAN-03 arhegde For having different local variables for IN and OUT |
17 REM | parameters (bug#2758428) |
18 REM +=======================================================================+
19 */
20 --
21 --
22 G_PKG_NAME CONSTANT VARCHAR2(30):='BIS_TARGET_LEVEL_VALIDATE_PVT';
23 --
24 PROCEDURE Validate_Dimension_Level_Id
25 ( p_api_version IN NUMBER
26 , p_level_id IN NUMBER
27 , p_level_short_name IN VARCHAR2
28 , x_return_status OUT NOCOPY VARCHAR2
29 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
30 )
31 IS
32 l_dummy number;
33 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
34
35 CURSOR chk_dimension is
36 select 1
37 from bis_Levels
38 where level_id = p_level_id;
39
40 begin
41 x_return_status := FND_API.G_RET_STS_SUCCESS;
42 if( BIS_UTILITIES_PUB.Value_Not_Missing(p_level_id)=FND_API.G_TRUE
43 AND BIS_UTILITIES_PUB.Value_Not_NULL(p_level_id)=FND_API.G_TRUE ) then
44 open chk_dimension;
45 fetch chk_dimension into l_dummy;
46 if (chk_dimension%NOTFOUND) then
47 close chk_dimension;
48 -- POPULATE THE error table
49 --added last two parameters
50 l_error_tbl := x_error_tbl;
51 BIS_UTILITIES_PVT.Add_Error_Message
52 ( p_error_msg_name => 'BIS_INVALID_DIMENSION_LEVEL_ID'
53 , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
54 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension_Level_ID'
55 , p_error_type => BIS_UTILITIES_PUB.G_ERROR
56 , p_error_table => l_error_tbl
57 , x_error_table => x_error_tbl
58 );
59 RAISE FND_API.G_EXC_ERROR;
60 end if;
61 close chk_dimension;
62 end if;
63
64 --commented RAISE
65 EXCEPTION
66 when FND_API.G_EXC_ERROR then
67 x_return_status := FND_API.G_RET_STS_ERROR ;
68 --RAISE FND_API.G_EXC_ERROR;
69 when FND_API.G_EXC_UNEXPECTED_ERROR then
70 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
71 -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
72 when others then
73 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
74 l_error_tbl := x_error_tbl;
75 --added last two parameters
76 BIS_UTILITIES_PVT.Add_Error_Message
77 ( p_error_msg_id => SQLCODE
78 , p_error_description => SQLERRM
79 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension_Level_Id'
80 , p_error_table => l_error_tbl
81 , x_error_table => x_error_tbl
82 );
83 -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
84
85 end Validate_Dimension_Level_Id;
86
87 PROCEDURE Validate_org_Level_ID
88 ( p_api_version IN NUMBER
89 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
90 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
91 , x_return_status OUT NOCOPY VARCHAR2
92 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
93 )
94 IS
95 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
96 BEGIN
97
98 Validate_Dimension_Level_ID( p_api_version
99 , p_TARGET_LEVEL_Rec.org_Level_ID
100 , p_TARGET_LEVEL_Rec.org_level_Short_Name
101 , x_return_status
102 , x_error_tbl
103 );
104
105 --commented RAISE
106 EXCEPTION
107 when FND_API.G_EXC_ERROR then
108 x_return_status := FND_API.G_RET_STS_ERROR ;
109 --RAISE FND_API.G_EXC_ERROR;
110 when FND_API.G_EXC_UNEXPECTED_ERROR then
111 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
112 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
113 when others then
114 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
115 --added last two parameters
116 l_error_tbl := x_error_tbl;
117 BIS_UTILITIES_PVT.Add_Error_Message
118 ( p_error_msg_id => SQLCODE
119 , p_error_description => SQLERRM
120 , p_error_proc_name => G_PKG_NAME||'.Validate_org_Level_ID'
121 , p_error_table => l_error_tbl
122 , x_error_table => x_error_tbl
123 );
124 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
125
126 END Validate_org_Level_ID;
127 --
128 PROCEDURE Validate_time_Level_ID
129 ( p_api_version IN NUMBER
130 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
131 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
132 , x_return_status OUT NOCOPY VARCHAR2
133 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
134 )
135 IS
136 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
137 BEGIN
138
139 Validate_Dimension_Level_ID( p_api_version
140 , p_TARGET_LEVEL_Rec.time_Level_ID
141 , p_TARGET_LEVEL_Rec.time_level_Short_Name
142 , x_return_status
143 , x_error_tbl
144 );
145
146 --commented RAISE
147 EXCEPTION
148 when FND_API.G_EXC_ERROR then
149 x_return_status := FND_API.G_RET_STS_ERROR ;
150 --RAISE FND_API.G_EXC_ERROR;
151 when FND_API.G_EXC_UNEXPECTED_ERROR then
152 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
154 when others then
155 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
156 --added last two parameters
157 l_error_tbl := x_error_tbl;
158 BIS_UTILITIES_PVT.Add_Error_Message
159 ( p_error_msg_id => SQLCODE
160 , p_error_description => SQLERRM
161 , p_error_proc_name => G_PKG_NAME||'.Validate_time_Level_ID'
162 , p_error_table => l_error_tbl
163 , x_error_table => x_error_tbl
164 );
165 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
166
167 END Validate_time_Level_ID;
168 --
169 --
170 PROCEDURE Validate_Dimension1_Level_ID
171 ( p_api_version IN NUMBER
172 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
173 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
174 , x_return_status OUT NOCOPY VARCHAR2
175 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
176 )
177 IS
178 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
179 BEGIN
180
181 Validate_Dimension_Level_ID( p_api_version
182 , p_TARGET_LEVEL_Rec.Dimension1_Level_ID
183 , p_TARGET_LEVEL_Rec.Dimension1_level_Short_Name
184 , x_return_status
185 , x_error_tbl
186 );
187
188 --commented RAISE
189 EXCEPTION
190 when FND_API.G_EXC_ERROR then
191 x_return_status := FND_API.G_RET_STS_ERROR ;
192 --RAISE FND_API.G_EXC_ERROR;
193 when FND_API.G_EXC_UNEXPECTED_ERROR then
194 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
195 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
196 when others then
197 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
198 l_error_tbl := x_error_tbl;
199 --added last two parameters
200 BIS_UTILITIES_PVT.Add_Error_Message
201 ( p_error_msg_id => SQLCODE
202 , p_error_description => SQLERRM
203 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension1_Level_ID'
204 , p_error_table => l_error_tbl
205 , x_error_table => x_error_tbl
206 );
207 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
208
209 END Validate_Dimension1_Level_ID;
210 --
211 PROCEDURE Validate_Dimension2_Level_ID
212 ( p_api_version IN NUMBER
213 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
214 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
215 , x_return_status OUT NOCOPY VARCHAR2
216 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
217 )
218 IS
219 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
220 BEGIN
221
222 Validate_Dimension_Level_ID( p_api_version
223 , p_TARGET_LEVEL_Rec.Dimension2_Level_ID
224 , p_TARGET_LEVEL_Rec.Dimension2_Level_Short_Name
225 , x_return_status
226 , x_error_tbl
227 );
228
229
230 --commented RAISE
231 EXCEPTION
232 when FND_API.G_EXC_ERROR then
233 x_return_status := FND_API.G_RET_STS_ERROR ;
234 --RAISE FND_API.G_EXC_ERROR;
235 when FND_API.G_EXC_UNEXPECTED_ERROR then
236 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
237 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238 when others then
239 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
240 --added last two parameters
241 l_error_tbl := x_error_tbl;
242 BIS_UTILITIES_PVT.Add_Error_Message
243 ( p_error_msg_id => SQLCODE
244 , p_error_description => SQLERRM
245 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension2_Level_ID'
246 , p_error_table => l_error_tbl
247 , x_error_table => x_error_tbl
248 );
249 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250
251 END Validate_Dimension2_Level_ID;
252 --
253 PROCEDURE Validate_Dimension3_Level_ID
254 ( p_api_version IN NUMBER
255 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
256 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
257 , x_return_status OUT NOCOPY VARCHAR2
258 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
259 )
260 IS
261 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
262 BEGIN
263
264 Validate_Dimension_Level_ID( p_api_version
265 , p_TARGET_LEVEL_Rec.Dimension3_Level_ID
266 , p_TARGET_LEVEL_Rec.Dimension3_Level_Short_Name
267 , x_return_status
268 , x_error_tbl
269 );
270
271 --commented RAISE
272 EXCEPTION
273 when FND_API.G_EXC_ERROR then
274 x_return_status := FND_API.G_RET_STS_ERROR ;
275 --RAISE FND_API.G_EXC_ERROR;
276 when FND_API.G_EXC_UNEXPECTED_ERROR then
277 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
278 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
279 when others then
280 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
281 --added last two parameters
282 l_error_tbl := x_error_tbl;
283 BIS_UTILITIES_PVT.Add_Error_Message
284 ( p_error_msg_id => SQLCODE
285 , p_error_description => SQLERRM
286 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension3_Level_ID'
287 , p_error_table => l_error_tbl
288 , x_error_table => x_error_tbl
289 );
290 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
291
292 END Validate_Dimension3_Level_ID;
293 --
294 PROCEDURE Validate_Dimension4_Level_ID
295 ( p_api_version IN NUMBER
296 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
297 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
298 , x_return_status OUT NOCOPY VARCHAR2
299 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
300 )
301 IS
302 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
303 BEGIN
304
305 Validate_Dimension_Level_ID( p_api_version
306 , p_TARGET_LEVEL_Rec.Dimension4_Level_ID
307 , p_TARGET_LEVEL_Rec.Dimension4_Level_Short_Name
308 , x_return_status
309 , x_error_tbl
310 );
311
312 --commented RAISE
313 EXCEPTION
314 when FND_API.G_EXC_ERROR then
315 x_return_status := FND_API.G_RET_STS_ERROR ;
316 --RAISE FND_API.G_EXC_ERROR;
317 when FND_API.G_EXC_UNEXPECTED_ERROR then
318 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
319 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
320 when others then
321 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322 l_error_tbl := x_error_tbl;
323 --added last two parameters
324 BIS_UTILITIES_PVT.Add_Error_Message
325 ( p_error_msg_id => SQLCODE
326 , p_error_description => SQLERRM
327 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension4_Level_ID'
328 , p_error_table => l_error_tbl
329 , x_error_table => x_error_tbl
330 );
331 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
332
333 END Validate_Dimension4_Level_ID;
334 --
335 PROCEDURE Validate_Dimension5_Level_ID
336 ( p_api_version IN NUMBER
337 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
338 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
339 , x_return_status OUT NOCOPY VARCHAR2
340 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
341 )
342 IS
343 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
344 BEGIN
345
346 Validate_Dimension_Level_ID( p_api_version
347 , p_TARGET_LEVEL_Rec.Dimension5_Level_ID
348 , p_TARGET_LEVEL_Rec.Dimension5_Level_Short_Name
349 , x_return_status
350 , x_error_tbl
351 );
352
353 --commented RAISE
354 EXCEPTION
355 when FND_API.G_EXC_ERROR then
356 x_return_status := FND_API.G_RET_STS_ERROR ;
357 --RAISE FND_API.G_EXC_ERROR;
358 when FND_API.G_EXC_UNEXPECTED_ERROR then
359 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
360 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
361 when others then
362 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
363 l_error_tbl := x_error_tbl;
364 --added last two parameters
365 BIS_UTILITIES_PVT.Add_Error_Message
366 ( p_error_msg_id => SQLCODE
367 , p_error_description => SQLERRM
368 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension5_Level_ID'
369 , p_error_table => l_error_tbl
370 , x_error_table => x_error_tbl
371 );
372 -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
373
374 END Validate_Dimension5_Level_ID;
375 --
376
377 PROCEDURE Validate_Dimension6_Level_ID
378 ( p_api_version IN NUMBER
379 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
380 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
381 , x_return_status OUT NOCOPY VARCHAR2
382 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
383 )
384 IS
385 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
386 BEGIN
387
388 Validate_Dimension_Level_ID( p_api_version
389 , p_TARGET_LEVEL_Rec.Dimension6_Level_ID
390 , p_TARGET_LEVEL_Rec.Dimension6_Level_Short_Name
391 , x_return_status
392 , x_error_tbl
393 );
394
395 --commented RAISE
396 EXCEPTION
397 when FND_API.G_EXC_ERROR then
398 x_return_status := FND_API.G_RET_STS_ERROR ;
399 -- RAISE FND_API.G_EXC_ERROR;
400 when FND_API.G_EXC_UNEXPECTED_ERROR then
401 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
402 -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
403 when others then
404 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
405 l_error_tbl := x_error_tbl;
406 --added last two parameters
407 BIS_UTILITIES_PVT.Add_Error_Message
408 ( p_error_msg_id => SQLCODE
409 , p_error_description => SQLERRM
410 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension6_Level_ID'
411 , p_error_table => l_error_tbl
412 , x_error_table => x_error_tbl
413 );
414 -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
415
416 END Validate_Dimension6_Level_ID;
417 --
418
419 PROCEDURE Validate_Dimension7_Level_ID
420 ( p_api_version IN NUMBER
421 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
422 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
423 , x_return_status OUT NOCOPY VARCHAR2
424 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
425 )
426 IS
427 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
428 BEGIN
429
430 Validate_Dimension_Level_ID( p_api_version
431 , p_TARGET_LEVEL_Rec.Dimension7_Level_ID
432 , p_TARGET_LEVEL_Rec.Dimension7_Level_Short_Name
433 , x_return_status
434 , x_error_tbl
435 );
436
437 --commented RAISE
438 EXCEPTION
439 when FND_API.G_EXC_ERROR then
440 x_return_status := FND_API.G_RET_STS_ERROR ;
441 --RAISE FND_API.G_EXC_ERROR;
442 when FND_API.G_EXC_UNEXPECTED_ERROR then
443 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
444 -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
445 when others then
446 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
447 l_error_tbl := x_error_tbl;
448 --added last two parameters
449 BIS_UTILITIES_PVT.Add_Error_Message
450 ( p_error_msg_id => SQLCODE
451 , p_error_description => SQLERRM
452 , p_error_proc_name => G_PKG_NAME||'.Validate_Dimension7_Level_ID'
453 , p_error_table => l_error_tbl
454 , x_error_table => x_error_tbl
455 );
456 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457
458 END Validate_Dimension7_Level_ID;
459 --
460
461 PROCEDURE Validate_WF_Process_Short_Name
462 ( p_api_version IN NUMBER
463 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
464 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
465 , x_return_status OUT NOCOPY VARCHAR2
466 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
467 )
468 is
469 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
470 begin
471
472 BIS_WORKFLOW_PROCESS_PVT.Validate_WF_Process_Short_Name
473 ( p_api_version
474 , p_validation_level
475 , p_TARGET_LEVEL_Rec.Workflow_Process_Short_Name
476 , x_return_status
477 , x_error_Tbl
478 );
479
480 --commented RAISE
481 EXCEPTION
482 when FND_API.G_EXC_ERROR then
483 x_return_status := FND_API.G_RET_STS_ERROR ;
484 --RAISE FND_API.G_EXC_ERROR;
485 when FND_API.G_EXC_UNEXPECTED_ERROR then
486 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
487 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
488 when others then
489 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
490 l_error_tbl := x_error_tbl;
491 --added last two parameters
492 BIS_UTILITIES_PVT.Add_Error_Message
493 ( p_error_msg_id => SQLCODE
494 , p_error_description => SQLERRM
495 , p_error_proc_name => G_PKG_NAME||'.Validate_WF_Process_Short_Name'
496 , p_error_table => l_error_tbl
497 , x_error_table => x_error_tbl
498 );
499 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
500
501 end Validate_WF_Process_Short_Name;
502 --
503 PROCEDURE Validate_Def_Notify_Resp_Id
504 ( p_api_version IN NUMBER
505 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
506 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
507 , x_return_status OUT NOCOPY VARCHAR2
508 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
509 )
510 IS
511 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
512 BEGIN
513
514 BIS_RESPONSIBILITY_PVT.Validate_Notify_Resp_ID
515 ( p_api_version
516 , p_validation_level
517 , p_TARGET_LEVEL_Rec.Default_Notify_Resp_ID
518 , x_return_status
519 , x_error_Tbl
520 );
521
522
523 --commented RAISE
524 EXCEPTION
525 when FND_API.G_EXC_ERROR then
526 x_return_status := FND_API.G_RET_STS_ERROR ;
527 --RAISE FND_API.G_EXC_ERROR;
528 when FND_API.G_EXC_UNEXPECTED_ERROR then
529 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
530 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531 when others then
532 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
533 l_error_tbl := x_error_tbl;
534 --added last two parameters
535 BIS_UTILITIES_PVT.Add_Error_Message
536 ( p_error_msg_id => SQLCODE
537 , p_error_description => SQLERRM
538 , p_error_proc_name => G_PKG_NAME||'.Validate_Def_Notify_Resp_Id'
539 , p_error_table => l_error_tbl
540 , x_error_table => x_error_tbl
541 );
542 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543
544 END Validate_Def_Notify_Resp_Id;
545 --
546 PROCEDURE Validate_Df_computed_target_Id
547 ( p_api_version IN NUMBER
548 , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
549 , p_TARGET_LEVEL_Rec IN BIS_TARGET_LEVEL_PUB.TARGET_LEVEL_Rec_Type
550 , x_return_status OUT NOCOPY VARCHAR2
551 , x_error_Tbl OUT NOCOPY BIS_UTILITIES_PUB.Error_Tbl_Type
552 )
553 IS
554 l_error_tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
555 BEGIN
556
557 BIS_COMPUTED_TARGET_PVT.Validate_Computed_Target_Id
558 ( p_api_version
559 , p_validation_level
560 , p_TARGET_LEVEL_Rec.Computing_function_ID
561 , x_return_status
562 , x_error_Tbl
563 );
564
565
566 --commented RAISE
567 EXCEPTION
568 when FND_API.G_EXC_ERROR then
569 x_return_status := FND_API.G_RET_STS_ERROR ;
570 --RAISE FND_API.G_EXC_ERROR;
571 when FND_API.G_EXC_UNEXPECTED_ERROR then
572 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
573 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
574 when others then
575 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
576 l_error_tbl := x_error_tbl;
577 --added last two parameters
578 BIS_UTILITIES_PVT.Add_Error_Message
579 ( p_error_msg_id => SQLCODE
580 , p_error_description => SQLERRM
581 , p_error_proc_name => G_PKG_NAME||'.Validate_Df_computed_target_Id'
582 , p_error_table => l_error_tbl
583 , x_error_table => x_error_tbl
584 );
585 --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
586
587 END Validate_Df_computed_target_Id;
588
589 --
590 --
591 END BIS_TARGET_LEVEL_VALIDATE_PVT;