Доброго времени суток,
Понадобилось мне в программе на С# через COM-соединение извлечь данные из 1С. И все шло хорошо, пока я не столкнулся с перечислениями, а точнее с получением вида операции платежного поручения.
<pre>
COMConnector comConnector  = new COMConnector();
dynamic connection= = comConnector.Connect(Settings.connectionString);

dynamic orders = connection.Документы.ПлатежноеПоручениеВходящее.Выбрать();
while ((bool)orders.Следующий())
{
// и вот тут мне нудно вытащить или название или хотя бы индекс Вида
//операции. orders.ВидОперации() в данном случае является Com объектом
//и достать из него что-либо никак не получается.
}
</pre>
Буду рад любой помощи.

orders.Операция?

if (orders.Операция = connection.Перечисления.НужноеПеречисление.НужноеЗначение)

?

на rsdn тебе дорога, там тебя поймут и обогреют

'System.__ComObject' does not contain a definition for 'Операция'

Юзай
connection.CreateObject("Enumeration.MyEnumeraion.MyValue")

Вместо Enumeration можно Перечисление написать

>>Юзай
>>connection.CreateObject("Enumeration.MyEnumeraion.MyValue")
Прошу прощения но не совсем понял хода вашей мысли.
На сколько я понимаю данный метод создаст мне обьект значения перечисления.
А мне нужно достать значение уже существующего обьекта

(7) Через COM можно передать только объекты примитивных типов. Чтобы выбрать индекс, можно сравнить с новым объектом нужного типа, а затем передать предопределенную строку в COM-приемник

Еще можно попробовать использовать метод/свойство "Метаданные" объекта orders.ВидОперации() -- есть такие метаданные, которые выдают описания в виде примитивных типов (строковом)

Сравнить то можно только как?

orders.ВидОперации() == connection.CreateObject("Enumeration.MyEnumeraion.MyValue") ?

if(connection.Перечисления.ВидыОперацийППИсходящее.ОплатаПоставщику == orders.ВидОперации)
   
Вот такое условие не срабатывает

CreateObject забыл

в то-то и затык, что его создать надо

точнее NewObject

'System.__ComObject' does not contain a definition for 'CreateObject'

попробуй (15)

if (connection.NewObject("Перечисления.ВидыОперацийППИсходящее.ОплатаПоставщику") == orders.ВидОперации)

Выдает ошибку (на все ошибки 1с он выдает одно и тоже сообщение, так что уточнить какая именно ошибка не могу)

orders.ВидОперации.Метаданные().Имя -- глянь в отладчике, выводит что-либо?

ВидыОперацийППИсходящее

Пробуй

Foreach item in orders.ВидОперации.Метаданные().ЗначенияПеречисления
{
if orders.ВидОперации == item.Синоним
{
return item.Имя
}


}

orders.ВидОперации под TrimAll взять в connection

чтобы строка "Оплата покупателя" была

Так не получится. item.Синоним это строка а orders.ВидОперации это ComObject

Трим нельзя использовать по той же причине

(24) Погоди, тебе нужен trim одинэсовский. Он возвращает строковое представление объекта, которое можно сравнивать со свойством "синоним". Как сделать trim одинэсовский? Может, через
connection.Выполнить("СокрЛП(""orders.ВидОперации"")")?

а может, просто connection.СокрЛП() пойде

ни СокрЛП()ни Выполнить у connection нету

так, к 1С доступ на изменение конфы есть?

А Execute() или TrimAll() есть у connection

dynamic query = connection.NewObject("Запрос");
                   query.Текст = "СокрЛП(" + orders.ВидОперации + ")";
                   dynamic e = query.Выполнить();

может как-то так? В палне что это конечно не правильно написано но может подобным образом сформирвать запрос?

>>>А Execute() или TrimAll() есть у connection
нет ни того ни другого

>>так, к 1С доступ на изменение конфы есть?
будем считать что нет

(30)

query.Текст =
"Выбрать
НужныйДокумент.ВидОперации.Представление Как стрПредставление
Из
Документы.ТвойТипДокумента КАК НужныйДокумент
Где Документы.ТвойТипДокумента.Ссылка = &СсылкаНаОбъект";

query.УстановитьПараметр("СсылкаНаОбъект", orders.Ссылка);

dynamic e = query.Выполнить();

(32) Плохо, можно кастомные функции прописывать в конфигураторе для внешнего соединения. Там СокрЛП прописали бы

Так запрос написать не получается...по крайней мере если в cтроку запроса просто вставить orders вместо НужныйДокумент

Вместо НужныйДокумент можно Документы.ТвойТипДокумента вставлять

>>>(32) Плохо, можно кастомные функции прописывать в конфигураторе для внешнего соединения. Там СокрЛП прописали бы

Но ведь при обновлении конфикугации этот метод все-равно ведь слетит?

(37) Дело в том, что Модуль внешнего соединения обычно пуст в любой конфигурации, в крайнем случае, галочку напротив него при обновлении можно не ставить

dynamic query = connection.NewObject("Запрос");
                   query.Текст = "Выбрать Документы.ПлатежноеПоручениеИсходящее.ВидОперации.Представление Как стрПредставление Из Документы.ПлатежноеПоручениеИсходящее КАК Документы.ПлатежноеПоручениеИсходящее Где Документы.ПлатежноеПоручениеИсходящее.Ссылка = &СсылкаНаОбъект ";
                   query.УстановитьПараметр("СсылкаНаОбъект", orders.Ссылка);

                   dynamic e = query.Выполнить();
Вот это не работает. Я все правильно написал?

(39) Я ошибся: для перечислений свойство "Представление" не определено

Зато это попробуй:

Запрос = Новый Запрос;
   Запрос.Текст =
   "ВЫБРАТЬ
   |    ПРЕДСТАВЛЕНИЕ(ПлатежноеПоручениеИсходящее.ВидОперации) КАК стрПредставление
   |ИЗ
   |    Документ.ПлатежноеПоручениеИсходящее КАК ПлатежноеПоручениеИсходящее
   |ГДЕ
   |    ПлатежноеПоручениеИсходящее.Ссылка = &СсылкаНаДокумент"

неа

>>(37) Дело в том, что Модуль внешнего соединения обычно пуст в любой конфигурации, в крайнем случае, галочку напротив него при обновлении можно не ставить
Ну чтож если другого выхода нет то буду благодарен если вы опишите мне что и где нужно прописать.

Но вообще это жесть какая-то=)

(41) ну, я запрос из 1С скопировал, тебе надо текст заменить в query.Текст... ты ведь ЭТО сделал?

(42) Клик ПКМ на корневом узле дерева конфигурации, выбираем "Модуль внешнего соединения". Пишем что-то вроде

Функция Trim(МоеЗначение) Экспорт

Возврат СокрЛП(МоеЗначение);

КонецФункции

По идее, функция Trim должна появится у connection

(43) Это ОдинЭЭЭЭЭЭЭЭЭЭЭЭЭЭЭЭЭС (с) Царь Леонид
А вообще, камрады с rsdn.ru регулярно решают похожие проблемы... тоже матеряться много

(41) ну, я запрос из 1С скопировал, тебе надо текст заменить в query.Текст... ты ведь ЭТО сделал?
Само собой

(45) Ну мало ли... всякое бывает. А вылетает на какой строчке:

query.УстановитьПараметр("СсылкаНаОбъект", orders.Ссылка);

dynamic e = query.Выполнить();

dynamic e = query.Выполнить();

(47) Это плохо. Запрос я конструктором составлял. Значит, с парамтером что-то

Вопрос конечно крайне глупый,но спрошу. В данный момент подключаюсь к тестовой базе. Под каким профилем надой зайти чтоб была возможность редактирования? Захожу как гендир и как администратор. Но все вкладки открываются "только для чтения".

(49) Профили в конфигураторе настраивают (Администрирование -> Пользователи). Там можно настроить доступ (дать себе права на изменение конфигурации).

Но есть и другая ситуация: когда на конфигурации висит "красный замок". Тогда надо идти в "Конфигурация -> Настройка поддержки", далее нажать на кнопку "Разрешить изменения"

Это если база не в хранилище и не захвачен ее корень

>>По идее, функция Trim должна появится у connection
Чето не появилась(

>>>>По идее, функция Trim должна появится у connection
>>Чето не появилась(
Появилась. только результат не тот что ожидалось.
var testVar = connection.Trim(orders.ВидОперации);
тут testVar равен "COMОбъект"

Еще идеи будут?

Это пипец какой-то

"Хотел бы я в глаза взглянуть тому конструктору, который этот двигатель придумал."(с)