52: EXCEPTION
53:
54: WHEN OTHERS THEN
55:
56: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
57: THEN
58: FND_MSG_PUB.Add_Exc_Msg
59: ( G_PKG_NAME
60: , 'Update_Row'
54: WHEN OTHERS THEN
55:
56: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
57: THEN
58: FND_MSG_PUB.Add_Exc_Msg
59: ( G_PKG_NAME
60: , 'Update_Row'
61: );
62: END IF;
145: EXCEPTION
146:
147: WHEN OTHERS THEN
148:
149: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
150: THEN
151: FND_MSG_PUB.Add_Exc_Msg
152: ( G_PKG_NAME
153: , 'Insert_Row'
147: WHEN OTHERS THEN
148:
149: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
150: THEN
151: FND_MSG_PUB.Add_Exc_Msg
152: ( G_PKG_NAME
153: , 'Insert_Row'
154: );
155: END IF;
200: EXCEPTION
201:
202: WHEN OTHERS THEN
203:
204: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME
208: , 'Delete_Row'
202: WHEN OTHERS THEN
203:
204: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: FND_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME
208: , 'Delete_Row'
209: );
210: END IF;
472:
473: x_return_status := FND_API.G_RET_STS_ERROR;
474: x_Sourcing_Rule_rec.return_status := FND_API.G_RET_STS_ERROR;
475:
476: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
477: THEN
478:
479: FND_MESSAGE.SET_NAME('MRP','BOI_LOCK_ROW_CHANGED');
480: FND_MSG_PUB.Add;
476: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
477: THEN
478:
479: FND_MESSAGE.SET_NAME('MRP','BOI_LOCK_ROW_CHANGED');
480: FND_MSG_PUB.Add;
481:
482: END IF;
483:
484: END IF;
489:
490: x_return_status := FND_API.G_RET_STS_ERROR;
491: x_Sourcing_Rule_rec.return_status := FND_API.G_RET_STS_ERROR;
492:
493: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
494: THEN
495:
496: FND_MESSAGE.SET_NAME('MRP','BOI_LOCK_ROW_DELETED');
497: FND_MSG_PUB.Add;
493: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
494: THEN
495:
496: FND_MESSAGE.SET_NAME('MRP','BOI_LOCK_ROW_DELETED');
497: FND_MSG_PUB.Add;
498:
499: END IF;
500: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
501:
501:
502: x_return_status := FND_API.G_RET_STS_ERROR;
503: x_Sourcing_Rule_rec.return_status := FND_API.G_RET_STS_ERROR;
504:
505: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
506: THEN
507:
508: FND_MESSAGE.SET_NAME('MRP','BOI_LOCK_ROW_ALREADY_LOCKED');
509: FND_MSG_PUB.Add;
505: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
506: THEN
507:
508: FND_MESSAGE.SET_NAME('MRP','BOI_LOCK_ROW_ALREADY_LOCKED');
509: FND_MSG_PUB.Add;
510:
511: END IF;
512: WHEN OTHERS THEN
513:
513:
514: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
515: x_Sourcing_Rule_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516:
517: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
518: THEN
519: FND_MSG_PUB.Add_Exc_Msg
520: ( G_PKG_NAME
521: , 'Lock_Row'
515: x_Sourcing_Rule_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
516:
517: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
518: THEN
519: FND_MSG_PUB.Add_Exc_Msg
520: ( G_PKG_NAME
521: , 'Lock_Row'
522: );
523: END IF;
606: EXCEPTION
607:
608: WHEN OTHERS THEN
609:
610: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
611: THEN
612: FND_MSG_PUB.Add_Exc_Msg
613: ( G_PKG_NAME
614: , 'Query_Row'
608: WHEN OTHERS THEN
609:
610: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
611: THEN
612: FND_MSG_PUB.Add_Exc_Msg
613: ( G_PKG_NAME
614: , 'Query_Row'
615: );
616: END IF;
701: EXCEPTION
702:
703: WHEN OTHERS THEN
704:
705: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
706: THEN
707: FND_MSG_PUB.Add_Exc_Msg
708: ( G_PKG_NAME
709: , 'Query_Entity'
703: WHEN OTHERS THEN
704:
705: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
706: THEN
707: FND_MSG_PUB.Add_Exc_Msg
708: ( G_PKG_NAME
709: , 'Query_Entity'
710: );
711: END IF;