[Home] [Help]
480: L_DEBUG CONSTANT VARCHAR2(90) := 'ahl.plsql.'||L_FULL_NAME;
481:
482: BEGIN
483:
484: -- Standard Start of API savepoint
485: SAVEPOINT create_rule_sp;
486:
487: IF (l_log_procedure >= l_log_current_level) THEN
488: FND_LOG.string(l_log_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
495:
496: -- Initialize API return status to success
497: x_return_status := FND_API.G_RET_STS_SUCCESS;
498:
499: -- Standard call to check for call compatibility.
500: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
502: END IF;
503:
572: END IF;
573:
574: ------------------------End of API Body--------------------------------------
575:
576: --Standard check for commit
577: IF (FND_API.TO_BOOLEAN(p_commit) AND x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
578: COMMIT;
579: END IF;
580:
646: L_OVN NUMBER;
647:
648: BEGIN
649:
650: -- Standard Start of API savepoint
651: SAVEPOINT update_rule_sp;
652:
653: IF (l_log_procedure >= l_log_current_level) THEN
654: FND_LOG.string(l_log_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
661:
662: -- Initialize API return status to success
663: x_return_status := FND_API.G_RET_STS_SUCCESS;
664:
665: -- Standard call to check for call compatibility.
666: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
667: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
668: END IF;
669:
712: END IF;
713:
714: ------------------------End of API Body--------------------------------------
715:
716: --Standard check for commit
717: IF (FND_API.TO_BOOLEAN(p_commit) AND x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
718: COMMIT;
719: END IF;
720: