Имя: Пароль:
1C
1С v8
проблема с табличной частью
,
0 dron4ikkk
 
07.11.13
16:51
всем привет! делаю печатную форму все заполняется кроме табличной части, не знаю как ее заполнить в таблич части есть след реквизиты:"Пункт маршрута", "Действие"...нужно наверное использовать цикл...но как  сделать..вообще не пойму

вот код:


    
ТабДок = Новый ТабличныйДокумент;
Макет = Документы.ЭлТех_Маршрутный_Лист.ПолучитьМакет("Макет");

ОбластьВерх = Макет.ПолучитьОбласть("Верх");
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьЦентр = Макет.ПолучитьОбласть("Центр");
ОбластьТаблица = Макет.ПолучитьОбласть("Таблица");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");



   ОбластьВерх.Параметры.Наименование_предприятия = ЭтотОбъект.Наименование_предприятия;
   ОбластьВерх.Параметры.Номер_Путевого_листа = ЭтотОбъект.Номер_Путевого_листа;

   ОбластьЗаголовок.Параметры.Номер_маршрутной_карты = ЭтотОбъект.Номер_маршрутной_карты;
   ОбластьЗаголовок.Параметры.От = ЭтотОбъект.От;

  
   ОбластьЦентр.Параметры.Гос_номер_транспорта = ЭтотОбъект.Гос_номер_транспорта;
   ОбластьЦентр.Параметры.Марка = ЭтотОбъект.Марка;
   ОбластьЦентр.Параметры.Водитель = ЭтотОбъект.Водитель;
   ОбластьЦентр.Параметры.Секции_транспорта = ЭтотОбъект.Секции_транспорта;
   ОбластьЦентр.Параметры.Гос_номер_прицепа = ЭтотОбъект.Гос_номер_прицепа;
   ОбластьЦентр.Параметры.Секции_прицепа = ЭтотОбъект.Секции_прицепа;
  

  

  
  
   ОбластьПодвал.Параметры.Всего_отработано_без_обеда = ЭтотОбъект.Всего_отработано_без_обеда;
   ОбластьПодвал.Параметры.Всего_отработано_с_обедом = ЭтотОбъект.Всего_отработано_с_обедом;
   ОбластьПодвал.Параметры.Протяженность_маршрута = ЭтотОбъект.Протяженность_маршрута;
   ОбластьПодвал.Параметры.Перевезено_НП = ЭтотОбъект.Перевезено_НП;

  
  
  
  
ТабДок.Вывести(ОбластьВерх);
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.Вывести(ОбластьЦентр);
ТабДок.Вывести(ОбластьПодвал);
ТабДок.Вывести(ОбластьТаблица);
    
    ТабДок.ОтображатьСетку = Ложь;
    ТабДок.Защита = Ложь;
    ТабДок.ТолькоПросмотр = Ложь;
    ТабДок.ОтображатьЗаголовки = Ложь;
    ТабДок.Показать();
1 sapphire
 
07.11.13
16:53
Имя табличной части?
2 Euguln
 
07.11.13
16:53
(0) я бы сказал, проблемы посерьезней здесь.
Позовите специалиста.
3 dron4ikkk
 
07.11.13
16:54
Маршруты назся имя табл части
4 mikecool
 
07.11.13
16:54
надо вывести табл. часть, ваш кеп
5 zak555
 
07.11.13
16:54
1. убери

   ОбластьВерх.Параметры.Наименование_предприятия = ЭтотОбъект.Наименование_предприятия;
   ОбластьВерх.Параметры.Номер_Путевого_листа = ЭтотОбъект.Номер_Путевого_листа;

   ОбластьЗаголовок.Параметры.Номер_маршрутной_карты = ЭтотОбъект.Номер_маршрутной_карты;
   ОбластьЗаголовок.Параметры.От = ЭтотОбъект.От;

  
   ОбластьЦентр.Параметры.Гос_номер_транспорта = ЭтотОбъект.Гос_номер_транспорта;
   ОбластьЦентр.Параметры.Марка = ЭтотОбъект.Марка;
   ОбластьЦентр.Параметры.Водитель = ЭтотОбъект.Водитель;
   ОбластьЦентр.Параметры.Секции_транспорта = ЭтотОбъект.Секции_транспорта;
   ОбластьЦентр.Параметры.Гос_номер_прицепа = ЭтотОбъект.Гос_номер_прицепа;
   ОбластьЦентр.Параметры.Секции_прицепа = ЭтотОбъект.Секции_прицепа;
  

  

  
  
   ОбластьПодвал.Параметры.Всего_отработано_без_обеда = ЭтотОбъект.Всего_отработано_без_обеда;
   ОбластьПодвал.Параметры.Всего_отработано_с_обедом = ЭтотОбъект.Всего_отработано_с_обедом;
   ОбластьПодвал.Параметры.Протяженность_маршрута = ЭтотОбъект.Протяженность_маршрута;
   ОбластьПодвал.Параметры.Перевезено_НП = ЭтотОбъект.Перевезено_НП;
6 dron4ikkk
 
07.11.13
16:56
как вывести табличную часть с использованием цикла?
7 mikecool
 
07.11.13
16:56
+4 типа
Об = ПолучитьОбласть("Строка");
Для Каждого Строка Из ТаблЧасть Цикл
  ЗаполнитьЗначенияСвойств(Об.Параметры, Строка);
  ТД.Вывести(Об);
КонецЦикла;
8 zak555
 
07.11.13
16:58
(6)

Для каждого СтрокаТЧ из Объект.ТЧ Цикл
    ОбластьТаблица.Параметры.Заполнить(СтрокаТЧ );
    ТабДок.Вывести(ОбластьТаблица);    
КонецЦикла;
9 sapphire
 
07.11.13
16:59
// Копипаста из всех посток для особо одаренных

ТабДок = Новый ТабличныйДокумент;
Макет = Документы.ЭлТех_Маршрутный_Лист.ПолучитьМакет("Макет");

ОбластьВерх = Макет.ПолучитьОбласть("Верх");
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьЦентр = Макет.ПолучитьОбласть("Центр");
ОбластьТаблица = Макет.ПолучитьОбласть("Таблица");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");

ЗаполнитьЗначенияСвойств(ОбластьВерх.Параметры,ЭтотОбъект);
ЗаполнитьЗначенияСвойств(ОбластьЗаголовок.Параметры,ЭтотОбъект);
ЗаполнитьЗначенияСвойств(ОбластьЦентр .Параметры,ЭтотОбъект);
ЗаполнитьЗначенияСвойств(ОбластьПодвал  .Параметры,ЭтотОбъект);

ТабДок.Вывести(ОбластьВерх);
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.Вывести(ОбластьЦентр);

Для каждого СтрокаТЧ из Объект.Маршруты Цикл
    ОбластьТаблица.Параметры.Заполнить(СтрокаТЧ);
    ТабДок.Вывести(ОбластьТаблица);    
КонецЦикла;

ТабДок.Вывести(ОбластьПодвал);

ТабДок.ОтображатьСетку = Ложь;
    ТабДок.Защита = Ложь;
    ТабДок.ТолькоПросмотр = Ложь;
    ТабДок.ОтображатьЗаголовки = Ложь;
    ТабДок.Показать();
10 zak555
 
07.11.13
17:01
(7) (9) Параметры.Заполнить()  не нравится ? =)
11 mikecool
 
07.11.13
17:02
(10) а меня так больше прикалывает )