0
Garikus
29.02.16
✎
12:10
|
Доброго времени суток, помогите с кодом в чем косяк?
Процедура КоманднаяПанель1Сформировать(Кнопка)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| РеализацияТоваровУслуг.Ссылка КАК Документ,
| РеализацияТоваровУслуг.Грузополучатель КАК Адрес,
| РеализацияТоваровУслуг.СтатусЕГАИС КАК СтатусЕГАИС,
| Ложь КАК Выборка
|ИЗ
| Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.СтатусЕГАИС В(&СтатусЕГАИС)
| И РеализацияТоваровУслуг.Дата МЕЖДУ &ДатаН И &ДатаК";
Запрос.УстановитьПараметр("ДатаН",Нач);
Запрос.УстановитьПараметр("ДатаК",Кон);
Запрос.УстановитьПараметр("СтатусЕГАИС",Перечисления.СтатусЕГАИС.ПереданоВЕгаис);
СписокДок = Запрос.Выполнить().Выгрузить();
КонецПроцедуры
Процедура СписокДокПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
ОформлениеСтроки.Ячейки["Выборка"].ОтображатьТекст = Ложь;
ОформлениеСтроки.Ячейки["Выборка"].ОтображатьФлажок = Истина;
КонецПроцедуры
Процедура КоманднаяПанель1ВыбратьВсеНакладные(Кнопка)
Для Каждого Строка Из СписокДок Цикл
Строка.Выборка = Истина;
КонецЦикла;
ЭлементыФормы.СписокДок.ОбновитьСтроки();
КонецПроцедуры
Процедура КоманднаяПанель1ОтменитьВыбор(Кнопка)
Для Каждого Строка Из СписокДок Цикл
Строка.Выборка = Ложь;
КонецЦикла;
КонецПроцедуры
Не меняются флажки при нажатии кнопок, притом без флажка меняет на ДА - НЕТ.
|
|