ttsbegin ttscommit and changecompany()

[Volodymyr]

Привет.
Кто подскажет что происходит при таких условиях:

 ttsbegin;
    changecompany("BAB")
    {
        ttsbegin;
        .....
        ttscommit;
    }
 ttscommit;

Не могу понять почему когда делается второй ttscommit, то вызывается ttsbegin.

Ниже можно не смотреть, просто привожу описания задачи, и появляющейся проблемы при вызове вторым ttscommit'ом ttsbegin'а.

Задача такая:
находимся в одной компании, при создании линии на форме у Юзера спрашивается из какой компании использовать номерную серию. Номерная серия из выбраной компании используется.

Решение:
создал класс NumberSeqFormHandlerMoe в нем перегрузил методы formMethodDataSourceDelete..... где просто добавил changecompany(Выбор Юзера).

Все вродебы хорошо работает. Только не все ) Так как второй ttscommit вызывает ttsbegin, то таблица NumberSequenceList не апдейтится на предмет использования номеров, так как ttsbegin сбрасывает параметры (resetAbort) необходимый для апдейта.

Если снимаю верхний ttsbegin-ttscommit, то все работае.
Но снять его я не могу потомучто

 void delete()
 {
    ttsbegin; -     ttsbegin
    element.numberSeqFormHandler().formMethodDataSourceDelete();
    super();
    ttscommit;
 }

Если кто дочитает буду рад =)
Всем спасибо!

[lev]

На сколько я знаю, аксатпа открывает транзакцию и закрывает только один раз. Т.е. в вот в таком коде:

ttsbegin;
  ttsbegin;
  ....
  ttscommit;
ttscommit;

транзакция уже открыта в первом ttsbegin, и внутри плодить ещё транзакции не имеет смысла.

Возможно я ошибаюсь, если да то поправьте.

[UNRW]

вложенные транзакции фактически СУБД не выполняются

настоящий commit будет по последнему ttscommit

[crazysolntse]

Цитата:

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

вложенные транзакции фактически СУБД не выполняются

настоящий commit будет по последнему ttscommit

не совсем так, транзакция фактически открывается не в момент вызова ttsbegin, а в момент первого запроса после него
например

ttsbegin; 
....
select custtrans where ... ;
ttscommit;

в примере транзакция откроется только в момент select - а
по моему так

[MikeR]

уж если вопрос зашел про вложенные транзакции, то вот примерчик многим знакомый

static void UpdateCustomers(Args _args)
{
    CustTable custTable;
    ;
    ttsbegin; // Уровень транзакции меняется с 0 на 1.
    while select forupdate custTable
        where custTable.CustGroup == '40' // SEIMPLICIT_TRANSACTIONS ON
    {
        ttsbegin; // Уровень транзакции меняется с 1 на 2.

        custTable.CreditMax = 1000;
        custTable.update();

        ttscommit; // Уровень транзакции меняется с 2 до 1.
    }

    ttscommit;// COMMIT TRANSACTION – Уровень транзакции меняется с 1 на 0.
}

[Volodymyr]

Получается такая ситуация, как ее преодолет незнаю.
Ниже приведена джоба, которая создает и освобождаем номер. Номерная серия должна быть Continious.

static void Job9(Args _args)
{
    NumberSeq numberSeq;
    Num       number;
    ;
    // Method DataSource.create() - craete the number
    numberSeq = NumberSeq::newGetNumFromCode('Acco_11',
                                             true);
    if (numberSeq)
    {
        number = numberSeq.num();
        info(number);
    }
 
    // Method DataSource.delete() - delete the number;
    ttsbegin;
    numberSeq.abort();
    //super() - delete line
    ttscommit;
}

Если мы работаем в одной компании то все ок.
Можно зайти в Basic->Setup->Number sequence->NumberSequence и посмотреть List.
На отркывшейся форме видно что номер имеет статус Free

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

static void Job9(Args _args)
{
    NumberSeq numberSeq;
    Num       number;
    ;
    // Method DataSource.create() - craete the number
    changecompany('VVV')
    {
        numberSeq = NumberSeq::newGetNumFromCode('Acco_11',
                                             true);
        if (numberSeq)
        {
            number = numberSeq.num();
            info(number);
        }
    }
    // Method DataSource.delete() - delete the number;
    ttsbegin;
    changecompany('VVV')
    {
        numberSeq.abort();
    }
    //super() - delete line
    ttscommit;
}

Перейдем в другую компани и посмотрим там NumberSequenceList, там номер имеет тип Active-Undecided.

Таблица NumberSequenceList будет проапдейтчена, если переменная abortIdx больше нуля. При вызове numberSeq.abort();
происходить увеличение abortIdx на единицу, т.е. все ок вродебы.

Но последний ttscommit для апдейта таблици NumberSequenceList, должен переключится в компанию VVV, но при переключении в эту компанию вызывается ttsbegin, который сбрасывает переменную abortIdx.

Application->ttsNotifyCommit()->this.numberSeqGlobal().ttsNotifyCommit();->this.runAutoClean();->Line 23

В результате маемо те що маемо =), т.е. Undecided.

Убрать просто ttsbegin-ttscommit я не могу потомучто если у нас не выполнится удаление линии на форме, то и номерная серия должна вернутся в исходное положение, откатится =)

[Lemming]

Цитата:

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

...
Но последний ttscommit для апдейта таблици NumberSequenceList, должен переключится в компанию VVV, но при переключении в эту компанию вызывается ttsbegin, который сбрасывает переменную abortIdx.
...

На вскидку, а если так попробовать:

    changecompany('VVV')
    {
        ttsbegin;

        numberSeq.abort();

        ttscommit;

    }