Имя: Пароль:
1C
 
Добавление реквизита табличной части в форму списка
0 Nvakh
 
09.02.15
14:43
Добре.

Собсно добавил колонку на форму списка а как сделать отбор теперь по ней не знаю.

Что сделал:
1) В процедуре "ПередОткрытим":
<code>
НоваяКолонкаФормы = ЭлементыФормы.Список.Колонки.Вставить(10, "Проект");
    НоваяКолонкаФормы.Имя = "Проект";
    НоваяКолонкаФормы.Ширина = 25;
    НоваяКолонкаФормы.УстановитьЭлементУправления(Тип("ПолеВвода"));
    НоваяКолонкаФормы.ТолькоПросмотр = ТолькоПросмотр;
    Массив = Новый Массив;
    Массив.Добавить(Тип("СправочникСсылка.Проекты"));
    НоваяКолонкаФормы.ЭлементУправления.ТипЗначения = Новый ОписаниеТипов(Массив);
    //ЭлементыФормы.Список.НастройкаОтбора.Проект.Доступность = Истина;
    
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
    |    ПлатежноеПоручениеИсходящее.Ссылка
    |ПОМЕСТИТЬ ВсеДокументы
    |ИЗ
    |    Документ.ПлатежноеПоручениеИсходящее КАК ПлатежноеПоручениеИсходящее
    |;
    |
    |////////////////////////////////////////////////////////////////////////////////
    |ВЫБРАТЬ
    |    ВсеДокументы.Ссылка КАК Документ,
    |    ЕСТЬNULL(ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Проект, ЗНАЧЕНИЕ(Справочник.Проекты.ПустаяСсылка)) КАК Проект
    |ИЗ
    |    ВсеДокументы КАК ВсеДокументы
    |        ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПлатежноеПоручениеИсходящее.РасшифровкаПлатежа КАК ПлатежноеПоручениеИсходящееРасшифровкаПлатежа
    |        ПО ВсеДокументы.Ссылка = ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Ссылка";
    мТаблицаСоответствий = Новый Соответствие;
    
    Выборка = Запрос.Выполнить().Выбрать();
    Пока Выборка.Следующий() цикл;
         мТаблицаСоответствий.Вставить(Выборка.Документ,Выборка.Проект);
     КонецЦикла;
</code>
1 Nvakh
 
09.02.15
14:44
(0) Не дописал.
2) В процедуре "ПриПолученииДанных"
<code>
Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)
        
    Для каждого текстрока из ОформленияСтрок цикл
          Проект = мТаблицаСоответствий.Получить(текстрока.ДанныеСтроки.Ссылка);
          Текстрока.Ячейки.Проект.Значение = Проект;
    КонецЦикла;
      
    
КонецПроцедуры
</code>