[Home] [Help]
PACKAGE BODY: APPS.BOM_DELETION_CONSTRAINTS_PKG
Source
1 PACKAGE BODY BOM_DELETION_CONSTRAINTS_PKG as
2 /* $Header: bompconb.pls 120.2 2005/07/18 03:06:43 bbpatel noship $ */
3
4 PROCEDURE Check_Unique(X_Sql_Statement_Name VARCHAR2) IS
5 DUMMY NUMBER;
6 BEGIN
7 SELECT 1 INTO DUMMY FROM DUAL WHERE NOT EXISTS
8 (SELECT 1 FROM BOM_DELETE_SQL_STATEMENTS
9 WHERE SQL_STATEMENT_NAME = X_Sql_Statement_Name
10 );
11
12 EXCEPTION
13 WHEN NO_DATA_FOUND THEN
14 FND_MESSAGE.SET_NAME('BOM', 'BOM_DEL_CON_STMT_ALREADY_EXIST'); --bug:4495612 Changed the error message
15 FND_MESSAGE.SET_TOKEN('NAME', X_Sql_Statement_Name, FALSE);
16 APP_EXCEPTION.RAISE_EXCEPTION;
17 END Check_Unique;
18
19 END BOM_DELETION_CONSTRAINTS_PKG;