572: FETCH C_lock_row INTO Recinfo;
573:
574: IF (C_lock_row%NOTFOUND) THEN
575: CLOSE C_lock_row;
576: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
577: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
578: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
579: --
580: IF l_debug_on THEN
641: END IF;
642: --
643: RETURN;
644: ELSE
645: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
646: IF l_debug_on THEN
647: WSH_DEBUG_SV.log(l_module_name,'FORM_RECORD_CHANGED');
648: END IF;
649: APP_EXCEPTION.Raise_Exception;