Есть функция получения значений справочников. никак не получается побороть периодические реквизиты:

Док = БазаОЛЕ.CreateObject("Документ");
ОбщИдент = Метаданные.ОбщийРеквизитДокумента(Счетчик).Идентификатор
ЗначСправ = Док.ПолучитьАтрибут(ОбщИдент)

Для Счетчик = 1 По Метаданные.ОбщийРеквизитДокумента() Цикл
   Если Метаданные.ОбщийРеквизитДокумента(Счетчик).Тип = "Справочник" Тогда
       ЗначСправ = Док.ПолучитьАтрибут(ОбщИдент);
       значАтр = ПолучитьЗначениеСправочника(ОбщАттр,ЗначСправ);
       Попытка
           ТекДок.УстановитьАтрибут(ОбщИдент,значАтр);
       Исключение
               Сообщить("Ошибка = "+ОписаниеОшибки());
       КонецПопытки;
   КонецЕсли;        
КонецЦикла;

Функция ПолучитьЗначениеСправочника(ОбщАттр,ЗначСправ)
   Для Счетчик2 = 1 По Метаданные.Справочник(ВидСпр).Реквизит() Цикл
       Справ = Метаданные.Справочник(ВидСпр).Реквизит(Счетчик2);
       Если Справ.Периодический = 1 Тогда
           ТекДата = ТекущаяДата();
           НачДата = "01.01.80";
           ПериодОЛЕ = БазаОЛЕ.CreateObject("Периодический");
           ПериодОЛЕ.UseObject(Справ,ЗначСправ);
           ПериодОЛЕ.ВыбратьЗначения(НачДата,ТекДата);
           Пока ПериодОЛЕ.ПолучитьЗначение()=1 Цикл
               Сообщить(Строка(ПериодОле.ДатаЗнач) + " " + Строка(ПериодОле.Значение));
           КонецЦикла;
       КонецЕсли;
   КонецЦикла;
КонецФункции
Выдает ошибку: Плохой тип переменной

Забыл сказать где тормозится: на строке ПериодОЛЕ.UseObject(Справ,ЗначСправ);

дык Справ не пролазит через OLE

(2)+ его надо "там" получать

(0). Попробуй ПериодОЛЕ.UseObject(Справ.Идентификатор,ЗначСправ);

Я думал там просто наименование реквизита надо поставить. В любом случае: получил его там - эффект тот же

ПериодОЛЕ.UseObject(Справ.Идентификатор,ЗначСправ.ТекущийЭлемент());

Реквизит = ДолжностьРуководителя типа = Строка вида =
........ 21 Элемент периодический = 1
ЗначСправ.Наименование = ООО "ПродИнвест"
ВидСпр = СвоиЮрЛица
Справ = Руководитель
ЗначСправ = OLE

Справ нормально получает, ТекущийЭлемент() в OLE не прокатывает

Может у кого-то есть решение как получить данные по периодическому элементу из OLE?

(8) еще как прокатывает

(9) как в (6) чем не устраивает ?

Хм, действительно прокатило. Просто я читал статью и там было написано что не прокатывает. Извиняюсь.

(12) удали эту статью нафиг. Всегда про ОЛЕ в 77 писали, что всё что в обычном режиме работает "по-умолчанию", в ОЛЕ надо прописывать явно

Там так и было написано, но при этом было написано: "Гарантированно не будут работать методы ТекущийЭлемент() и ТекущийДокумент() (ошибки V7 не будет, но и результат работы будет нулевой)."

(14)На заборе тоже много пишут из 3-ёх букв :)

...так то 1С само пишет много, что работает совсем по другому ;)

+(14) В свое время я реализовал работу через функцию: ExecuteBatch и переменные глУсловие1..глУсловие12 (из БД ОЛЕ)
И выполнял код в базе ОЛЕ, а результат передавай через глобальные переменные.

Может кто подскажет как через эту же функцию установить реквизит справочника типа"справочник". Остальные реквизиты получаются нормально. Пытаюсь сделать так:

Справ1 = Справ;
Если Справ.Периодический = 1 Тогда
   
Иначе
   СправИдент = Справ.Идентификатор;
   ЗначАтр2 = СпрОЛЕ.ПолучитьАтрибут(СправИдент);
   ПолучЗначАтр2 = ПолучитьЗначениеАттрибута(Справ1,ЗначАтр2);
   Попытка
       ТекСправ.УстановитьАтрибут(СправИдент,ПолучЗначАтр2);
   Исключение
   КонецПопытки;
КонецЕсли;


Не получается

(17)ТекущийЭлемент()

Куда его вставить?)

Никто не подскажет?

Разобрался, всем спасибо. ТекущийЭлемент() не понадобился)