23: THEN
24:
25: l_return_status := FND_API.G_RET_STS_ERROR;
26:
27: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
28: THEN
29:
30: FND_MESSAGE.SET_NAME('MRP','MRP_ATTRIBUTE_REQUIRED');
31: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Assignment_Set_Id');
28: THEN
29:
30: FND_MESSAGE.SET_NAME('MRP','MRP_ATTRIBUTE_REQUIRED');
31: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Assignment_Set_Id');
32: FND_MSG_PUB.Add;
33:
34: END IF;
35:
36: END IF;
75: WHEN OTHERS THEN
76:
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78:
79: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
80: THEN
81: FND_MSG_PUB.Add_Exc_Msg
82: ( G_PKG_NAME
83: , 'Entity'
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78:
79: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
80: THEN
81: FND_MSG_PUB.Add_Exc_Msg
82: ( G_PKG_NAME
83: , 'Entity'
84: );
85: END IF;
117: WHEN OTHERS THEN
118:
119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
120:
121: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
122: THEN
123: FND_MSG_PUB.Add_Exc_Msg
124: ( G_PKG_NAME
125: , 'Entity_Delete'
119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
120:
121: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
122: THEN
123: FND_MSG_PUB.Add_Exc_Msg
124: ( G_PKG_NAME
125: , 'Entity_Delete'
126: );
127: END IF;
441: WHEN OTHERS THEN
442:
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444:
445: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
446: THEN
447: FND_MSG_PUB.Add_Exc_Msg
448: ( G_PKG_NAME
449: , 'Attributes'
443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
444:
445: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
446: THEN
447: FND_MSG_PUB.Add_Exc_Msg
448: ( G_PKG_NAME
449: , 'Attributes'
450: );
451: END IF;
471: THEN
472: dbms_output.put_line ('Val_Assignment_Set_Name Error');
473: FND_MESSAGE.SET_NAME('MRP','MRP_ATTRIBUTE_REQUIRED');
474: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Assignment_Set_Name');
475: FND_MSG_PUB.Add;
476: RETURN FALSE;
477: ELSE
478: -- make sure that this assignment set does
479: -- not already exist in the system
486: IF l_count > 0 THEN
487: dbms_output.put_line ('Val_Assignment_Set_Name Error');
488: FND_MESSAGE.SET_NAME('MRP','MRP_ATTRIBUTE_VALUE_ERROR');
489: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Assignment_Set_Name');
490: FND_MSG_PUB.Add;
491: RETURN FALSE;
492: END IF;
493:
494: END IF;