Покорить .NET в DAX чтобы сделать ручным ReportingServices

[KingPeas]

Кстати кто знает что делает метод Equals()? Он вроде есть у всех объектов CLRObject

[belugin]

http://msdn.microsoft.com/en-us/libr...ls(VS.71).aspx

[RumataEstor]

Цитата:

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

Смотрю через Reflector и вижу кучу интересующих меня свойств у CatalogItem и все они public как то: Path, Name и т.д. Но доступа к ним нет почему то?
Что делать ума не приложу. Посмотрел в SystemDocumentation ничего по смыслу подходящего нет(

Проблема в том, что CatalogItem предоставляет не свойства, а поля. Очевидно, доступ к ним в Аксапте представляет очередную проблему.
А как ты пользовался SRSProxy? Получал xml?

Цитата:

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

Кстати кто знает что делает метод Equals()? Он вроде есть у всех объектов CLRObject

Обычно он проверяет равенство объектов. В зависимости от реализации он может проверять равенство по содержимому объектов, а может сравнивать только ссылки (указывают ли переменные на один объект).

PS. Так как в Аксапте исходники CLRInterop::staticInvoke я посмотреть не могу, не мог бы ты здесь их выложить. Тогда, возможно, некоторые проблемы можно было бы решить теми же методами, как они реализуются разработчиками Аксапты.

[KingPeas]

Цитата:

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

Проблема в том, что CatalogItem предоставляет не свойства, а поля. Очевидно, доступ к ним в Аксапте представляет очередную проблему.
А как ты пользовался SRSProxy? Получал xml?

SRSProxy реализован через COM и listChildren возвращает там действительно XML, а дальше идет его разбор средствами аксапты без лишней нервотрепки. Да вот только ReportingServices.ListChildren возвращает CLRObject в виде массива значений, подозреваю что тот же XML но как его оттуда выцарапать не знаю...
Пробовал перевести все через com сделать по аналогии, через Com не могу добраться до статического свойста Credentials...

Цитата:

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

PS. Так как в Аксапте исходники CLRInterop::staticInvoke я посмотреть не могу, не мог бы ты здесь их выложить. Тогда, возможно, некоторые проблемы можно было бы решить теми же методами, как они реализуются разработчиками Аксапты.

Данный метод находится в закрытой части ядра SystemDocumentation и просмотреть его не так просто? во всяком случае как это сделать я не знаю.

[KingPeas]

Вообще чувствуешь себя как слепой котенок. Тычешься-тычешься в попытках понять как же оно должно работать, натыкаешься на глухие стены... Где же хваленая интеграция с .Net если инструменты для работы с оной неизвестно где искать??? Энумы извлекаются так, статические свойства так, поля получать неизвестно как... вопросов однозначно больше ответов

[belugin]

я бы попробовал через reflection http://msdn.microsoft.com/en-us/libr....getvalue.aspx

[RumataEstor]

Цитата:

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

я бы попробовал через reflection http://msdn.microsoft.com/en-us/libr....getvalue.aspx

Точно. Можно так:

Microsoft.Dynamics.ReportingServices.CatalogItem            catalogItem;
//...
str path = catalogItem.GetType().GetField("Path").GetValue(catalogItem);

[RumataEstor]

Найти способы доступа к полям из Аксапты не получилось.

Можно попробовать этот массив выгрузить в XML

System.Array ar = ReportingServices.ListChildren('/',true);
System.IO.StringWriter w = new System.IO.StringWriter();
System.Xml.Serialization.XmlSerializer ser = new System.Xml.Serialization.XmlSerializer(ar.GetType(),
          "http://schemas.microsoft.com/sqlserver/2005/06/30/reporting/reportingservices");
ser.Serialize(w, ar);
w.Flush();
str result = w.ToString();

[belugin]

типа

System.Type t;
    System.Reflection.FieldInfo f;
    Object o;
;
    t = x.GetType();
    f = t.GetField("field");
    o = f.GetValue(x);
    info(o.toString());
}

[KingPeas]

Цитата:

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

типа

System.Type t;
    System.Reflection.FieldInfo f;
    Object o;
;
    t = x.GetType();
    f = t.GetField("field");
    o = f.GetValue(x);
    info(o.toString());
}

Класс, работает, наконец то)))
Всем кто помогал покорить .Net огромное спасибо. Чтобы я без вашей помощи делал ума не приложу. Сажусь изучать .Net, не сомневаюсь что он еще пригодится.

О сколько нам открытий чудных
Готовят сборки от .Net
Спасения в советах мудрых
За это Вам большой РАХМЕТ.

[RumataEstor]

Цитата:

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

Класс, работает, наконец то)))
Всем кто помогал покорить .Net огромное спасибо. Чтобы я без вашей помощи делал ума не приложу. Сажусь изучать .Net, не сомневаюсь что он еще пригодится.

О сколько нам открытий чудных
Готовят сборки от .Net
Спасения в советах мудрых
За это Вам большой РАХМЕТ.

Было здесь такое сообщение:

Цитата:

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

ИМХО лучше не мучаться, написать dll и уже ее подключить в Аксапту.
Это и в будуещем пригодиться.

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

[KingPeas]

Цитата:

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

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

Рад бы писать, да к сожалению практически кроме MorphX ничем не владею. Стаж работы в качестве программиста скромный около 3 лет и все это время в Аксапте. Потихоньку осваиваю XML, SQL. Приходилось с VBA ковыряться, но там все на порядок проще было по офисным приложениям. Сейчас скорей всего придется VisualBasic .Net изучать. Для себя немного разбирался с HTML и ActionScript для Flash.
Так что не судите слишком строго) И потом если оно должно работать, так ведь стоит разбираться, тем более что AX2009 говорят очень связан с .Net

[RumataEstor]

Цитата:

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

Рад бы писать, да к сожалению практически кроме MorphX ничем не владею. Стаж работы в качестве программиста скромный около 3 лет и все это время в Аксапте. Потихоньку осваиваю XML, SQL. Приходилось с VBA ковыряться, но там все на порядок проще было по офисным приложениям. Сейчас скорей всего придется VisualBasic .Net изучать. Для себя немного разбирался с HTML и ActionScript для Flash.
Так что не судите слишком строго) И потом если оно должно работать, так ведь стоит разбираться, тем более что AX2009 говорят очень связан с .Net

Лучше уж C#. Насколько я знаю, в ActionScript синтаксис похож на Java, а C# - это Java от Microsoft.

[KingPeas]

Ох рано я обрадовался. Попробовал получить параметры как это делается в примерах
Сначала так

ar2 = ReportingServices.GetReportParameters( '/ABCD_New/ABCD_New', null, false, null,null);

потом так

            ar2 = ReportingServices.GetReportParameters( '/ABCD_New/ABCD_New',
                                                        CLRInterop::Null("System.String"),
                                                        false, 
                                                        CLRInterop::Null("Microsoft.Dynamics.ReportingServices.Microsoft.Dynamics.ReportingServices.DataSourceCredentials"),
                                                        CLRInterop::Null("Microsoft.Dynamics.ReportingServices.CatalogItem"));

Что-то непонятное , параметров 5. Ругается Класс не содержит эту функцию, обычно такой результат когда вызов неправильно идет. У кого будут какие идеи?

[RumataEstor]

Во втором варианте, наверное, должны быть типы "System.Array", так как в декларации написаны массивы:
public ReportParameter[] GetReportParameters(string Report, string HistoryID, bool ForRendering, ParameterValue[] Values, DataSourceCredentials[] Credentials);

Параметров действительно 5, метод вроде бы называется верно. Может, у тебя переменная ReportingServices в этот момент уже другое значение принимает? Проверь ее тип с помощью метода GetType().

[KingPeas]

Цитата:

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

Во втором варианте, наверное, должны быть типы "System.Array", так как в декларации написаны массивы

И так пробовал на промежуточном шаге, тоже не помогает(

Цитата:

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

Может, у тебя переменная ReportingServices в этот момент уже другое значение принимает?

Ну если бы в этот момент ругалось бы в момент исполнения, а так Аксапта ругается еще на синтаксис, до запуска дело не дошло.

[RumataEstor]

Может, ошибка в типе переменной? Уверен, что ReportingServices типа Microsoft.Dynamics.ReportingServices.ReportingService2005? Уж с методами все должно быть нормально, ведь ListChildren нормально отрабатывает.

[KingPeas]

Цитата:

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

Уверен, что ReportingServices типа Microsoft.Dynamics.ReportingServices.ReportingService2005? Уж с методами все должно быть нормально, ведь ListChildren нормально отрабатывает.

Тип правильный. Во первых в определении явно указываю

Microsoft.Dynamics.ReportingServices.ReportingService2005   ReportingServices = new Microsoft.Dynamics.ReportingServices.ReportingService2005();

Во вторых специально ввел для проверки в месте вызова

 info (ReportingServices.ToString());

возвращает
Microsoft.Dynamics.ReportingServices.ReportingService2005
так что ошибка непонятно где( Может у кого есть возможность в 2009 посмотреть код, там вроде описание необходимых параметров есть, возможно и ошибки более детальные выдаются...
Вот результирующий код

static void RSGetReportParameter2(Args _args)
{
    Microsoft.Dynamics.ReportingServices.ReportingService2005   ReportingServices = new Microsoft.Dynamics.ReportingServices.ReportingService2005();
    Microsoft.Dynamics.ReportingServices.CatalogItem            catalogItem;
    Microsoft.Dynamics.ReportingServices.ItemTypeEnum           itemTypeEnum;

    Microsoft.Dynamics.ReportingServices.ReportParameter        reportParameter;
    SRSItemTypeEnum                                             ItemType;
    System.Net.ICredentials cred = CLRInterop::staticInvoke("System.Net.CredentialCache", "get_DefaultCredentials");

    System.Exception                                            exception;
    System.Array                                                ar, ar2, arEmpty;
    System.Text.StringBuilder                                   sb = new System.Text.StringBuilder();
    System.Uri                                                  url = new System.Uri('http://ax-dev/ReportServer');
    str         name,
                path;
    int         i, j, arLength, arLength2, typeElement;
    str         type;

    anytype getFieldValue(CLRObject _object, str  _fieldName)
    {
        System.Type                     t;
        System.Reflection.FieldInfo     fieldInfo;
        ;

        t = _object.GetType();
        fieldInfo = t.GetField(_fieldName);
        return fieldInfo.GetValue(_object);

    }
    ;

    try
    {
        ReportingServices.set_WebServiceUrl('http://ax-dev/ReportServer/ReportService2005.asmx');
        ReportingServices.set_Credentials(cred);
        ar = ReportingServices.ListChildren('/',true);
        arLength = ar.get_Length();
        for (i=0; i< arLength; i++)
        {
            catalogItem = ar.GetValue(i);
            path = getFieldValue(catalogItem,"Path");
            name = getFieldValue(catalogItem,"Name");
            typeElement = getFieldValue(catalogItem,"Type");
            ItemType = typeElement;
            info (strfmt('%1 - %2 (%3)',ItemType, path, name));
            ar2 = ReportingServices.GetReportParameters(path, null, false, null, null);
            arLength2 = ar2.get_Length();
            for (j = 0; j < arLength2; j++)
            {
                reportParameter = ar2.GetValue(j);
                name = getFieldValue(reportParameter,"Name");
                info(strFmt('--Параметр %1',name));
            }

        }
    }
    catch (Exception::CLRError)
    {
        info('Ошибка .NET');
        exception = CLRInterop::getLastException();
        name = exception.ToString();
        info (name);

    }

    info('Конец');

}

[RumataEstor]

Можно снова попробовать решлекшеном.

ReportingServices.GetType().InvokeMember("GetReportParameters",
               ClrInterop:: parseClrEnum("System.Reflection.BindingFlags", "InvokeMethod"),
               null,
               ReportingServices,
               [path, null, false, null, null]).

Или хотя бы проверить, есть ли в ReportingServices такой метод.

[KingPeas]

Цитата:

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

Или хотя бы проверить, есть ли в ReportingServices такой метод.

Метод есть, он его предлагает для выбора. А вот что ему не ясно... через рефлекшн попробую