1: PACKAGE BODY INV_COST_GROUP_PUB AS
2: /* $Header: INVPDCGB.pls 120.1 2005/06/17 17:21:34 appldev $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: INVPDCGB.pls 120.1 2005/06/17 17:21:34 appldev $ */
3:
4: -- Global constant holding the package name
5:
6: --G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_COST_GROUP_PUB';
7: is_debug BOOLEAN := TRUE;
8:
9: -- Start of Comments
10: -- API name Assign_Cost_Group
94: WHEN OTHERS THEN
95: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
96: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
97: FND_MSG_PUB.Add_Exc_Msg
98: ( G_PKG_NAME, 'INV_COST_GROUP_PUB');
99: end if;
100: END Assign_Cost_Group;
101: END;
102: