[Home] [Help]
9: G_USER_ID NUMBER := FND_GLOBAL.USER_ID;
10:
11: PROCEDURE INSERT_HOST_APP(
12: p_api_version IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15:
16: p_host_app_id OUT NOCOPY jtf_prefab_host_apps.host_app_id%TYPE,
17: p_wsh_po_id IN jtf_prefab_host_apps.wsh_po_id%TYPE,
10:
11: PROCEDURE INSERT_HOST_APP(
12: p_api_version IN NUMBER,
13: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14: p_commit IN VARCHAR2 := FND_API.G_FALSE,
15:
16: p_host_app_id OUT NOCOPY jtf_prefab_host_apps.host_app_id%TYPE,
17: p_wsh_po_id IN jtf_prefab_host_apps.wsh_po_id%TYPE,
18: p_application_id IN jtf_prefab_host_apps.application_id%TYPE,
53: -- Standard Start of API savepoint
54: SAVEPOINT INSERT_HOST_APP;
55:
56: -- Standard call to check for call compatibility.
57: IF NOT FND_API.Compatible_API_Call (
58: l_api_version,
59: p_api_version,
60: l_api_name,
61: G_PKG_NAME)
59: p_api_version,
60: l_api_name,
61: G_PKG_NAME)
62: THEN
63: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
64: END IF;
65:
66: -- Initialize message list if p_init_msg_list is set to TRUE.
67: IF FND_API.To_Boolean( p_init_msg_list ) THEN
63: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
64: END IF;
65:
66: -- Initialize message list if p_init_msg_list is set to TRUE.
67: IF FND_API.To_Boolean( p_init_msg_list ) THEN
68: FND_MSG_PUB.initialize;
69: END IF;
70:
71: -- Initialize API return status to success
68: FND_MSG_PUB.initialize;
69: END IF;
70:
71: -- Initialize API return status to success
72: x_return_status := FND_API.G_RET_STS_SUCCESS;
73:
74: -- real logic --
75: ----------------
76:
180: -----------------------
181: -- end of real logic --
182:
183: -- Standard check of p_commit.
184: IF (FND_API.To_Boolean(p_commit)) THEN
185: COMMIT WORK;
186: END IF;
187:
188: -- Standard call to get message count and if count is 1, get message info.
190: p_count => x_msg_count,
191: p_data => x_msg_data );
192:
193: EXCEPTION
194: WHEN FND_API.G_EXC_ERROR THEN
195: ROLLBACK TO INSERT_HOST_APP;
196: x_return_status := FND_API.G_RET_STS_ERROR ;
197:
198: FND_MSG_PUB.Count_And_Get(
192:
193: EXCEPTION
194: WHEN FND_API.G_EXC_ERROR THEN
195: ROLLBACK TO INSERT_HOST_APP;
196: x_return_status := FND_API.G_RET_STS_ERROR ;
197:
198: FND_MSG_PUB.Count_And_Get(
199: p_count => x_msg_count,
200: p_data => x_msg_data );
198: FND_MSG_PUB.Count_And_Get(
199: p_count => x_msg_count,
200: p_data => x_msg_data );
201:
202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
203: ROLLBACK TO INSERT_HOST_APP;
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
205:
206: FND_MSG_PUB.Count_And_Get(
200: p_data => x_msg_data );
201:
202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
203: ROLLBACK TO INSERT_HOST_APP;
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
205:
206: FND_MSG_PUB.Count_And_Get(
207: p_count => x_msg_count,
208: p_data => x_msg_data );
208: p_data => x_msg_data );
209:
210: WHEN OTHERS THEN
211: ROLLBACK TO INSERT_HOST_APP;
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213:
214: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
215: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
216: END IF;
222: END INSERT_HOST_APP;
223:
224: PROCEDURE UPDATE_HOST_APP(
225: p_api_version IN NUMBER,
226: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
227: p_commit IN VARCHAR2 := FND_API.G_FALSE,
228:
229: p_host_app_id IN jtf_prefab_host_apps.host_app_id%TYPE,
230: p_cache_policy IN jtf_prefab_host_apps.cache_policy%TYPE,
223:
224: PROCEDURE UPDATE_HOST_APP(
225: p_api_version IN NUMBER,
226: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
227: p_commit IN VARCHAR2 := FND_API.G_FALSE,
228:
229: p_host_app_id IN jtf_prefab_host_apps.host_app_id%TYPE,
230: p_cache_policy IN jtf_prefab_host_apps.cache_policy%TYPE,
231: p_cache_clear_flag IN jtf_prefab_host_apps.cache_clear_flag%TYPE,
246: -- Standard Start of API savepoint
247: SAVEPOINT UPDATE_HOST_APP;
248:
249: -- Standard call to check for call compatibility.
250: IF NOT FND_API.Compatible_API_Call (
251: l_api_version,
252: p_api_version,
253: l_api_name,
254: G_PKG_NAME)
252: p_api_version,
253: l_api_name,
254: G_PKG_NAME)
255: THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: END IF;
258:
259: -- Initialize message list if p_init_msg_list is set to TRUE.
260: IF FND_API.To_Boolean( p_init_msg_list ) THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: END IF;
258:
259: -- Initialize message list if p_init_msg_list is set to TRUE.
260: IF FND_API.To_Boolean( p_init_msg_list ) THEN
261: FND_MSG_PUB.initialize;
262: END IF;
263:
264: -- Initialize API return status to success
261: FND_MSG_PUB.initialize;
262: END IF;
263:
264: -- Initialize API return status to success
265: x_return_status := FND_API.G_RET_STS_SUCCESS;
266:
267: -- real logic --
268: ----------------
269:
281: -----------------------
282: -- end of real logic --
283:
284: -- Standard check of p_commit.
285: IF (FND_API.To_Boolean(p_commit)) THEN
286: COMMIT WORK;
287: END IF;
288:
289: -- Standard call to get message count and if count is 1, get message info.
291: p_count => x_msg_count,
292: p_data => x_msg_data );
293:
294: EXCEPTION
295: WHEN FND_API.G_EXC_ERROR THEN
296: ROLLBACK TO UPDATE_HOST_APP;
297: x_return_status := FND_API.G_RET_STS_ERROR ;
298:
299: FND_MSG_PUB.Count_And_Get(
293:
294: EXCEPTION
295: WHEN FND_API.G_EXC_ERROR THEN
296: ROLLBACK TO UPDATE_HOST_APP;
297: x_return_status := FND_API.G_RET_STS_ERROR ;
298:
299: FND_MSG_PUB.Count_And_Get(
300: p_count => x_msg_count,
301: p_data => x_msg_data );
299: FND_MSG_PUB.Count_And_Get(
300: p_count => x_msg_count,
301: p_data => x_msg_data );
302:
303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
304: ROLLBACK TO UPDATE_HOST_APP;
305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
306:
307: FND_MSG_PUB.Count_And_Get(
301: p_data => x_msg_data );
302:
303: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
304: ROLLBACK TO UPDATE_HOST_APP;
305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
306:
307: FND_MSG_PUB.Count_And_Get(
308: p_count => x_msg_count,
309: p_data => x_msg_data );
309: p_data => x_msg_data );
310:
311: WHEN OTHERS THEN
312: ROLLBACK TO UPDATE_HOST_APP;
313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
314:
315: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
316: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
317: END IF;
323: END UPDATE_HOST_APP;
324:
325: procedure SELECT_HOST_APP_FOR_HOST(
326: p_api_version IN NUMBER,
327: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
328: p_host_app_id IN jtf_prefab_host_apps.host_app_id%TYPE,
329:
330: p_object_version_number OUT NOCOPY jtf_prefab_host_apps.object_version_number%TYPE,
331: p_wsh_po_id OUT NOCOPY jtf_prefab_host_apps.wsh_po_id%TYPE,
352:
353: BEGIN
354:
355: -- Standard call to check for call compatibility.
356: IF NOT FND_API.Compatible_API_Call (
357: l_api_version,
358: p_api_version,
359: l_api_name,
360: G_PKG_NAME)
358: p_api_version,
359: l_api_name,
360: G_PKG_NAME)
361: THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: END IF;
364:
365: -- Initialize message list if p_init_msg_list is set to TRUE.
366: IF FND_API.To_Boolean( p_init_msg_list ) THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: END IF;
364:
365: -- Initialize message list if p_init_msg_list is set to TRUE.
366: IF FND_API.To_Boolean( p_init_msg_list ) THEN
367: FND_MSG_PUB.initialize;
368: END IF;
369:
370: -- Initialize API return status to success
367: FND_MSG_PUB.initialize;
368: END IF;
369:
370: -- Initialize API return status to success
371: x_return_status := FND_API.G_RET_STS_SUCCESS;
372: x_msg_count := 0;
373: x_msg_data := 'S';
374:
375:
404:
405:
406: procedure DELETE_HOST_APP(
407: p_api_version IN NUMBER,
408: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
409: p_commit IN VARCHAR2 := FND_API.G_FALSE,
410:
411: p_host_app_id IN jtf_prefab_host_apps.host_app_id%TYPE,
412:
405:
406: procedure DELETE_HOST_APP(
407: p_api_version IN NUMBER,
408: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
409: p_commit IN VARCHAR2 := FND_API.G_FALSE,
410:
411: p_host_app_id IN jtf_prefab_host_apps.host_app_id%TYPE,
412:
413: p_object_version_number IN jtf_prefab_host_apps.object_version_number%TYPE,
423: -- Standard Start of API savepoint
424: SAVEPOINT DELETE_HOST_APP;
425:
426: -- Standard call to check for call compatibility.
427: IF NOT FND_API.Compatible_API_Call (
428: l_api_version,
429: p_api_version,
430: l_api_name,
431: G_PKG_NAME)
429: p_api_version,
430: l_api_name,
431: G_PKG_NAME)
432: THEN
433: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
434: END IF;
435:
436: -- Initialize message list if p_init_msg_list is set to TRUE.
437: IF FND_API.To_Boolean( p_init_msg_list ) THEN
433: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
434: END IF;
435:
436: -- Initialize message list if p_init_msg_list is set to TRUE.
437: IF FND_API.To_Boolean( p_init_msg_list ) THEN
438: FND_MSG_PUB.initialize;
439: END IF;
440:
441: -- Initialize API return status to success
438: FND_MSG_PUB.initialize;
439: END IF;
440:
441: -- Initialize API return status to success
442: x_return_status := FND_API.G_RET_STS_SUCCESS;
443:
444: -- real logic --
445: ----------------
446:
468: -----------------------
469: -- end of real logic --
470:
471: -- Standard check of p_commit.
472: IF (FND_API.To_Boolean(p_commit)) THEN
473: COMMIT WORK;
474: END IF;
475:
476: -- Standard call to get message count and if count is 1, get message info.
478: p_count => x_msg_count,
479: p_data => x_msg_data );
480:
481: EXCEPTION
482: WHEN FND_API.G_EXC_ERROR THEN
483: ROLLBACK TO DELETE_HOST_APP;
484: x_return_status := FND_API.G_RET_STS_ERROR ;
485:
486: FND_MSG_PUB.Count_And_Get(
480:
481: EXCEPTION
482: WHEN FND_API.G_EXC_ERROR THEN
483: ROLLBACK TO DELETE_HOST_APP;
484: x_return_status := FND_API.G_RET_STS_ERROR ;
485:
486: FND_MSG_PUB.Count_And_Get(
487: p_count => x_msg_count,
488: p_data => x_msg_data );
486: FND_MSG_PUB.Count_And_Get(
487: p_count => x_msg_count,
488: p_data => x_msg_data );
489:
490: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
491: ROLLBACK TO DELETE_HOST_APP;
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493:
494: FND_MSG_PUB.Count_And_Get(
488: p_data => x_msg_data );
489:
490: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
491: ROLLBACK TO DELETE_HOST_APP;
492: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
493:
494: FND_MSG_PUB.Count_And_Get(
495: p_count => x_msg_count,
496: p_data => x_msg_data );
496: p_data => x_msg_data );
497:
498: WHEN OTHERS THEN
499: ROLLBACK TO DELETE_HOST_APP;
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
501:
502: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
503: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
504: END IF;
510: END DELETE_HOST_APP;
511:
512: procedure DELETE_HOST_APPS_FOR_HOST(
513: p_api_version IN NUMBER,
514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
515: p_commit IN VARCHAR2 := FND_API.G_FALSE,
516:
517: p_wsh_po_id IN jtf_prefab_host_apps.wsh_po_id%TYPE,
518:
511:
512: procedure DELETE_HOST_APPS_FOR_HOST(
513: p_api_version IN NUMBER,
514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
515: p_commit IN VARCHAR2 := FND_API.G_FALSE,
516:
517: p_wsh_po_id IN jtf_prefab_host_apps.wsh_po_id%TYPE,
518:
519: p_object_version_number IN jtf_prefab_host_apps.object_version_number%TYPE,
534: -- Standard Start of API savepoint
535: SAVEPOINT DELETE_HOST_APPS_FOR_HOST;
536:
537: -- Standard call to check for call compatibility.
538: IF NOT FND_API.Compatible_API_Call (
539: l_api_version,
540: p_api_version,
541: l_api_name,
542: G_PKG_NAME)
540: p_api_version,
541: l_api_name,
542: G_PKG_NAME)
543: THEN
544: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
545: END IF;
546:
547: -- Initialize message list if p_init_msg_list is set to TRUE.
548: IF FND_API.To_Boolean( p_init_msg_list ) THEN
544: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
545: END IF;
546:
547: -- Initialize message list if p_init_msg_list is set to TRUE.
548: IF FND_API.To_Boolean( p_init_msg_list ) THEN
549: FND_MSG_PUB.initialize;
550: END IF;
551:
552: -- Initialize API return status to success
549: FND_MSG_PUB.initialize;
550: END IF;
551:
552: -- Initialize API return status to success
553: x_return_status := FND_API.G_RET_STS_SUCCESS;
554:
555: -- real logic --
556: ----------------
557:
575: -----------------------
576: -- end of real logic --
577:
578: -- Standard check of p_commit.
579: IF (FND_API.To_Boolean(p_commit)) THEN
580: COMMIT WORK;
581: END IF;
582:
583: -- Standard call to get message count and if count is 1, get message info.
585: p_count => x_msg_count,
586: p_data => x_msg_data );
587:
588: EXCEPTION
589: WHEN FND_API.G_EXC_ERROR THEN
590: ROLLBACK TO DELETE_HOST_APPS_FOR_HOST;
591: x_return_status := FND_API.G_RET_STS_ERROR ;
592:
593: FND_MSG_PUB.Count_And_Get(
587:
588: EXCEPTION
589: WHEN FND_API.G_EXC_ERROR THEN
590: ROLLBACK TO DELETE_HOST_APPS_FOR_HOST;
591: x_return_status := FND_API.G_RET_STS_ERROR ;
592:
593: FND_MSG_PUB.Count_And_Get(
594: p_count => x_msg_count,
595: p_data => x_msg_data );
593: FND_MSG_PUB.Count_And_Get(
594: p_count => x_msg_count,
595: p_data => x_msg_data );
596:
597: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
598: ROLLBACK TO DELETE_HOST_APPS_FOR_HOST;
599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
600:
601: FND_MSG_PUB.Count_And_Get(
595: p_data => x_msg_data );
596:
597: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
598: ROLLBACK TO DELETE_HOST_APPS_FOR_HOST;
599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
600:
601: FND_MSG_PUB.Count_And_Get(
602: p_count => x_msg_count,
603: p_data => x_msg_data );
603: p_data => x_msg_data );
604:
605: WHEN OTHERS THEN
606: ROLLBACK TO DELETE_HOST_APPS_FOR_HOST;
607: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
608:
609: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
610: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
611: END IF;
617: END DELETE_HOST_APPS_FOR_HOST;
618:
619: PROCEDURE INSERT_CACHE_COMP(
620: p_api_version IN NUMBER,
621: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
622: p_commit IN VARCHAR2 := FND_API.G_FALSE,
623:
624: p_ca_comp_id OUT NOCOPY jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
625: p_application_id IN jtf_prefab_ca_comps_b.application_id%TYPE,
618:
619: PROCEDURE INSERT_CACHE_COMP(
620: p_api_version IN NUMBER,
621: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
622: p_commit IN VARCHAR2 := FND_API.G_FALSE,
623:
624: p_ca_comp_id OUT NOCOPY jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
625: p_application_id IN jtf_prefab_ca_comps_b.application_id%TYPE,
626: p_comp_name IN jtf_prefab_ca_comps_b.comp_name%TYPE,
663: -- Standard Start of API savepoint
664: SAVEPOINT INSERT_CACHE_COMP;
665:
666: -- Standard call to check for call compatibility.
667: IF NOT FND_API.Compatible_API_Call (
668: l_api_version,
669: p_api_version,
670: l_api_name,
671: G_PKG_NAME)
669: p_api_version,
670: l_api_name,
671: G_PKG_NAME)
672: THEN
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END IF;
675:
676: -- Initialize message list if p_init_msg_list is set to TRUE.
677: IF FND_API.To_Boolean( p_init_msg_list ) THEN
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END IF;
675:
676: -- Initialize message list if p_init_msg_list is set to TRUE.
677: IF FND_API.To_Boolean( p_init_msg_list ) THEN
678: FND_MSG_PUB.initialize;
679: END IF;
680:
681: -- Initialize API return status to success
678: FND_MSG_PUB.initialize;
679: END IF;
680:
681: -- Initialize API return status to success
682: x_return_status := FND_API.G_RET_STS_SUCCESS;
683:
684: -- real logic --
685: ----------------
686:
809: -----------------------
810: -- end of real logic --
811:
812: -- Standard check of p_commit.
813: IF (FND_API.To_Boolean(p_commit)) THEN
814: COMMIT WORK;
815: END IF;
816:
817: -- Standard call to get message count and if count is 1, get message info.
819: p_count => x_msg_count,
820: p_data => x_msg_data );
821:
822: EXCEPTION
823: WHEN FND_API.G_EXC_ERROR THEN
824: ROLLBACK TO INSERT_CACHE_COMP;
825: x_return_status := FND_API.G_RET_STS_ERROR ;
826:
827: FND_MSG_PUB.Count_And_Get(
821:
822: EXCEPTION
823: WHEN FND_API.G_EXC_ERROR THEN
824: ROLLBACK TO INSERT_CACHE_COMP;
825: x_return_status := FND_API.G_RET_STS_ERROR ;
826:
827: FND_MSG_PUB.Count_And_Get(
828: p_count => x_msg_count,
829: p_data => x_msg_data );
827: FND_MSG_PUB.Count_And_Get(
828: p_count => x_msg_count,
829: p_data => x_msg_data );
830:
831: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
832: ROLLBACK TO INSERT_CACHE_COMP;
833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
834:
835: FND_MSG_PUB.Count_And_Get(
829: p_data => x_msg_data );
830:
831: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
832: ROLLBACK TO INSERT_CACHE_COMP;
833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
834:
835: FND_MSG_PUB.Count_And_Get(
836: p_count => x_msg_count,
837: p_data => x_msg_data );
837: p_data => x_msg_data );
838:
839: WHEN OTHERS THEN
840: ROLLBACK TO INSERT_CACHE_COMP;
841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
842:
843: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
844: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
845: END IF;
851: END INSERT_CACHE_COMP;
852:
853: PROCEDURE UPDATE_CACHE_COMP(
854: p_api_version IN NUMBER,
855: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
856: p_commit IN VARCHAR2 := FND_API.G_FALSE,
857:
858: p_ca_comp_id IN jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
859: p_application_id IN jtf_prefab_ca_comps_b.application_id%TYPE,
852:
853: PROCEDURE UPDATE_CACHE_COMP(
854: p_api_version IN NUMBER,
855: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
856: p_commit IN VARCHAR2 := FND_API.G_FALSE,
857:
858: p_ca_comp_id IN jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
859: p_application_id IN jtf_prefab_ca_comps_b.application_id%TYPE,
860: p_comp_name IN jtf_prefab_ca_comps_b.comp_name%TYPE,
884: -- Standard Start of API savepoint
885: SAVEPOINT UPDATE_CACHE_COMP;
886:
887: -- Standard call to check for call compatibility.
888: IF NOT FND_API.Compatible_API_Call (
889: l_api_version,
890: p_api_version,
891: l_api_name,
892: G_PKG_NAME)
890: p_api_version,
891: l_api_name,
892: G_PKG_NAME)
893: THEN
894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
895: END IF;
896:
897: -- Initialize message list if p_init_msg_list is set to TRUE.
898: IF FND_API.To_Boolean( p_init_msg_list ) THEN
894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
895: END IF;
896:
897: -- Initialize message list if p_init_msg_list is set to TRUE.
898: IF FND_API.To_Boolean( p_init_msg_list ) THEN
899: FND_MSG_PUB.initialize;
900: END IF;
901:
902: -- Initialize API return status to success
899: FND_MSG_PUB.initialize;
900: END IF;
901:
902: -- Initialize API return status to success
903: x_return_status := FND_API.G_RET_STS_SUCCESS;
904:
905: -- real logic --
906: ----------------
907:
947: -----------------------
948: -- end of real logic --
949:
950: -- Standard check of p_commit.
951: IF (FND_API.To_Boolean(p_commit)) THEN
952: COMMIT WORK;
953: END IF;
954:
955: -- Standard call to get message count and if count is 1, get message info.
957: p_count => x_msg_count,
958: p_data => x_msg_data );
959:
960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN
962: ROLLBACK TO UPDATE_CACHE_COMP;
963: x_return_status := FND_API.G_RET_STS_ERROR ;
964:
965: FND_MSG_PUB.Count_And_Get(
959:
960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN
962: ROLLBACK TO UPDATE_CACHE_COMP;
963: x_return_status := FND_API.G_RET_STS_ERROR ;
964:
965: FND_MSG_PUB.Count_And_Get(
966: p_count => x_msg_count,
967: p_data => x_msg_data );
965: FND_MSG_PUB.Count_And_Get(
966: p_count => x_msg_count,
967: p_data => x_msg_data );
968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: ROLLBACK TO UPDATE_CACHE_COMP;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
972:
973: FND_MSG_PUB.Count_And_Get(
967: p_data => x_msg_data );
968:
969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
970: ROLLBACK TO UPDATE_CACHE_COMP;
971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
972:
973: FND_MSG_PUB.Count_And_Get(
974: p_count => x_msg_count,
975: p_data => x_msg_data );
975: p_data => x_msg_data );
976:
977: WHEN OTHERS THEN
978: ROLLBACK TO UPDATE_CACHE_COMP;
979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
980:
981: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
982: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
983: END IF;
989: END UPDATE_CACHE_COMP;
990:
991: PROCEDURE UPDATE_CACHE_COMP_1(
992: p_api_version IN NUMBER,
993: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
994: p_commit IN VARCHAR2 := FND_API.G_FALSE,
995:
996: p_ca_comp_id IN jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
997:
990:
991: PROCEDURE UPDATE_CACHE_COMP_1(
992: p_api_version IN NUMBER,
993: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
994: p_commit IN VARCHAR2 := FND_API.G_FALSE,
995:
996: p_ca_comp_id IN jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
997:
998: -- p_object_version_number IN OUT NOCOPY jtf_prefab_ca_comps_b.object_version_number%TYPE,
1009: -- Standard Start of API savepoint
1010: SAVEPOINT UPDATE_CACHE_COMP_1;
1011:
1012: -- Standard call to check for call compatibility.
1013: IF NOT FND_API.Compatible_API_Call (
1014: l_api_version,
1015: p_api_version,
1016: l_api_name,
1017: G_PKG_NAME)
1015: p_api_version,
1016: l_api_name,
1017: G_PKG_NAME)
1018: THEN
1019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1020: END IF;
1021:
1022: -- Initialize message list if p_init_msg_list is set to TRUE.
1023: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1020: END IF;
1021:
1022: -- Initialize message list if p_init_msg_list is set to TRUE.
1023: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1024: FND_MSG_PUB.initialize;
1025: END IF;
1026:
1027: -- Initialize API return status to success
1024: FND_MSG_PUB.initialize;
1025: END IF;
1026:
1027: -- Initialize API return status to success
1028: x_return_status := FND_API.G_RET_STS_SUCCESS;
1029:
1030: -- real logic --
1031: ----------------
1032: -- Passing values for ca_comp_id and last_updated_by columns
1037: -----------------------
1038: -- end of real logic --
1039:
1040: -- Standard check of p_commit.
1041: IF (FND_API.To_Boolean(p_commit)) THEN
1042: COMMIT WORK;
1043: END IF;
1044:
1045: -- Standard call to get message count and if count is 1, get message info.
1047: p_count => x_msg_count,
1048: p_data => x_msg_data );
1049:
1050: EXCEPTION
1051: WHEN FND_API.G_EXC_ERROR THEN
1052: ROLLBACK TO UPDATE_CACHE_COMP_1;
1053: x_return_status := FND_API.G_RET_STS_ERROR ;
1054:
1055: FND_MSG_PUB.Count_And_Get(
1049:
1050: EXCEPTION
1051: WHEN FND_API.G_EXC_ERROR THEN
1052: ROLLBACK TO UPDATE_CACHE_COMP_1;
1053: x_return_status := FND_API.G_RET_STS_ERROR ;
1054:
1055: FND_MSG_PUB.Count_And_Get(
1056: p_count => x_msg_count,
1057: p_data => x_msg_data );
1055: FND_MSG_PUB.Count_And_Get(
1056: p_count => x_msg_count,
1057: p_data => x_msg_data );
1058:
1059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1060: ROLLBACK TO UPDATE_CACHE_COMP_1;
1061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1062:
1063: FND_MSG_PUB.Count_And_Get(
1057: p_data => x_msg_data );
1058:
1059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1060: ROLLBACK TO UPDATE_CACHE_COMP_1;
1061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1062:
1063: FND_MSG_PUB.Count_And_Get(
1064: p_count => x_msg_count,
1065: p_data => x_msg_data );
1065: p_data => x_msg_data );
1066:
1067: WHEN OTHERS THEN
1068: ROLLBACK TO UPDATE_CACHE_COMP_1;
1069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1070:
1071: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1072: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1073: END IF;
1079: END UPDATE_CACHE_COMP_1;
1080:
1081: procedure DELETE_CACHE_COMP(
1082: p_api_version IN NUMBER,
1083: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1084: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1085:
1086: p_ca_comp_id IN jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
1087:
1080:
1081: procedure DELETE_CACHE_COMP(
1082: p_api_version IN NUMBER,
1083: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1084: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1085:
1086: p_ca_comp_id IN jtf_prefab_ca_comps_b.ca_comp_id%TYPE,
1087:
1088: p_object_version_number IN jtf_prefab_ca_comps_b.object_version_number%TYPE,
1098: -- Standard Start of API savepoint
1099: SAVEPOINT DELETE_CACHE_COMP;
1100:
1101: -- Standard call to check for call compatibility.
1102: IF NOT FND_API.Compatible_API_Call (
1103: l_api_version,
1104: p_api_version,
1105: l_api_name,
1106: G_PKG_NAME)
1104: p_api_version,
1105: l_api_name,
1106: G_PKG_NAME)
1107: THEN
1108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1109: END IF;
1110:
1111: -- Initialize message list if p_init_msg_list is set to TRUE.
1112: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1109: END IF;
1110:
1111: -- Initialize message list if p_init_msg_list is set to TRUE.
1112: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1113: FND_MSG_PUB.initialize;
1114: END IF;
1115:
1116: -- Initialize API return status to success
1113: FND_MSG_PUB.initialize;
1114: END IF;
1115:
1116: -- Initialize API return status to success
1117: x_return_status := FND_API.G_RET_STS_SUCCESS;
1118:
1119: -- real logic --
1120: ----------------
1121:
1139: -----------------------
1140: -- end of real logic --
1141:
1142: -- Standard check of p_commit.
1143: IF (FND_API.To_Boolean(p_commit)) THEN
1144: COMMIT WORK;
1145: END IF;
1146:
1147: -- Standard call to get message count and if count is 1, get message info.
1149: p_count => x_msg_count,
1150: p_data => x_msg_data );
1151:
1152: EXCEPTION
1153: WHEN FND_API.G_EXC_ERROR THEN
1154: ROLLBACK TO DELETE_CACHE_COMP;
1155: x_return_status := FND_API.G_RET_STS_ERROR ;
1156:
1157: FND_MSG_PUB.Count_And_Get(
1151:
1152: EXCEPTION
1153: WHEN FND_API.G_EXC_ERROR THEN
1154: ROLLBACK TO DELETE_CACHE_COMP;
1155: x_return_status := FND_API.G_RET_STS_ERROR ;
1156:
1157: FND_MSG_PUB.Count_And_Get(
1158: p_count => x_msg_count,
1159: p_data => x_msg_data );
1157: FND_MSG_PUB.Count_And_Get(
1158: p_count => x_msg_count,
1159: p_data => x_msg_data );
1160:
1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1162: ROLLBACK TO DELETE_CACHE_COMP;
1163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1164:
1165: FND_MSG_PUB.Count_And_Get(
1159: p_data => x_msg_data );
1160:
1161: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1162: ROLLBACK TO DELETE_CACHE_COMP;
1163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1164:
1165: FND_MSG_PUB.Count_And_Get(
1166: p_count => x_msg_count,
1167: p_data => x_msg_data );
1167: p_data => x_msg_data );
1168:
1169: WHEN OTHERS THEN
1170: ROLLBACK TO DELETE_CACHE_COMP;
1171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1172:
1173: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1174: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1175: END IF;
1181: END DELETE_CACHE_COMP;
1182:
1183: PROCEDURE INSERT_HA_COMP(
1184: p_api_version IN NUMBER,
1185: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1186: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1187:
1188: p_ha_comp_id OUT NOCOPY jtf_prefab_ha_comps.ha_comp_id%TYPE,
1189: p_host_app_id IN jtf_prefab_ha_comps.host_app_id%TYPE,
1182:
1183: PROCEDURE INSERT_HA_COMP(
1184: p_api_version IN NUMBER,
1185: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1186: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1187:
1188: p_ha_comp_id OUT NOCOPY jtf_prefab_ha_comps.ha_comp_id%TYPE,
1189: p_host_app_id IN jtf_prefab_ha_comps.host_app_id%TYPE,
1190: p_ca_comp_id IN jtf_prefab_ha_comps.ca_comp_id%TYPE,
1208: -- Standard Start of API savepoint
1209: SAVEPOINT INSERT_HA_COMP;
1210:
1211: -- Standard call to check for call compatibility.
1212: IF NOT FND_API.Compatible_API_Call (
1213: l_api_version,
1214: p_api_version,
1215: l_api_name,
1216: G_PKG_NAME)
1214: p_api_version,
1215: l_api_name,
1216: G_PKG_NAME)
1217: THEN
1218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1219: END IF;
1220:
1221: -- Initialize message list if p_init_msg_list is set to TRUE.
1222: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1219: END IF;
1220:
1221: -- Initialize message list if p_init_msg_list is set to TRUE.
1222: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1223: FND_MSG_PUB.initialize;
1224: END IF;
1225:
1226: -- Initialize API return status to success
1223: FND_MSG_PUB.initialize;
1224: END IF;
1225:
1226: -- Initialize API return status to success
1227: x_return_status := FND_API.G_RET_STS_SUCCESS;
1228:
1229: -- real logic --
1230: ----------------
1231:
1264: -----------------------
1265: -- end of real logic --
1266:
1267: -- Standard check of p_commit.
1268: IF (FND_API.To_Boolean(p_commit)) THEN
1269: COMMIT WORK;
1270: END IF;
1271:
1272: -- Standard call to get message count and if count is 1, get message info.
1274: p_count => x_msg_count,
1275: p_data => x_msg_data );
1276:
1277: EXCEPTION
1278: WHEN FND_API.G_EXC_ERROR THEN
1279: ROLLBACK TO INSERT_HA_COMP;
1280: x_return_status := FND_API.G_RET_STS_ERROR ;
1281:
1282: FND_MSG_PUB.Count_And_Get(
1276:
1277: EXCEPTION
1278: WHEN FND_API.G_EXC_ERROR THEN
1279: ROLLBACK TO INSERT_HA_COMP;
1280: x_return_status := FND_API.G_RET_STS_ERROR ;
1281:
1282: FND_MSG_PUB.Count_And_Get(
1283: p_count => x_msg_count,
1284: p_data => x_msg_data );
1282: FND_MSG_PUB.Count_And_Get(
1283: p_count => x_msg_count,
1284: p_data => x_msg_data );
1285:
1286: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1287: ROLLBACK TO INSERT_HA_COMP;
1288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1289:
1290: FND_MSG_PUB.Count_And_Get(
1284: p_data => x_msg_data );
1285:
1286: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1287: ROLLBACK TO INSERT_HA_COMP;
1288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1289:
1290: FND_MSG_PUB.Count_And_Get(
1291: p_count => x_msg_count,
1292: p_data => x_msg_data );
1292: p_data => x_msg_data );
1293:
1294: WHEN OTHERS THEN
1295: ROLLBACK TO INSERT_HA_COMP;
1296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1297:
1298: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1299: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1300: END IF;
1306: END INSERT_HA_COMP;
1307:
1308: PROCEDURE UPDATE_HA_COMP(
1309: p_api_version IN NUMBER,
1310: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1311: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1312:
1313: p_ha_comp_id IN jtf_prefab_ha_comps.ha_comp_id%TYPE,
1314: p_cache_policy IN jtf_prefab_ha_comps.cache_policy%TYPE,
1307:
1308: PROCEDURE UPDATE_HA_COMP(
1309: p_api_version IN NUMBER,
1310: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1311: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1312:
1313: p_ha_comp_id IN jtf_prefab_ha_comps.ha_comp_id%TYPE,
1314: p_cache_policy IN jtf_prefab_ha_comps.cache_policy%TYPE,
1315: p_cache_clear_flag IN jtf_prefab_ha_comps.cache_clear_flag%TYPE,
1329: -- Standard Start of API savepoint
1330: SAVEPOINT UPDATE_HA_COMP;
1331:
1332: -- Standard call to check for call compatibility.
1333: IF NOT FND_API.Compatible_API_Call (
1334: l_api_version,
1335: p_api_version,
1336: l_api_name,
1337: G_PKG_NAME)
1335: p_api_version,
1336: l_api_name,
1337: G_PKG_NAME)
1338: THEN
1339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1340: END IF;
1341:
1342: -- Initialize message list if p_init_msg_list is set to TRUE.
1343: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1340: END IF;
1341:
1342: -- Initialize message list if p_init_msg_list is set to TRUE.
1343: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1344: FND_MSG_PUB.initialize;
1345: END IF;
1346:
1347: -- Initialize API return status to success
1344: FND_MSG_PUB.initialize;
1345: END IF;
1346:
1347: -- Initialize API return status to success
1348: x_return_status := FND_API.G_RET_STS_SUCCESS;
1349:
1350: -- real logic --
1351: ----------------
1352:
1363: -----------------------
1364: -- end of real logic --
1365:
1366: -- Standard check of p_commit.
1367: IF (FND_API.To_Boolean(p_commit)) THEN
1368: COMMIT WORK;
1369: END IF;
1370:
1371: -- Standard call to get message count and if count is 1, get message info.
1373: p_count => x_msg_count,
1374: p_data => x_msg_data );
1375:
1376: EXCEPTION
1377: WHEN FND_API.G_EXC_ERROR THEN
1378: ROLLBACK TO UPDATE_HA_COMP;
1379: x_return_status := FND_API.G_RET_STS_ERROR ;
1380:
1381: FND_MSG_PUB.Count_And_Get(
1375:
1376: EXCEPTION
1377: WHEN FND_API.G_EXC_ERROR THEN
1378: ROLLBACK TO UPDATE_HA_COMP;
1379: x_return_status := FND_API.G_RET_STS_ERROR ;
1380:
1381: FND_MSG_PUB.Count_And_Get(
1382: p_count => x_msg_count,
1383: p_data => x_msg_data );
1381: FND_MSG_PUB.Count_And_Get(
1382: p_count => x_msg_count,
1383: p_data => x_msg_data );
1384:
1385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1386: ROLLBACK TO UPDATE_HA_COMP;
1387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1388:
1389: FND_MSG_PUB.Count_And_Get(
1383: p_data => x_msg_data );
1384:
1385: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1386: ROLLBACK TO UPDATE_HA_COMP;
1387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1388:
1389: FND_MSG_PUB.Count_And_Get(
1390: p_count => x_msg_count,
1391: p_data => x_msg_data );
1391: p_data => x_msg_data );
1392:
1393: WHEN OTHERS THEN
1394: ROLLBACK TO UPDATE_HA_COMP;
1395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1396:
1397: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1398: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1399: END IF;
1405: END UPDATE_HA_COMP;
1406:
1407: procedure DELETE_HA_COMPS_FOR_HOST_APP(
1408: p_api_version IN NUMBER,
1409: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1410: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1411:
1412: p_host_app_id IN jtf_prefab_ha_comps.host_app_id%TYPE,
1413:
1406:
1407: procedure DELETE_HA_COMPS_FOR_HOST_APP(
1408: p_api_version IN NUMBER,
1409: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1410: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1411:
1412: p_host_app_id IN jtf_prefab_ha_comps.host_app_id%TYPE,
1413:
1414: p_object_version_number IN jtf_prefab_ha_comps.object_version_number%TYPE,
1424: -- Standard Start of API savepoint
1425: SAVEPOINT DELETE_HA_COMPS_FOR_HOST_APP;
1426:
1427: -- Standard call to check for call compatibility.
1428: IF NOT FND_API.Compatible_API_Call (
1429: l_api_version,
1430: p_api_version,
1431: l_api_name,
1432: G_PKG_NAME)
1430: p_api_version,
1431: l_api_name,
1432: G_PKG_NAME)
1433: THEN
1434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1435: END IF;
1436:
1437: -- Initialize message list if p_init_msg_list is set to TRUE.
1438: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1434: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1435: END IF;
1436:
1437: -- Initialize message list if p_init_msg_list is set to TRUE.
1438: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1439: FND_MSG_PUB.initialize;
1440: END IF;
1441:
1442: -- Initialize API return status to success
1439: FND_MSG_PUB.initialize;
1440: END IF;
1441:
1442: -- Initialize API return status to success
1443: x_return_status := FND_API.G_RET_STS_SUCCESS;
1444:
1445: -- real logic --
1446: ----------------
1447:
1451: -----------------------
1452: -- end of real logic --
1453:
1454: -- Standard check of p_commit.
1455: IF (FND_API.To_Boolean(p_commit)) THEN
1456: COMMIT WORK;
1457: END IF;
1458:
1459: -- Standard call to get message count and if count is 1, get message info.
1461: p_count => x_msg_count,
1462: p_data => x_msg_data );
1463:
1464: EXCEPTION
1465: WHEN FND_API.G_EXC_ERROR THEN
1466: ROLLBACK TO DELETE_HA_COMPS_FOR_HOST_APP;
1467: x_return_status := FND_API.G_RET_STS_ERROR ;
1468:
1469: FND_MSG_PUB.Count_And_Get(
1463:
1464: EXCEPTION
1465: WHEN FND_API.G_EXC_ERROR THEN
1466: ROLLBACK TO DELETE_HA_COMPS_FOR_HOST_APP;
1467: x_return_status := FND_API.G_RET_STS_ERROR ;
1468:
1469: FND_MSG_PUB.Count_And_Get(
1470: p_count => x_msg_count,
1471: p_data => x_msg_data );
1469: FND_MSG_PUB.Count_And_Get(
1470: p_count => x_msg_count,
1471: p_data => x_msg_data );
1472:
1473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1474: ROLLBACK TO DELETE_HA_COMPS_FOR_HOST_APP;
1475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1476:
1477: FND_MSG_PUB.Count_And_Get(
1471: p_data => x_msg_data );
1472:
1473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1474: ROLLBACK TO DELETE_HA_COMPS_FOR_HOST_APP;
1475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1476:
1477: FND_MSG_PUB.Count_And_Get(
1478: p_count => x_msg_count,
1479: p_data => x_msg_data );
1479: p_data => x_msg_data );
1480:
1481: WHEN OTHERS THEN
1482: ROLLBACK TO DELETE_HA_COMPS_FOR_HOST_APP;
1483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1484:
1485: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1486: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1487: END IF;
1493: END DELETE_HA_COMPS_FOR_HOST_APP;
1494:
1495: procedure DELETE_HA_COMPS_FOR_CACHE_COMP(
1496: p_api_version IN NUMBER,
1497: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1498: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1499:
1500: p_ca_comp_id IN jtf_prefab_ha_comps.ca_comp_id%TYPE,
1501:
1494:
1495: procedure DELETE_HA_COMPS_FOR_CACHE_COMP(
1496: p_api_version IN NUMBER,
1497: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1498: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1499:
1500: p_ca_comp_id IN jtf_prefab_ha_comps.ca_comp_id%TYPE,
1501:
1502: p_object_version_number IN jtf_prefab_ha_comps.object_version_number%TYPE,
1512: -- Standard Start of API savepoint
1513: SAVEPOINT DELETE_HA_COMPS_FOR_CACHE_COMP;
1514:
1515: -- Standard call to check for call compatibility.
1516: IF NOT FND_API.Compatible_API_Call (
1517: l_api_version,
1518: p_api_version,
1519: l_api_name,
1520: G_PKG_NAME)
1518: p_api_version,
1519: l_api_name,
1520: G_PKG_NAME)
1521: THEN
1522: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1523: END IF;
1524:
1525: -- Initialize message list if p_init_msg_list is set to TRUE.
1526: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1522: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1523: END IF;
1524:
1525: -- Initialize message list if p_init_msg_list is set to TRUE.
1526: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1527: FND_MSG_PUB.initialize;
1528: END IF;
1529:
1530: -- Initialize API return status to success
1527: FND_MSG_PUB.initialize;
1528: END IF;
1529:
1530: -- Initialize API return status to success
1531: x_return_status := FND_API.G_RET_STS_SUCCESS;
1532:
1533: -- real logic --
1534: ----------------
1535:
1539: -----------------------
1540: -- end of real logic --
1541:
1542: -- Standard check of p_commit.
1543: IF (FND_API.To_Boolean(p_commit)) THEN
1544: COMMIT WORK;
1545: END IF;
1546:
1547: -- Standard call to get message count and if count is 1, get message info.
1549: p_count => x_msg_count,
1550: p_data => x_msg_data );
1551:
1552: EXCEPTION
1553: WHEN FND_API.G_EXC_ERROR THEN
1554: ROLLBACK TO DELETE_HA_COMPS_FOR_CACHE_COMP;
1555: x_return_status := FND_API.G_RET_STS_ERROR ;
1556:
1557: FND_MSG_PUB.Count_And_Get(
1551:
1552: EXCEPTION
1553: WHEN FND_API.G_EXC_ERROR THEN
1554: ROLLBACK TO DELETE_HA_COMPS_FOR_CACHE_COMP;
1555: x_return_status := FND_API.G_RET_STS_ERROR ;
1556:
1557: FND_MSG_PUB.Count_And_Get(
1558: p_count => x_msg_count,
1559: p_data => x_msg_data );
1557: FND_MSG_PUB.Count_And_Get(
1558: p_count => x_msg_count,
1559: p_data => x_msg_data );
1560:
1561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1562: ROLLBACK TO DELETE_HA_COMPS_FOR_CACHE_COMP;
1563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1564:
1565: FND_MSG_PUB.Count_And_Get(
1559: p_data => x_msg_data );
1560:
1561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1562: ROLLBACK TO DELETE_HA_COMPS_FOR_CACHE_COMP;
1563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1564:
1565: FND_MSG_PUB.Count_And_Get(
1566: p_count => x_msg_count,
1567: p_data => x_msg_data );
1567: p_data => x_msg_data );
1568:
1569: WHEN OTHERS THEN
1570: ROLLBACK TO DELETE_HA_COMPS_FOR_CACHE_COMP;
1571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1572:
1573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1574: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1575: END IF;
1581: END DELETE_HA_COMPS_FOR_CACHE_COMP;
1582:
1583: PROCEDURE INSERT_CACHE_STAT(
1584: p_api_version IN NUMBER,
1585: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1586: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1587:
1588: p_cache_stat_id OUT NOCOPY jtf_prefab_cache_stats.cache_stat_id%TYPE,
1589: p_security_group_id IN jtf_prefab_cache_stats.security_group_id%TYPE,
1582:
1583: PROCEDURE INSERT_CACHE_STAT(
1584: p_api_version IN NUMBER,
1585: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1586: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1587:
1588: p_cache_stat_id OUT NOCOPY jtf_prefab_cache_stats.cache_stat_id%TYPE,
1589: p_security_group_id IN jtf_prefab_cache_stats.security_group_id%TYPE,
1590: p_wsh_po_id IN jtf_prefab_cache_stats.wsh_po_id%TYPE,
1616: -- Standard Start of API savepoint
1617: SAVEPOINT INSERT_CACHE_STAT;
1618:
1619: -- Standard call to check for call compatibility.
1620: IF NOT FND_API.Compatible_API_Call (
1621: l_api_version,
1622: p_api_version,
1623: l_api_name,
1624: G_PKG_NAME)
1622: p_api_version,
1623: l_api_name,
1624: G_PKG_NAME)
1625: THEN
1626: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1627: END IF;
1628:
1629: -- Initialize message list if p_init_msg_list is set to TRUE.
1630: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1626: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1627: END IF;
1628:
1629: -- Initialize message list if p_init_msg_list is set to TRUE.
1630: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1631: FND_MSG_PUB.initialize;
1632: END IF;
1633:
1634: -- Initialize API return status to success
1631: FND_MSG_PUB.initialize;
1632: END IF;
1633:
1634: -- Initialize API return status to success
1635: x_return_status := FND_API.G_RET_STS_SUCCESS;
1636:
1637: -- real logic --
1638: ----------------
1639:
1687: -----------------------
1688: -- end of real logic --
1689:
1690: -- Standard check of p_commit.
1691: IF (FND_API.To_Boolean(p_commit)) THEN
1692: COMMIT WORK;
1693: END IF;
1694:
1695: -- Standard call to get message count and if count is 1, get message info.
1697: p_count => x_msg_count,
1698: p_data => x_msg_data );
1699:
1700: EXCEPTION
1701: WHEN FND_API.G_EXC_ERROR THEN
1702: ROLLBACK TO INSERT_CACHE_STAT;
1703: x_return_status := FND_API.G_RET_STS_ERROR ;
1704:
1705: FND_MSG_PUB.Count_And_Get(
1699:
1700: EXCEPTION
1701: WHEN FND_API.G_EXC_ERROR THEN
1702: ROLLBACK TO INSERT_CACHE_STAT;
1703: x_return_status := FND_API.G_RET_STS_ERROR ;
1704:
1705: FND_MSG_PUB.Count_And_Get(
1706: p_count => x_msg_count,
1707: p_data => x_msg_data );
1705: FND_MSG_PUB.Count_And_Get(
1706: p_count => x_msg_count,
1707: p_data => x_msg_data );
1708:
1709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1710: ROLLBACK TO INSERT_CACHE_STAT;
1711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1712:
1713: FND_MSG_PUB.Count_And_Get(
1707: p_data => x_msg_data );
1708:
1709: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1710: ROLLBACK TO INSERT_CACHE_STAT;
1711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1712:
1713: FND_MSG_PUB.Count_And_Get(
1714: p_count => x_msg_count,
1715: p_data => x_msg_data );
1715: p_data => x_msg_data );
1716:
1717: WHEN OTHERS THEN
1718: ROLLBACK TO INSERT_CACHE_STAT;
1719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1720:
1721: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1722: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1723: END IF;
1728: END INSERT_CACHE_STAT;
1729:
1730: PROCEDURE UPDATE_CACHE_STAT(
1731: p_api_version IN NUMBER,
1732: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1733: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1734:
1735: p_cache_stat_id IN jtf_prefab_cache_stats.cache_stat_id%TYPE,
1736: p_security_group_id IN jtf_prefab_cache_stats.security_group_id%TYPE,
1729:
1730: PROCEDURE UPDATE_CACHE_STAT(
1731: p_api_version IN NUMBER,
1732: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1733: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1734:
1735: p_cache_stat_id IN jtf_prefab_cache_stats.cache_stat_id%TYPE,
1736: p_security_group_id IN jtf_prefab_cache_stats.security_group_id%TYPE,
1737: p_wsh_po_id IN jtf_prefab_cache_stats.wsh_po_id%TYPE,
1761: -- Standard Start of API savepoint
1762: SAVEPOINT UPDATE_CACHE_STAT;
1763:
1764: -- Standard call to check for call compatibility.
1765: IF NOT FND_API.Compatible_API_Call (
1766: l_api_version,
1767: p_api_version,
1768: l_api_name,
1769: G_PKG_NAME)
1767: p_api_version,
1768: l_api_name,
1769: G_PKG_NAME)
1770: THEN
1771: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1772: END IF;
1773:
1774: -- Initialize message list if p_init_msg_list is set to TRUE.
1775: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1771: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1772: END IF;
1773:
1774: -- Initialize message list if p_init_msg_list is set to TRUE.
1775: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1776: FND_MSG_PUB.initialize;
1777: END IF;
1778:
1779: -- Initialize API return status to success
1776: FND_MSG_PUB.initialize;
1777: END IF;
1778:
1779: -- Initialize API return status to success
1780: x_return_status := FND_API.G_RET_STS_SUCCESS;
1781:
1782: -- real logic --
1783: ----------------
1784:
1807: -----------------------
1808: -- end of real logic --
1809:
1810: -- Standard check of p_commit.
1811: IF (FND_API.To_Boolean(p_commit)) THEN
1812: COMMIT WORK;
1813: END IF;
1814:
1815: -- Standard call to get message count and if count is 1, get message info.
1817: p_count => x_msg_count,
1818: p_data => x_msg_data );
1819:
1820: EXCEPTION
1821: WHEN FND_API.G_EXC_ERROR THEN
1822: ROLLBACK TO UPDATE_CACHE_STAT;
1823: x_return_status := FND_API.G_RET_STS_ERROR ;
1824:
1825: FND_MSG_PUB.Count_And_Get(
1819:
1820: EXCEPTION
1821: WHEN FND_API.G_EXC_ERROR THEN
1822: ROLLBACK TO UPDATE_CACHE_STAT;
1823: x_return_status := FND_API.G_RET_STS_ERROR ;
1824:
1825: FND_MSG_PUB.Count_And_Get(
1826: p_count => x_msg_count,
1827: p_data => x_msg_data );
1825: FND_MSG_PUB.Count_And_Get(
1826: p_count => x_msg_count,
1827: p_data => x_msg_data );
1828:
1829: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1830: ROLLBACK TO UPDATE_CACHE_STAT;
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1832:
1833: FND_MSG_PUB.Count_And_Get(
1827: p_data => x_msg_data );
1828:
1829: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1830: ROLLBACK TO UPDATE_CACHE_STAT;
1831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1832:
1833: FND_MSG_PUB.Count_And_Get(
1834: p_count => x_msg_count,
1835: p_data => x_msg_data );
1835: p_data => x_msg_data );
1836:
1837: WHEN OTHERS THEN
1838: ROLLBACK TO UPDATE_CACHE_STAT;
1839: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1840:
1841: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1842: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1843: END IF;
1849: END UPDATE_CACHE_STAT;
1850:
1851: procedure DELETE_CACHE_STAT(
1852: p_api_version IN NUMBER,
1853: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1854: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1855:
1856: x_return_status OUT NOCOPY VARCHAR2,
1857: x_msg_count OUT NOCOPY NUMBER,
1850:
1851: procedure DELETE_CACHE_STAT(
1852: p_api_version IN NUMBER,
1853: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1854: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1855:
1856: x_return_status OUT NOCOPY VARCHAR2,
1857: x_msg_count OUT NOCOPY NUMBER,
1858: x_msg_data OUT NOCOPY VARCHAR2
1864: -- Standard Start of API savepoint
1865: SAVEPOINT DELETE_CACHE_STAT;
1866:
1867: -- Standard call to check for call compatibility.
1868: IF NOT FND_API.Compatible_API_Call (
1869: l_api_version,
1870: p_api_version,
1871: l_api_name,
1872: G_PKG_NAME)
1870: p_api_version,
1871: l_api_name,
1872: G_PKG_NAME)
1873: THEN
1874: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1875: END IF;
1876:
1877: -- Initialize message list if p_init_msg_list is set to TRUE.
1878: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1874: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1875: END IF;
1876:
1877: -- Initialize message list if p_init_msg_list is set to TRUE.
1878: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1879: FND_MSG_PUB.initialize;
1880: END IF;
1881:
1882: -- Initialize API return status to success
1879: FND_MSG_PUB.initialize;
1880: END IF;
1881:
1882: -- Initialize API return status to success
1883: x_return_status := FND_API.G_RET_STS_SUCCESS;
1884:
1885: -- real logic --
1886: ----------------
1887:
1893: -----------------------
1894: -- end of real logic --
1895:
1896: -- Standard check of p_commit.
1897: IF (FND_API.To_Boolean(p_commit)) THEN
1898: COMMIT WORK;
1899: END IF;
1900:
1901: -- Standard call to get message count and if count is 1, get message info.
1903: p_count => x_msg_count,
1904: p_data => x_msg_data );
1905:
1906: EXCEPTION
1907: WHEN FND_API.G_EXC_ERROR THEN
1908: ROLLBACK TO DELETE_CACHE_STAT;
1909: x_return_status := FND_API.G_RET_STS_ERROR ;
1910:
1911: FND_MSG_PUB.Count_And_Get(
1905:
1906: EXCEPTION
1907: WHEN FND_API.G_EXC_ERROR THEN
1908: ROLLBACK TO DELETE_CACHE_STAT;
1909: x_return_status := FND_API.G_RET_STS_ERROR ;
1910:
1911: FND_MSG_PUB.Count_And_Get(
1912: p_count => x_msg_count,
1913: p_data => x_msg_data );
1911: FND_MSG_PUB.Count_And_Get(
1912: p_count => x_msg_count,
1913: p_data => x_msg_data );
1914:
1915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1916: ROLLBACK TO DELETE_CACHE_STAT;
1917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1918:
1919: FND_MSG_PUB.Count_And_Get(
1913: p_data => x_msg_data );
1914:
1915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1916: ROLLBACK TO DELETE_CACHE_STAT;
1917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1918:
1919: FND_MSG_PUB.Count_And_Get(
1920: p_count => x_msg_count,
1921: p_data => x_msg_data );
1921: p_data => x_msg_data );
1922:
1923: WHEN OTHERS THEN
1924: ROLLBACK TO DELETE_CACHE_STAT;
1925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1926:
1927: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1928: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1929: END IF;
1936:
1937:
1938: procedure RESET_CACHE_STAT(
1939: p_api_version IN NUMBER,
1940: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1941: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1942: p_wsh_po_id IN NUMBER,
1943: p_ca_comp_id IN NUMBER,
1944:
1937:
1938: procedure RESET_CACHE_STAT(
1939: p_api_version IN NUMBER,
1940: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1941: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1942: p_wsh_po_id IN NUMBER,
1943: p_ca_comp_id IN NUMBER,
1944:
1945: x_return_status OUT NOCOPY VARCHAR2,
1953: -- Standard Start of API savepoint
1954: SAVEPOINT RESET_CACHE_STAT;
1955:
1956: -- Standard call to check for call compatibility.
1957: IF NOT FND_API.Compatible_API_Call (
1958: l_api_version,
1959: p_api_version,
1960: l_api_name,
1961: G_PKG_NAME)
1959: p_api_version,
1960: l_api_name,
1961: G_PKG_NAME)
1962: THEN
1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1964: END IF;
1965:
1966: -- Initialize message list if p_init_msg_list is set to TRUE.
1967: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1964: END IF;
1965:
1966: -- Initialize message list if p_init_msg_list is set to TRUE.
1967: IF FND_API.To_Boolean( p_init_msg_list ) THEN
1968: FND_MSG_PUB.initialize;
1969: END IF;
1970:
1971: -- Initialize API return status to success
1968: FND_MSG_PUB.initialize;
1969: END IF;
1970:
1971: -- Initialize API return status to success
1972: x_return_status := FND_API.G_RET_STS_SUCCESS;
1973:
1974: -- real logic --
1975: ----------------
1976:
1989: -----------------------
1990: -- end of real logic --
1991:
1992: -- Standard check of p_commit.
1993: IF (FND_API.To_Boolean(p_commit)) THEN
1994: COMMIT WORK;
1995: END IF;
1996:
1997: -- Standard call to get message count and if count is 1, get message info.
1999: p_count => x_msg_count,
2000: p_data => x_msg_data );
2001:
2002: EXCEPTION
2003: WHEN FND_API.G_EXC_ERROR THEN
2004: ROLLBACK TO RESET_CACHE_STAT;
2005: x_return_status := FND_API.G_RET_STS_ERROR ;
2006:
2007: FND_MSG_PUB.Count_And_Get(
2001:
2002: EXCEPTION
2003: WHEN FND_API.G_EXC_ERROR THEN
2004: ROLLBACK TO RESET_CACHE_STAT;
2005: x_return_status := FND_API.G_RET_STS_ERROR ;
2006:
2007: FND_MSG_PUB.Count_And_Get(
2008: p_count => x_msg_count,
2009: p_data => x_msg_data );
2007: FND_MSG_PUB.Count_And_Get(
2008: p_count => x_msg_count,
2009: p_data => x_msg_data );
2010:
2011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2012: ROLLBACK TO RESET_CACHE_STAT;
2013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2014:
2015: FND_MSG_PUB.Count_And_Get(
2009: p_data => x_msg_data );
2010:
2011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2012: ROLLBACK TO RESET_CACHE_STAT;
2013: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2014:
2015: FND_MSG_PUB.Count_And_Get(
2016: p_count => x_msg_count,
2017: p_data => x_msg_data );
2017: p_data => x_msg_data );
2018:
2019: WHEN OTHERS THEN
2020: ROLLBACK TO RESET_CACHE_STAT;
2021: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2022:
2023: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2024: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2025: END IF;
2032:
2033:
2034: PROCEDURE INSERT_CA_FILTER(
2035: p_api_version IN NUMBER,
2036: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2037: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2038:
2039: p_ca_filter_id OUT NOCOPY jtf_prefab_ca_filters_b.ca_filter_id%TYPE,
2040: p_application_id IN jtf_prefab_ca_filters_b.application_id%TYPE,
2033:
2034: PROCEDURE INSERT_CA_FILTER(
2035: p_api_version IN NUMBER,
2036: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2037: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2038:
2039: p_ca_filter_id OUT NOCOPY jtf_prefab_ca_filters_b.ca_filter_id%TYPE,
2040: p_application_id IN jtf_prefab_ca_filters_b.application_id%TYPE,
2041: p_ca_filter_name IN jtf_prefab_ca_filters_b.ca_filter_name%TYPE,
2064: -- Standard Start of API savepoint
2065: SAVEPOINT INSERT_CA_FILTER;
2066:
2067: -- Standard call to check for call compatibility.
2068: IF NOT FND_API.Compatible_API_Call (
2069: l_api_version,
2070: p_api_version,
2071: l_api_name,
2072: G_PKG_NAME)
2070: p_api_version,
2071: l_api_name,
2072: G_PKG_NAME)
2073: THEN
2074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2075: END IF;
2076:
2077: -- Initialize message list if p_init_msg_list is set to TRUE.
2078: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2074: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2075: END IF;
2076:
2077: -- Initialize message list if p_init_msg_list is set to TRUE.
2078: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2079: FND_MSG_PUB.initialize;
2080: END IF;
2081:
2082: -- Initialize API return status to success
2079: FND_MSG_PUB.initialize;
2080: END IF;
2081:
2082: -- Initialize API return status to success
2083: x_return_status := FND_API.G_RET_STS_SUCCESS;
2084:
2085: -- real logic --
2086: ----------------
2087:
2128: -----------------------
2129: -- end of real logic --
2130:
2131: -- Standard check of p_commit.
2132: IF (FND_API.To_Boolean(p_commit)) THEN
2133: COMMIT WORK;
2134: END IF;
2135:
2136: -- Standard call to get message count and if count is 1, get message info.
2138: p_count => x_msg_count,
2139: p_data => x_msg_data );
2140:
2141: EXCEPTION
2142: WHEN FND_API.G_EXC_ERROR THEN
2143: ROLLBACK TO INSERT_CA_FILTER;
2144: x_return_status := FND_API.G_RET_STS_ERROR ;
2145:
2146: FND_MSG_PUB.Count_And_Get(
2140:
2141: EXCEPTION
2142: WHEN FND_API.G_EXC_ERROR THEN
2143: ROLLBACK TO INSERT_CA_FILTER;
2144: x_return_status := FND_API.G_RET_STS_ERROR ;
2145:
2146: FND_MSG_PUB.Count_And_Get(
2147: p_count => x_msg_count,
2148: p_data => x_msg_data );
2146: FND_MSG_PUB.Count_And_Get(
2147: p_count => x_msg_count,
2148: p_data => x_msg_data );
2149:
2150: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2151: ROLLBACK TO INSERT_CA_FILTER;
2152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2153:
2154: FND_MSG_PUB.Count_And_Get(
2148: p_data => x_msg_data );
2149:
2150: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2151: ROLLBACK TO INSERT_CA_FILTER;
2152: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2153:
2154: FND_MSG_PUB.Count_And_Get(
2155: p_count => x_msg_count,
2156: p_data => x_msg_data );
2156: p_data => x_msg_data );
2157:
2158: WHEN OTHERS THEN
2159: ROLLBACK TO INSERT_CA_FILTER;
2160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2161:
2162: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2163: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2164: END IF;
2170: END INSERT_CA_FILTER;
2171:
2172: PROCEDURE UPDATE_CA_FILTER(
2173: p_api_version IN NUMBER,
2174: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2175: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2176:
2177: p_ca_filter_id IN jtf_prefab_ca_filters_b.ca_filter_id%TYPE,
2178: p_application_id IN jtf_prefab_ca_filters_b.application_id%TYPE,
2171:
2172: PROCEDURE UPDATE_CA_FILTER(
2173: p_api_version IN NUMBER,
2174: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2175: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2176:
2177: p_ca_filter_id IN jtf_prefab_ca_filters_b.ca_filter_id%TYPE,
2178: p_application_id IN jtf_prefab_ca_filters_b.application_id%TYPE,
2179: p_ca_filter_name IN jtf_prefab_ca_filters_b.ca_filter_name%TYPE,
2193: -- Standard Start of API savepoint
2194: SAVEPOINT UPDATE_CA_FILTER;
2195:
2196: -- Standard call to check for call compatibility.
2197: IF NOT FND_API.Compatible_API_Call (
2198: l_api_version,
2199: p_api_version,
2200: l_api_name,
2201: G_PKG_NAME)
2199: p_api_version,
2200: l_api_name,
2201: G_PKG_NAME)
2202: THEN
2203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2204: END IF;
2205:
2206: -- Initialize message list if p_init_msg_list is set to TRUE.
2207: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2204: END IF;
2205:
2206: -- Initialize message list if p_init_msg_list is set to TRUE.
2207: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2208: FND_MSG_PUB.initialize;
2209: END IF;
2210:
2211: -- Initialize API return status to success
2208: FND_MSG_PUB.initialize;
2209: END IF;
2210:
2211: -- Initialize API return status to success
2212: x_return_status := FND_API.G_RET_STS_SUCCESS;
2213:
2214: -- real logic --
2215: ----------------
2216:
2227: -----------------------
2228: -- end of real logic --
2229:
2230: -- Standard check of p_commit.
2231: IF (FND_API.To_Boolean(p_commit)) THEN
2232: COMMIT WORK;
2233: END IF;
2234:
2235: -- Standard call to get message count and if count is 1, get message info.
2237: p_count => x_msg_count,
2238: p_data => x_msg_data );
2239:
2240: EXCEPTION
2241: WHEN FND_API.G_EXC_ERROR THEN
2242: ROLLBACK TO UPDATE_CA_FILTER;
2243: x_return_status := FND_API.G_RET_STS_ERROR ;
2244:
2245: FND_MSG_PUB.Count_And_Get(
2239:
2240: EXCEPTION
2241: WHEN FND_API.G_EXC_ERROR THEN
2242: ROLLBACK TO UPDATE_CA_FILTER;
2243: x_return_status := FND_API.G_RET_STS_ERROR ;
2244:
2245: FND_MSG_PUB.Count_And_Get(
2246: p_count => x_msg_count,
2247: p_data => x_msg_data );
2245: FND_MSG_PUB.Count_And_Get(
2246: p_count => x_msg_count,
2247: p_data => x_msg_data );
2248:
2249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2250: ROLLBACK TO UPDATE_CA_FILTER;
2251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2252:
2253: FND_MSG_PUB.Count_And_Get(
2247: p_data => x_msg_data );
2248:
2249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2250: ROLLBACK TO UPDATE_CA_FILTER;
2251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2252:
2253: FND_MSG_PUB.Count_And_Get(
2254: p_count => x_msg_count,
2255: p_data => x_msg_data );
2255: p_data => x_msg_data );
2256:
2257: WHEN OTHERS THEN
2258: ROLLBACK TO UPDATE_CA_FILTER;
2259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2260:
2261: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2262: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2263: END IF;
2269: END UPDATE_CA_FILTER;
2270:
2271: procedure DELETE_CA_FILTER(
2272: p_api_version IN NUMBER,
2273: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2274: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2275:
2276: p_ca_filter_id IN jtf_prefab_ca_filters_b.ca_filter_id%TYPE,
2277:
2270:
2271: procedure DELETE_CA_FILTER(
2272: p_api_version IN NUMBER,
2273: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2274: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2275:
2276: p_ca_filter_id IN jtf_prefab_ca_filters_b.ca_filter_id%TYPE,
2277:
2278: p_object_version_number IN jtf_prefab_ca_filters_b.object_version_number%TYPE,
2288: -- Standard Start of API savepoint
2289: SAVEPOINT DELETE_CA_FILTER;
2290:
2291: -- Standard call to check for call compatibility.
2292: IF NOT FND_API.Compatible_API_Call (
2293: l_api_version,
2294: p_api_version,
2295: l_api_name,
2296: G_PKG_NAME)
2294: p_api_version,
2295: l_api_name,
2296: G_PKG_NAME)
2297: THEN
2298: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2299: END IF;
2300:
2301: -- Initialize message list if p_init_msg_list is set to TRUE.
2302: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2298: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2299: END IF;
2300:
2301: -- Initialize message list if p_init_msg_list is set to TRUE.
2302: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2303: FND_MSG_PUB.initialize;
2304: END IF;
2305:
2306: -- Initialize API return status to success
2303: FND_MSG_PUB.initialize;
2304: END IF;
2305:
2306: -- Initialize API return status to success
2307: x_return_status := FND_API.G_RET_STS_SUCCESS;
2308:
2309: -- real logic --
2310: ----------------
2311:
2339: -----------------------
2340: -- end of real logic --
2341:
2342: -- Standard check of p_commit.
2343: IF (FND_API.To_Boolean(p_commit)) THEN
2344: COMMIT WORK;
2345: END IF;
2346:
2347: -- Standard call to get message count and if count is 1, get message info.
2349: p_count => x_msg_count,
2350: p_data => x_msg_data );
2351:
2352: EXCEPTION
2353: WHEN FND_API.G_EXC_ERROR THEN
2354: ROLLBACK TO DELETE_CA_FILTER;
2355: x_return_status := FND_API.G_RET_STS_ERROR ;
2356:
2357: FND_MSG_PUB.Count_And_Get(
2351:
2352: EXCEPTION
2353: WHEN FND_API.G_EXC_ERROR THEN
2354: ROLLBACK TO DELETE_CA_FILTER;
2355: x_return_status := FND_API.G_RET_STS_ERROR ;
2356:
2357: FND_MSG_PUB.Count_And_Get(
2358: p_count => x_msg_count,
2359: p_data => x_msg_data );
2357: FND_MSG_PUB.Count_And_Get(
2358: p_count => x_msg_count,
2359: p_data => x_msg_data );
2360:
2361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2362: ROLLBACK TO DELETE_CA_FILTER;
2363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2364:
2365: FND_MSG_PUB.Count_And_Get(
2359: p_data => x_msg_data );
2360:
2361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2362: ROLLBACK TO DELETE_CA_FILTER;
2363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2364:
2365: FND_MSG_PUB.Count_And_Get(
2366: p_count => x_msg_count,
2367: p_data => x_msg_data );
2367: p_data => x_msg_data );
2368:
2369: WHEN OTHERS THEN
2370: ROLLBACK TO DELETE_CA_FILTER;
2371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2372:
2373: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2374: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2375: END IF;
2381: END DELETE_CA_FILTER;
2382:
2383: PROCEDURE INSERT_HA_FILTER(
2384: p_api_version IN NUMBER,
2385: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2386: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2387:
2388: p_ha_filter_id OUT NOCOPY jtf_prefab_ha_filters.ha_filter_id%TYPE,
2389: p_host_app_id IN jtf_prefab_ha_filters.host_app_id%TYPE,
2382:
2383: PROCEDURE INSERT_HA_FILTER(
2384: p_api_version IN NUMBER,
2385: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2386: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2387:
2388: p_ha_filter_id OUT NOCOPY jtf_prefab_ha_filters.ha_filter_id%TYPE,
2389: p_host_app_id IN jtf_prefab_ha_filters.host_app_id%TYPE,
2390: p_ca_filter_id IN jtf_prefab_ha_filters.ca_filter_id%TYPE,
2406: -- Standard Start of API savepoint
2407: SAVEPOINT INSERT_HA_FILTER;
2408:
2409: -- Standard call to check for call compatibility.
2410: IF NOT FND_API.Compatible_API_Call (
2411: l_api_version,
2412: p_api_version,
2413: l_api_name,
2414: G_PKG_NAME)
2412: p_api_version,
2413: l_api_name,
2414: G_PKG_NAME)
2415: THEN
2416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2417: END IF;
2418:
2419: -- Initialize message list if p_init_msg_list is set to TRUE.
2420: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2417: END IF;
2418:
2419: -- Initialize message list if p_init_msg_list is set to TRUE.
2420: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2421: FND_MSG_PUB.initialize;
2422: END IF;
2423:
2424: -- Initialize API return status to success
2421: FND_MSG_PUB.initialize;
2422: END IF;
2423:
2424: -- Initialize API return status to success
2425: x_return_status := FND_API.G_RET_STS_SUCCESS;
2426:
2427: -- real logic --
2428: ----------------
2429:
2458: -----------------------
2459: -- end of real logic --
2460:
2461: -- Standard check of p_commit.
2462: IF (FND_API.To_Boolean(p_commit)) THEN
2463: COMMIT WORK;
2464: END IF;
2465:
2466: -- Standard call to get message count and if count is 1, get message info.
2468: p_count => x_msg_count,
2469: p_data => x_msg_data );
2470:
2471: EXCEPTION
2472: WHEN FND_API.G_EXC_ERROR THEN
2473: ROLLBACK TO INSERT_HA_FILTER;
2474: x_return_status := FND_API.G_RET_STS_ERROR ;
2475:
2476: FND_MSG_PUB.Count_And_Get(
2470:
2471: EXCEPTION
2472: WHEN FND_API.G_EXC_ERROR THEN
2473: ROLLBACK TO INSERT_HA_FILTER;
2474: x_return_status := FND_API.G_RET_STS_ERROR ;
2475:
2476: FND_MSG_PUB.Count_And_Get(
2477: p_count => x_msg_count,
2478: p_data => x_msg_data );
2476: FND_MSG_PUB.Count_And_Get(
2477: p_count => x_msg_count,
2478: p_data => x_msg_data );
2479:
2480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2481: ROLLBACK TO INSERT_HA_FILTER;
2482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2483:
2484: FND_MSG_PUB.Count_And_Get(
2478: p_data => x_msg_data );
2479:
2480: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2481: ROLLBACK TO INSERT_HA_FILTER;
2482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2483:
2484: FND_MSG_PUB.Count_And_Get(
2485: p_count => x_msg_count,
2486: p_data => x_msg_data );
2486: p_data => x_msg_data );
2487:
2488: WHEN OTHERS THEN
2489: ROLLBACK TO INSERT_HA_FILTER;
2490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2491:
2492: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2493: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2494: END IF;
2500: END INSERT_HA_FILTER;
2501:
2502: PROCEDURE UPDATE_HA_FILTER(
2503: p_api_version IN NUMBER,
2504: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2505: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2506:
2507: p_ha_filter_id IN jtf_prefab_ha_filters.ha_filter_id%TYPE,
2508: p_cache_filter_enabled_flag IN jtf_prefab_ha_filters.cache_filter_enabled_flag%TYPE,
2501:
2502: PROCEDURE UPDATE_HA_FILTER(
2503: p_api_version IN NUMBER,
2504: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2505: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2506:
2507: p_ha_filter_id IN jtf_prefab_ha_filters.ha_filter_id%TYPE,
2508: p_cache_filter_enabled_flag IN jtf_prefab_ha_filters.cache_filter_enabled_flag%TYPE,
2509:
2521: -- Standard Start of API savepoint
2522: SAVEPOINT UPDATE_HA_FILTER;
2523:
2524: -- Standard call to check for call compatibility.
2525: IF NOT FND_API.Compatible_API_Call (
2526: l_api_version,
2527: p_api_version,
2528: l_api_name,
2529: G_PKG_NAME)
2527: p_api_version,
2528: l_api_name,
2529: G_PKG_NAME)
2530: THEN
2531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2532: END IF;
2533:
2534: -- Initialize message list if p_init_msg_list is set to TRUE.
2535: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2532: END IF;
2533:
2534: -- Initialize message list if p_init_msg_list is set to TRUE.
2535: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2536: FND_MSG_PUB.initialize;
2537: END IF;
2538:
2539: -- Initialize API return status to success
2536: FND_MSG_PUB.initialize;
2537: END IF;
2538:
2539: -- Initialize API return status to success
2540: x_return_status := FND_API.G_RET_STS_SUCCESS;
2541:
2542: -- real logic --
2543: ----------------
2544:
2553: -----------------------
2554: -- end of real logic --
2555:
2556: -- Standard check of p_commit.
2557: IF (FND_API.To_Boolean(p_commit)) THEN
2558: COMMIT WORK;
2559: END IF;
2560:
2561: -- Standard call to get message count and if count is 1, get message info.
2563: p_count => x_msg_count,
2564: p_data => x_msg_data );
2565:
2566: EXCEPTION
2567: WHEN FND_API.G_EXC_ERROR THEN
2568: ROLLBACK TO UPDATE_HA_FILTER;
2569: x_return_status := FND_API.G_RET_STS_ERROR ;
2570:
2571: FND_MSG_PUB.Count_And_Get(
2565:
2566: EXCEPTION
2567: WHEN FND_API.G_EXC_ERROR THEN
2568: ROLLBACK TO UPDATE_HA_FILTER;
2569: x_return_status := FND_API.G_RET_STS_ERROR ;
2570:
2571: FND_MSG_PUB.Count_And_Get(
2572: p_count => x_msg_count,
2573: p_data => x_msg_data );
2571: FND_MSG_PUB.Count_And_Get(
2572: p_count => x_msg_count,
2573: p_data => x_msg_data );
2574:
2575: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2576: ROLLBACK TO UPDATE_HA_FILTER;
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2578:
2579: FND_MSG_PUB.Count_And_Get(
2573: p_data => x_msg_data );
2574:
2575: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2576: ROLLBACK TO UPDATE_HA_FILTER;
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2578:
2579: FND_MSG_PUB.Count_And_Get(
2580: p_count => x_msg_count,
2581: p_data => x_msg_data );
2581: p_data => x_msg_data );
2582:
2583: WHEN OTHERS THEN
2584: ROLLBACK TO UPDATE_HA_FILTER;
2585: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2586:
2587: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2588: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2589: END IF;
2595: END UPDATE_HA_FILTER;
2596:
2597: procedure DELETE_HA_FILTERS_F_HOST_APP(
2598: p_api_version IN NUMBER,
2599: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2600: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2601:
2602: p_host_app_id IN jtf_prefab_ha_filters.host_app_id%TYPE,
2603:
2596:
2597: procedure DELETE_HA_FILTERS_F_HOST_APP(
2598: p_api_version IN NUMBER,
2599: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2600: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2601:
2602: p_host_app_id IN jtf_prefab_ha_filters.host_app_id%TYPE,
2603:
2604: p_object_version_number IN jtf_prefab_ha_filters.object_version_number%TYPE,
2614: -- Standard Start of API savepoint
2615: SAVEPOINT DELETE_HA_FILTERS_F_HOST_APP;
2616:
2617: -- Standard call to check for call compatibility.
2618: IF NOT FND_API.Compatible_API_Call (
2619: l_api_version,
2620: p_api_version,
2621: l_api_name,
2622: G_PKG_NAME)
2620: p_api_version,
2621: l_api_name,
2622: G_PKG_NAME)
2623: THEN
2624: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2625: END IF;
2626:
2627: -- Initialize message list if p_init_msg_list is set to TRUE.
2628: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2624: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2625: END IF;
2626:
2627: -- Initialize message list if p_init_msg_list is set to TRUE.
2628: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2629: FND_MSG_PUB.initialize;
2630: END IF;
2631:
2632: -- Initialize API return status to success
2629: FND_MSG_PUB.initialize;
2630: END IF;
2631:
2632: -- Initialize API return status to success
2633: x_return_status := FND_API.G_RET_STS_SUCCESS;
2634:
2635: -- real logic --
2636: ----------------
2637:
2641: -----------------------
2642: -- end of real logic --
2643:
2644: -- Standard check of p_commit.
2645: IF (FND_API.To_Boolean(p_commit)) THEN
2646: COMMIT WORK;
2647: END IF;
2648:
2649: -- Standard call to get message count and if count is 1, get message info.
2651: p_count => x_msg_count,
2652: p_data => x_msg_data );
2653:
2654: EXCEPTION
2655: WHEN FND_API.G_EXC_ERROR THEN
2656: ROLLBACK TO DELETE_HA_FILTERS_F_HOST_APP;
2657: x_return_status := FND_API.G_RET_STS_ERROR ;
2658:
2659: FND_MSG_PUB.Count_And_Get(
2653:
2654: EXCEPTION
2655: WHEN FND_API.G_EXC_ERROR THEN
2656: ROLLBACK TO DELETE_HA_FILTERS_F_HOST_APP;
2657: x_return_status := FND_API.G_RET_STS_ERROR ;
2658:
2659: FND_MSG_PUB.Count_And_Get(
2660: p_count => x_msg_count,
2661: p_data => x_msg_data );
2659: FND_MSG_PUB.Count_And_Get(
2660: p_count => x_msg_count,
2661: p_data => x_msg_data );
2662:
2663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2664: ROLLBACK TO DELETE_HA_FILTERS_F_HOST_APP;
2665: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2666:
2667: FND_MSG_PUB.Count_And_Get(
2661: p_data => x_msg_data );
2662:
2663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2664: ROLLBACK TO DELETE_HA_FILTERS_F_HOST_APP;
2665: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2666:
2667: FND_MSG_PUB.Count_And_Get(
2668: p_count => x_msg_count,
2669: p_data => x_msg_data );
2669: p_data => x_msg_data );
2670:
2671: WHEN OTHERS THEN
2672: ROLLBACK TO DELETE_HA_FILTERS_F_HOST_APP;
2673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2674:
2675: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2676: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2677: END IF;
2683: END DELETE_HA_FILTERS_F_HOST_APP;
2684:
2685: procedure DELETE_HA_FILTERS_F_CA_FILTER(
2686: p_api_version IN NUMBER,
2687: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2688: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2689:
2690: p_ca_filter_id IN jtf_prefab_ha_filters.ca_filter_id%TYPE,
2691:
2684:
2685: procedure DELETE_HA_FILTERS_F_CA_FILTER(
2686: p_api_version IN NUMBER,
2687: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2688: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2689:
2690: p_ca_filter_id IN jtf_prefab_ha_filters.ca_filter_id%TYPE,
2691:
2692: p_object_version_number IN jtf_prefab_ha_filters.object_version_number%TYPE,
2702: -- Standard Start of API savepoint
2703: SAVEPOINT DELETE_HA_FILTERS_F_CA_FILTER;
2704:
2705: -- Standard call to check for call compatibility.
2706: IF NOT FND_API.Compatible_API_Call (
2707: l_api_version,
2708: p_api_version,
2709: l_api_name,
2710: G_PKG_NAME)
2708: p_api_version,
2709: l_api_name,
2710: G_PKG_NAME)
2711: THEN
2712: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2713: END IF;
2714:
2715: -- Initialize message list if p_init_msg_list is set to TRUE.
2716: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2712: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2713: END IF;
2714:
2715: -- Initialize message list if p_init_msg_list is set to TRUE.
2716: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2717: FND_MSG_PUB.initialize;
2718: END IF;
2719:
2720: -- Initialize API return status to success
2717: FND_MSG_PUB.initialize;
2718: END IF;
2719:
2720: -- Initialize API return status to success
2721: x_return_status := FND_API.G_RET_STS_SUCCESS;
2722:
2723: -- real logic --
2724: ----------------
2725:
2729: -----------------------
2730: -- end of real logic --
2731:
2732: -- Standard check of p_commit.
2733: IF (FND_API.To_Boolean(p_commit)) THEN
2734: COMMIT WORK;
2735: END IF;
2736:
2737: -- Standard call to get message count and if count is 1, get message info.
2739: p_count => x_msg_count,
2740: p_data => x_msg_data );
2741:
2742: EXCEPTION
2743: WHEN FND_API.G_EXC_ERROR THEN
2744: ROLLBACK TO DELETE_HA_FILTERS_F_CA_FILTER;
2745: x_return_status := FND_API.G_RET_STS_ERROR ;
2746:
2747: FND_MSG_PUB.Count_And_Get(
2741:
2742: EXCEPTION
2743: WHEN FND_API.G_EXC_ERROR THEN
2744: ROLLBACK TO DELETE_HA_FILTERS_F_CA_FILTER;
2745: x_return_status := FND_API.G_RET_STS_ERROR ;
2746:
2747: FND_MSG_PUB.Count_And_Get(
2748: p_count => x_msg_count,
2749: p_data => x_msg_data );
2747: FND_MSG_PUB.Count_And_Get(
2748: p_count => x_msg_count,
2749: p_data => x_msg_data );
2750:
2751: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2752: ROLLBACK TO DELETE_HA_FILTERS_F_CA_FILTER;
2753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2754:
2755: FND_MSG_PUB.Count_And_Get(
2749: p_data => x_msg_data );
2750:
2751: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2752: ROLLBACK TO DELETE_HA_FILTERS_F_CA_FILTER;
2753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2754:
2755: FND_MSG_PUB.Count_And_Get(
2756: p_count => x_msg_count,
2757: p_data => x_msg_data );
2757: p_data => x_msg_data );
2758:
2759: WHEN OTHERS THEN
2760: ROLLBACK TO DELETE_HA_FILTERS_F_CA_FILTER;
2761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2762:
2763: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2764: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2765: END IF;
2771: END DELETE_HA_FILTERS_F_CA_FILTER;
2772:
2773: PROCEDURE INSERT_CA_FL_RESP(
2774: p_api_version IN NUMBER,
2775: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2776: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2777:
2778: p_ca_fl_resp_id OUT NOCOPY jtf_prefab_ca_fl_resps.ca_fl_resp_id%TYPE,
2779: p_ca_filter_id IN jtf_prefab_ca_fl_resps.ca_filter_id%TYPE,
2772:
2773: PROCEDURE INSERT_CA_FL_RESP(
2774: p_api_version IN NUMBER,
2775: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2776: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2777:
2778: p_ca_fl_resp_id OUT NOCOPY jtf_prefab_ca_fl_resps.ca_fl_resp_id%TYPE,
2779: p_ca_filter_id IN jtf_prefab_ca_fl_resps.ca_filter_id%TYPE,
2780: p_responsibility_id IN jtf_prefab_ca_fl_resps.responsibility_id%TYPE,
2796: -- Standard Start of API savepoint
2797: SAVEPOINT INSERT_CA_FL_RESP;
2798:
2799: -- Standard call to check for call compatibility.
2800: IF NOT FND_API.Compatible_API_Call (
2801: l_api_version,
2802: p_api_version,
2803: l_api_name,
2804: G_PKG_NAME)
2802: p_api_version,
2803: l_api_name,
2804: G_PKG_NAME)
2805: THEN
2806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2807: END IF;
2808:
2809: -- Initialize message list if p_init_msg_list is set to TRUE.
2810: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2807: END IF;
2808:
2809: -- Initialize message list if p_init_msg_list is set to TRUE.
2810: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2811: FND_MSG_PUB.initialize;
2812: END IF;
2813:
2814: -- Initialize API return status to success
2811: FND_MSG_PUB.initialize;
2812: END IF;
2813:
2814: -- Initialize API return status to success
2815: x_return_status := FND_API.G_RET_STS_SUCCESS;
2816:
2817: -- real logic --
2818: ----------------
2819:
2846: -----------------------
2847: -- end of real logic --
2848:
2849: -- Standard check of p_commit.
2850: IF (FND_API.To_Boolean(p_commit)) THEN
2851: COMMIT WORK;
2852: END IF;
2853:
2854: -- Standard call to get message count and if count is 1, get message info.
2856: p_count => x_msg_count,
2857: p_data => x_msg_data );
2858:
2859: EXCEPTION
2860: WHEN FND_API.G_EXC_ERROR THEN
2861: ROLLBACK TO INSERT_CA_FL_RESP;
2862: x_return_status := FND_API.G_RET_STS_ERROR ;
2863:
2864: FND_MSG_PUB.Count_And_Get(
2858:
2859: EXCEPTION
2860: WHEN FND_API.G_EXC_ERROR THEN
2861: ROLLBACK TO INSERT_CA_FL_RESP;
2862: x_return_status := FND_API.G_RET_STS_ERROR ;
2863:
2864: FND_MSG_PUB.Count_And_Get(
2865: p_count => x_msg_count,
2866: p_data => x_msg_data );
2864: FND_MSG_PUB.Count_And_Get(
2865: p_count => x_msg_count,
2866: p_data => x_msg_data );
2867:
2868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2869: ROLLBACK TO INSERT_CA_FL_RESP;
2870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2871:
2872: FND_MSG_PUB.Count_And_Get(
2866: p_data => x_msg_data );
2867:
2868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2869: ROLLBACK TO INSERT_CA_FL_RESP;
2870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2871:
2872: FND_MSG_PUB.Count_And_Get(
2873: p_count => x_msg_count,
2874: p_data => x_msg_data );
2874: p_data => x_msg_data );
2875:
2876: WHEN OTHERS THEN
2877: ROLLBACK TO INSERT_CA_FL_RESP;
2878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2879:
2880: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2881: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2882: END IF;
2888: END INSERT_CA_FL_RESP;
2889:
2890: procedure DELETE_CA_FL_RESP(
2891: p_api_version IN NUMBER,
2892: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2893: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2894:
2895: p_ca_filter_id IN jtf_prefab_ca_fl_resps.ca_filter_id%TYPE,
2896:
2889:
2890: procedure DELETE_CA_FL_RESP(
2891: p_api_version IN NUMBER,
2892: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2893: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2894:
2895: p_ca_filter_id IN jtf_prefab_ca_fl_resps.ca_filter_id%TYPE,
2896:
2897: p_object_version_number IN jtf_prefab_ca_fl_resps.object_version_number%TYPE,
2907: -- Standard Start of API savepoint
2908: SAVEPOINT DELETE_CA_FL_RESP;
2909:
2910: -- Standard call to check for call compatibility.
2911: IF NOT FND_API.Compatible_API_Call (
2912: l_api_version,
2913: p_api_version,
2914: l_api_name,
2915: G_PKG_NAME)
2913: p_api_version,
2914: l_api_name,
2915: G_PKG_NAME)
2916: THEN
2917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2918: END IF;
2919:
2920: -- Initialize message list if p_init_msg_list is set to TRUE.
2921: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2918: END IF;
2919:
2920: -- Initialize message list if p_init_msg_list is set to TRUE.
2921: IF FND_API.To_Boolean( p_init_msg_list ) THEN
2922: FND_MSG_PUB.initialize;
2923: END IF;
2924:
2925: -- Initialize API return status to success
2922: FND_MSG_PUB.initialize;
2923: END IF;
2924:
2925: -- Initialize API return status to success
2926: x_return_status := FND_API.G_RET_STS_SUCCESS;
2927:
2928: -- real logic --
2929: ----------------
2930:
2934: -----------------------
2935: -- end of real logic --
2936:
2937: -- Standard check of p_commit.
2938: IF (FND_API.To_Boolean(p_commit)) THEN
2939: COMMIT WORK;
2940: END IF;
2941:
2942: -- Standard call to get message count and if count is 1, get message info.
2944: p_count => x_msg_count,
2945: p_data => x_msg_data );
2946:
2947: EXCEPTION
2948: WHEN FND_API.G_EXC_ERROR THEN
2949: ROLLBACK TO DELETE_CA_FL_RESP;
2950: x_return_status := FND_API.G_RET_STS_ERROR ;
2951:
2952: FND_MSG_PUB.Count_And_Get(
2946:
2947: EXCEPTION
2948: WHEN FND_API.G_EXC_ERROR THEN
2949: ROLLBACK TO DELETE_CA_FL_RESP;
2950: x_return_status := FND_API.G_RET_STS_ERROR ;
2951:
2952: FND_MSG_PUB.Count_And_Get(
2953: p_count => x_msg_count,
2954: p_data => x_msg_data );
2952: FND_MSG_PUB.Count_And_Get(
2953: p_count => x_msg_count,
2954: p_data => x_msg_data );
2955:
2956: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2957: ROLLBACK TO DELETE_CA_FL_RESP;
2958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2959:
2960: FND_MSG_PUB.Count_And_Get(
2954: p_data => x_msg_data );
2955:
2956: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2957: ROLLBACK TO DELETE_CA_FL_RESP;
2958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2959:
2960: FND_MSG_PUB.Count_And_Get(
2961: p_count => x_msg_count,
2962: p_data => x_msg_data );
2962: p_data => x_msg_data );
2963:
2964: WHEN OTHERS THEN
2965: ROLLBACK TO DELETE_CA_FL_RESP;
2966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2967:
2968: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2969: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2970: END IF;
2976: END DELETE_CA_FL_RESP;
2977:
2978: procedure DELETE_CA_FL_RESP(
2979: p_api_version IN NUMBER,
2980: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2981: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2982:
2983: p_ca_filter_id IN jtf_prefab_ca_fl_resps.ca_filter_id%TYPE,
2984: p_responsibility_id IN jtf_prefab_ca_fl_resps.responsibility_id%TYPE,
2977:
2978: procedure DELETE_CA_FL_RESP(
2979: p_api_version IN NUMBER,
2980: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2981: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2982:
2983: p_ca_filter_id IN jtf_prefab_ca_fl_resps.ca_filter_id%TYPE,
2984: p_responsibility_id IN jtf_prefab_ca_fl_resps.responsibility_id%TYPE,
2985:
2996: -- Standard Start of API savepoint
2997: SAVEPOINT DELETE_CA_FL_RESP;
2998:
2999: -- Standard call to check for call compatibility.
3000: IF NOT FND_API.Compatible_API_Call (
3001: l_api_version,
3002: p_api_version,
3003: l_api_name,
3004: G_PKG_NAME)
3002: p_api_version,
3003: l_api_name,
3004: G_PKG_NAME)
3005: THEN
3006: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3007: END IF;
3008:
3009: -- Initialize message list if p_init_msg_list is set to TRUE.
3010: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3006: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3007: END IF;
3008:
3009: -- Initialize message list if p_init_msg_list is set to TRUE.
3010: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3011: FND_MSG_PUB.initialize;
3012: END IF;
3013:
3014: -- Initialize API return status to success
3011: FND_MSG_PUB.initialize;
3012: END IF;
3013:
3014: -- Initialize API return status to success
3015: x_return_status := FND_API.G_RET_STS_SUCCESS;
3016:
3017: -- real logic --
3018: ----------------
3019:
3024: -----------------------
3025: -- end of real logic --
3026:
3027: -- Standard check of p_commit.
3028: IF (FND_API.To_Boolean(p_commit)) THEN
3029: COMMIT WORK;
3030: END IF;
3031:
3032: -- Standard call to get message count and if count is 1, get message info.
3034: p_count => x_msg_count,
3035: p_data => x_msg_data );
3036:
3037: EXCEPTION
3038: WHEN FND_API.G_EXC_ERROR THEN
3039: ROLLBACK TO DELETE_CA_FL_RESP;
3040: x_return_status := FND_API.G_RET_STS_ERROR ;
3041:
3042: FND_MSG_PUB.Count_And_Get(
3036:
3037: EXCEPTION
3038: WHEN FND_API.G_EXC_ERROR THEN
3039: ROLLBACK TO DELETE_CA_FL_RESP;
3040: x_return_status := FND_API.G_RET_STS_ERROR ;
3041:
3042: FND_MSG_PUB.Count_And_Get(
3043: p_count => x_msg_count,
3044: p_data => x_msg_data );
3042: FND_MSG_PUB.Count_And_Get(
3043: p_count => x_msg_count,
3044: p_data => x_msg_data );
3045:
3046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3047: ROLLBACK TO DELETE_CA_FL_RESP;
3048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3049:
3050: FND_MSG_PUB.Count_And_Get(
3044: p_data => x_msg_data );
3045:
3046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3047: ROLLBACK TO DELETE_CA_FL_RESP;
3048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3049:
3050: FND_MSG_PUB.Count_And_Get(
3051: p_count => x_msg_count,
3052: p_data => x_msg_data );
3052: p_data => x_msg_data );
3053:
3054: WHEN OTHERS THEN
3055: ROLLBACK TO DELETE_CA_FL_RESP;
3056: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3057:
3058: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3059: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3060: END IF;
3066: END DELETE_CA_FL_RESP;
3067:
3068: PROCEDURE INSERT_CA_FL_LANG(
3069: p_api_version IN NUMBER,
3070: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3071: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3072:
3073: p_ca_fl_lang_id OUT NOCOPY jtf_prefab_ca_fl_langs.ca_fl_lang_id%TYPE,
3074: p_ca_filter_id IN jtf_prefab_ca_fl_langs.ca_filter_id%TYPE,
3067:
3068: PROCEDURE INSERT_CA_FL_LANG(
3069: p_api_version IN NUMBER,
3070: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3071: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3072:
3073: p_ca_fl_lang_id OUT NOCOPY jtf_prefab_ca_fl_langs.ca_fl_lang_id%TYPE,
3074: p_ca_filter_id IN jtf_prefab_ca_fl_langs.ca_filter_id%TYPE,
3075: p_language_code IN jtf_prefab_ca_fl_langs.language_code%TYPE,
3091: -- Standard Start of API savepoint
3092: SAVEPOINT INSERT_CA_FL_LANG;
3093:
3094: -- Standard call to check for call compatibility.
3095: IF NOT FND_API.Compatible_API_Call (
3096: l_api_version,
3097: p_api_version,
3098: l_api_name,
3099: G_PKG_NAME)
3097: p_api_version,
3098: l_api_name,
3099: G_PKG_NAME)
3100: THEN
3101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3102: END IF;
3103:
3104: -- Initialize message list if p_init_msg_list is set to TRUE.
3105: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3102: END IF;
3103:
3104: -- Initialize message list if p_init_msg_list is set to TRUE.
3105: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3106: FND_MSG_PUB.initialize;
3107: END IF;
3108:
3109: -- Initialize API return status to success
3106: FND_MSG_PUB.initialize;
3107: END IF;
3108:
3109: -- Initialize API return status to success
3110: x_return_status := FND_API.G_RET_STS_SUCCESS;
3111:
3112: -- real logic --
3113: ----------------
3114:
3141: -----------------------
3142: -- end of real logic --
3143:
3144: -- Standard check of p_commit.
3145: IF (FND_API.To_Boolean(p_commit)) THEN
3146: COMMIT WORK;
3147: END IF;
3148:
3149: -- Standard call to get message count and if count is 1, get message info.
3151: p_count => x_msg_count,
3152: p_data => x_msg_data );
3153:
3154: EXCEPTION
3155: WHEN FND_API.G_EXC_ERROR THEN
3156: ROLLBACK TO INSERT_CA_FL_LANG;
3157: x_return_status := FND_API.G_RET_STS_ERROR ;
3158:
3159: FND_MSG_PUB.Count_And_Get(
3153:
3154: EXCEPTION
3155: WHEN FND_API.G_EXC_ERROR THEN
3156: ROLLBACK TO INSERT_CA_FL_LANG;
3157: x_return_status := FND_API.G_RET_STS_ERROR ;
3158:
3159: FND_MSG_PUB.Count_And_Get(
3160: p_count => x_msg_count,
3161: p_data => x_msg_data );
3159: FND_MSG_PUB.Count_And_Get(
3160: p_count => x_msg_count,
3161: p_data => x_msg_data );
3162:
3163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3164: ROLLBACK TO INSERT_CA_FL_LANG;
3165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3166:
3167: FND_MSG_PUB.Count_And_Get(
3161: p_data => x_msg_data );
3162:
3163: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3164: ROLLBACK TO INSERT_CA_FL_LANG;
3165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3166:
3167: FND_MSG_PUB.Count_And_Get(
3168: p_count => x_msg_count,
3169: p_data => x_msg_data );
3169: p_data => x_msg_data );
3170:
3171: WHEN OTHERS THEN
3172: ROLLBACK TO INSERT_CA_FL_LANG;
3173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3174:
3175: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3176: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3177: END IF;
3183: END INSERT_CA_FL_LANG;
3184:
3185: procedure DELETE_CA_FL_LANG(
3186: p_api_version IN NUMBER,
3187: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3188: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3189:
3190: p_ca_filter_id IN jtf_prefab_ca_fl_langs.ca_filter_id%TYPE,
3191:
3184:
3185: procedure DELETE_CA_FL_LANG(
3186: p_api_version IN NUMBER,
3187: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3188: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3189:
3190: p_ca_filter_id IN jtf_prefab_ca_fl_langs.ca_filter_id%TYPE,
3191:
3192: p_object_version_number IN jtf_prefab_ca_fl_langs.object_version_number%TYPE,
3202: -- Standard Start of API savepoint
3203: SAVEPOINT DELETE_CA_FL_LANG;
3204:
3205: -- Standard call to check for call compatibility.
3206: IF NOT FND_API.Compatible_API_Call (
3207: l_api_version,
3208: p_api_version,
3209: l_api_name,
3210: G_PKG_NAME)
3208: p_api_version,
3209: l_api_name,
3210: G_PKG_NAME)
3211: THEN
3212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3213: END IF;
3214:
3215: -- Initialize message list if p_init_msg_list is set to TRUE.
3216: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3212: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3213: END IF;
3214:
3215: -- Initialize message list if p_init_msg_list is set to TRUE.
3216: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3217: FND_MSG_PUB.initialize;
3218: END IF;
3219:
3220: -- Initialize API return status to success
3217: FND_MSG_PUB.initialize;
3218: END IF;
3219:
3220: -- Initialize API return status to success
3221: x_return_status := FND_API.G_RET_STS_SUCCESS;
3222:
3223: -- real logic --
3224: ----------------
3225:
3229: -----------------------
3230: -- end of real logic --
3231:
3232: -- Standard check of p_commit.
3233: IF (FND_API.To_Boolean(p_commit)) THEN
3234: COMMIT WORK;
3235: END IF;
3236:
3237: -- Standard call to get message count and if count is 1, get message info.
3239: p_count => x_msg_count,
3240: p_data => x_msg_data );
3241:
3242: EXCEPTION
3243: WHEN FND_API.G_EXC_ERROR THEN
3244: ROLLBACK TO DELETE_CA_FL_LANG;
3245: x_return_status := FND_API.G_RET_STS_ERROR ;
3246:
3247: FND_MSG_PUB.Count_And_Get(
3241:
3242: EXCEPTION
3243: WHEN FND_API.G_EXC_ERROR THEN
3244: ROLLBACK TO DELETE_CA_FL_LANG;
3245: x_return_status := FND_API.G_RET_STS_ERROR ;
3246:
3247: FND_MSG_PUB.Count_And_Get(
3248: p_count => x_msg_count,
3249: p_data => x_msg_data );
3247: FND_MSG_PUB.Count_And_Get(
3248: p_count => x_msg_count,
3249: p_data => x_msg_data );
3250:
3251: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3252: ROLLBACK TO DELETE_CA_FL_LANG;
3253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3254:
3255: FND_MSG_PUB.Count_And_Get(
3249: p_data => x_msg_data );
3250:
3251: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3252: ROLLBACK TO DELETE_CA_FL_LANG;
3253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3254:
3255: FND_MSG_PUB.Count_And_Get(
3256: p_count => x_msg_count,
3257: p_data => x_msg_data );
3257: p_data => x_msg_data );
3258:
3259: WHEN OTHERS THEN
3260: ROLLBACK TO DELETE_CA_FL_LANG;
3261: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3262:
3263: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3264: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3265: END IF;
3271: END DELETE_CA_FL_LANG;
3272:
3273: procedure DELETE_CA_FL_LANG(
3274: p_api_version IN NUMBER,
3275: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3276: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3277:
3278: p_ca_filter_id IN jtf_prefab_ca_fl_langs.ca_filter_id%TYPE,
3279: p_language_code IN jtf_prefab_ca_fl_langs.language_code%TYPE,
3272:
3273: procedure DELETE_CA_FL_LANG(
3274: p_api_version IN NUMBER,
3275: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
3276: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3277:
3278: p_ca_filter_id IN jtf_prefab_ca_fl_langs.ca_filter_id%TYPE,
3279: p_language_code IN jtf_prefab_ca_fl_langs.language_code%TYPE,
3280:
3291: -- Standard Start of API savepoint
3292: SAVEPOINT DELETE_CA_FL_LANG;
3293:
3294: -- Standard call to check for call compatibility.
3295: IF NOT FND_API.Compatible_API_Call (
3296: l_api_version,
3297: p_api_version,
3298: l_api_name,
3299: G_PKG_NAME)
3297: p_api_version,
3298: l_api_name,
3299: G_PKG_NAME)
3300: THEN
3301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3302: END IF;
3303:
3304: -- Initialize message list if p_init_msg_list is set to TRUE.
3305: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3302: END IF;
3303:
3304: -- Initialize message list if p_init_msg_list is set to TRUE.
3305: IF FND_API.To_Boolean( p_init_msg_list ) THEN
3306: FND_MSG_PUB.initialize;
3307: END IF;
3308:
3309: -- Initialize API return status to success
3306: FND_MSG_PUB.initialize;
3307: END IF;
3308:
3309: -- Initialize API return status to success
3310: x_return_status := FND_API.G_RET_STS_SUCCESS;
3311:
3312: -- real logic --
3313: ----------------
3314:
3319: -----------------------
3320: -- end of real logic --
3321:
3322: -- Standard check of p_commit.
3323: IF (FND_API.To_Boolean(p_commit)) THEN
3324: COMMIT WORK;
3325: END IF;
3326:
3327: -- Standard call to get message count and if count is 1, get message info.
3329: p_count => x_msg_count,
3330: p_data => x_msg_data );
3331:
3332: EXCEPTION
3333: WHEN FND_API.G_EXC_ERROR THEN
3334: ROLLBACK TO DELETE_CA_FL_LANG;
3335: x_return_status := FND_API.G_RET_STS_ERROR ;
3336:
3337: FND_MSG_PUB.Count_And_Get(
3331:
3332: EXCEPTION
3333: WHEN FND_API.G_EXC_ERROR THEN
3334: ROLLBACK TO DELETE_CA_FL_LANG;
3335: x_return_status := FND_API.G_RET_STS_ERROR ;
3336:
3337: FND_MSG_PUB.Count_And_Get(
3338: p_count => x_msg_count,
3339: p_data => x_msg_data );
3337: FND_MSG_PUB.Count_And_Get(
3338: p_count => x_msg_count,
3339: p_data => x_msg_data );
3340:
3341: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3342: ROLLBACK TO DELETE_CA_FL_LANG;
3343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3344:
3345: FND_MSG_PUB.Count_And_Get(
3339: p_data => x_msg_data );
3340:
3341: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3342: ROLLBACK TO DELETE_CA_FL_LANG;
3343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3344:
3345: FND_MSG_PUB.Count_And_Get(
3346: p_count => x_msg_count,
3347: p_data => x_msg_data );
3347: p_data => x_msg_data );
3348:
3349: WHEN OTHERS THEN
3350: ROLLBACK TO DELETE_CA_FL_LANG;
3351: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3352:
3353: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3354: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3355: END IF;