38: OPEN c1(p_msite_id);
39: FETCH c1 INTO l_tmp_id;
40: IF (c1%NOTFOUND) THEN
41: CLOSE c1;
42: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_NOT_FOUND');
43: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
44: FND_MSG_PUB.Add;
45: RAISE FND_API.G_EXC_ERROR;
46: END IF;
39: FETCH c1 INTO l_tmp_id;
40: IF (c1%NOTFOUND) THEN
41: CLOSE c1;
42: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_NOT_FOUND');
43: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
44: FND_MSG_PUB.Add;
45: RAISE FND_API.G_EXC_ERROR;
46: END IF;
47: CLOSE c1;
60: p_data => x_msg_data,
61: p_encoded => 'F');
62:
63: WHEN OTHERS THEN
64: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
65: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
66: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
67: FND_MESSAGE.Set_Token('REASON', SQLERRM);
68: FND_MSG_PUB.Add;
61: p_encoded => 'F');
62:
63: WHEN OTHERS THEN
64: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
65: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
66: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
67: FND_MESSAGE.Set_Token('REASON', SQLERRM);
68: FND_MSG_PUB.Add;
69:
62:
63: WHEN OTHERS THEN
64: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
65: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
66: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
67: FND_MESSAGE.Set_Token('REASON', SQLERRM);
68: FND_MSG_PUB.Add;
69:
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
63: WHEN OTHERS THEN
64: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
65: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
66: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
67: FND_MESSAGE.Set_Token('REASON', SQLERRM);
68: FND_MSG_PUB.Add;
69:
70: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
71:
113: OPEN c1(p_payment_method_code);
114: FETCH c1 INTO l_tmp_id;
115: IF (c1%NOTFOUND) THEN
116: CLOSE c1;
117: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_CODE_NOT_EXISTS');
118: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_payment_method_code);
119: FND_MSG_PUB.Add;
120: RAISE FND_API.G_EXC_ERROR;
121: END IF;
114: FETCH c1 INTO l_tmp_id;
115: IF (c1%NOTFOUND) THEN
116: CLOSE c1;
117: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_CODE_NOT_EXISTS');
118: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_payment_method_code);
119: FND_MSG_PUB.Add;
120: RAISE FND_API.G_EXC_ERROR;
121: END IF;
122: CLOSE c1;
135: p_data => x_msg_data,
136: p_encoded => 'F');
137:
138: WHEN OTHERS THEN
139: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
140: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
141: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
142: FND_MESSAGE.Set_Token('REASON', SQLERRM);
143: FND_MSG_PUB.Add;
136: p_encoded => 'F');
137:
138: WHEN OTHERS THEN
139: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
140: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
141: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
142: FND_MESSAGE.Set_Token('REASON', SQLERRM);
143: FND_MSG_PUB.Add;
144:
137:
138: WHEN OTHERS THEN
139: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
140: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
141: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
142: FND_MESSAGE.Set_Token('REASON', SQLERRM);
143: FND_MSG_PUB.Add;
144:
145: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
138: WHEN OTHERS THEN
139: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
140: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
141: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
142: FND_MESSAGE.Set_Token('REASON', SQLERRM);
143: FND_MSG_PUB.Add;
144:
145: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
146:
183: OPEN c1(p_credit_card_code);
184: FETCH c1 INTO l_tmp_id;
185: IF (c1%NOTFOUND) THEN
186: CLOSE c1;
187: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_CODE_NOT_EXISTS');
188: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_credit_card_code);
189: FND_MSG_PUB.Add;
190: RAISE FND_API.G_EXC_ERROR;
191: END IF;
184: FETCH c1 INTO l_tmp_id;
185: IF (c1%NOTFOUND) THEN
186: CLOSE c1;
187: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_CODE_NOT_EXISTS');
188: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_credit_card_code);
189: FND_MSG_PUB.Add;
190: RAISE FND_API.G_EXC_ERROR;
191: END IF;
192: CLOSE c1;
205: p_data => x_msg_data,
206: p_encoded => 'F');
207:
208: WHEN OTHERS THEN
209: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
210: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
211: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
212: FND_MESSAGE.Set_Token('REASON', SQLERRM);
213: FND_MSG_PUB.Add;
206: p_encoded => 'F');
207:
208: WHEN OTHERS THEN
209: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
210: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
211: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
212: FND_MESSAGE.Set_Token('REASON', SQLERRM);
213: FND_MSG_PUB.Add;
214:
207:
208: WHEN OTHERS THEN
209: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
210: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
211: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
212: FND_MESSAGE.Set_Token('REASON', SQLERRM);
213: FND_MSG_PUB.Add;
214:
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
208: WHEN OTHERS THEN
209: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
210: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
211: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
212: FND_MESSAGE.Set_Token('REASON', SQLERRM);
213: FND_MSG_PUB.Add;
214:
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
216:
258: OPEN c1(p_shipment_method_code);
259: FETCH c1 INTO l_tmp_id;
260: IF (c1%NOTFOUND) THEN
261: CLOSE c1;
262: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_CODE_NOT_EXISTS');
263: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_shipment_method_code);
264: FND_MSG_PUB.Add;
265: RAISE FND_API.G_EXC_ERROR;
266: END IF;
259: FETCH c1 INTO l_tmp_id;
260: IF (c1%NOTFOUND) THEN
261: CLOSE c1;
262: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_CODE_NOT_EXISTS');
263: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_shipment_method_code);
264: FND_MSG_PUB.Add;
265: RAISE FND_API.G_EXC_ERROR;
266: END IF;
267: CLOSE c1;
280: p_data => x_msg_data,
281: p_encoded => 'F');
282:
283: WHEN OTHERS THEN
284: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
285: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
286: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
287: FND_MESSAGE.Set_Token('REASON', SQLERRM);
288: FND_MSG_PUB.Add;
281: p_encoded => 'F');
282:
283: WHEN OTHERS THEN
284: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
285: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
286: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
287: FND_MESSAGE.Set_Token('REASON', SQLERRM);
288: FND_MSG_PUB.Add;
289:
282:
283: WHEN OTHERS THEN
284: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
285: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
286: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
287: FND_MESSAGE.Set_Token('REASON', SQLERRM);
288: FND_MSG_PUB.Add;
289:
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
283: WHEN OTHERS THEN
284: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
285: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
286: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
287: FND_MESSAGE.Set_Token('REASON', SQLERRM);
288: FND_MSG_PUB.Add;
289:
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291:
371: OPEN c1(p_msite_id, p_msite_information1);
372: FETCH c1 INTO l_tmp_id;
373: IF (c1%FOUND) THEN -- found duplicate
374: CLOSE c1;
375: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
376: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
377: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
378: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
379: FND_MSG_PUB.Add;
372: FETCH c1 INTO l_tmp_id;
373: IF (c1%FOUND) THEN -- found duplicate
374: CLOSE c1;
375: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
376: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
377: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
378: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
379: FND_MSG_PUB.Add;
380: RAISE FND_API.G_EXC_ERROR;
373: IF (c1%FOUND) THEN -- found duplicate
374: CLOSE c1;
375: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
376: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
377: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
378: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
379: FND_MSG_PUB.Add;
380: RAISE FND_API.G_EXC_ERROR;
381: END IF;
374: CLOSE c1;
375: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
376: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
377: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
378: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
379: FND_MSG_PUB.Add;
380: RAISE FND_API.G_EXC_ERROR;
381: END IF;
382: CLOSE c1;
387: OPEN c2(p_msite_id, p_msite_information1);
388: FETCH c2 INTO l_tmp_id;
389: IF (c2%FOUND) THEN -- found duplicate
390: CLOSE c2;
391: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
392: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
393: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
394: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
395: FND_MSG_PUB.Add;
388: FETCH c2 INTO l_tmp_id;
389: IF (c2%FOUND) THEN -- found duplicate
390: CLOSE c2;
391: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
392: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
393: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
394: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
395: FND_MSG_PUB.Add;
396: RAISE FND_API.G_EXC_ERROR;
389: IF (c2%FOUND) THEN -- found duplicate
390: CLOSE c2;
391: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
392: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
393: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
394: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
395: FND_MSG_PUB.Add;
396: RAISE FND_API.G_EXC_ERROR;
397: END IF;
390: CLOSE c2;
391: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
392: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
393: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
394: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
395: FND_MSG_PUB.Add;
396: RAISE FND_API.G_EXC_ERROR;
397: END IF;
398: CLOSE c2;
403: OPEN c3(p_msite_id, p_msite_information1);
404: FETCH c3 INTO l_tmp_id;
405: IF (c3%FOUND) THEN -- found duplicate
406: CLOSE c3;
407: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
408: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
409: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
410: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
411: FND_MSG_PUB.Add;
404: FETCH c3 INTO l_tmp_id;
405: IF (c3%FOUND) THEN -- found duplicate
406: CLOSE c3;
407: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
408: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
409: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
410: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
411: FND_MSG_PUB.Add;
412: RAISE FND_API.G_EXC_ERROR;
405: IF (c3%FOUND) THEN -- found duplicate
406: CLOSE c3;
407: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
408: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
409: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
410: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
411: FND_MSG_PUB.Add;
412: RAISE FND_API.G_EXC_ERROR;
413: END IF;
406: CLOSE c3;
407: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFORMATION_DUP');
408: FND_MESSAGE.Set_Token('VALUE', p_msite_information1);
409: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
410: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
411: FND_MSG_PUB.Add;
412: RAISE FND_API.G_EXC_ERROR;
413: END IF;
414: CLOSE c3;
429: p_data => x_msg_data,
430: p_encoded => 'F');
431:
432: WHEN OTHERS THEN
433: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
434: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
435: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
436: FND_MESSAGE.Set_Token('REASON', SQLERRM);
437: FND_MSG_PUB.Add;
430: p_encoded => 'F');
431:
432: WHEN OTHERS THEN
433: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
434: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
435: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
436: FND_MESSAGE.Set_Token('REASON', SQLERRM);
437: FND_MSG_PUB.Add;
438:
431:
432: WHEN OTHERS THEN
433: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
434: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
435: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
436: FND_MESSAGE.Set_Token('REASON', SQLERRM);
437: FND_MSG_PUB.Add;
438:
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: WHEN OTHERS THEN
433: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
434: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
435: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
436: FND_MESSAGE.Set_Token('REASON', SQLERRM);
437: FND_MSG_PUB.Add;
438:
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
440:
516:
517: IF ((p_msite_id IS NULL) OR
518: (p_msite_id = FND_API.G_MISS_NUM))
519: THEN
520: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_MSITE_ID');
521: FND_MSG_PUB.Add;
522: RAISE FND_API.G_EXC_ERROR;
523: END IF;
524:
524:
525: IF ((p_msite_information_context IS NULL) OR
526: (p_msite_information_context = FND_API.G_MISS_CHAR))
527: THEN
528: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_INFO_CTX');
529: FND_MSG_PUB.Add;
530: RAISE FND_API.G_EXC_ERROR;
531: END IF;
532: -- developer flex-fields
537:
538: IF ((p_msite_information1 IS NULL) OR
539: (p_msite_information1 = FND_API.G_MISS_CHAR))
540: THEN
541: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_MSITE_INFO');
542: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
543: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
544: FND_MSG_PUB.Add;
545: RAISE FND_API.G_EXC_ERROR;
538: IF ((p_msite_information1 IS NULL) OR
539: (p_msite_information1 = FND_API.G_MISS_CHAR))
540: THEN
541: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_MSITE_INFO');
542: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
543: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
544: FND_MSG_PUB.Add;
545: RAISE FND_API.G_EXC_ERROR;
546: END IF;
539: (p_msite_information1 = FND_API.G_MISS_CHAR))
540: THEN
541: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_MSITE_INFO');
542: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
543: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
544: FND_MSG_PUB.Add;
545: RAISE FND_API.G_EXC_ERROR;
546: END IF;
547:
564: x_msg_data => x_msg_data
565: );
566:
567: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
568: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_VLD_FAIL');
569: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
570: FND_MSG_PUB.Add;
571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
572: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
565: );
566:
567: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
568: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_VLD_FAIL');
569: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
570: FND_MSG_PUB.Add;
571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
572: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
573: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_VLD_FAIL');
569: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
570: FND_MSG_PUB.Add;
571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
572: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
573: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_VLD_FAIL');
574: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
575: FND_MSG_PUB.Add;
576: RAISE FND_API.G_EXC_ERROR; -- invalid msite_id
577: END IF;
570: FND_MSG_PUB.Add;
571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
572: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
573: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSITE_ID_VLD_FAIL');
574: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
575: FND_MSG_PUB.Add;
576: RAISE FND_API.G_EXC_ERROR; -- invalid msite_id
577: END IF;
578: -- developer flexfield
586: x_msg_data => x_msg_data
587: );
588:
589: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
590: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
591: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
592: FND_MSG_PUB.Add;
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
587: );
588:
589: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
590: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
591: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
592: FND_MSG_PUB.Add;
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
595: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
591: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
592: FND_MSG_PUB.Add;
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
595: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
596: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
597: FND_MSG_PUB.Add;
598: RAISE FND_API.G_EXC_ERROR;
599: END IF;
592: FND_MSG_PUB.Add;
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
595: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
596: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
597: FND_MSG_PUB.Add;
598: RAISE FND_API.G_EXC_ERROR;
599: END IF;
600: ELSIF (p_msite_information_context = 'CC_TYPE') THEN
607: x_msg_data => x_msg_data
608: );
609:
610: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
611: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
612: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
613: FND_MSG_PUB.Add;
614: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
615: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
608: );
609:
610: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
611: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
612: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
613: FND_MSG_PUB.Add;
614: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
615: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
616: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
612: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
613: FND_MSG_PUB.Add;
614: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
615: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
616: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
617: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
618: FND_MSG_PUB.Add;
619: RAISE FND_API.G_EXC_ERROR;
620: END IF;
613: FND_MSG_PUB.Add;
614: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
615: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
616: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
617: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
618: FND_MSG_PUB.Add;
619: RAISE FND_API.G_EXC_ERROR;
620: END IF;
621: ELSIF (p_msite_information_context = 'SHPMT_MTHD') THEN
628: x_msg_data => x_msg_data
629: );
630:
631: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
632: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
633: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
634: FND_MSG_PUB.Add;
635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
636: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
629: );
630:
631: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
632: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
633: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
634: FND_MSG_PUB.Add;
635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
636: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
637: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
633: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
634: FND_MSG_PUB.Add;
635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
636: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
637: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
638: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
639: FND_MSG_PUB.Add;
640: RAISE FND_API.G_EXC_ERROR;
641: END IF;
634: FND_MSG_PUB.Add;
635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
636: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
637: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
638: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
639: FND_MSG_PUB.Add;
640: RAISE FND_API.G_EXC_ERROR;
641: END IF;
642:
673: x_msg_data => x_msg_data
674: );
675:
676: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
677: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UNEXP_DUP_CHECK');
678: FND_MSG_PUB.Add;
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
681: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DUPLICATE_MSITE_INFO');
677: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UNEXP_DUP_CHECK');
678: FND_MSG_PUB.Add;
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
681: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DUPLICATE_MSITE_INFO');
682: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
683: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
684: FND_MSG_PUB.Add;
685: RAISE FND_API.G_EXC_ERROR; -- duplicate entry
678: FND_MSG_PUB.Add;
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
681: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DUPLICATE_MSITE_INFO');
682: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
683: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
684: FND_MSG_PUB.Add;
685: RAISE FND_API.G_EXC_ERROR; -- duplicate entry
686: END IF;
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
681: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_DUPLICATE_MSITE_INFO');
682: FND_MESSAGE.Set_Token('MSITE_ID', p_msite_id);
683: FND_MESSAGE.Set_Token('CONTEXT', p_msite_information_context);
684: FND_MSG_PUB.Add;
685: RAISE FND_API.G_EXC_ERROR; -- duplicate entry
686: END IF;
687: EXCEPTION
698: p_data => x_msg_data,
699: p_encoded => 'F');
700:
701: WHEN OTHERS THEN
702: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
703: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
704: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
705: FND_MESSAGE.Set_Token('REASON', SQLERRM);
706: FND_MSG_PUB.Add;
699: p_encoded => 'F');
700:
701: WHEN OTHERS THEN
702: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
703: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
704: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
705: FND_MESSAGE.Set_Token('REASON', SQLERRM);
706: FND_MSG_PUB.Add;
707:
700:
701: WHEN OTHERS THEN
702: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
703: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
704: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
705: FND_MESSAGE.Set_Token('REASON', SQLERRM);
706: FND_MSG_PUB.Add;
707:
708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: WHEN OTHERS THEN
702: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
703: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
704: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
705: FND_MESSAGE.Set_Token('REASON', SQLERRM);
706: FND_MSG_PUB.Add;
707:
708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
709:
793: --
794:
795: -- msite_information_id
796: IF (p_msite_information_id IS NULL) THEN
797: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_MSINF_ID_IS_NULL');
798: FND_MSG_PUB.Add;
799: RAISE FND_API.G_EXC_ERROR;
800: END IF;
801:
801:
802: -- object_version_number
803: IF (p_object_version_number IS NULL)
804: THEN
805: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_OVN_IS_NULL');
806: FND_MSG_PUB.Add;
807: RAISE FND_API.G_EXC_ERROR;
808: END IF;
809:
815: OPEN c1(p_msite_information_id);
816: FETCH c1 INTO l_msite_information_context, l_msite_id;
817: IF (c1%NOTFOUND) THEN
818: CLOSE c1;
819: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_ID_NOT_FOUND');
820: FND_MESSAGE.Set_Token('MSITE_INFO_ID', p_msite_information_id);
821: FND_MSG_PUB.Add;
822: RAISE FND_API.G_EXC_ERROR;
823: END IF;
816: FETCH c1 INTO l_msite_information_context, l_msite_id;
817: IF (c1%NOTFOUND) THEN
818: CLOSE c1;
819: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_ID_NOT_FOUND');
820: FND_MESSAGE.Set_Token('MSITE_INFO_ID', p_msite_information_id);
821: FND_MSG_PUB.Add;
822: RAISE FND_API.G_EXC_ERROR;
823: END IF;
824: CLOSE c1;
831:
832: IF ((p_msite_information1 IS NULL) OR
833: (p_msite_information1 = FND_API.G_MISS_CHAR))
834: THEN
835: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_MSITE_INFO');
836: FND_MESSAGE.Set_Token('MSITE_ID', l_msite_id);
837: FND_MESSAGE.Set_Token('CONTEXT', l_msite_information_context);
838: FND_MSG_PUB.Add;
839: RAISE FND_API.G_EXC_ERROR;
832: IF ((p_msite_information1 IS NULL) OR
833: (p_msite_information1 = FND_API.G_MISS_CHAR))
834: THEN
835: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_MSITE_INFO');
836: FND_MESSAGE.Set_Token('MSITE_ID', l_msite_id);
837: FND_MESSAGE.Set_Token('CONTEXT', l_msite_information_context);
838: FND_MSG_PUB.Add;
839: RAISE FND_API.G_EXC_ERROR;
840: END IF;
833: (p_msite_information1 = FND_API.G_MISS_CHAR))
834: THEN
835: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INVALID_MSITE_INFO');
836: FND_MESSAGE.Set_Token('MSITE_ID', l_msite_id);
837: FND_MESSAGE.Set_Token('CONTEXT', l_msite_information_context);
838: FND_MSG_PUB.Add;
839: RAISE FND_API.G_EXC_ERROR;
840: END IF;
841:
852: x_msg_data => x_msg_data
853: );
854:
855: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
856: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
857: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
858: FND_MSG_PUB.Add;
859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
853: );
854:
855: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
856: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
857: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
858: FND_MSG_PUB.Add;
859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
861: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
857: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
858: FND_MSG_PUB.Add;
859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
861: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
862: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
863: FND_MSG_PUB.Add;
864: RAISE FND_API.G_EXC_ERROR;
865: END IF;
858: FND_MSG_PUB.Add;
859: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
860: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
861: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_PM_VLD_FAIL');
862: FND_MESSAGE.Set_Token('PAYMENT_METHOD_CODE', p_msite_information1);
863: FND_MSG_PUB.Add;
864: RAISE FND_API.G_EXC_ERROR;
865: END IF;
866:
874: x_msg_data => x_msg_data
875: );
876:
877: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
878: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
879: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
880: FND_MSG_PUB.Add;
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
875: );
876:
877: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
878: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
879: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
880: FND_MSG_PUB.Add;
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
883: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
879: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
880: FND_MSG_PUB.Add;
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
883: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
884: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
885: FND_MSG_PUB.Add;
886: RAISE FND_API.G_EXC_ERROR;
887: END IF;
880: FND_MSG_PUB.Add;
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
883: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_CC_VLD_FAIL');
884: FND_MESSAGE.Set_Token('CREDIT_CARD_CODE', p_msite_information1);
885: FND_MSG_PUB.Add;
886: RAISE FND_API.G_EXC_ERROR;
887: END IF;
888:
896: x_msg_data => x_msg_data
897: );
898:
899: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
900: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
901: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
902: FND_MSG_PUB.Add;
903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
904: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
897: );
898:
899: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
900: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
901: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
902: FND_MSG_PUB.Add;
903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
904: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
905: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
901: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
902: FND_MSG_PUB.Add;
903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
904: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
905: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
906: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
907: FND_MSG_PUB.Add;
908: RAISE FND_API.G_EXC_ERROR;
909: END IF;
902: FND_MSG_PUB.Add;
903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
904: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
905: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_SM_VLD_FAIL');
906: FND_MESSAGE.Set_Token('SHIPMENT_METHOD_CODE', p_msite_information1);
907: FND_MSG_PUB.Add;
908: RAISE FND_API.G_EXC_ERROR;
909: END IF;
910:
924: p_data => x_msg_data,
925: p_encoded => 'F');
926:
927: WHEN OTHERS THEN
928: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
929: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
930: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
931: FND_MESSAGE.Set_Token('REASON', SQLERRM);
932: FND_MSG_PUB.Add;
925: p_encoded => 'F');
926:
927: WHEN OTHERS THEN
928: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
929: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
930: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
931: FND_MESSAGE.Set_Token('REASON', SQLERRM);
932: FND_MSG_PUB.Add;
933:
926:
927: WHEN OTHERS THEN
928: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
929: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
930: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
931: FND_MESSAGE.Set_Token('REASON', SQLERRM);
932: FND_MSG_PUB.Add;
933:
934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
927: WHEN OTHERS THEN
928: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
929: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
930: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
931: FND_MESSAGE.Set_Token('REASON', SQLERRM);
932: FND_MSG_PUB.Add;
933:
934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
935:
1077: x_msg_count => x_msg_count,
1078: x_msg_data => x_msg_data
1079: );
1080: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1081: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_CREATE');
1082: FND_MSG_PUB.Add;
1083: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1084: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1085: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_CREATE');
1081: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_CREATE');
1082: FND_MSG_PUB.Add;
1083: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1084: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1085: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_CREATE');
1086: FND_MSG_PUB.Add;
1087: RAISE FND_API.G_EXC_ERROR; -- invalid
1088: END IF;
1089: --
1142: );
1143:
1144: EXCEPTION
1145: WHEN NO_DATA_FOUND THEN
1146: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INSERT_FL');
1147: FND_MSG_PUB.Add;
1148: RAISE FND_API.G_EXC_ERROR;
1149: WHEN OTHERS THEN
1150: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1146: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INSERT_FL');
1147: FND_MSG_PUB.Add;
1148: RAISE FND_API.G_EXC_ERROR;
1149: WHEN OTHERS THEN
1150: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1151: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1152: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1153: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1154: FND_MSG_PUB.Add;
1147: FND_MSG_PUB.Add;
1148: RAISE FND_API.G_EXC_ERROR;
1149: WHEN OTHERS THEN
1150: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1151: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1152: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1153: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1154: FND_MSG_PUB.Add;
1155:
1148: RAISE FND_API.G_EXC_ERROR;
1149: WHEN OTHERS THEN
1150: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1151: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1152: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1153: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1154: FND_MSG_PUB.Add;
1155:
1156: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INSERT_FL');
1149: WHEN OTHERS THEN
1150: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1151: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1152: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1153: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1154: FND_MSG_PUB.Add;
1155:
1156: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INSERT_FL');
1157: FND_MSG_PUB.Add;
1152: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1153: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1154: FND_MSG_PUB.Add;
1155:
1156: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INSERT_FL');
1157: FND_MSG_PUB.Add;
1158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1159: END;
1160:
1187: p_data => x_msg_data,
1188: p_encoded => 'F');
1189:
1190: WHEN OTHERS THEN
1191: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1192: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1193: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1194: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1195: FND_MSG_PUB.Add;
1188: p_encoded => 'F');
1189:
1190: WHEN OTHERS THEN
1191: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1192: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1193: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1194: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1195: FND_MSG_PUB.Add;
1196:
1189:
1190: WHEN OTHERS THEN
1191: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1192: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1193: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1194: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1195: FND_MSG_PUB.Add;
1196:
1197: ROLLBACK TO create_msite_information_pvt;
1190: WHEN OTHERS THEN
1191: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1192: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1193: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1194: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1195: FND_MSG_PUB.Add;
1196:
1197: ROLLBACK TO create_msite_information_pvt;
1198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1336: x_msg_data => x_msg_data
1337: );
1338:
1339: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1340: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_UPDATE');
1341: FND_MSG_PUB.Add;
1342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1343: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1344: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_UPDATE');
1340: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_UPDATE');
1341: FND_MSG_PUB.Add;
1342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1343: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1344: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_INVALID_UPDATE');
1345: FND_MSG_PUB.Add;
1346: RAISE FND_API.G_EXC_ERROR; -- invalid
1347: END IF;
1348:
1394: );
1395:
1396: EXCEPTION
1397: WHEN NO_DATA_FOUND THEN
1398: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UPDATE_FL');
1399: FND_MSG_PUB.ADD;
1400: RAISE FND_API.G_EXC_ERROR;
1401: WHEN OTHERS THEN
1402: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1398: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UPDATE_FL');
1399: FND_MSG_PUB.ADD;
1400: RAISE FND_API.G_EXC_ERROR;
1401: WHEN OTHERS THEN
1402: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1403: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1404: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1405: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1406: FND_MSG_PUB.Add;
1399: FND_MSG_PUB.ADD;
1400: RAISE FND_API.G_EXC_ERROR;
1401: WHEN OTHERS THEN
1402: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1403: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1404: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1405: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1406: FND_MSG_PUB.Add;
1407:
1400: RAISE FND_API.G_EXC_ERROR;
1401: WHEN OTHERS THEN
1402: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1403: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1404: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1405: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1406: FND_MSG_PUB.Add;
1407:
1408: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UPDATE_FL');
1401: WHEN OTHERS THEN
1402: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1403: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1404: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1405: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1406: FND_MSG_PUB.Add;
1407:
1408: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UPDATE_FL');
1409: FND_MSG_PUB.ADD;
1404: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1405: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1406: FND_MSG_PUB.Add;
1407:
1408: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_UPDATE_FL');
1409: FND_MSG_PUB.ADD;
1410: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1411: END;
1412:
1439: p_data => x_msg_data,
1440: p_encoded => 'F');
1441:
1442: WHEN OTHERS THEN
1443: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1444: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1445: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1446: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1447: FND_MSG_PUB.Add;
1440: p_encoded => 'F');
1441:
1442: WHEN OTHERS THEN
1443: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1444: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1445: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1446: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1447: FND_MSG_PUB.Add;
1448:
1441:
1442: WHEN OTHERS THEN
1443: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1444: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1445: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1446: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1447: FND_MSG_PUB.Add;
1448:
1449: ROLLBACK TO update_msite_information_pvt;
1442: WHEN OTHERS THEN
1443: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1444: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1445: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1446: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1447: FND_MSG_PUB.Add;
1448:
1449: ROLLBACK TO update_msite_information_pvt;
1450: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1503: IF ((p_msite_information_id IS NULL) OR
1504: (p_msite_information_id = FND_API.G_MISS_NUM))
1505: THEN
1506: -- msite_information_id is not specified
1507: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_NO_MINFO_ID_SPEC');
1508: FND_MSG_PUB.Add;
1509: RAISE FND_API.G_EXC_ERROR;
1510: END IF;
1511:
1513: BEGIN
1514: Ibe_Msite_Information_Pkg.delete_row(p_msite_information_id);
1515: EXCEPTION
1516: WHEN NO_DATA_FOUND THEN
1517: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_DELETE_FL');
1518: FND_MSG_PUB.Add;
1519: RAISE FND_API.G_EXC_ERROR;
1520: WHEN OTHERS THEN
1521: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1517: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_DELETE_FL');
1518: FND_MSG_PUB.Add;
1519: RAISE FND_API.G_EXC_ERROR;
1520: WHEN OTHERS THEN
1521: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1522: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1523: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1524: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1525: FND_MSG_PUB.Add;
1518: FND_MSG_PUB.Add;
1519: RAISE FND_API.G_EXC_ERROR;
1520: WHEN OTHERS THEN
1521: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1522: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1523: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1524: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1525: FND_MSG_PUB.Add;
1526:
1519: RAISE FND_API.G_EXC_ERROR;
1520: WHEN OTHERS THEN
1521: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1522: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1523: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1524: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1525: FND_MSG_PUB.Add;
1526:
1527: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_DELETE_FL');
1520: WHEN OTHERS THEN
1521: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1522: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1523: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1524: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1525: FND_MSG_PUB.Add;
1526:
1527: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_DELETE_FL');
1528: FND_MSG_PUB.Add;
1523: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1524: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1525: FND_MSG_PUB.Add;
1526:
1527: FND_MESSAGE.Set_Name('IBE', 'IBE_MSITE_INFO_DELETE_FL');
1528: FND_MSG_PUB.Add;
1529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1530: END;
1531:
1558: p_data => x_msg_data,
1559: p_encoded => 'F');
1560:
1561: WHEN OTHERS THEN
1562: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1563: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1564: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1565: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1566: FND_MSG_PUB.Add;
1559: p_encoded => 'F');
1560:
1561: WHEN OTHERS THEN
1562: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1563: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1564: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1565: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1566: FND_MSG_PUB.Add;
1567:
1560:
1561: WHEN OTHERS THEN
1562: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1563: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1564: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1565: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1566: FND_MSG_PUB.Add;
1567:
1568: ROLLBACK TO delete_msite_information_pvt;
1561: WHEN OTHERS THEN
1562: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1563: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1564: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1565: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1566: FND_MSG_PUB.Add;
1567:
1568: ROLLBACK TO delete_msite_information_pvt;
1569: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;