Заполнение CustTable программно.

[Dima_Dima]

Всем добрый день.

Такой вопрос: пробовал ли кто-либо заполнять таблицу CustTable из кода (допустим с while)? Проблема в том, что первую строку я могу записать, если следом идет вторая, то получаю следующую ошибку:

Cannot create a record in Customers (CustTable). Customer account: 13698002, BbK SrD West.
The record already exists.

Этого recorda в таблице нет!!!

Заранее спасибо.

[George Nordic]

Ой!

Мы не инициализируем значения переменной!

Читайте. очень много тем. И как программно, и как из Excelя. На маззи ру даже статья была, кажется, Вадима Г.

С Ув,
Г.

[Dima_Dima]

Цитата:

Сообщение от George Nordic

Мы не инициализируем значения переменной!

Да нет, вроде все инициализируем. Сами посудите:

static void CCADOConnect1(Args _args)
{
   CCADOConnection      dbcon;
   CCADOCommand         cmd;
   CCADORecordset       rs;
   CCADOFields          f;

   str cs;
   COM comrs;
   CustTable            custTable;
   ;
    cs = "trusted_connection=yes;server=ADM; database=Interface; driver={SQL Server}";
    dbcon = new CCADOConnection();
    dbcon.open(cs);

    cmd = new ccadocommand();
    cmd.activeConnection(dbcon);
    cmd.commandText('select * from CustTable order by AccountNum');
    rs = cmd.execute();

    comrs = rs.recordSet();
    while (!rs.EOF())
    {
        f=rs.fields();       

        ttsbegin;
        custTable.initValue();
        custTable.AccountNum        = f.itemIdx(0).value();
        custTable.CustGroup         = f.itemIdx(1).value();
        custTable.Name              = f.itemIdx(2).value() + ' ' + f.itemIdx(3).value();
        custTable.Street            = f.itemIdx(4).value();
        custTable.City              = f.itemIdx(5).value();
        custTable.ZipCode           = f.itemIdx(6).value();
        custTable.CountryRegionId   = f.itemIdx(7).value();        
        custTable.PartyType = DirPartyType::Organization;        
        custTable.Currency          = 'EUR';
        custTable.LanguageId        = 'EN';

        if(custTable.validateWrite())
        custTable.insert();
        else ttsabort;
        ttscommit;

        comrs.moveNext();
    }
    rs.close();
    dbcon.close();
}

[lev]

а можно пример кода как вы это делаете?

[raz]

comrs.moveNext();
но
while (!rs.EOF())

ЗЫ.
Надо что то типа такого:

while (!rs.EOF())
{
    ...
    rs.moveNext();
}

[ZVV]

Цитата:

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

comrs.moveNext();
но
while (!rs.EOF())

comrs = rs.recordSet();

вроде как работает у автора и так...

[kashperuk]

Попробуйте добавить custTable.clear() перед custTable.initValue()

И не используйте транзакции так, как вы это делаете.
Где-то недавно была тема, что они не работают, если откатывать в цикле (правда там начиналась транзакция до цикла).

Лучше бросать exception

[ZVV]

Цитата:

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

Попробуйте добавить custTable.clear() перед custTable.initValue()

Или даже лучше

custTable := Null;

А то в некоторых случаях бывают побочные эффекты нежелательные...

[Dima_Dima]

Цитата:

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

Попробуйте добавить custTable.clear() перед custTable.initValue()

И не используйте транзакции так, как вы это делаете.
Где-то недавно была тема, что они не работают, если откатывать в цикле (правда там начиналась транзакция до цикла).

Лучше бросать exception

Спасибо. Заработало! А трансакции я использовал для Test-Job. В приложении сделаю с try catch.

[raz]

2 Dima_Dima
ИМХО, дело не в отсутствии custTable.clear(), т.к. запись идет в одни и те же поля, а в том, что f=rs.fields() возвращает одни и те же значения, т.е. рекордсет не перебирается.

Специально сваял джоб, для которого сделал CopyOfCustTable, как копию CustTable, удалил с неё все методы, кроме initValue(). Джоб прекрасно отработал без custTable.clear().
Если я прав и рекордсет не перебирается, то custTable.clear() не поможет.

static void Job1(Args _args)
{
   CustTable            custTable;             
   CopyOfCustTable      CopyOfCustTable;
   ;
    while select custTable
    {
        ttsbegin;
        CopyOfCustTable.initValue();
        CopyOfCustTable.AccountNum        = custTable.AccountNum;
        CopyOfCustTable.CustGroup         = custTable.CustGroup;
        CopyOfCustTable.Name              = custTable.Name;
        CopyOfCustTable.Street            = custTable.Street;
        CopyOfCustTable.City              = custTable.City;
        CopyOfCustTable.ZipCode           = custTable.ZipCode;
        CopyOfCustTable.Currency          = 'EUR';
        CopyOfCustTable.LanguageId        = 'EN';

        if(CopyOfCustTable.validateWrite())
            CopyOfCustTable.insert();
        else ttsabort;

        ttscommit;
    }
}

Просто хочется понять где ошибка, может я ошибаюсь, может что поменялось в аксапте.
У меня Ax3, а у Вас?

ЗЫ. Я в таких конструкциях всегда использую clear().

[Dima_Dima]

Цитата:

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

2 Dima_Dima

Просто хочется понять где ошибка, может я ошибаюсь, может что поменялось в аксапте.
У меня Ax3, а у Вас?
ЗЫ. Я в таких конструкциях всегда использую clear().

У меня АХ 2009,

с custTable.clear(); или custTable = null; всё работает отлично. Даже GlobalAddressBook заполняется корректно....

[player]

Если смущает com recordset, можно просто добавить метод в класс CCADORecordSet
(непонятно, кстати, по какой причине исключенный в dax2009)

void moveNext()
{
         recordSet.moveNext();
}