1: PACKAGE BODY IBE_Prod_Relation_Rule_PVT AS
2: /* $Header: IBEVCRRB.pls 120.0 2005/05/30 02:53:44 appldev noship $ */
3:
4:
5: PROCEDURE Insert_SQL_Rule(
40: -- Initialize API return status to success
41: x_return_status := FND_API.G_RET_STS_SUCCESS;
42:
43: IF (l_debug = 'Y') THEN
44: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Insert_SQL_Rule(+)');
45: END IF;
46: -- API body
47: IF NOT Is_SQL_Valid( p_sql_statement ) THEN
48: IF (l_debug = 'Y') THEN
75: RAISE FND_API.G_EXC_ERROR;
76: END IF;
77: -- End of API body.
78: IF (l_debug = 'Y') THEN
79: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Insert_SQL_Rule(-)');
80: END IF;
81:
82: -- Standard check of p_commit.
83: IF FND_API.To_Boolean( p_commit ) THEN
164: -- Initialize API return status to success
165: x_return_status := FND_API.G_RET_STS_SUCCESS;
166:
167: IF (l_debug = 'Y') THEN
168: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Insert_Mapping_Rules(+)');
169: END IF;
170: -- API body
171: IF FND_API.to_Boolean( p_preview ) THEN
172: IF (l_debug = 'Y') THEN
252: END LOOP;
253: END IF;
254: -- End of API body.
255: IF (l_debug = 'Y') THEN
256: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Insert_Mapping_Rules(-)');
257: END IF;
258:
259: -- Standard check of p_commit.
260: IF FND_API.To_Boolean( p_commit ) THEN
335: -- Initialize API return status to success
336: x_return_status := FND_API.G_RET_STS_SUCCESS;
337:
338: IF (l_debug = 'Y') THEN
339: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Update_Rule(+)');
340: END IF;
341: -- API body
342: IF p_sql_statement IS NOT NULL AND
343: NOT Is_SQL_Valid( p_sql_statement ) THEN
364: RAISE FND_API.G_EXC_ERROR;
365: END IF;
366: -- End of API body.
367: IF (l_debug = 'Y') THEN
368: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Update_Rule(-)');
369: END IF;
370:
371: -- Standard check of p_commit.
372: IF FND_API.To_Boolean( p_commit ) THEN
445: -- Initialize API return status to success
446: x_return_status := FND_API.G_RET_STS_SUCCESS;
447:
448: IF (l_debug = 'Y') THEN
449: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Delete_Rule(+)');
450: END IF;
451: -- API body
452: IF (l_debug = 'Y') THEN
453: IBE_UTIL.debug('Deleting rows in IBE_CT_RELATION_RULES.');
480: END IF;
481: IBE_Prod_Relation_PVT.Remove_Invalid_Exclusions();
482: -- End of API body.
483: IF (l_debug = 'Y') THEN
484: IBE_UTIL.debug('IBE_Prod_Relation_Rule_PVT.Delete_Rule(-)');
485: END IF;
486:
487: -- Standard check of p_commit.
488: IF FND_API.To_Boolean( p_commit ) THEN
629: DBMS_SQL.Close_Cursor(l_cursor);
630: RETURN l_is_valid;
631: END Is_SQL_Valid;
632:
633: END IBE_Prod_Relation_Rule_PVT;