@Терни

Пожалуйста, объясните мне, почему у меня не получается округление. Что-то не так с синтаксисом?

Кол1: IIf ([Кол] Is Not Null; Round ([Таблица2]![Колич]*[Кол];2); [Таблица2].[Колич])

Ситуация такая - имеется древовидная структура.
Это сборочные единицы со входящими в них опять таки сборками, деталями, винтиками всякими и прочим, и плюс материалы.
Если кто близок к технике - то ему понятно будет что я хочу создать сводную спецификацию - выбрать все, что входит в блок или изделие.
Всё, кроме материалов, меряется штуками, то есть целыми числами, а материала может быть, скажем, 0,1м. Вводить в миллиметрах не хочется, так как в другой сборке этого провода скажем будет 3м.
В итоге в одной и той же графе есть целые (выглядят как целые) и вещественные числа.

Скажем, некий провод входит в кабель, а этот кабель - в блок. Кабелей там может быть несколько, потому количество провода умножается на количество кабелей, а в иерархически следующей единице - на количество блоков.
Если же смотреть по иерархии сверху вниз, то где-то вложенность обязательно заканчивается и число умноженное на нулл не должно стать нулл, а должно остаться собой.

Вся беда в том, что при умножении 0,1 на 1 аксесс выдает скажем 0,100000467 и это число вылазит решеточками в графе.

Как обойти этот момент и почему у меня не хочет работать round?
Задавать вещественные числа в графе количество не хочется, так как 1,00 деталей выглядит нелепо.
Заранее спасибо.

Nz мне не подходит, так как нули в пустых графах мне тоже не нужны.

Добавлено через 12 минут
Забыла сказать - округление до целого в этом выражении работает. Но меня это не устраивает.

Добавлено через 9 минут
В более простых выражения то же самое - round работает без второго параметра, второй параметр через запятую (как в хелпе) не позволяет, а через точку с запятой, похоже, не понимает. Ни в кавычках ни без.

0

@minob

А при чем все это? Вы показали скрин на котором ясно видно число 0,100000001490116 и результат его округления, не помещающийся в отведенную длину поля. Я задал это число, как константу в запросе, и выполнил его округление.
Думаю, что без предоставления фрагмента базы, в котором проявляется ваш эффект "неверного" округления, дальнейшее обсуждение не имеет смысла.

0

@Agapov_stas

Да нет, все верно говорит, по поводу Round. Че то с ним не то.
Если просто прописать в VBA в окне отладки:
Если в запросе:

Миниатюры

   

Вложения

db_test.rar (8.4 Кб, 18 просмотров)

0

mobile

Round без второго параметра (количество знаков после точки), всегда отрабатывает правильно. Если же параметр определен, то поведение Round зависит от того, как компилятор распознает тип поля. Причем иногда компилятор ошибается (или перестраховывается, на всякий случай воспринимая число как текст). Поэтому, задавая полю в Round тип явно, например, функцией Val, можно добиться правильной работы Round. Пример правильно работающего запроса из выложенной БД db_test.mdb

0

@minob

На картинке, полученный мной, результат вашего запроса.
ИМХО, существует некоторая проблема (а может мое непонимание) с обработкой Jet типа Single, т.к. если изменить тип поля Кол с Single на Double, то Round отрабатывает нормально (без лишних хвостов), аналогичный результат Round(CDbl(Кол),2) можно подучить и при Single.
При Single хвосты появляются даже у результата такой элементарной операции, как сложение: Кол+0.
Следует отметить, что числа с хвостами представлены на экране с разрядностью, соответствующей Double, но определение типа TypeName(Round(Кол,2)) возвращает Single.

Миниатюры

 

0

mobile

minob, правильно ли я понял, что Round с параметром numdecimalplaces=2, выдает число без десятичных знаков, как на вашем рисунке? Мне не удалось получить такое. Испытывал на 2 версиях акса. Смотрите картинку.

Ваши выводы относительно Single точны, я их получил и ранее, но не опубликовал, поскольку не знал интереса к этой теме.

0

mobile

Картинка отклеилась

Миниатюры

 

0

@minob

Да. Проверял на Access2003 и Access2010.
Разница в результатах обусловлена различием системного разделителя целой и дробной части: у вас точка и тогда
?Val(2.345)
2.345
у меня запятая, при которой
?Val(2.345)
2

1

@Rikozenit

Терни, подскажите, как древовидную структуру для спецификаций в Аксессе создать?!!! HELP!!!! Очень нужно, но сколько не искал - так и не нашёл решения(((

0

@texnik-san

Rikozenit, вы обращаетесь к человеку, который последний раз был на форуме в 2012 году. Врядли он вам ответит.

0

mobile

Это контрол типа TreeView. Живет в библиотеке Windows Common Control, файл mscomctl.ocx. Работа с тривью хорошо описана у Шкуренко - http://www.hot.ee/jurisfox/vfp... _01_ru.htm. На форуме есть примеры работы тривью.

1

@Rikozenit

mobile, как-то уже пробовал это прочесть и разобраться. Тогда не вышло. Попробую второй заход!

0

@Терни

Я-то отвечу, если вспомню, как я это делала четыре года назад
Я не программист, потому скорей всего мое решение не самое изящное.
Вложенная форма называется "матрешка", что отражает суть идеи. Форм в матрешке тупо сделано столько, сколько уровней вложенности дерева.
Вы киньте мыло в личку, я вам пришлю вычищенную от данных базу. Она не вся работает, так как я теперь в другом месте работаю, и админ отказывается Аксесс ставить всем. Вот сама ее веду на подпольном ноуте. Стимула доводить базу до ума нет.
Если вы подхватите идею и доработаете так, чтобы ВП составлялась в отчете (он виснет при создании). То я была бы рада иметь ваш вариант.

1