Импорт в АХ через ODBC

[ice]

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

[miklenew]

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

[AXbeginer]

Цитата:

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

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

[lev]

Цитата:

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

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

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

[AXbeginer]

Цитата:

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

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

[miklenew]

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

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

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

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

попробуйте

            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]

Цитата:

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

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

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

[AXbeginer]

Цитата:

Когда пишите код на панели есть кнопочка 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).");
    }


}

[AXbeginer]

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