Импорт в АХ через ODBC - DAX: Программирование

AXbeginer · 01.10.2009, 08:16

Здравствуйте, с недавних пор начал программировать в АХ и возникли проблемы ,а спросить не у кого (нет рядом программиста АХ). Суть вопроса: Нужно получить данные из внешней базы и записать в базу АХ создал кнопку на форме ProdTable, создал метод на кнопке который получает данные

X++:

void method1()
{
   ProdTable ProdTabl;
     ProdBOM    ProdBom;
     LoginProperty           LP = new LoginProperty();
     OdbcConnection          myConnection;
     Statement               myStatement;
     ResultSet               myResult,myResultLine;
     Str    s;
     str 50 CRProdid,Item;
     real   LostQty,DifQty;

     prodTableChangeQtySched    PQS = new prodTableChangeQtySched();
     ProdTabl = ProdTable;
     ProdBom = ProdBOM;
     LP.setDSN("TransferConnection");
    info(ProdTabl.collectrefprodid);
    try
    {
        myConnection = new OdbcConnection(LP);
        myStatement = myConnection.createStatement();
        myResult = myStatement.executeQuery(
            strfmt("Select excontrolqty,primor,collectrefprodid from ShiftReportPourHeader " +
                   "Where DataAreaId = '%1' and collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));
        while (myResult.next())
        {   s = int2str(myResult.getInt(2));
            CRProdid=myResult.getString(3);
        info(s);
            myResultLine = myStatement.executeQuery(strfmt("Select CAST(LostQty AS numeric(15, 8)) AS exp1,CAST(DiffectQty AS numeric(15, 8)) AS exp1,ItemId from ShiftReportPourLine " +
            "Where primor = '%1'",s));
//*****************************************
// LostQty ,DiffectQty - типа float 
            while (myResultLine.next())
            {
            Item=myResultLine.getString(3);
            LostQty=myResultLine.getReal(1);
            info(num2str(LostQty,6,3,1,1));
            ttsbegin;
            select forupdate * from Prodbom where Prodbom.ProdId==CRProdid && Prodbom.ItemId==Item;
                info('Go');

                Prodbom.ScrapConst =LostQty;
              ttscommit;
            ttsbegin;
            info('go2');
                Prodbom.update();
            ttscommit;
            }
        info('go2');
        ProdTabl.QtySched=myResult.getReal(1);
        PQS.parmProdTable(ProdTable);
        myStatement.executeUpdate(strfmt("Update ShiftReportPourHeader Set posted = 1 Where primor = %1 (1 = 0)", s));

        }

    }
    catch
    {
        throw("Check DSN settings (username/password).");
    }


}

а итоге он выдает ошибки
1 (X) Невозможно выполнить требуемую операцию с базой данных. Операция закончилась неудачно.
(!) [Microsoft][SQL Native Client]Invalid Descriptor Index

2 (X) Невозможно считать запись из ().
База данных SQL обнаружила ошибку.
(!) [Microsoft][SQL Native Client]Invalid Descriptor Index

У меня есть предположение что это проблема именно с типом данных LostQty и DiffectQty. Пытался проверить по средством выставления info потому что debager не работает(хотя включен может из за того что метод на кнопке). Так же пытался перевести в тип numeric тоже самое.

ice · 01.10.2009, 08:28

Для того чтоб работал дебагер: Сервис\Параметры\Разработка\Режим отладки = "Когда есть точки останова". импорт лучше делать в классе, а из формы его вызвать через MenuItem

miklenew · 01.10.2009, 08:36

Ещё один.
Когда пишите код на панели есть кнопочка X++.
Сейчас глядя на этот код, мысль только одна: "Щас мозг взорвётся".

AXbeginer · 01.10.2009, 08:59

Цитата:

Для того чтоб работал дебагер: Сервис\Параметры\Разработка\Режим отладки = "Когда есть точки останова".

Ну так и настроено

AXbeginer · 01.10.2009, 09:01

Цитата:

Когда пишите код на панели есть кнопочка X++

Извините не заметил

X++:

void method1()
{
   ProdTable ProdTabl;
     ProdBOM    ProdBom;
     LoginProperty           LP = new LoginProperty();
     OdbcConnection          myConnection;
     Statement               myStatement;
     ResultSet               myResult,myResultLine;
     Str    s;
     str 50 CRProdid,Item;
     real   LostQty,DifQty;

     prodTableChangeQtySched    PQS = new prodTableChangeQtySched();
     ProdTabl = ProdTable;
     ProdBom = ProdBOM;
     LP.setDSN("TransferConnection");
    info(ProdTabl.collectrefprodid);
    try
    {
        myConnection = new OdbcConnection(LP);
        myStatement = myConnection.createStatement();
        myResult = myStatement.executeQuery(
            strfmt("Select excontrolqty,primor,collectrefprodid from ShiftReportPourHeader " +
                   "Where DataAreaId = '%1' and collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));
        while (myResult.next())
        {   s = int2str(myResult.getInt(2));
            CRProdid=myResult.getString(3);
        info(s);
            myResultLine = myStatement.executeQuery(strfmt("Select CAST(LostQty AS numeric(15, 8)) AS exp1,CAST(DiffectQty AS numeric(15, 8)) AS exp1,ItemId from ShiftReportPourLine " +
            "Where primor = '%1'",s));
            while (myResultLine.next())
            {
            Item=myResultLine.getString(3);
            LostQty=myResultLine.getReal(1);
            info(num2str(LostQty,6,3,1,1));
            ttsbegin;
            select forupdate * from Prodbom where Prodbom.ProdId==CRProdid && Prodbom.ItemId==Item;
                info('Go');

                Prodbom.ScrapConst =LostQty;
              ttscommit;
            ttsbegin;
            info('go2');
                Prodbom.update();
            ttscommit;
            }
        info('go2');
        ProdTabl.QtySched=myResult.getReal(1);
        PQS.parmProdTable(ProdTable);
        myStatement.executeUpdate(strfmt("Update ShiftReportPourHeader Set posted = 1 Where primor = %1 (1 = 0)", s));

        }
        if(!s)
         throw ('Нет данных для импорта');
    }
    catch
    {
        throw("Check DSN settings (username/password).");
    }


}

lev · 01.10.2009, 09:01

Цитата:

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

Ну так и настроено

работаете через АОС? если да то ндо ещё на АОСе включить отладку.

AXbeginer · 01.10.2009, 09:03

Ну а с ошибками то что делать? В чем проблема?

AXbeginer · 01.10.2009, 09:05

Цитата:

работаете через АОС? если да то ндо ещё на АОСе включить отладку.

Все так и настроено, не может debager не работать из за того что ОС Vista

lev · 01.10.2009, 09:10

если я правильно понял "LP.setDSN("TransferConnection")" - это настроенное odbc подключение?
оно нормально работает? тест выполняли?
ещё вопросик, какая у Вас версия Аксапты?

corner77 · 01.10.2009, 09:12

X++:

Item=myResultLine.getString(3);
LostQty=myResultLine.getReal(1);

класс ResultSet однонаправленный и по строкам и по (как ни странно) столбцам. Если сначала считать значение из 3-го, то потом из первого не считаете ни за что. Читайте последовательно нужные столбцы и будет счастье.

lev · 01.10.2009, 09:13

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

miklenew · 01.10.2009, 09:14

Я не заметил строк

X++:

        LP.setUsername('Usr');
        LP.setPassword('Pwd');

И не помню точно.
Но попробовать можно.
Возможно ругаеться на запрос.
Место

X++:

            strfmt("Select excontrolqty,primor,collectrefprodid from ShiftReportPourHeader " +
                   "Where DataAreaId = '%1' and collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));

попробуйте

X++:

            strfmt("Select ShiftReportPourHeader.excontrolqty, ShiftReportPourHeader.primor, ShiftReportPourHeader.collectrefprodid from ShiftReportPourHeader " +
                   "Where ShiftReportPourHeader.DataAreaId = '%1' and ShiftReportPourHeader.collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));

Точно не помню. Но помойму так должен выглядить select.
И ещё dns точно создан.
Из описанного выше у вас код выполняется на клиенте.
Но если вы что-то упустили или не дописали и он выполняется на сервере, то dns нужно создавать на сервере.
Да и с дебагером лучше всё же разберитесь. Лучше на код положить, чем на дебагер.

Zodiak · 01.10.2009, 11:31

Цитата:

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

Все так и настроено, не может debager не работать из за того что ОС Vista

дебаггер в 40 может не отрабатывать на методах элементов форм (в частности, кнопочек) по точке останова. Для уверенности надо явно писать breakpoint вместо точки останова.
Поймайте дебаггером строку, на которой вылетает - можно будет дать более точные рекомендации. Сейчас слишком много вариантов))

AXbeginer · 01.10.2009, 14:59

Цитата:

если я правильно понял "LP.setDSN("TransferConnection")" - это настроенное odbc подключение?
оно нормально работает? тест выполняли?
ещё вопросик, какая у Вас версия Аксапты?

Да это настроенное соединение в источниках данных. работает 100%. Потому ,что уже есть загрузка с участием данного соединения АХ 4.0

X++:

            strfmt("Select ShiftReportPourHeader.excontrolqty, ShiftReportPourHeader.primor, ShiftReportPourHeader.collectrefprodid from ShiftReportPourHeader " +
                   "Where ShiftReportPourHeader.DataAreaId = '%1' and ShiftReportPourHeader.collectrefprodid = '%2'",
                    curext(),ProdTable.collectrefprodid));

не берусь утверждать в силу своего не слишком большого опыта АХ разработок , но мне казалось здесь используется стандартный SQL запрос.

Цитата:

дебаггер в 40 может не отрабатывать на методах элементов форм (в частности, кнопочек) по точке останова.

У меня было такое предположение вы его подтвердили

Цитата:

класс ResultSet однонаправленный и по строкам и по (как ни странно) столбцам. Если сначала считать значение из 3-го, то потом из первого не считаете ни за что. Читайте последовательно нужные столбцы и будет счастье.

Да этот вариант сработал.Спасибо
Правда осталась проблема с updatequery За пример взял

X++:

 myStatement.executeUpdate(strfmt("Update ShiftReportHeader Set posted = 1 Where primor = %1 (1 = 0)", s));

правда убрал (1 = 0) не знаю что это такое

AXbeginer · 02.10.2009, 08:12

Хотелось бы еще понять как узнать что запрос вернул пустое значение, ничего не нашел с текущими условиямя. Wasnull не позволяет проверить это, как мне кажется, т.к. он смотрит на отдельные столбцы, а while resaltset.next() это все таки больше для перебора строк.

Похожие темы
Тема	Автор	Раздел	Ответов	Посл. сообщение
Построчный импорт из Excel через COM	_and	DAX: Программирование	3	05.07.2011 14:05
Построчный импорт из Excel через COM	olesh	DAX: Программирование	20	23.10.2008 14:01
Чтение данных из SQL Server через ODBC. Не работает в 3-х звенке	sukhanchik	DAX: Программирование	7	30.05.2005 17:52
Импорт данных из ODBC источника	JohNick	DAX: Программирование	4	09.04.2004 10:17
А могет ли Акса 2.5 или 3 работать с Ораклом не через ODBC,а через что-нить пошустрее	asaev	DAX: Администрирование	2	29.03.2004 20:35