Для Каждого ТекКол из ТЧ.Колонки Цикл
       Если Строка(ТекКол.ТипЗначения) = "Валюты" Тогда
           НС = ТЧ.Добавить();
           НС.ТекКол = Валюта;
       КонецЕсли;
   КонецЦикла;


Что не так написал? Поле обьекта не обнаружено. Выдает.

Как тут добавить новую строку текущей колонки? Туплю я чтото....

НС.ТекКол = Валюта;

На эту строчку ругается?

(2) Да
Я уже пробовал НС[ТекКол.Имя] или НС[ТекКол.Заголовок]

офигеть.
НС = ТЧ.Добавить();
НС.Валюты = Валюта;
а остальной код в топку

ли тебе надо заполнить колонку Валюты?
Для Каждого ТекКол из ТЧ.Колонки Цикл
   ТекКол.Валюты = Валюта;
КонецЦикла;

тьфу ты
Для Каждого ТекКол из ТЧ Цикл
   ТекКол.Валюты = Валюта;
КонецЦикла;

Я в ТЧ дока отобрать должен колонки где ТипЗначения = Валюты , и их строки подложить валюту.

(7) их там 100500 чтоли? имена колонок знаешь? вот и обращайся по имени.

Колонок произвольное количество. Называются они так Валюта0 , Валюта1 , Валюта2 .
В зависимости скока цен по поставщику выставлю.

Вот мне и надо по типу отобрать . Это ж типа не сложно , а не получается ЙПРСТ.

Как решить эту проблему?

Для ай=0 по ТЧ.Колонки.Количество() Цикл

       Если Строка(ТЧ.Колонки[ай].ТипЗначения) = "Валюты" Тогда
           НС = ТЧ.Добавить();
           НС[ай] = Валюта;
       КонецЕсли;
   КонецЦикла;

Только этот код не "подсунет" валюту, а создаст новую строчку с валютой.

Для каждого НС из ТЧ Цикл
Для ай=0 по ТЧ.Колонки.Количество() Цикл
       Если Строка(ТЧ.Колонки[ай].ТипЗначения) = "Валюты" Тогда
           НС[ай] = Валюта;
       КонецЕсли;
   КонецЦикла;
КонецЦикал;

НС.Валюта0  = Валюта;
НС.Единица0 = ТС.Номенклатура.ЕдиницаХраненияОстатков;


Вот так работало , но это если я одну цену добавляю.

списокколонок=тч.ВыгрузитьКолонки();
Для Каждого ТекКол из списокколонок.Колонки Цикл
  Если Найти(ВРег(ТекКол.ТипЗначения),"ВАЛЮТ")>0 Тогда
     НС = ТЧ.Добавить();
     НС[ТекКол.Имя] = Валюта;
   КонецЕсли;
КонецЦикла;

Для Каждого ТекКол из ТЧ.Колонки Цикл
       Если ТекКол.ТипЗначения = Новый ОписаниеТипов("СправочникСсылка.Валюты") Тогда
           Для Каждого ТекСтр из ТЧ Цикл
               НовСтр = ТЧ.Добавить();
               НовСтр[ТекКол.Имя] = Валюта;
               КонецЦикла;
           КонецЕсли;
       КонецЦикла;


А делаю так , то цыкл вроде бесконечным получается , ато думает долго...

Неужели нет ответа на вопрос?

Как мне отобрать колонки с ТЧ по ТипЗначения "Валюты" , и в каждую строку колонки установить валюту???

ХЕЛП!!!!!!!!!!!!!!!!!!!!!

ТЧ.Очистить();
   Для каждого ТС Из ТаблВыставленияСоответствия Цикл    
       НС = ТЧ.Добавить();
       ЗаполнитьЗначенияСвойств(НС,ТС);
       Попытка
           НС.Валюта0  = Валюта;
           НС.Единица0 = ТС.Номенклатура.ЕдиницаХраненияОстатков;
       Исключение
       КонецПопытки;
   КонецЦикла;







Вот если знаю конкретно имя колонки , то так работает. А как отобрать все колонки с Валюта и ЕдиницаХраненияОстатков - ума не приложу!!!

(18)Ты в (13) не заглядывал, да?


13 - 28.03.12 - 21:21
   
Для каждого НС из ТЧ Цикл

Для ай=0 по ТЧ.Колонки.Количество()-1 Цикл
       Если Строка(ТЧ.Колонки[ай].ТипЗначения) = "Валюты" Тогда
           НС[ай] = Валюта;
       КонецЕсли;
   КонецЦикла;
КонецЦикал;

(19) чукча однако не читатель, чукча писатель))) это про ТС...