- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
Процедура ТабличноеПоле1ПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
// при выводе строки в ТабличноеПоле1, перебор ячеек строки
Для Каждого Ячейка Из ОформлениеСтроки.Ячейки Цикл
// если имя текущей ячейки "НормаВремени"
Если Ячейка.Имя = "НормаВремениТекст" Тогда
// получить норму времени текущего поста охраны на текущую дату и вывести в соотв. ячейку Тч
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| НормыВремениПоПостамСрезПоследних.Период,
| НормыВремениПоПостамСрезПоследних.ПостОхраны,
| НормыВремениПоПостамСрезПоследних.НормаВремени
|ИЗ
| РегистрСведений.НормыВремениПоПостам.СрезПоследних(&ВыбДата) КАК НормыВремениПоПостамСрезПоследних
|ГДЕ
| НормыВремениПоПостамСрезПоследних.ПостОхраны = &Пост";
Запрос.УстановитьПараметр("ВыбДата",ТекущаяДата());
Запрос.УстановитьПараметр("Пост", ДанныеСтроки.Ссылка);
ТекНормаВремени = Запрос.Выполнить().Выгрузить();
//ЭлементыФормы.ТабличноеПоле1.ТекущаяСтрока[Ячейка.Имя].Значение = ТекНормаВремени[0].НормаВремени;
ОформлениеСтроки.Ячейки["НормаВремениТекст"].ОтображатьТекст = Истина;
//ОформлениеСтроки.Ячейки["НормаВремениТекст"].Значение = ТекНормаВремени[0].НормаВремени;
ОформлениеСтроки.Ячейки["НормаВремениТекст"].Текст = ТекНормаВремени[0].НормаВремени;
КонецЕсли;
КонецЦикла;
КонецПроцедуры