534: END IF;
535:
536: --
537: --
538: -- Standard check of p_commit.
539:
540: IF FND_API.To_Boolean ( p_commit ) THEN
541: COMMIT WORK;
542: END iF;
540: IF FND_API.To_Boolean ( p_commit ) THEN
541: COMMIT WORK;
542: END iF;
543: --
544: -- Standard call to get message count and if count is 1, get message info.
545: FND_MSG_PUB.Count_And_Get ( p_count => p_msg_count,
546: p_data => p_msg_data );
547: --
548: EXCEPTION
1233: l_rowid VARCHAR2(100) ;
1234: l_dist_rule_line_id NUMBER ;
1235: --
1236: BEGIN
1237: -- Standard Start of API savepoint
1238: g_dbug := g_dbug || ' copy rule';
1239:
1240: SAVEPOINT Copy_Rule;
1241: