конфигурация с нуля нужна помощь!!!

[ydadonov]

Уважаемые программисты и бывалые пользователи подскажите пожалуйста как в модуле правильно написать чтобы при привышении общей (итоговой)суммы покупки
в табличной части например в 1000р выдавалось сообщение на бонус или бесплатную доставку??

[LexaK]

все очень просто (вот один из самых простых вариантов, возможна еще куча других)

в форме вашего документа, в событии ПереЗакрытием (если нет создайте)
добавьте расчет общей суммы документа и вывод вашего/нужного сообщения.
можно еще дополнительно проверить что документ был изменен

Примерно так
...
Если Этаформа.Модифицированность и СуммаДокумента  > 1000 Тогда
    ПоказтьПредупреждение(,"Предоставляется бесплатная доставка.", 60);
    //или какие другие действия
КонецЕсли

[ydadonov]

Уважаемые программисты и бывалые пользователи подскажите пожалуйста как в модуле правильно написать чтобы при привышении общей (итоговой)суммы покупки
в табличной части например в 1000р выдавалось сообщение на бонус или бесплатную доставку??

&НаСервере
Функция ПолучЦену(СсылкаНаСправочник)
   СпрПоСсылке = Справочники.Номенклатура;
   СпрПоСсылке = СсылкаНаСправочник.ПолучитьОбъект();
   Возврат СпрПоСсылке.Цена;   
КонецФункции

&НаКлиенте
Процедура ПродажаТоварыПриИзменении(Элемент)
   СтрТаблЧасти = Элементы.Продажа.ТекущиеДанные;
   СтрТаблЧасти.Цена = ПолучЦену(СтрТаблЧасти.Товары);
КонецПроцедуры



&НаКлиенте
Процедура ПродажаКоличествоПриИзменении(Элемент)
   СтрТаблЧасти =  Элементы.Продажа.ТекущиеДанные;
   СтрТаблЧасти.Сумма = СтрТаблЧасти.Количество * СтрТаблЧасти.Цена;
КонецПроцедуры

[LexaK]

куча обрабатываемых событий! Замечательно!
найдите тот код который считает Общую сумму документа
вот туда и добавьте вашу проверку с сообщением !

[ydadonov]

все очень просто (вот один из самых простых вариантов, возможна еще куча других)

в форме вашего документа, в событии ПереЗакрытием (если нет создайте)
добавьте расчет общей суммы документа и вывод вашего/нужного сообщения.
можно еще дополнительно проверить что документ был изменен

Примерно так
...
Если Этаформа.Модифицированность и СуммаДокумента  > 1000 Тогда
    ПоказтьПредупреждение(,"Предоставляется бесплатная доставка.", 60);
    //или какие другие действия
КонецЕсли

Создал при закрытии а что туда вписывать
&НаКлиенте
Процедура ПередЗакрытием(Отказ, ЗавершениеРаботы, ТекстПредупреждения, СтандартнаяОбработка)
   Если Объект.Продажа.ИтоговаяСумма  > 1000 Тогда
    Сообщить("Предоставляется бесплатная доставка.");
    //или какие другие действия
КонецЕсли
КонецПроцедуры

Добавлено: 23 дек 2020, 17:54

куча обрабатываемых событий! Замечательно!
найдите тот код который считает Общую сумму документа
вот туда и добавьте вашу проверку с сообщением !

Там только Итог Сумма высчитывает сама а с ней ничего не сделаешь

Добавлено: 23 дек 2020, 19:17

все очень просто (вот один из самых простых вариантов, возможна еще куча других)

в форме вашего документа, в событии ПереЗакрытием (если нет создайте)
добавьте расчет общей суммы документа и вывод вашего/нужного сообщения.
можно еще дополнительно проверить что документ был изменен

Примерно так
...
Если Этаформа.Модифицированность и СуммаДокумента  > 1000 Тогда
    ПоказтьПредупреждение(,"Предоставляется бесплатная доставка.", 60);
    //или какие другие действия
КонецЕсли

Создал при закрытии а что туда вписывать
&НаКлиенте
Процедура ПередЗакрытием(Отказ, ЗавершениеРаботы, ТекстПредупреждения, СтандартнаяОбработка)
   Если Объект.Продажа.ИтоговаяСумма  > 1000 Тогда
    Сообщить("Предоставляется бесплатная доставка.");
    //или какие другие действия
КонецЕсли
КонецПроцедуры

Добавлено: 23 дек 2020, 17:54

куча обрабатываемых событий! Замечательно!
найдите тот код который считает Общую сумму документа
вот туда и добавьте вашу проверку с сообщением !

Там только Итог Сумма высчитывает сама а с ней ничего не сделаешь

Даже вывел отдельно общую сумму все равно не выдает сообщение???

[LexaK]

попробуйте так

Код Выделить Развернуть


&НаКлиенте
Процедура ПередЗакрытием(Отказ, ЗавершениеРаботы, ТекстПредупреждения, СтандартнаяОбработка)
   Если Объект.Продажа.Итог("Сумма") > 1000 Тогда
    Сообщить("Предоставляется бесплатная доставка.");//с ПоказатьПредепреждение - нагляднее
    //или какие другие действия
КонецЕсли
КонецПроцедуры