Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
16 апр 2024, 13:07

Произвольное число

Автор Kostik2013, 25 июл 2013, 17:25

0 Пользователей и 1 гость просматривают эту тему.

Kostik2013

Всем привет!Есть обработка Формирование Цен,я туда добавил реквизит ТипыЦен. Я выбираю Установить цену,после этого появляется рядом реквизит для ввода числа (Произвольно),но у меня вводится округление.Как передать введеное число, вместо округления, при нажатии выполнить, в ТабЧасть?Заранее спасибо!

1С:Предприятие 8.2 (8.2.18.61) У  ЧП Украины Базовая



Kostik2013

Такой код у меня

Процедура КнопкаВыполнитьНажатиеУстановитьЦену(Элемент) // Подключение данной процедуры-обработчика выполняется из кода конфигурации

   // Должен быть выбран прядок округления
   Если ОбщегоНазначения.ЗначениеНеЗаполнено(ВариантЗначения) Тогда
      
      Предупреждение(" Не указана цена!", 60, );
      Возврат;
      
   КонецЕсли;

   Для каждого СтрокаТабличнойЧасти Из Товары Цикл
      Если СтрокаТабличнойЧасти.Пометка Тогда

         // Установим.
   СтрокаТабличнойЧасти.Цена = Ценообразование.УстановитьЦену(СтрокаТабличнойЧасти.Цена,
                                   ВариантЗначения, Ложь);
      КонецЕсли;
   КонецЦикла;
   ДействиеНеВыполнено = Ложь;


КонецПроцедуры // КнопкаВыполнитьНажатиеУстановитьЦену()

Добавлено: 25 июл 2013, 18:02


Цитата: Kostik2013 от 25 июл 2013, 17:50
Такой код у меня

Процедура КнопкаВыполнитьНажатиеУстановитьЦену(Элемент) // Подключение данной процедуры-обработчика выполняется из кода конфигурации

   // Должен быть выбран прядок округления
   Если ОбщегоНазначения.ЗначениеНеЗаполнено(ВариантЗначения) Тогда
      
      Предупреждение(" Не указана цена!", 60, );
      Возврат;
      
   КонецЕсли;

   Для каждого СтрокаТабличнойЧасти Из Товары Цикл
      Если СтрокаТабличнойЧасти.Пометка Тогда

         // Установим.
   СтрокаТабличнойЧасти.Цена = Ценообразование.УстановитьЦену(СтрокаТабличнойЧасти.Цена,
                                   ВариантЗначения, Ложь);
      КонецЕсли;
   КонецЦикла;
   ДействиеНеВыполнено = Ложь;


КонецПроцедуры // КнопкаВыполнитьНажатиеУстановитьЦену()
Добавлено: 25 июл 2013, 18:07


Оооооочень срочно люди добрые!
Добавлено: 25 июл 2013, 18:32


Цитата: Kostik2013 от 25 июл 2013, 17:50
Такой код у меня

Процедура КнопкаВыполнитьНажатиеУстановитьЦену(Элемент) // Подключение данной процедуры-обработчика выполняется из кода конфигурации

   // Должен быть выбран прядок округления
   Если ОбщегоНазначения.ЗначениеНеЗаполнено(ВариантЗначения) Тогда
      
      Предупреждение(" Не указана цена!", 60, );
      Возврат;
      
   КонецЕсли;

   Для каждого СтрокаТабличнойЧасти Из Товары Цикл
      Если СтрокаТабличнойЧасти.Пометка Тогда

         // Установим.
   СтрокаТабличнойЧасти.Цена = Ценообразование.УстановитьЦену(СтрокаТабличнойЧасти.Цена,
                                   ВариантЗначения, Ложь);
      КонецЕсли;
   КонецЦикла;
   ДействиеНеВыполнено = Ложь;


КонецПроцедуры // КнопкаВыполнитьНажатиеУстановитьЦену()

Добавлено: 25 июл 2013, 18:02


Цитата: Kostik2013 от 25 июл 2013, 17:50
Такой код у меня

Процедура КнопкаВыполнитьНажатиеУстановитьЦену(Элемент) // Подключение данной процедуры-обработчика выполняется из кода конфигурации

   // Должен быть выбран прядок округления
   Если ОбщегоНазначения.ЗначениеНеЗаполнено(ВариантЗначения) Тогда
      
      Предупреждение(" Не указана цена!", 60, );
      Возврат;
      
   КонецЕсли;

   Для каждого СтрокаТабличнойЧасти Из Товары Цикл
      Если СтрокаТабличнойЧасти.Пометка Тогда

         // Установим.
   СтрокаТабличнойЧасти.Цена = Ценообразование.УстановитьЦену(СтрокаТабличнойЧасти.Цена,
                                   ВариантЗначения, Ложь);
      КонецЕсли;
   КонецЦикла;
   ДействиеНеВыполнено = Ложь;


КонецПроцедуры // КнопкаВыполнитьНажатиеУстановитьЦену()
Добавлено: 25 июл 2013, 18:07


Оооооочень,очеееень  срочно люди добрые!
Добавлено: 25 июл 2013, 18:33





Оооооочень,очеееень  срочно люди добрые!

mixqn

Цитата: Kostik2013 от 25 июл 2013, 17:25
Всем привет!Есть обработка Формирование Цен,я туда добавил реквизит ТипыЦен. Я выбираю Установить цену,после этого появляется рядом реквизит для ввода числа (Произвольно),но у меня вводится округление.Как передать введеное число, вместо округления, при нажатии выполнить, в ТабЧасть?Заранее спасибо!

1С:Предприятие 8.2 (8.2.18.61) У  ЧП Украины Базовая

либо я дурак, либо вопрос у вас сформулирован непонятно.

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

если проблема в чем-то другом, попробуйте переформулировать или уточнить вопрос

Kostik2013

Цитата: mixqn от 25 июл 2013, 19:04
Цитата: Kostik2013 от 25 июл 2013, 17:25
Всем привет!Есть обработка Формирование Цен,я туда добавил реквизит ТипыЦен. Я выбираю Установить цену,после этого появляется рядом реквизит для ввода числа (Произвольно),но у меня вводится округление.Как передать введеное число, вместо округления, при нажатии выполнить, в ТабЧасть?Заранее спасибо!

1С:Предприятие 8.2 (8.2.18.61) У  ЧП Украины Базовая

либо я дурак, либо вопрос у вас сформулирован непонятно.

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

если проблема в чем-то другом, попробуйте переформулировать или уточнить вопрос

Разобрался!Спасибо)

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск