Вычисление значений в Документе 1С по формулам

[staff]

Есть набор формул, по которым должны вычисляться значения в Документе 1С, каким образом реализовать алгоритм вычисления?
Например, есть формула W=(Q1-Q2)*100/Q1-Q где Q - вес пустой емкости, Q1 - вес с навеской до высушивания емкости, Q2 - вес с навеской после высушивания емкости.
Как сделать, чтобы значения с "Поле ввода" подставлялись в формулу?

[Dest]

Q - вес пустой емкости, Q1 - вес с навеской до высушивания емкости, Q2 - вес с навеской после высушивания емкости.
Делаешь их реквизитами формы, или реквизитами документа. Потом создаешь три поля ввода и в свойствах "Источник"  указываешь, по очереди каждый из параметров

[staff]

ну а код для вычисления как построить?

[Dest]

Создаешь кнопку. Создаешь обработчик события "Нажатие" этой кнопки. Потом появляется в модуле формы процедура = там набираешь

W=(Q1-Q2)*100/Q1-Q ;
сообщить(W);

Код:

Процедура КнопкаВыполнитьНажатие(Кнопка)
W=(Q1-Q2)*100/Q1-Q ;
сообщить(W);

КонецПроцедуры

[staff]

еще у меня в Форма Документа находится несколько закладок, как сделать что бы информация по расчетам при нажатии кнопки ОК (Записать и Закрыть) сохранялися, так как на данный момент при нажатии ОК записывается только одно значение с первой закладки, а не со всех???

[Dest]

А те значения, которые не записываются - это реквизиты документа? Или что?

[staff]

необходима помощь в формировании отчета в которых принимают участие формулы для расчета

[staff]

есть Документ -> ЦэхЭкстракции в котором все вычисления делаются по формулам расчета, данные отображаются так же в РегистрНакопления ->  ЦэхЭкстракции, на данный момент составляю отчет в котором присущи все показатели и щас загвоздка, как сделать так что бы результаты расчетов анализа отображались в отчете

[Kivals]

Тебе в отчет нужно вывести данные регистра накопления?
Попробуй воспользоваться конструктором отчета http://v8.1c.ru/overview/dcs_sample_report.htm

[staff]

щас попробую по примеру сделать

[staff]

вопрос, если мне не надо вычислять остатки а просто что бы формировались данные последовательно какой надо выбрать тип РегистрыОстаткиИОбороты, РегистыОбороты или РегистрыОстатки?

[Kivals]

Если нужны движения за определенный период (по определенному документу) - тогда РегистрыНакопленияОбороты

[staff]

сделал все какда давалось по ссылке и получилось вот такое

[staff]

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

[Kivals]

Поиграйся с параметрами конструктора - там сногое можно менять... Я пока не могу вникнуть что же ты хочешь получить

[staff]

хотелось бы что бы так как слепил

[staff]

если что то не понятно то я могу выложить выгрузку с наработками

[Kivals]

А как должен выглядеть отчет если будет несколько строк с разными числовыми данными?

[staff]

фактически так как я скинул файл так и должно происходить построение отчета, тока вместо букв будут стоять наименования анализов

[staff]

и анализы будут проводиться раз в 2 часа

[Kivals]

Я имею в виду как нужно показать данные, если в отчет попадут разные Период, Пользователь, Смена, Сырье...

[staff]

нужна помощь что бы разобраться в формировании отчета, неодходимо что бы при добавлении нового результата анализов с новым пользователем происходило разделение от старых результатов, а так же что бы не происходило дублирование данных по одному пользователю + если будет один и тот же пользователь добавлялись результаты анализа без создания новых данных.

код процедуры формирования:



Процедура КнопкаСформироватьНажатие(Кнопка)
   // Вставить содержимое обработчика.
   Запрос= новый запрос;
   Запрос.Текст=
   "ВЫБРАТЬ
   |   ЦэхЭкстракции.Пользователь КАК Пользователь,
   |   ЦэхЭкстракции.Смена КАК Смена,
   |   ЦэхЭкстракции.Сторона КАК Сторона,
   |   ЦэхЭкстракции.Сырье КАК Сырье,
   |   ЦэхЭкстракции.Регистратор как Регистратор,
   |   СУММА(ЦэхЭкстракции.W) КАК W,
   |   СУММА(ЦэхЭкстракции.X) КАК X,
   |   СУММА(ЦэхЭкстракции.M1) КАК M1,
   |   СУММА(ЦэхЭкстракции.Z) КАК Z,
   |   СУММА(ЦэхЭкстракции.Y) КАК Y,
   |   СУММА(ЦэхЭкстракции.A) КАК A
   |ИЗ
   |   РегистрНакопления.ЦэхЭкстракции КАК ЦэхЭкстракции
   |
   |СГРУППИРОВАТЬ ПО
   |   ЦэхЭкстракции.Пользователь,
   |   ЦэхЭкстракции.Смена,
   |   ЦэхЭкстракции.Сторона,
   |   ЦэхЭкстракции.Сырье,   
   |   ЦэхЭкстракции.Регистратор
   |УПОРЯДОЧИТЬ ПО
   |   Пользователь,
   |   Смена,
   |   Сторона,
   |   Сырье,
   |   Регистратор
   |ИТОГИ
   |   СУММА(W),
   |   СУММА(X),
   |   СУММА(M1),
   |   СУММА(Z),
   |   СУММА(Y),
   |   СУММА(A)
   |ПО
   |   Пользователь,
   |   Смена,
   |   Сторона,
   |   Сырье,
   |   Регистратор
   |АВТОУПОРЯДОЧИВАНИЕ" ;
   Запрос.УстановитьПараметр("НачалоПериода", НачПериода);
   Запрос.УстановитьПараметр("КонецПериода", КонПериода);
   Результат=Запрос.Выполнить();
   Выборка=Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   темп = новый ТабличныйДокумент;
    ТабДок=ПолучитьМакет("Макет");
   ОбластьМаркеровка=ТабДок.ПолучитьОбласть("Маркеровка");
   Темп.Вывести(ОбластьМаркеровка);
   ОбластьПериод=ТабДок.ПолучитьОбласть("Период");
   ОбластьПериод.Параметры.Период=" Период с "+НачПериода+" по "+КонПериода;
   Темп.Вывести(ОбластьПериод);
   
ОбластьОтступ=ТабДок.ПолучитьОбласть("Отступ");
темп.Вывести(ОбластьОтступ);
   
   
   пока выборка.Следующий() цикл
   ОбластьПользователь=ТабДок.ПолучитьОбласть("Пользователь");
   ОбластьПользователь.Параметры.Пользователь=Выборка.Пользователь;
   Темп.Вывести(ОбластьПользователь);
   ВыборкаСмена=Выборка.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   
   пока ВыборкаСмена.Следующий() цикл
   ОбластьСмена=ТабДок.ПолучитьОбласть("Смена ");
   ОбластьСмена.Параметры.Смена=ВыборкаСмена.Смена;
   Темп.Вывести(ОбластьСмена);
   ВыборкаСторона=ВыборкаСмена.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   
      пока ВыборкаСторона.Следующий() цикл
      ОбластьСторона=ТабДок.ПолучитьОбласть("Сторона");
      ОбластьСторона.Параметры.Сторона=ВыборкаСторона.Сторона;
      Темп.Вывести(ОбластьСторона);
      ВыборкаСырье=ВыборкаСторона.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
      
      пока выборкаСырье.Следующий() цикл
         областьСырье=ТабДок.ПолучитьОбласть("Сырье");
         ОбластьСырье.Параметры.Сырье=ВыборкаСырье.Сырье;
         темп.Вывести(ОбластьСырье);
         ВыборкаРегистратор=ВыборкаСырье.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
ОбластьОписание=ТабДок.ПолучитьОбласть("Описание");
Темп.Вывести(ОбластьОписание);

               пока выборкаРегистратор.Следующий() цикл
               если ВыборкаРегистратор.Регистратор<>Неопределено тогда
                  ОбластьРегистратор=ТабДок.ПолучитьОбласть("Регистратор");
                  ОбластьРегистратор.Параметры.W=ВыборкаРегистратор.W;
                  ОбластьРегистратор.Параметры.X=ВыборкаРегистратор.X;
                  ОбластьРегистратор.Параметры.M1=ВыборкаРегистратор.M1;
                  ОбластьРегистратор.Параметры.Z=ВыборкаРегистратор.Z;
                  ОбластьРегистратор.Параметры.Y=ВыборкаРегистратор.Y;
                  ОбластьРегистратор.Параметры.A=ВыборкаРегистратор.A;
                  ОбластьРегистратор.Параметры.Дата=ВыборкаРегистратор.Регистратор.Дата;
                  Темп.Вывести(ОбластьРегистратор);
               конецесли;
               
            
   ТабФорма=Отчеты.ЦэхЭкстракции.ПолучитьФорму("ФормаТаблицы");
   ТабФорма.Открыть();
   ТабФорма.ЭлементыФормы.Результат.Вывести(Темп);
   

   
конеццикла;               
   конеццикла;
      конеццикла;
         конеццикла;   
            конеццикла;
КонецПроцедуры

[Kivals]

1. из двух рисунков - какой парвильный?
2. выложи скриншот макета (с названиями областей)

[staff]

обе фотки которые я скидывал это результаты отчета которые у меня получается
а это work3 макет

[Kivals]

"при добавлении нового результата ... разделение от старых результатов" - что имеется в виду под разделением?
"что бы не происходило дублирование данных " - укажи где на рисунках видно что есть дублирование?

[staff]

на фото видно, получается в один день провожу документ с одним пользователем в отчете (снимок) он самый первый идет, в этот же день добавил еще одну проводку с другим пользователем сделал обновление отчета и получилось что создались сначало пользователь Админ, потом Админ+Нева, потом сделал третью проводку и получилось Админ, Админ+Нева, Админ+Нева

[staff]

попробовал сделать запрос отчета через Регистр Сведений, все равно происходит то что было и с Регистром Накопления, может сам запрос на формирование отчета надо переделать???

код формирования отчета:
Процедура КнопкаСформироватьНажатие(Кнопка)
   // Вставить содержимое обработчика.
   Запрос= новый запрос;
   Запрос.Текст=
   "ВЫБРАТЬ
   |   ЦэхЭкстракции.Пользователь КАК Пользователь,
   |   ЦэхЭкстракции.Смена КАК Смена,
   |   ЦэхЭкстракции.Сырье КАК Сырье,
   |   ЦэхЭкстракции.Сторона КАК Сторона,
   |   ЦэхЭкстракции.Регистратор КАК Регистратор,
   |   СУММА(ЦэхЭкстракции.W) КАК W,
   |   СУММА(ЦэхЭкстракции.X) КАК X,
   |   СУММА(ЦэхЭкстракции.M1) КАК M1,
   |   СУММА(ЦэхЭкстракции.Z) КАК Z,
   |   СУММА(ЦэхЭкстракции.Y) КАК Y,
   |   СУММА(ЦэхЭкстракции.A) КАК A
   |ИЗ
   |   РегистрСведений.ЦэхЭкстракции КАК ЦэхЭкстракции
   |
   |СГРУППИРОВАТЬ ПО
   |   ЦэхЭкстракции.Пользователь,
   |   ЦэхЭкстракции.Смена,
   |   ЦэхЭкстракции.Сырье,
   |   ЦэхЭкстракции.Сторона,
   |   ЦэхЭкстракции.Регистратор
   |
   |УПОРЯДОЧИТЬ ПО
   |   Пользователь,
   |   Смена,
   |   Сырье,
   |   Сторона,
   |   Регистратор
   |ИТОГИ
   |   СУММА(W),
   |   СУММА(X),
   |   СУММА(M1),
   |   СУММА(Z),
   |   СУММА(Y),
   |   СУММА(A)
   |ПО
   |   Пользователь,
   |   Смена,
   |   Сырье,
   |   Сторона,
   |   Регистратор
   |АВТОУПОРЯДОЧИВАНИЕ";
   Запрос.УстановитьПараметр("НачалоПериода", НачПериода);
   Запрос.УстановитьПараметр("КонецПериода", КонПериода);
   Результат=Запрос.Выполнить();
   Выборка=Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   темп = новый ТабличныйДокумент;
    ТабДок=ПолучитьМакет("Макет");
   ОбластьМаркеровка=ТабДок.ПолучитьОбласть("Маркеровка");
   Темп.Вывести(ОбластьМаркеровка);
   ОбластьПериод=ТабДок.ПолучитьОбласть("Период");
   ОбластьПериод.Параметры.Период=" Период с "+НачПериода+" по "+КонПериода;
   Темп.Вывести(ОбластьПериод);
   
ОбластьОтступ=ТабДок.ПолучитьОбласть("Отступ");
темп.Вывести(ОбластьОтступ);
   
   
   пока выборка.Следующий() цикл
   ОбластьПользователь=ТабДок.ПолучитьОбласть("Пользователь");
   ОбластьПользователь.Параметры.Пользователь=Выборка.Пользователь;
   Темп.Вывести(ОбластьПользователь);
   ВыборкаСмена=Выборка.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   
   пока ВыборкаСмена.Следующий() цикл
   ОбластьСмена=ТабДок.ПолучитьОбласть("Смена ");
   ОбластьСмена.Параметры.Смена=ВыборкаСмена.Смена;
   Темп.Вывести(ОбластьСмена);
   ВыборкаСторона=ВыборкаСмена.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   
      пока ВыборкаСторона.Следующий() цикл
      ОбластьСторона=ТабДок.ПолучитьОбласть("Сторона");
      ОбластьСторона.Параметры.Сторона=ВыборкаСторона.Сторона;
      Темп.Вывести(ОбластьСторона);
      ВыборкаСырье=ВыборкаСторона.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
      
      пока выборкаСырье.Следующий() цикл
         областьСырье=ТабДок.ПолучитьОбласть("Сырье");
         ОбластьСырье.Параметры.Сырье=ВыборкаСырье.Сырье;
         темп.Вывести(ОбластьСырье);
         ВыборкаРегистратор=ВыборкаСырье.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
ОбластьОписание=ТабДок.ПолучитьОбласть("Описание");
Темп.Вывести(ОбластьОписание);

               пока выборкаРегистратор.Следующий() цикл
               если ВыборкаРегистратор.Регистратор<>Неопределено тогда
                  ОбластьРегистратор=ТабДок.ПолучитьОбласть("Регистратор");
                  ОбластьРегистратор.Параметры.W=ВыборкаРегистратор.W;
                  ОбластьРегистратор.Параметры.X=ВыборкаРегистратор.X;
                  ОбластьРегистратор.Параметры.M1=ВыборкаРегистратор.M1;
                  ОбластьРегистратор.Параметры.Z=ВыборкаРегистратор.Z;
                  ОбластьРегистратор.Параметры.Y=ВыборкаРегистратор.Y;
                  ОбластьРегистратор.Параметры.A=ВыборкаРегистратор.A;
                  ОбластьРегистратор.Параметры.Дата=ВыборкаРегистратор.Регистратор.Дата;
                  Темп.Вывести(ОбластьРегистратор);
               конецесли;
               
            
   ТабФорма=Отчеты.ЦэхЭкстракции.ПолучитьФорму("ФормаТаблицы");
   ТабФорма.Открыть();
   ТабФорма.ЭлементыФормы.Результат.Вывести(Темп);
   

   
конеццикла;               
   конеццикла;
      конеццикла;
         конеццикла;   
            конеццикла;
КонецПроцедуры

[Kivals]

Вместо
РегистрСведений.ЦэхЭкстракции КАК ЦэхЭкстракции
как минимум должно быть
РегистрСведений.ЦэхЭкстракции.СрезПоследних(&ТекущаяДата, ) КАК ЦэхЭкстракции

[staff]

быть может у меня сам запрос не правильно построен, сделал через "РегистрСведений.ЦэхЭкстракции.СрезПоследних(&ТекущаяДата, ) КАК ЦэхЭкстракции" по началу давало ошибку, устранил проблему, но все равно происходит повтор значений, может мне сделать выгрузку базы и ты ее посмотришь?

[Kivals]

Давай - выгрузи структуру, которая нужна по задаче, и прицепи сюда в ответ (если влезет). Если нет - на мыло...