31: OPEN c1(p_msite_id);
32: FETCH c1 INTO l_tmp_id;
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;
32: FETCH c1 INTO l_tmp_id;
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;
93: OPEN c1(p_party_id);
94: FETCH c1 INTO l_tmp_id;
95: IF (c1%NOTFOUND) THEN
96: CLOSE c1;
97: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PARTY_NOT_FOUND');
98: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
99: FND_MSG_PUB.Add;
100: RAISE FND_API.G_EXC_ERROR;
101: END IF;
94: FETCH c1 INTO l_tmp_id;
95: IF (c1%NOTFOUND) THEN
96: CLOSE c1;
97: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PARTY_NOT_FOUND');
98: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
99: FND_MSG_PUB.Add;
100: RAISE FND_API.G_EXC_ERROR;
101: END IF;
102: CLOSE c1;
167: OPEN c1(p_msite_prty_accss_id);
168: FETCH c1 INTO l_tmp_id;
169: IF (c1%NOTFOUND) THEN
170: CLOSE c1;
171: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_NOT_FOUND');
172: FND_MESSAGE.Set_Token('MSITE_PRTY_ACCSS_ID', p_msite_prty_accss_id);
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
175: CLOSE c1;
168: FETCH c1 INTO l_tmp_id;
169: IF (c1%NOTFOUND) THEN
170: CLOSE c1;
171: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_NOT_FOUND');
172: FND_MESSAGE.Set_Token('MSITE_PRTY_ACCSS_ID', p_msite_prty_accss_id);
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
175: CLOSE c1;
176:
183: OPEN c2(p_msite_id, p_party_id);
184: FETCH c2 INTO l_tmp_id;
185: IF (c2%NOTFOUND) THEN
186: CLOSE c2;
187: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
188: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
189: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
190: RAISE FND_API.G_EXC_ERROR;
191: END IF;
184: FETCH c2 INTO l_tmp_id;
185: IF (c2%NOTFOUND) THEN
186: CLOSE c2;
187: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
188: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
189: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
190: RAISE FND_API.G_EXC_ERROR;
191: END IF;
192: CLOSE c2;
185: IF (c2%NOTFOUND) THEN
186: CLOSE c2;
187: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
188: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
189: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
190: RAISE FND_API.G_EXC_ERROR;
191: END IF;
192: CLOSE c2;
193:
193:
194: ELSE
195: -- neither msite_prty_accss_id nor combination of
196: -- msite_id and party_id is specified
197: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_MP_IDS_SPEC');
198: FND_MSG_PUB.Add;
199: RAISE FND_API.G_EXC_ERROR;
200: END IF;
201:
264: -- p_msite_id
265: IF ((p_msite_id IS NULL) OR
266: (p_msite_id = FND_API.G_MISS_NUM))
267: THEN
268: FND_MESSAGE.Set_Name('JTF', 'JTF_DSP_INVALID_MSITE_ID');
269: FND_MSG_PUB.Add;
270: RAISE FND_API.G_EXC_ERROR;
271: END IF;
272:
273: -- p_party_id
274: IF ((p_party_id IS NULL) OR
275: (p_party_id = FND_API.G_MISS_NUM))
276: THEN
277: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_INVALID_PRTY_ID');
278: FND_MSG_PUB.Add;
279: RAISE FND_API.G_EXC_ERROR;
280: END IF;
281:
282: -- start_date_active
283: IF ((p_start_date_active IS NULL) OR
284: (p_start_date_active = FND_API.G_MISS_DATE))
285: THEN
286: FND_MESSAGE.Set_Name('JTF', 'JTF_DSP_INVALID_START_DATE');
287: FND_MSG_PUB.Add;
288: RAISE FND_API.G_EXC_ERROR;
289: END IF;
290:
305: x_msg_data => x_msg_data
306: );
307:
308: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
309: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
310: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
311: FND_MSG_PUB.Add;
312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
313: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
306: );
307:
308: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
309: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
310: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
311: FND_MSG_PUB.Add;
312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
313: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
314: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
310: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
311: FND_MSG_PUB.Add;
312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
313: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
314: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
315: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
316: RAISE FND_API.G_EXC_ERROR; -- invalid msite_id
317: END IF;
318:
311: FND_MSG_PUB.Add;
312: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
313: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
314: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_ID_VLD_FAIL');
315: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
316: RAISE FND_API.G_EXC_ERROR; -- invalid msite_id
317: END IF;
318:
319: -- party_id
325: x_msg_data => x_msg_data
326: );
327:
328: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
329: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ID_VLD_FAIL');
330: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
331: FND_MSG_PUB.Add;
332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
333: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
326: );
327:
328: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
329: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ID_VLD_FAIL');
330: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
331: FND_MSG_PUB.Add;
332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
333: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
334: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ID_VLD_FAIL');
330: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
331: FND_MSG_PUB.Add;
332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
333: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
334: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ID_VLD_FAIL');
335: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
336: RAISE FND_API.G_EXC_ERROR;
337: END IF;
338:
331: FND_MSG_PUB.Add;
332: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
333: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
334: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_PRTY_ID_VLD_FAIL');
335: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
336: RAISE FND_API.G_EXC_ERROR;
337: END IF;
338:
339: -- p_msite_id, p_party_id (check for duplicate)
349:
350: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
351: x_return_status := FND_API.G_RET_STS_SUCCESS;
352: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
353: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_VLD_FAIL');
354: FND_MSG_PUB.Add;
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
356: ELSIF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN -- duplicate exists
357: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_DUP_EXISTS');
353: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_VLD_FAIL');
354: FND_MSG_PUB.Add;
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
356: ELSIF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN -- duplicate exists
357: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_DUP_EXISTS');
358: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
359: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
360: FND_MSG_PUB.Add;
361: RAISE FND_API.G_EXC_ERROR;
354: FND_MSG_PUB.Add;
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
356: ELSIF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN -- duplicate exists
357: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_DUP_EXISTS');
358: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
359: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
360: FND_MSG_PUB.Add;
361: RAISE FND_API.G_EXC_ERROR;
362: END IF;
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
356: ELSIF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN -- duplicate exists
357: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_DUP_EXISTS');
358: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
359: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
360: FND_MSG_PUB.Add;
361: RAISE FND_API.G_EXC_ERROR;
362: END IF;
363:
424: --
425:
426: -- msite_prty_accss_id
427: IF (p_msite_prty_accss_id IS NULL) THEN
428: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_IS_NULL');
429: FND_MSG_PUB.Add;
430: RAISE FND_API.G_EXC_ERROR;
431: END IF;
432:
432:
433: -- object_version_number
434: IF (p_object_version_number IS NULL)
435: THEN
436: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_OVN_IS_NULL');
437: FND_MSG_PUB.Add;
438: RAISE FND_API.G_EXC_ERROR;
439: END IF;
440:
439: END IF;
440:
441: -- start_date_active
442: IF (p_start_date_active IS NULL) THEN
443: FND_MESSAGE.Set_Name('JTF', 'JTF_DSP_INVALID_START_DATE');
444: FND_MSG_PUB.Add;
445: RAISE FND_API.G_EXC_ERROR;
446: END IF;
447:
460: x_msg_data => x_msg_data
461: );
462:
463: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
464: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_VLD_FAIL');
465: FND_MSG_PUB.Add;
466: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
467: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
468: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_VLD_FAIL');
464: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_VLD_FAIL');
465: FND_MSG_PUB.Add;
466: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
467: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
468: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSPRT_ID_VLD_FAIL');
469: FND_MSG_PUB.Add;
470: RAISE FND_API.G_EXC_ERROR;
471: END IF;
472:
566: x_msg_data => x_msg_data
567: );
568:
569: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
570: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_CREATE');
571: FND_MSG_PUB.Add;
572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
573: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
574: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_CREATE');
570: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_CREATE');
571: FND_MSG_PUB.Add;
572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
573: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
574: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_CREATE');
575: FND_MSG_PUB.Add;
576: RAISE FND_API.G_EXC_ERROR; -- invalid
577: END IF;
578:
599: );
600:
601: EXCEPTION
602: WHEN NO_DATA_FOUND THEN
603: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_INSERT_FL');
604: FND_MSG_PUB.Add;
605: RAISE FND_API.G_EXC_ERROR;
606: WHEN OTHERS THEN
607: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_INSERT_FL');
603: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_INSERT_FL');
604: FND_MSG_PUB.Add;
605: RAISE FND_API.G_EXC_ERROR;
606: WHEN OTHERS THEN
607: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_INSERT_FL');
608: FND_MSG_PUB.Add;
609: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
610: END;
611:
725: OPEN c1(p_msite_id, p_party_id);
726: FETCH c1 INTO l_msite_prty_accss_id;
727: IF (c1%NOTFOUND) THEN
728: CLOSE c1;
729: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
730: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
731: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
732: RAISE FND_API.G_EXC_ERROR;
733: END IF;
726: FETCH c1 INTO l_msite_prty_accss_id;
727: IF (c1%NOTFOUND) THEN
728: CLOSE c1;
729: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
730: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
731: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
732: RAISE FND_API.G_EXC_ERROR;
733: END IF;
734: CLOSE c1;
727: IF (c1%NOTFOUND) THEN
728: CLOSE c1;
729: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
730: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
731: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
732: RAISE FND_API.G_EXC_ERROR;
733: END IF;
734: CLOSE c1;
735:
735:
736: ELSE
737: -- neither msite_prty_accss_id nor combination of
738: -- msite_id and party_id is specified
739: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_MP_IDS_SPEC');
740: FND_MSG_PUB.Add;
741: RAISE FND_API.G_EXC_ERROR;
742: END IF;
743:
757: x_msg_data => x_msg_data
758: );
759:
760: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
761: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_UPDATE');
762: FND_MSG_PUB.Add;
763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
764: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
765: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_UPDATE');
761: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_UPDATE');
762: FND_MSG_PUB.Add;
763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
764: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
765: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MP_INVALID_UPDATE');
766: FND_MSG_PUB.Add;
767: RAISE FND_API.G_EXC_ERROR; -- invalid
768: END IF;
769:
782: );
783:
784: EXCEPTION
785: WHEN NO_DATA_FOUND THEN
786: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_UPDATE_FL');
787: FND_MSG_PUB.ADD;
788: RAISE FND_API.G_EXC_ERROR;
789: WHEN OTHERS THEN
790: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_UPDATE_FL');
786: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_UPDATE_FL');
787: FND_MSG_PUB.ADD;
788: RAISE FND_API.G_EXC_ERROR;
789: WHEN OTHERS THEN
790: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_UPDATE_FL');
791: FND_MSG_PUB.ADD;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: END;
794:
902: OPEN c1(p_msite_id, p_party_id);
903: FETCH c1 INTO l_msite_prty_accss_id;
904: IF (c1%NOTFOUND) THEN
905: CLOSE c1;
906: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
907: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
908: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
909: RAISE FND_API.G_EXC_ERROR;
910: END IF;
903: FETCH c1 INTO l_msite_prty_accss_id;
904: IF (c1%NOTFOUND) THEN
905: CLOSE c1;
906: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
907: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
908: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
909: RAISE FND_API.G_EXC_ERROR;
910: END IF;
911: CLOSE c1;
904: IF (c1%NOTFOUND) THEN
905: CLOSE c1;
906: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITEPRTY_NOT_FOUND');
907: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
908: FND_MESSAGE.Set_Token('PARTY_ID', p_party_id);
909: RAISE FND_API.G_EXC_ERROR;
910: END IF;
911: CLOSE c1;
912:
912:
913: ELSE
914: -- neither msite_prty_accss_id nor combination of
915: -- msite_id and party_id is specified
916: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_NO_MP_IDS_SPEC');
917: FND_MSG_PUB.Add;
918: RAISE FND_API.G_EXC_ERROR;
919: END IF;
920:
922: BEGIN
923: Jtf_Msite_Prty_Accss_Pkg.delete_row(l_msite_prty_accss_id);
924: EXCEPTION
925: WHEN NO_DATA_FOUND THEN
926: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_DELETE_FL');
927: FND_MSG_PUB.Add;
928: RAISE FND_API.G_EXC_ERROR;
929: WHEN OTHERS THEN
930: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_DELETE_FL');
926: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_DELETE_FL');
927: FND_MSG_PUB.Add;
928: RAISE FND_API.G_EXC_ERROR;
929: WHEN OTHERS THEN
930: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_MSITE_PRTY_DELETE_FL');
931: FND_MSG_PUB.Add;
932: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
933: END;
934: