fy">ОбработкаТабличныхЧастей.РассчитатьСуммуТабЧасти(стр, ЕтотОб'ект);
КонецЦікла;
СуммаОплаты=Товары.Итог(laquo;Суммаraquo;)-Сертификаты.Итог(laquo;Суммаraquo;);
КонецПроцедури
//Виробляє заповнення документа переданими з форми підбору даними.
//
//Параметри:
//ТаблічнаяЧасть - таблична частина, в яку треба додавати підібрану позицію номенклатури;
//ЗначеніеВибора - структура, яка містить параметри підбору.
//
Процедура ОбработкаПодбора (ТаблічнаяЧасть, ЗначеніеВибора) Експорт
Перем Бонусна, СпособЗаполненіяЦен, ВалютаЦени, ІзТермінала;
Перем Номенклатура, ЕдініцаІзмеренія, Кількість, Ціна, Характеристика, Серія, Сертифікат;
Якщо РаботаСДиалогами.ПроверитьЧтоКачествоВСтруктуреПодбораНеУдовлетворяетУсловиямПодбора(ЗначениеВыбора, Істина) Тоді
Повернення;
КонецЕсли;
//Отримаємо параметри підбору зі структури підбору.
ЗначениеВыбора.Свойство(laquo;СпособЗаполненияЦенraquo;, СпособЗаполненіяЦен);
ЗначеніеВибора.Свойство ( ВалютаЦени raquo ;, ВалютаЦени);
ЗначениеВыбора.Свойство(laquo;Номенклатураraquo;, Номенклатура);
ЗначениеВыбора.Свойство(laquo;ЕдиницаИзмеренияraquo;, ЕдініцаІзмеренія);
ЗначеніеВибора.Свойство ( Кількість raquo ;, Кількість);
ЗначеніеВибора.Свойство ( Ціна raquo ;, Ціна);
ЗначениеВыбора.Свойство(laquo;Характеристикаraquo;, Характеристика);
ЗначеніеВибора.Свойство ( Серія raquo ;, Серія);
ЗначеніеВибора.Свойство ( ІзТермінала raquo ;, ІзТермінала);
ЗначеніеВибора.Свойство ( Сертифікат raquo ;, Сертифікат);
ЗначеніеВибора.Свойство ( Бонус raquo ;, Бонусна);
//Перевіримо, чи є вже сертифікати в ТЧ Товари з однаковим штрихкодом. Якщо є, то не додаємо
Якщо ЗначеніеЗаполнено (Сертифікат) тоді
флВозврат=брехня;
Для кожного товар з Товари цикл
Якщо товар.Номенклатура=Справочники.Номенклатура.Сертификат І товар.Штріхкод=Сертіфікат.КодКарти тоді
флВозврат=Істина;
КонецЕсли;
КонецЦікла;
Якщо флВозврат тоді
повернення;
КонецЕсли;
КонецЕсли;
...
//Шукаємо обрану позицію в таблиці підібраною номенклатури.
//Якщо знайдемо - збільшимо кількість; не знайдемо - додамо новий рядок.
СтруктураОтбора=Новий Структура ();
СтруктураОтбора.Вставить(laquo;Номенклатураraquo;, Номенклатура);
СтруктураОтбора.Вставить(laquo;ЕдиницаИзмеренияraquo;, ЕдініцаІзмеренія);
СтруктураОтбора.Вставить(laquo;ХарактеристикаНоменклатурыraquo;, Характеристика);
СтруктураОтбора.Вставить(laquo;СерияНоменклатурыraquo; , Серія);
Якщо СпособЗаполненіяЦен=Перечісленія.СпособиЗаполненіяЦен.ПоРознічнимЦенам Тоді
СтруктураОтбора.Вставіть ( Ціна raquo ;, Ціна);
КонецЕсли;
ШтрихКод= raquo ;;
Якщо не ЗначеніеЗаполнено (Сертифікат) тоді
СтрокаШтріхкода=УправлениеРозничнойТорговлей.ПолучитьШтрихКод(Номенклатура,
ЕдініцаІзмеренія,
Характеристика,
Серія,
Справочнікі.Качество.Новий);
Якщо СтрокаШтріхкода lt; gt; Не визначено Тоді
ШтрихКод=СтрокаШтріхкода.Штріхкод;
КонецЕсли;
//КонецЕсли;
Інакше
ШтрихКод=Сертіфікат.КодКарти;
КонецЕсли;
ПоследняяСтрока=Товари.Колічество () - 1;
Якщо Товари.Колічество () gt; 0
І Товари [ПоследняяСтрока] .Номенклатура=Номенклатура
І Товари [ПоследняяСтрока] .ЕдініцаІзмеренія=ЕдініцаІзмеренія
І Товари [ПоследняяСтрока] .ХарактерістікаНоменклатури=Характеристика
І Товари [ПоследняяСтрока] .СеріяНоменклатури=Серія
