[Home] [Help]
33: IF (c1%NOTFOUND) THEN
34: CLOSE c1;
35: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_NOT_FOUND');
36: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
37: FND_MSG_PUB.Add;
38: RAISE FND_API.G_EXC_ERROR;
39: END IF;
40: CLOSE c1;
41:
42: EXCEPTION
43:
44: WHEN FND_API.G_EXC_ERROR THEN
45: x_return_status := FND_API.G_RET_STS_ERROR;
46: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
47: p_data => x_msg_data,
48: p_encoded => 'F');
49:
50: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
48: p_encoded => 'F');
49:
50: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
51: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
52: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
53: p_data => x_msg_data,
54: p_encoded => 'F');
55:
56: WHEN OTHERS THEN
55:
56: WHEN OTHERS THEN
57: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
58:
59: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
60: THEN
61: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
62: END IF;
63:
57: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
58:
59: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
60: THEN
61: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
62: END IF;
63:
64: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
65: p_data => x_msg_data,
60: THEN
61: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
62: END IF;
63:
64: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
65: p_data => x_msg_data,
66: p_encoded => 'F');
67:
68: END Validate_Msite_Id_Exists;
99: CLOSE c1;
100: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_RESP_APPL_NOT_FOUND');
101: FND_MESSAGE.Set_Token('RESP_ID', p_responsibility_id);
102: FND_MESSAGE.Set_Token('APPL_ID', p_application_id);
103: FND_MSG_PUB.Add;
104: RAISE FND_API.G_EXC_ERROR;
105: END IF;
106: CLOSE c1;
107:
108: EXCEPTION
109:
110: WHEN FND_API.G_EXC_ERROR THEN
111: x_return_status := FND_API.G_RET_STS_ERROR;
112: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
113: p_data => x_msg_data,
114: p_encoded => 'F');
115:
116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
114: p_encoded => 'F');
115:
116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
118: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
119: p_data => x_msg_data,
120: p_encoded => 'F');
121:
122: WHEN OTHERS THEN
121:
122: WHEN OTHERS THEN
123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
124:
125: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
126: THEN
127: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
128: END IF;
129:
123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
124:
125: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
126: THEN
127: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
128: END IF;
129:
130: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
131: p_data => x_msg_data,
126: THEN
127: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
128: END IF;
129:
130: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
131: p_data => x_msg_data,
132: p_encoded => 'F');
133:
134: END Validate_Resp_Appl_Id_Exists;
204: ELSE
205: -- neither msite_resp_id nor combination of
206: -- msite_id, responsibility_id and application_id is specified
207: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_MR_IDS_SPEC');
208: FND_MSG_PUB.Add;
209: RAISE FND_API.G_EXC_ERROR;
210: END IF;
211:
212: EXCEPTION
212: EXCEPTION
213:
214: WHEN FND_API.G_EXC_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
217: p_data => x_msg_data,
218: p_encoded => 'F');
219:
220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
218: p_encoded => 'F');
219:
220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
222: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
223: p_data => x_msg_data,
224: p_encoded => 'F');
225:
226: WHEN OTHERS THEN
225:
226: WHEN OTHERS THEN
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
228:
229: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
230: THEN
231: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
232: END IF;
233:
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
228:
229: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
230: THEN
231: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
232: END IF;
233:
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
235: p_data => x_msg_data,
230: THEN
231: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
232: END IF;
233:
234: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
235: p_data => x_msg_data,
236: p_encoded => 'F');
237:
238: END Validate_Msite_Resp_Id_Exists;
264: BEGIN
265:
266: -- Initialize message list if p_init_msg_list is set to TRUE.
267: IF FND_API.to_Boolean(p_init_msg_list) THEN
268: FND_MSG_PUB.initialize;
269: END IF;
270:
271: -- Initialize API return status to success
272: x_return_status := FND_API.G_RET_STS_SUCCESS;
279: IF ((p_msite_id IS NULL) OR
280: (p_msite_id = FND_API.G_MISS_NUM))
281: THEN
282: FND_MESSAGE.Set_Name('JTF', 'JTF_DSP_INVALID_MSITE_ID');
283: FND_MSG_PUB.Add;
284: RAISE FND_API.G_EXC_ERROR;
285: END IF;
286:
287: -- p_responsibility_id
288: IF ((p_responsibility_id IS NULL) OR
289: (p_responsibility_id = FND_API.G_MISS_NUM))
290: THEN
291: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVALID_RESP_ID');
292: FND_MSG_PUB.Add;
293: RAISE FND_API.G_EXC_ERROR;
294: END IF;
295:
296: -- application_id
297: IF ((p_application_id IS NULL) OR
298: (p_application_id = FND_API.G_MISS_NUM))
299: THEN
300: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVALID_APPL_ID');
301: FND_MSG_PUB.Add;
302: RAISE FND_API.G_EXC_ERROR;
303: END IF;
304:
305: -- start_date_active
306: IF ((p_start_date_active IS NULL) OR
307: (p_start_date_active = FND_API.G_MISS_DATE))
308: THEN
309: FND_MESSAGE.Set_Name('JTF', 'JTF_DSP_INVALID_START_DATE');
310: FND_MSG_PUB.Add;
311: RAISE FND_API.G_EXC_ERROR;
312: END IF;
313:
314: -- display_name
315: IF ((p_display_name IS NULL) OR
316: (p_display_name = FND_API.G_MISS_CHAR))
317: THEN
318: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_MSRSP_DSP_NAME');
319: FND_MSG_PUB.Add;
320: RAISE FND_API.G_EXC_ERROR;
321: END IF;
322:
323: --
329: (p_sort_order <> FND_API.G_MISS_NUM))
330: THEN
331: IF(p_sort_order < 0) THEN
332: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_SORT_ORDER');
333: FND_MSG_PUB.Add;
334: RAISE FND_API.G_EXC_ERROR;
335: END IF;
336: END IF;
337:
350:
351: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
352: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
353: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
354: FND_MSG_PUB.Add;
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
356: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
357: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
358: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
372: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
373: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_RESP_ID_VLD_FAIL');
374: FND_MESSAGE.Set_Token('RESP_ID', p_responsibility_id);
375: FND_MESSAGE.Set_Token('APPL_ID', p_application_id);
376: FND_MSG_PUB.Add;
377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
378: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
379: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_RESP_ID_VLD_FAIL');
380: FND_MESSAGE.Set_Token('RESP_ID', p_responsibility_id);
397: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
398: x_return_status := FND_API.G_RET_STS_SUCCESS;
399: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
400: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_VLD_FAIL');
401: FND_MSG_PUB.Add;
402: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
403: ELSIF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN -- duplicate exists
404: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_DUP_EXISTS');
405: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
404: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_DUP_EXISTS');
405: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
406: FND_MESSAGE.Set_Token('RESP_ID', p_responsibility_id);
407: FND_MESSAGE.Set_Token('APPL_ID', p_application_id);
408: FND_MSG_PUB.Add;
409: RAISE FND_API.G_EXC_ERROR;
410: END IF;
411:
412: EXCEPTION
412: EXCEPTION
413:
414: WHEN FND_API.G_EXC_ERROR THEN
415: x_return_status := FND_API.G_RET_STS_ERROR;
416: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
417: p_data => x_msg_data,
418: p_encoded => 'F');
419:
420: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
418: p_encoded => 'F');
419:
420: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
421: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
422: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
423: p_data => x_msg_data,
424: p_encoded => 'F');
425:
426: WHEN OTHERS THEN
425:
426: WHEN OTHERS THEN
427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
428:
429: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
432: END IF;
433:
427: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
428:
429: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
432: END IF;
433:
434: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
435: p_data => x_msg_data,
430: THEN
431: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
432: END IF;
433:
434: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
435: p_data => x_msg_data,
436: p_encoded => 'F');
437:
438: END Validate_Create;
463: BEGIN
464:
465: -- Initialize message list if p_init_msg_list is set to TRUE.
466: IF FND_API.to_Boolean(p_init_msg_list) THEN
467: FND_MSG_PUB.initialize;
468: END IF;
469:
470: -- Initialize API return status to success
471: x_return_status := FND_API.G_RET_STS_SUCCESS;
476:
477: -- msite_resp_id
478: IF (p_msite_resp_id IS NULL) THEN
479: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_IS_NULL');
480: FND_MSG_PUB.Add;
481: RAISE FND_API.G_EXC_ERROR;
482: END IF;
483:
484: -- object_version_number
484: -- object_version_number
485: IF (p_object_version_number IS NULL)
486: THEN
487: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_OVN_IS_NULL');
488: FND_MSG_PUB.Add;
489: RAISE FND_API.G_EXC_ERROR;
490: END IF;
491:
492: -- start_date_active
491:
492: -- start_date_active
493: IF (p_start_date_active IS NULL) THEN
494: FND_MESSAGE.Set_Name('JTF', 'JTF_DSP_INVALID_START_DATE');
495: FND_MSG_PUB.Add;
496: RAISE FND_API.G_EXC_ERROR;
497: END IF;
498:
499: -- display_name
498:
499: -- display_name
500: IF (p_display_name IS NULL) THEN
501: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_MSRSP_DSP_NAME');
502: FND_MSG_PUB.Add;
503: RAISE FND_API.G_EXC_ERROR;
504: END IF;
505:
506: --
512: (p_sort_order <> FND_API.G_MISS_NUM))
513: THEN
514: IF(p_sort_order < 0) THEN
515: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVLD_SORT_ORDER');
516: FND_MSG_PUB.Add;
517: RAISE FND_API.G_EXC_ERROR;
518: END IF;
519: END IF;
520:
531: );
532:
533: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
534: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_VLD_FAIL');
535: FND_MSG_PUB.Add;
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
538: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_VLD_FAIL');
539: FND_MSG_PUB.Add;
535: FND_MSG_PUB.Add;
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
538: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSRSP_ID_VLD_FAIL');
539: FND_MSG_PUB.Add;
540: RAISE FND_API.G_EXC_ERROR;
541: END IF;
542:
543:
544: EXCEPTION
545:
546: WHEN FND_API.G_EXC_ERROR THEN
547: x_return_status := FND_API.G_RET_STS_ERROR;
548: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
549: p_data => x_msg_data,
550: p_encoded => 'F');
551:
552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
550: p_encoded => 'F');
551:
552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
555: p_data => x_msg_data,
556: p_encoded => 'F');
557:
558: WHEN OTHERS THEN
557:
558: WHEN OTHERS THEN
559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
560:
561: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
562: THEN
563: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
564: END IF;
565:
559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
560:
561: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
562: THEN
563: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
564: END IF;
565:
566: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
567: p_data => x_msg_data,
562: THEN
563: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
564: END IF;
565:
566: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
567: p_data => x_msg_data,
568: p_encoded => 'F');
569:
570: END Validate_Update;
610: END IF;
611:
612: -- Initialize message list if p_init_msg_list is set to TRUE.
613: IF FND_API.to_Boolean(p_init_msg_list) THEN
614: FND_MSG_PUB.initialize;
615: END IF;
616:
617: -- Initialize API return status to success
618: x_return_status := FND_API.G_RET_STS_SUCCESS;
643: );
644:
645: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
646: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_CREATE');
647: FND_MSG_PUB.Add;
648: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
649: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
650: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_CREATE');
651: FND_MSG_PUB.Add;
647: FND_MSG_PUB.Add;
648: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
649: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
650: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_CREATE');
651: FND_MSG_PUB.Add;
652: RAISE FND_API.G_EXC_ERROR; -- invalid
653: END IF;
654:
655: --
679:
680: EXCEPTION
681: WHEN NO_DATA_FOUND THEN
682: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_INSERT_FL');
683: FND_MSG_PUB.Add;
684: RAISE FND_API.G_EXC_ERROR;
685: WHEN OTHERS THEN
686: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_INSERT_FL');
687: FND_MSG_PUB.Add;
683: FND_MSG_PUB.Add;
684: RAISE FND_API.G_EXC_ERROR;
685: WHEN OTHERS THEN
686: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_INSERT_FL');
687: FND_MSG_PUB.Add;
688: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
689: END;
690:
691: --
696: COMMIT WORK;
697: END IF;
698:
699: -- Standard call to get message count and if count is 1, get message info.
700: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
701: p_data => x_msg_data,
702: p_encoded => 'F');
703:
704: EXCEPTION
705:
706: WHEN FND_API.G_EXC_ERROR THEN
707: ROLLBACK TO create_msite_resp_pvt;
708: x_return_status := FND_API.G_RET_STS_ERROR;
709: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
710: p_data => x_msg_data,
711: p_encoded => 'F');
712:
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
712:
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714: ROLLBACK TO create_msite_resp_pvt;
715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
716: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
717: p_data => x_msg_data,
718: p_encoded => 'F');
719:
720: WHEN OTHERS THEN
720: WHEN OTHERS THEN
721: ROLLBACK TO create_msite_resp_pvt;
722: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
723:
724: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
725: THEN
726: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
727: END IF;
728:
722: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
723:
724: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
725: THEN
726: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
727: END IF;
728:
729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
730: p_data => x_msg_data,
725: THEN
726: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
727: END IF;
728:
729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
730: p_data => x_msg_data,
731: p_encoded => 'F');
732:
733: END Create_Msite_Resp;
779: END IF;
780:
781: -- Initialize message list if p_init_msg_list is set to TRUE.
782: IF FND_API.to_Boolean(p_init_msg_list) THEN
783: FND_MSG_PUB.initialize;
784: END IF;
785:
786: -- Initialize API return status to success
787: x_return_status := FND_API.G_RET_STS_SUCCESS;
823: ELSE
824: -- neither msite_resp_id nor combination of
825: -- msite_id, responsibility_id and application_id is specified
826: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_MR_IDS_SPEC');
827: FND_MSG_PUB.Add;
828: RAISE FND_API.G_EXC_ERROR;
829: END IF;
830:
831: --
847: );
848:
849: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
850: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_UPDATE');
851: FND_MSG_PUB.Add;
852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
853: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
854: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_UPDATE');
855: FND_MSG_PUB.Add;
851: FND_MSG_PUB.Add;
852: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
853: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
854: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MR_INVALID_UPDATE');
855: FND_MSG_PUB.Add;
856: RAISE FND_API.G_EXC_ERROR; -- invalid
857: END IF;
858:
859: -- 2. update row with section data into section table
874:
875: EXCEPTION
876: WHEN NO_DATA_FOUND THEN
877: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_UPDATE_FL');
878: FND_MSG_PUB.ADD;
879: RAISE FND_API.G_EXC_ERROR;
880: WHEN OTHERS THEN
881: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_UPDATE_FL');
882: FND_MSG_PUB.ADD;
878: FND_MSG_PUB.ADD;
879: RAISE FND_API.G_EXC_ERROR;
880: WHEN OTHERS THEN
881: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_UPDATE_FL');
882: FND_MSG_PUB.ADD;
883: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
884: END;
885:
886: --
891: COMMIT WORK;
892: END IF;
893:
894: -- standard call to get message count and if count is 1, get message info.
895: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
896: p_data => x_msg_data,
897: p_encoded => 'F');
898:
899: EXCEPTION
900:
901: WHEN FND_API.G_EXC_ERROR THEN
902: ROLLBACK TO update_msite_resp_pvt;
903: x_return_status := FND_API.G_RET_STS_ERROR;
904: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
905: p_data => x_msg_data,
906: p_encoded => 'F');
907:
908: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
907:
908: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
909: ROLLBACK TO update_msite_resp_pvt;
910: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
911: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
912: p_data => x_msg_data,
913: p_encoded => 'F');
914:
915: WHEN OTHERS THEN
915: WHEN OTHERS THEN
916: ROLLBACK TO update_msite_resp_pvt;
917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
918:
919: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
920: THEN
921: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
922: END IF;
923:
917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
918:
919: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
920: THEN
921: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
922: END IF;
923:
924: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
925: p_data => x_msg_data,
920: THEN
921: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
922: END IF;
923:
924: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
925: p_data => x_msg_data,
926: p_encoded => 'F');
927:
928: END Update_Msite_Resp;
969: END IF;
970:
971: -- Initialize message list if p_init_msg_list is set to TRUE.
972: IF FND_API.to_Boolean(p_init_msg_list) THEN
973: FND_MSG_PUB.initialize;
974: END IF;
975:
976: -- Initialize API return status to success
977: x_return_status := FND_API.G_RET_STS_SUCCESS;
1010: ELSE
1011: -- neither msite_resp_id nor combination of
1012: -- msite_id, responsibility_id and application_id is specified
1013: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_MR_IDS_SPEC');
1014: FND_MSG_PUB.Add;
1015: RAISE FND_API.G_EXC_ERROR;
1016: END IF;
1017:
1018: -- delete for jtf_msite_resps_b and _tl tables
1020: Jtf_Msite_Resp_Pkg.delete_row(l_msite_resp_id);
1021: EXCEPTION
1022: WHEN NO_DATA_FOUND THEN
1023: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_DELETE_FL');
1024: FND_MSG_PUB.Add;
1025: RAISE FND_API.G_EXC_ERROR;
1026: WHEN OTHERS THEN
1027: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_DELETE_FL');
1028: FND_MSG_PUB.Add;
1024: FND_MSG_PUB.Add;
1025: RAISE FND_API.G_EXC_ERROR;
1026: WHEN OTHERS THEN
1027: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_RESP_DELETE_FL');
1028: FND_MSG_PUB.Add;
1029: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1030: END;
1031:
1032: EXCEPTION
1033:
1034: WHEN FND_API.G_EXC_ERROR THEN
1035: ROLLBACK TO delete_msite_resp_pvt;
1036: x_return_status := FND_API.G_RET_STS_ERROR;
1037: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1038: p_data => x_msg_data,
1039: p_encoded => 'F');
1040:
1041: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1040:
1041: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1042: ROLLBACK TO delete_msite_resp_pvt;
1043: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1044: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1045: p_data => x_msg_data,
1046: p_encoded => 'F');
1047:
1048: WHEN OTHERS THEN
1048: WHEN OTHERS THEN
1049: ROLLBACK TO delete_msite_resp_pvt;
1050: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1051:
1052: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1053: THEN
1054: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1055: END IF;
1056:
1050: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1051:
1052: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1053: THEN
1054: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1055: END IF;
1056:
1057: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1058: p_data => x_msg_data,
1053: THEN
1054: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1055: END IF;
1056:
1057: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1058: p_data => x_msg_data,
1059: p_encoded => 'F');
1060:
1061: END Delete_Msite_Resp;