[Home] [Help]
PACKAGE BODY: APPS.AST_SEARCH_RESULT_PVT
Source
1 PACKAGE BODY AST_SEARCH_RESULT_PVT AS
2 /* $Header: astlsgnb.pls 115.4 2002/02/06 11:20:24 pkm ship $ */
3
4 -- Start of Comments - astlsgnb.pls
5 -- Package name : AST_SEARCH_RESULT_PVT
6 -- Purpose : Create_search_result saves the results of mass selection
7 -- Get_search_result out put the results
8 -- History : 8/11/2000 Julian Wang Created
9 -- NOTE :
10 -- End of Comments
11
12 G_PKG_NAME CONSTANT VARCHAR2(30):= 'AST_SEARCH_RESULT_PVT';
13 G_FILE_NAME CONSTANT VARCHAR2(12) := 'astlsgnb.pls';
14
15 G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
16 G_LOGIN_ID NUMBER := FND_GLOBAL.CONC_LOGIN_ID;
17
18 -- FUNCTION to return initialized variables to forms
19
20 FUNCTION get_search_result_rec RETURN AST_SEARCH_RESULT_PVT.SEARCH_RESULT_REC_TYPE IS
21 l_variable ast_search_result_pvt.search_result_rec_type
22 := ast_search_result_pvt.g_miss_search_result_rec;
23 BEGIN
24 return (l_variable);
25 END;
26
27 -- Hint: Primary key needs to be returned.
28
29 PROCEDURE Create_search_result(
30 P_Api_Version_Number IN NUMBER,
31 P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
32 P_Commit IN VARCHAR2 := FND_API.G_FALSE,
33 P_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
34 P_search_result_Rec IN search_result_Rec_Type := G_MISS_search_result_REC,
35 X_Return_Status OUT VARCHAR2,
36 X_Msg_Count OUT NUMBER,
37 X_Msg_Data OUT VARCHAR2
38 )
39
40 IS
41 l_api_name CONSTANT VARCHAR2(30) := 'Create_search_result';
42 l_api_version_number CONSTANT NUMBER := 1.0;
43 l_return_status_full VARCHAR2(1);
44 l_search_result_Rec search_result_Rec_Type := p_search_result_Rec;
45
46 l_count number;
47 x number;
48 BEGIN
49
50 -- Standard Start of API savepoint
51 SAVEPOINT CREATE_search_result_PVT;
52
53 -- Standard call to check for call compatibility.
54 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
55 p_api_version_number,
56 l_api_name,
57 G_PKG_NAME)
58 THEN
59 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60 END IF;
61
62 -- Initialize message list if p_init_msg_list is set to TRUE.
63 IF FND_API.to_Boolean( p_init_msg_list )
64 THEN
65 FND_MSG_PUB.initialize;
66 END IF;
67
68 -- Debug Message
69 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'start');
70
71 -- Initialize API return status to SUCCESS
72 x_return_status := FND_API.G_RET_STS_SUCCESS;
73
74 --
75 -- API body
76 --
77 x := 0;
78 IF GLB_SEARCH_RESULT_TBL.COUNT = 0 THEN
79 x := x + 1;
80 ELSE
81 x := glb_search_result_tbl.count + 1;
82 END IF;
83
84 glb_search_result_tbl(x).created_by := P_search_result_Rec.created_by;
85 glb_search_result_tbl(x).creation_date := P_search_result_Rec.creation_date;
86 glb_search_result_tbl(x).last_updated_by := P_search_result_Rec.last_updated_by;
87 glb_search_result_tbl(x).last_update_date := P_search_result_Rec.last_update_date;
88 glb_search_result_tbl(x).last_update_login := P_search_result_Rec.last_update_login;
89 glb_search_result_tbl(x).primary_id := P_search_result_Rec.primary_id;
90 glb_search_result_tbl(x).secondary_id := P_search_result_Rec.secondary_id;
91
92 --
93 -- End of API body
94 --
95
96 -- Standard check for p_commit
97 IF FND_API.to_Boolean( p_commit )
98 THEN
99 COMMIT WORK;
100 END IF;
101
102
103 -- Debug Message
104 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'end');
105
106 -- Standard call to get message count and if count is 1, get message info.
107 FND_MSG_PUB.Count_And_Get
108 ( p_count => x_msg_count,
109 p_data => x_msg_data
110 );
111
112 EXCEPTION
113 WHEN FND_API.G_EXC_ERROR THEN
114 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
115 P_API_NAME => L_API_NAME
116 ,P_PKG_NAME => G_PKG_NAME
117 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
118 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
119 ,X_MSG_COUNT => X_MSG_COUNT
120 ,X_MSG_DATA => X_MSG_DATA
121 ,X_RETURN_STATUS => X_RETURN_STATUS);
122
123 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
124 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
125 P_API_NAME => L_API_NAME
126 ,P_PKG_NAME => G_PKG_NAME
127 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
128 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
129 ,X_MSG_COUNT => X_MSG_COUNT
130 ,X_MSG_DATA => X_MSG_DATA
131 ,X_RETURN_STATUS => X_RETURN_STATUS);
132
133 WHEN OTHERS THEN
134 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
135 P_API_NAME => L_API_NAME
136 ,P_PKG_NAME => G_PKG_NAME
137 ,P_EXCEPTION_LEVEL => JTF_PLSQL_API.G_EXC_OTHERS
138 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
139 ,X_MSG_COUNT => X_MSG_COUNT
140 ,X_MSG_DATA => X_MSG_DATA
141 ,X_RETURN_STATUS => X_RETURN_STATUS);
142 End Create_search_result;
143
144 PROCEDURE GET_SEARCH_RESULT(
145 P_Api_Version_Number IN NUMBER,
146 P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
147 P_Commit IN VARCHAR2 := FND_API.G_FALSE,
148 p_validation_level IN NUMBER
149 := FND_API.G_VALID_LEVEL_FULL,
150 p_count IN NUMBER,
151 x_Search_Result_Rec OUT SEARCH_RESULT_REC_TYPE,
152 X_Return_Status OUT VARCHAR2,
153 X_Msg_Count OUT NUMBER,
154 X_Msg_Data OUT VARCHAR2
155 )
156 IS
157 l_api_name CONSTANT VARCHAR2(30) := 'Get_search_result';
158 l_api_version_number CONSTANT NUMBER := 1.0;
159 l_return_status_full VARCHAR2(1);
160 l_search_result_Rec search_result_Rec_Type;
161
162 l_count number;
163 x number;
164 BEGIN
165
166 -- Standard Start of API savepoint
167 SAVEPOINT Get_search_result_PVT;
168
169 -- Standard call to check for call compatibility.
170 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
171 p_api_version_number,
172 l_api_name,
173 G_PKG_NAME)
174 THEN
175 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
176 END IF;
177
178 -- Initialize message list if p_init_msg_list is set to TRUE.
179 IF FND_API.to_Boolean( p_init_msg_list )
180 THEN
181 FND_MSG_PUB.initialize;
182 END IF;
183
184 -- Debug Message
185 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'start');
186
187 -- Initialize API return status to SUCCESS
188 x_return_status := FND_API.G_RET_STS_SUCCESS;
189
190 --
191 -- API body
192 --
193
194 x_search_result_Rec.created_by := glb_search_result_tbl(p_count).created_by;
195 x_search_result_Rec.creation_date := glb_search_result_tbl(p_count).creation_date;
196 x_search_result_Rec.last_updated_by := glb_search_result_tbl(p_count).last_updated_by;
197 x_search_result_Rec.last_update_date := glb_search_result_tbl(p_count).last_update_date;
198 x_search_result_Rec.last_update_login := glb_search_result_tbl(p_count).last_update_login;
199 x_search_result_Rec.primary_id := glb_search_result_tbl(p_count).primary_id;
200 x_search_result_Rec.secondary_id := glb_search_result_tbl(p_count).secondary_id;
201
202 glb_search_result_tbl.delete(p_count);
203
204 --
205 -- End of API body
206 --
207
208 -- Standard check for p_commit
209 IF FND_API.to_Boolean( p_commit )
210 THEN
211 COMMIT WORK;
212 END IF;
213
214
215 -- Debug Message
216 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'end');
217
218 -- Standard call to get message count and if count is 1, get message info.
219 FND_MSG_PUB.Count_And_Get
220 ( p_count => x_msg_count,
221 p_data => x_msg_data
222 );
223
224 EXCEPTION
225 WHEN FND_API.G_EXC_ERROR THEN
226 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
227 P_API_NAME => L_API_NAME
228 ,P_PKG_NAME => G_PKG_NAME
229 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
230 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
231 ,X_MSG_COUNT => X_MSG_COUNT
232 ,X_MSG_DATA => X_MSG_DATA
233 ,X_RETURN_STATUS => X_RETURN_STATUS);
234
235 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
236 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
237 P_API_NAME => L_API_NAME
238 ,P_PKG_NAME => G_PKG_NAME
239 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
240 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
241 ,X_MSG_COUNT => X_MSG_COUNT
242 ,X_MSG_DATA => X_MSG_DATA
243 ,X_RETURN_STATUS => X_RETURN_STATUS);
244
245 WHEN OTHERS THEN
246 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
247 P_API_NAME => L_API_NAME
248 ,P_PKG_NAME => G_PKG_NAME
249 ,P_EXCEPTION_LEVEL => JTF_PLSQL_API.G_EXC_OTHERS
250 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
251 ,X_MSG_COUNT => X_MSG_COUNT
252 ,X_MSG_DATA => X_MSG_DATA
253 ,X_RETURN_STATUS => X_RETURN_STATUS);
254 End Get_search_result;
255
256 PROCEDURE DELETE_SEARCH_RESULT(
257 P_Api_Version_Number IN NUMBER,
258 P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
259 P_Commit IN VARCHAR2 := FND_API.G_FALSE,
260 p_validation_level IN NUMBER
261 := FND_API.G_VALID_LEVEL_FULL,
262 X_Return_Status OUT VARCHAR2,
263 X_Msg_Count OUT NUMBER,
264 X_Msg_Data OUT VARCHAR2
265 )
266 IS
267 l_api_name CONSTANT VARCHAR2(30) := 'Get_search_result';
268 l_api_version_number CONSTANT NUMBER := 1.0;
269 l_return_status_full VARCHAR2(1);
270
271 l_count number;
272 x number;
273
274 BEGIN
275 -- Standard Start of API savepoint
276 SAVEPOINT Get_search_result_PVT;
277
278 -- Standard call to check for call compatibility.
279 IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
280 p_api_version_number,
281 l_api_name,
282 G_PKG_NAME)
283 THEN
284 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285 END IF;
286
287 -- Initialize message list if p_init_msg_list is set to TRUE.
288 IF FND_API.to_Boolean( p_init_msg_list )
289 THEN
290 FND_MSG_PUB.initialize;
291 END IF;
292
293 -- Debug Message
294 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'start');
295
296 -- Initialize API return status to SUCCESS
297 x_return_status := FND_API.G_RET_STS_SUCCESS;
298
299 --
300 -- API body
301 --
302 IF GLB_SEARCH_RESULT_TBL.COUNT > 0 THEN
303
304 FOR i IN 1 .. GLB_SEARCH_RESULT_TBL.COUNT LOOP
305 glb_search_result_tbl.delete(i);
306 END LOOP;
307
308 END IF;
309 --
310 -- End of API body
311 --
312
313 -- Standard check for p_commit
314 IF FND_API.to_Boolean( p_commit )
315 THEN
316 COMMIT WORK;
317 END IF;
318
319
320 -- Debug Message
321 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'end');
322
326 p_data => x_msg_data
323 -- Standard call to get message count and if count is 1, get message info.
324 FND_MSG_PUB.Count_And_Get
325 ( p_count => x_msg_count,
327 );
328
329 EXCEPTION
330 WHEN FND_API.G_EXC_ERROR THEN
331 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
332 P_API_NAME => L_API_NAME
333 ,P_PKG_NAME => G_PKG_NAME
334 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
335 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
336 ,X_MSG_COUNT => X_MSG_COUNT
337 ,X_MSG_DATA => X_MSG_DATA
338 ,X_RETURN_STATUS => X_RETURN_STATUS);
339
340 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
342 P_API_NAME => L_API_NAME
343 ,P_PKG_NAME => G_PKG_NAME
344 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
345 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
346 ,X_MSG_COUNT => X_MSG_COUNT
347 ,X_MSG_DATA => X_MSG_DATA
348 ,X_RETURN_STATUS => X_RETURN_STATUS);
349
350 WHEN OTHERS THEN
351 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
352 P_API_NAME => L_API_NAME
353 ,P_PKG_NAME => G_PKG_NAME
354 ,P_EXCEPTION_LEVEL => JTF_PLSQL_API.G_EXC_OTHERS
355 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
356 ,X_MSG_COUNT => X_MSG_COUNT
357 ,X_MSG_DATA => X_MSG_DATA
358 ,X_RETURN_STATUS => X_RETURN_STATUS);
359 END;
360
361 PROCEDURE add_party_id(
362 p_api_version IN NUMBER := 1.0,
363 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
364 p_commit IN VARCHAR2 := FND_API.G_FALSE,
365 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
366 x_return_status OUT VARCHAR2,
367 x_msg_count OUT NUMBER,
368 x_msg_data OUT VARCHAR2,
369 p_search_type IN VARCHAR2,
370 p_party_id_tbl IN party_id_tbl,
371 x_glb_count OUT NUMBER
372 )
373 AS
374
375 l_api_name CONSTANT VARCHAR2(30) := 'Add_Party_Id';
376 l_api_version CONSTANT NUMBER := 1.0;
377 l_return_status VARCHAR2(1);
378 l_msg_count NUMBER;
379 l_msg_data VARCHAR2(32767);
380
381 g_count INTEGER;
382 l_count INTEGER;
383 x INTEGER;
384 y INTEGER; -- For testing
385
386 BEGIN
387
388 -- Standard start of API savepoint
389 SAVEPOINT AST_Add_Party_Id;
390
391 -- Standard call to check for call compatibility
392 IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
393 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
394 END IF;
395
396 -- Initialize message list if p_init_msg_list is set to TRUE
397 IF FND_API.To_Boolean(p_init_msg_list) THEN
398 FND_MSG_PUB.initialize;
399 END IF;
400
401 -- Initialize API return status to success
402 x_return_status := FND_API.G_RET_STS_SUCCESS;
403
404 -- API body
405 /*
406 l_count := p_party_id_tbl.COUNT;
407 g_count := glb_party_id_tbl.COUNT + p_party_id_tbl.COUNT;
408
409 IF glb_party_id_tbl.COUNT = 0 THEN
410 x := 0;
411 FOR i IN 1..l_count LOOP
412 x := x + 1;
413 glb_party_id_tbl(x) := p_party_id_tbl(i);
414 END LOOP;
415 ELSE
416 x := glb_party_id_tbl.COUNT;
417 FOR i IN 1..l_count LOOP
418 x := x + 1;
419 glb_party_id_tbl(x) := p_party_id_tbl(i);
420 END LOOP;
421 END IF;
422
423 x_glb_count := g_count;
424
425 -- End of API body
426 */
427 -- Standard check for p_commit
428 IF FND_API.to_Boolean( p_commit )
429 THEN
430 COMMIT WORK;
431 END IF;
432
433 -- Debug Message
434 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'end');
435
436 -- Standard call to get message count and if count is 1, get message info.
437 FND_MSG_PUB.Count_And_Get
438 ( p_count => x_msg_count,
439 p_data => x_msg_data
440 );
441
442 EXCEPTION
443 WHEN FND_API.G_EXC_ERROR THEN
444 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
445 P_API_NAME => L_API_NAME
446 ,P_PKG_NAME => G_PKG_NAME
447 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
448 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
449 ,X_MSG_COUNT => X_MSG_COUNT
450 ,X_MSG_DATA => X_MSG_DATA
451 ,X_RETURN_STATUS => X_RETURN_STATUS);
452
453 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
454 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
455 P_API_NAME => L_API_NAME
456 ,P_PKG_NAME => G_PKG_NAME
457 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
458 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
459 ,X_MSG_COUNT => X_MSG_COUNT
460 ,X_MSG_DATA => X_MSG_DATA
461 ,X_RETURN_STATUS => X_RETURN_STATUS);
462
463 WHEN OTHERS THEN
464 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
465 P_API_NAME => L_API_NAME
466 ,P_PKG_NAME => G_PKG_NAME
467 ,P_EXCEPTION_LEVEL => JTF_PLSQL_API.G_EXC_OTHERS
468 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
469 ,X_MSG_COUNT => X_MSG_COUNT
473 END;
470 ,X_MSG_DATA => X_MSG_DATA
471 ,X_RETURN_STATUS => X_RETURN_STATUS);
472
474
475 PROCEDURE get_party_id(
476 p_api_version IN NUMBER := 1.0,
477 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
478 p_commit IN VARCHAR2 := FND_API.G_FALSE,
479 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
480 x_return_status OUT VARCHAR2,
481 x_msg_count OUT NUMBER,
482 x_msg_data OUT VARCHAR2,
483 p_search_type IN VARCHAR2,
484 x_party_id_tbl OUT party_id_tbl,
485 x_glb_count OUT NUMBER
486 ) AS
487 l_api_name CONSTANT VARCHAR2(30) := 'Get_Party_Id';
488 l_api_version CONSTANT NUMBER := 1.0;
489 l_return_status VARCHAR2(1);
490 l_msg_count NUMBER;
491 l_msg_data VARCHAR2(32767);
492
493 x INTEGER;
494 y INTEGER; -- For testing
495 BEGIN
496
497 -- Standard start of API savepoint
498 SAVEPOINT AST_Get_Party_Id;
499
500 -- Standard call to check for call compatibility
501 IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
502 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
503 END IF;
504
505 -- Initialize message list if p_init_msg_list is set to TRUE
506 IF FND_API.To_Boolean(p_init_msg_list) THEN
507 FND_MSG_PUB.initialize;
508 END IF;
509
510 -- Initialize API return status to success
511 x_return_status := FND_API.G_RET_STS_SUCCESS;
512
513 -- API body
514 x := 0;
515 FOR i IN 1..glb_party_id_tbl.COUNT LOOP
516 x := x + 1;
517 x_party_id_tbl(x) := glb_party_id_tbl(i);
518 END LOOP;
519
520 FOR i IN 1..glb_party_id_tbl.COUNT LOOP
521 glb_party_id_tbl.DELETE(i);
522 END LOOP;
523
524 x_glb_count := x;
525 -- End of API body
526
527 -- Standard check for p_commit
528 IF FND_API.to_Boolean( p_commit )
529 THEN
530 COMMIT WORK;
531 END IF;
532
533 -- Debug Message
534 JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'AST', 'Private API: ' || l_api_name || 'end');
535
536 -- Standard call to get message count and if count is 1, get message info.
537 FND_MSG_PUB.Count_And_Get
538 ( p_count => x_msg_count,
539 p_data => x_msg_data
540 );
541
542 EXCEPTION
543 WHEN FND_API.G_EXC_ERROR THEN
544 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
545 P_API_NAME => L_API_NAME
546 ,P_PKG_NAME => G_PKG_NAME
547 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
548 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
549 ,X_MSG_COUNT => X_MSG_COUNT
550 ,X_MSG_DATA => X_MSG_DATA
551 ,X_RETURN_STATUS => X_RETURN_STATUS);
552
553 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
554 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
555 P_API_NAME => L_API_NAME
556 ,P_PKG_NAME => G_PKG_NAME
557 ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
558 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
559 ,X_MSG_COUNT => X_MSG_COUNT
560 ,X_MSG_DATA => X_MSG_DATA
561 ,X_RETURN_STATUS => X_RETURN_STATUS);
562
563 WHEN OTHERS THEN
564 JTF_PLSQL_API.HANDLE_EXCEPTIONS(
565 P_API_NAME => L_API_NAME
566 ,P_PKG_NAME => G_PKG_NAME
567 ,P_EXCEPTION_LEVEL => JTF_PLSQL_API.G_EXC_OTHERS
568 ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
569 ,X_MSG_COUNT => X_MSG_COUNT
570 ,X_MSG_DATA => X_MSG_DATA
571 ,X_RETURN_STATUS => X_RETURN_STATUS);
572 END;
573
574 End AST_SEARCH_RESULT_PVT;