Добрый день!
Отбираю документы по оле, но мне надо пропустить некоторые в которых определенное значение перечисления. Как это сделать по оле ?

ДокОле = БазаОле.CreateObject("Документ."+знВидаОле);
       ДокОле.ВыбратьДокументы(НачДата, КонДата);
       Пока ДокОле.ПолучитьДокумент() = 1 Цикл
           
           ВО = БазаОле.EvalExpr("Перечисление.ЗначениеПоИдентификатору(""ВводОстатков"")");
           //СП = БазаОле.EvalExpr("Перечисление.ЗначениеПоИдентификатору(""Списание"")");
           //Если ДокОле.Вид = ВО Тогда
           //    Сообщить("Это ВО");
           //КонецЕсли;
           //Если ДокОле.Вид = СП Тогда
           //    Сообщить("Это СП");
           //КонецЕсли;
           тбДокОле.НоваяСтрока();
           тбДокОле.ВидДок   = ДокОле.Вид();
           тбДокОле.НомерДок = ДокОле.НомерДок;
           тбДокОле.ДатаДок  = ДокОле.ДатаДок;
           тбДокОле.UIDp     = ДокОле.UIDp;
           тбДокОле.IDD      = ДокОле.IDD;
           тбДокОле.Проведен = ?(ДокОле.Проведен()=1,1,0);
           тбДокОле.Помечен  = ?(ДокОле.ПометкаУдаления()=1,1,0);
       КонецЦикла;


ВО = БазаОле.EvalExpr("Перечисление.ЗначениеПоИдентификатору(""ВводОстатков"")");
{D:\СОПОСТАВИТЬДОКУМЕНТЫБАЗ.ERT(154)}: 1С:Предприятие: Поле агрегатного объекта не обнаружено (ЗначениеПоИдентификатору): 0

Вот так

Если ДокОле.Вид() = "Мой вид" Тогда

(0) А значение КАКОГО перечисления ты хочешь по идентификатору получить?

(2)Он хочет их из 8-ки полу в 7-ку.

Т.е. он из 7.7 подключился к 8.х...
Но это только Телепатия.

(1) Это не тот вид.

(0) А вообще, я бы лучше сделал так:

Если ДокОле.Вид.Идентификатор() = "ВводОстатков" Тогда
.............


(3)(4) Фигню пишешь

ПеречислениеКО = БазаОле.EvalExpr("Перечисление.ТвойВидПеречисления")
ВО = ПеречислениеКО.ЗначениеПоИдентификатору("ВодОстатков");;
СП = ПеречислениеКО.ЗначениеПоИдентификатору("Списание");

емнип, можно так обращаться:

ПеречислениеКО = БазаОле.Перечисление.ТвойВидПеречисления

но могу и ошибаться

(5) +1

Я по OLE работаю именно так - стараюсь получать только простые типы данных: число, строка, дата. И то с датами надо про баг не забывать. А уж агрегатные - нах-нах.

(8) И точно работает :). Что-то типа такого.

Сообщить(""+База77.Перечисление.ВидыОплаты.Оплата.Идентификатор()) ;

Ну и соотвествнно и такое
ВО = База77.Перечисление.ВидыОплаты.Оплата ;

В ВО будет OLE объект.

(10)+ Значения перечисления.

оле перечисления получить удалось, но глядя в отладчике почему то ДокОле.Вид = "" хотя точно у реквизита документа Вид тип значения = Перечисление.ВводСписание, и у данного документа заполнено.    

БазаОле.Перечисление.ВводСписание.ВводОстатков.Идентификатор() = "ВводОстатков"
ВО = OLE
ДокОле.Вид = ""
ТипЗначения(ДокОле.Вид)  = 2
ТипЗначения(ВО)  = 100

Ну че-то отладчик с тобой не согласен насчет "хотя точно у реквизита документа Вид тип значения = Перечисление.ВводСписание", ему кажется, а может это так и есть, что там строка.

(12) Ну и какой будет ТипЗначения() в ОТКРЫТОЙ базе у перечисления из ДРУГОЙ базы?

Особенно, если в текущей базе вообще нет такого вида перечисления?

На твоем примере - какой тип назначен колонке тбДокОле.ВидДок?

Читай (9) и оперируй с ПРОСТЫМИ типами. Например:

Если ДокОле.Вид.Идентификатор() = "ВводОстатков" Тогда
    тбДокОле.ВидДок   = Перечисление. КакоеОноТамУТебя.ВводОстатков;
ИначеЕсли ДокОле.Вид.Идентификатор() = "Списание" Тогда
    тбДокОле.ВидДок   = Перечисление. КакоеОноТамУТебя.Списание;
...
и так далее

(14)

ТипЗначения(ДокОле.Вид())  = 2
ТипЗначения(ДокОле.ДатаДок)  = 3

ДокОле.Вид.Идентификатор()   ругается....

(15) Значит, открыл документ, у которого Вид - не перечисление.

+(16) Или, как вариант, реквизит НЕ ЗАПОЛНЕН. Перед ДокОле.Вид.Идентификатор() проверяй на ПустоеЗначение(ДокОле.Вид)

(16)А есть доки с видом "перечисление"?

(16)
Пишу на базе оле
Док = СоздатьОбъект("Документ.ВводСписаниеТоваров");
   Док.ВыбратьДокументы(НачДата,КонДата);
   Пока Док.ПолучитьДокумент() = 1 Цикл
       Сообщить(""+Док+"  Док.Вид="+Док.Вид.Идентификатор());    
   КонецЦикла;

РЕЗУЛЬТАТ:
ВводСписаниеТоваров Нл-0000087  Док.Вид=ВводОстатков
ВводСписаниеТоваров ВСТp0000003  Док.Вид=Списание


пишу к базе по оле
   Сообщить("знВидаОле="+знВидаОле);
       ДокОле = БазаОле.CreateObject("Документ."+знВидаОле);
       ДокОле.ВыбратьДокументы(НачДата, КонДата);
       Пока ДокОле.ПолучитьДокумент() = 1 Цикл
           Сообщить("ном док= "+ДокОле.НомерДок);
КонецЦикла;

РЕЗУЛЬТАТ:
знВидаОле=ВводСписаниеТоваров
ном док= Нл-0000087
ном док= ВСТp0000003

(18) У ТС "Вид" - это реквизит документа.

(15) Про это поподробнее ТипЗначения(ДокОле.Вид()). Скобочки зачем ? Это тогда метод.

ДокОле.Вид() или ДокОле.Вид ?

Какой то мудень когдато сделал реквизит Вид тип Перечисление.ВводСписание

(22)
ТипЗначения(ДокОле.Вид)  = 2
и
ТипЗначения(ДокОле.Вид())  = 2 //тут логично

без скобок д.б. 10.

(19) А так что выйдет ?

Сообщить("ном док= "+ДокОле.НомерДок+ " , ВидРеквизит = " +ДокОле.Вид) ;

(26) выходит
знВидаОле=ВводСписаниеТоваров
ном док= Нл-0000087  , ВидРеквизит =
ном док= ВСТp0000003 , ВидРеквизит =

А на

Сообщить("ном док= "+ДокОле.НомерДок+ " , ВидРеквизит = " +ДокОле.Вид.Идентияикатор()) ;

Ругается ?

* Идентификатор()

(28) Да, Значение не представляет агрегатный объект (Идентификатор)

Прикольно. Похоже, при вызове по ОЛЕ происходит коллизия между свойством и методом, если они обзавны одинаково.

(31) вот-вот я тоже заподозрил

(31) Вот у меня тоже в голове такое крутится :). ТС попробуй на тестовой базе поменять идентификатор существующего реквизита Вид на другой и проверь.

Хотя, с другой стороны, тогда ДокОле.Вид должно не пустую строку, а название вида документа возвращать.

(34) Может его частично глючит :), на типизации :).

А если не через выборку попробовать работать, а через запрос?

(31) 100%  переименовал и уже код Сообщить("ном док= "+ДокОле.НомерДок+ " , ВидРеквизит = " +ДокОле.ВидОстатков) ;

Результат:

знВидаОле=ВводСписаниеТоваров
ном док= Нл-0000087  , ВидРеквизит = OLE
ном док= ВСТp0000003 , ВидРеквизит = OLE

(37) От жеж ...

Действительно прикольно :). Интересно его на всех именах методов документа так штырит :) или только на вид().

(37),(38): всё непримитивное, что "там" имеет тивы-виды-прочая, тут имеют тип "OLE", чонеясно?
Сообщить("ном док= "+ДокОле.НомерДок+ " , ВидРеквизит = " +ДокОле.ВидОстатков.Identifier());

ЗЫ: и - да. 1) за названия реквизитов и объектов, совпадающие с ключевыми словами встроенного языка - рубить руки, это недопустимо (ну или раскладывает труднораспознаваемые грабли при работе через ОЛЕ); 2) ВСЕ методы и прочие лексемы ВЯ в оле-контексте (для оле-объектов) - указывать строго рекомендуется в англоязычной транскрипции - очень хорошая и полезная для дела привычка!

+(36) Примерно так:

Запрос = БазаОле.CreateObject("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с '"+ Строка(НачДата) +"' по '" + Строка(КонДата) + "';
|ОбрабатыватьДокументы все;
|ВидОстатков = Документ."+знВидаОле+".Вид;
|ТекущийДокумент = Документ."+знВидаОле+".ТекущийДокумент;
|Группировка ТекущийДокумент;
|"//}}ЗАПРОС
;

Пока Запрос.Группировка(1) = 1 Цикл
   Сообщить(Запрос.ВидОстатков.Идентификатор());
КонецЦикла;


(40) >> чонеясно?

А всю ветку прочитать?

Если OLE_ДДС.ВидДвижения.Идентификатор()=OLE.Enum.ВидыДвиженийДенежныхСредств.ПриобретениеТоваровПродукцииРаботИУслуг.Идентификатор() Тогда

я так сравниваю

(43) Тоже начни с чтения.

(44) у меня работает, сравнивает и выбирает то что надо.

Автор, попробуй через запрос со старым названием реквизита. Очень интересно, что получится :-)

(45) У тебя тоже имена реквизитов совпадают с именами методов?

(42): ты внятнее формулируй что именно имеешь ввиду - причем в рамках ответа по сути (40).

(41) Запрос ничего не выбирает

(48) Я имею в виду, что вот это: "всё непримитивное, что "там" имеет тивы-виды-прочая, тут имеют тип "OLE"" ни у кого неясностей или вопросов не вызывало на протяжении всей ветки. Вопрос вызвало то, что нечто непримитивное "там" вдруг оказалось строкой "тут".

(47) Вряд ли, а зачем так делать?

(49) Хмммм, странно. У меня в (41) пропущено

Запрос.Выполнить(ТекстЗапроса);

Ты не пропустил, надеюсь?

(51) А затем, что у автора так уже сделано, и это суровая реальность, данная нам в ощущениях.

(53)+1. Насчет ключевых слов полностью согласен во всеми. Но если такая же бодяга и для других методов, то не всегда при заведении нового реквизита можно помнить все методы, в данном случае документа. На мой взгляд это все-таки косяк платформы.

(52) запрос срабатывает

Результат:
ВводОстатков
Списание

(55) Ну вот и делай через запрос. Если не хочешь ковырять всю конфу выискивая, где этот реквизит упоминается.

(54) Скорее это косяк OLE.