Процедура Выполнить();
СпрП = СоздатьОбъект("Справочник.ОсновныеСредства");
Спр = СоздатьОбъект("Справочник.Фирмы");
Спр.НайтиПоНаименованию ("");
СпрП.ИспользоватьВладельца(Спр.ТекущийЭлемент());
СпрП.ВыбратьЭлементы();
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Таблица");
Таб.ВывестиСекцию("Шапка");
//ДатаВводаВЭксплуатацию=СпрП.ДатаВводаВЭксплуатацию.Получить(ТекущаяДата());
//ДатаВыбытия = СпрП.ДатаВыбытия.Получить(ТекущаяДата());
ПорядковыйНомер=0;
Пока СпрП.ПолучитьЭлемент() = 1 Цикл
Если СпрП.Родитель.Наименование = "Машины и оборудование" Тогда
Таб.ВывестиСекцию("Секция_2");
//сообщить("Наименование "+СпрП.Наименование+" Код "+спрП.код);
ПорядковыйНомер=ПорядковыйНомер+1;
ДатаВводаВЭксплуатацию=СпрП.ДатаПостОС.Получить();
ДатаВыбытия=СпрП.ДатаВыбытия.Получить();
СостояниеОС=СпрП.СостояниеОС.Получить();
КонецЕсли;
КонецЦикла;
Таб.ТолькоПросмотр(1);
Таб.Показать();
ДатаВыбытия=СпрП.ДатаВыбытия.Получить(ТекущаяДата());