Вызов 1С из Ax 2009

[TravellerInTime]

Всем привет!
Есть у кого опыт интеграции Ax и 1С?
Пытаюсь разобраться как работать с 1С из Ax 2009.
Написал вот такой код

    COM s = new COM('V83.Application');
    COM d;
    s.Connect('Srvr="server";Ref="base"');
    s.Visible(true);

    d = s.NewObject('Справочник.Контрагенты');

Соединение проходит успешно, но на последней строке я получаю ошибку:
Метод "NewObject" в COM-объекте класса "V83.Application" возвратил код ошибки 0x80020005 (DISP_E_TYPEMISMATCH), который означает: Один или несколько аргументов не могли быть преобразованы.
Какое здесь несоответствие типов я не понимаю. Во всех примерах, что есть в инете (не с Ax, конечно), передаётся в этот метод строка.
Подскажите, пожалуйста, как сделать правильно?

[TasmanianDevil]

COMVariant вместо строки?

[Ace of Database]

Мне кажется, что надо вместо 'V83.Application' использовать 'V83.COMConnector'
Я так работал с 1С версии 8.2, использовал V82.COMConnector

[TravellerInTime]

Цитата:

Сообщение от Ace of Database

Мне кажется, что надо вместо 'V83.Application' использовать 'V83.COMConnector'

COMConnector насколько я понимаю, не позволяет работать с интерфейсом пользователя или я ошибаюсь?

[TravellerInTime]

Цитата:

Сообщение от TasmanianDevil

COMVariant вместо строки?

Вы это имели ввиду:

     COMVariant v = COMVariant::createFromStr('Справочники.Контрагенты', COMVariantInOut::In);
     d = s.NewObject(v);

Не помогло - та же ошибка.

[sukhanchik]

Ну вот как-то так можно получить описание:

            COM                     comApplication;
            COM                     comCatalog;
            COM                     comCatalogs;
            COM                     comMetaData;
            COM                     comObject;
            str                     connectionString;
            str                     objectNameId = "Контрагенты";
            #define.V80_COMConnector('V8.COMConnector')
            #define.V81_COMConnector('V81.COMConnector')
            #define.V82_COMConnector('V82.COMConnector')
            #define.V83_COMConnector('V83.COMConnector')
            ;
            new InteropPermission(InteropKind::ComInterop).assert();
            comObject              = new COM(#V83_COMConnector);
            comApplication      = comObject.Connect(connectionString);
            comMetaData = comApplication.MetaData();
            comCatalogs = comMetaData.Catalogs();
            comCatalog = comCatalogs.Find(objectNameId); // Можно получить описание объекта справочник.Контрагенты
            CodeAccessPermission::revertAssert();

Если же нужно данные получить - то нужно делать запрос в 1С и тогда код будет выглядеть как-то так:

            str Code;
            str sqlString = "ВЫБРАТЬ Справочник.Контрагенты.Код КАК Code ИЗ Справочник.Контрагенты";

            query = application.NewQuery();
            query.Text(sqlString);
            iterator = query.Execute().Select().comObject(); // Для 8.2 вместо Select() - Choose()
	    while (iterator.Next())
	    {
                Code = iterator.Code(); // Код контрагента
            }

Код примерный, выдран из рабочего кода, поэтому напрямую может не работать. Я показал концепцию.

[TravellerInTime]

Цитата:

Сообщение от sukhanchik

Ну вот как-то так можно получить описание:
....
Я показал концепцию.

О! Ключевое слово MetaData(), которое я никак не мог найти!
Буду изучать дальше! Спасибо!

[brahma]

Тип называется либо СправочникОбъект.Контрагенты, либо СправочникСсылка.Контрагенты, в зависимости от того, что вы хотите создать. Вообще создавать таким образом ни объект, ни ссылку не стоит. Для создания объекта нужно использовать метод менеджера справочника СоздатьЭлемент(), или СоздатьГруппу(). Типа
catalogObject = comApplication.Справочники.Контрагенты.СоздатьЭлемент();
....
catalogObject.Записать();

И да, лучше использовать ComConnector.

[TravellerInTime]

Цитата:

Сообщение от brahma

И да, лучше использовать ComConnector.

С его помощью я могу открыть форму документа, справочника?

[sukhanchik]

Цитата:

Сообщение от TravellerInTime

С его помощью я могу открыть форму документа, справочника?

С помощь COMConnector можно:

• Получить данные из БД
• Получить метаданные конфигурации.

Ряд методов/свойств в COMConnector не работает. Подробнее - см. синтаксис-помощник в 1С.
Также соединение относительно небыстрое. Т.е. для целей получения метаданных или относительно небольшого количества данных - подойдет. Но для целей регулярной интеграции документов с большим количеством строк (или большого кол-ва документов) не подойдет.
Визуальные вещи также не запускаются (т.е. COMConnector не управляет поведением клиента 1С).

[TravellerInTime]

Цитата:

Сообщение от sukhanchik

С помощь COMConnector можно:
Визуальные вещи также не запускаются (т.е. COMConnector не управляет поведением клиента 1С).

Значит я всё правильно разобрался, что нужен именно Application.
Получение данных из 1С планируется в настоящий момент через web-service. С ним еще не игрался, может тоже возникнет куча вопросов. Кстати, а как по скорости web service 1С?

PS: Странно форум настроен, не могу поставить благодарность, пишет, что нужно 3 дня подождать.

[brahma]

Цитата:

Сообщение от TravellerInTime

Значит я всё правильно разобрался, что нужен именно Application.

Для открытия формы нужен Application. Другое дело стоит ли вообще связываться с открытием формы.

Цитата:

Сообщение от TravellerInTime

Получение данных из 1С планируется в настоящий момент через web-service. С ним еще не игрался, может тоже возникнет куча вопросов. Кстати, а как по скорости web service 1С?

Есть возможность получение данных через OData, есть возможность делать Rest через http-сервисы. Вроде в последней версии сделали возможность держать сеанс, это позволяет ускорить работу сервисов. Быстро или не быстро зависит от ваших задач.

[TravellerInTime]

Продолжаю изучать тему. С методанными вроде разобрался.
А вот такая строчка кода в Ax не прокатывает, ибо с русскими буквами Ax не дружит.
catalogObject = comApplication.Справочники.Контрагенты.СоздатьЭлемент();
Как обратится к справочнику "Контрагенты" в данном случае?

[brahma]

Нет, с помощью ComConnector форму открыть нельзя.

[TravellerInTime]

Продолжу в этой теме.
Дальнейшей темой моего изучения стали веб-сервисы 1С.
В Reference я добавил веб-сервис. Ax создала обёртку. Написал код. Вроде всё просто и понятно. И тут стал вопрос авторизации, как из Ax передать логин и пароль пользователя в 1С?
Если на .net я просто пишу:
service.ClientCredentials.UserName.UserName = "User";
service.ClientCredentials.UserName.Password = "Password";
то обёртка, созданная Ax, не имеет ClientCredentials.
Подскажите, пожалуйста, как всё это делается в Ax?

[Player1]

AX 2012: Авторизация при вызове сервисов

[TravellerInTime]

Player1 Спасибо, я читал эту тему... Как я написал уже выше, у меня нет проблем с авторизацией в .net. Я спрашиваю, как это сделать в Ax штатными средствами?

[maldini]

Мы как-то так это делаем. Сделали на C# прокси класс на основе сервиса 1С подключили сервис как web reference. Затем его добавили в референс в AX и испрользуем как ниже показано.

        version = CLRInterop::parseClrEnum("System.Web.Services.Protocols.SoapProtocolVersion","Soap11");
        webService = new WebServicesProxyAX.Service1C.DAXTo1C();
        webService.set_UseDefaultCredentials(true);
        webService.set_SoapVersion(version);

        if(timeout)
            webService.set_Timeout(timeout);

        if(urlWebServices)
            webService.set_Url(urlWebServices);

[TravellerInTime]

Идея с обёрткой в .net понятна, и она уже приходила на ум.
Т.е. получается MS не сделала никакой возможности авторизации на веб-сервисе из Ax? Браво!

[MazZzDaI]

Try this way:

ClrObject clientType = CLRInterop::getType("CheckersReference.CheckersBotAPI.CheckersBotClient"); 
CheckersReference.CheckersBotAPI.CheckersBotClient      myClient;
System.ServiceModel.Description.ClientCredentials       clientCredentials;
System.ServiceModel.Security.WindowsClientCredential    windowsCredentials;
System.Net.NetworkCredential                            creds;
    
creds = new System.Net.NetworkCredential();
creds.set_Domain("axforumDomain");
creds.set_UserName("axforumUser");
creds.set_Password("axforumUserPassword");
    
myClient = AifUtil::CreateServiceClient(clientType);
    
clientCredentials = myClient.get_ClientCredentials();
windowsCredentials = clientCredentials.get_Windows();
windowsCredentials.set_ClientCredential(creds);

myClient.MakeStepAI();