1: PACKAGE BODY QP_Validate_Price_List AS
2: /* $Header: QPXLPLHB.pls 120.9.12020000.2 2013/02/28 10:37:08 kdurgasi ship $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: QPXLPLHB.pls 120.9.12020000.2 2013/02/28 10:37:08 kdurgasi ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_Validate_Price_List';
7:
8: -- Procedure Entity
9:
10: PROCEDURE Entity
485: oe_msg_pub.add;
486: END IF;
487: END IF;
488:
489: IF NOT QP_Validate.Price_List_Name(p_PRICE_LIST_rec.name,
490: p_PRICE_LIST_rec.list_header_id,
491: p_PRICE_LIST_rec.version_no) THEN
492:
493: l_return_status := FND_API.G_RET_STS_ERROR;
1148: END IF;
1149:
1150: END Entity_Delete;
1151:
1152: END QP_Validate_Price_List;