как выйти из аксапты в строго заданном месте?

[f18]

Здравствуйте.
Есть задача - при наступлении определенного условия, неважно на каком этапе обработки мы находимся - срочно покинуть аксапту (с обрыванием всех транзакций, с несохранением введенных данных) - просто выйти. Естественно подумал использовать infolog.shutDown(true), не сработало, отсюда 2 вопроса - один на забавный, второй серьезный
1.
Сколько раз отработает цикл

    int i;
    for (i = 1; i <= 1000; i++)
    {
        print i;
        infolog.shutDown(true);
    }

2. как завершить работу приложения.
// WinAPI::exitWindows(#EWX_FORCE) - пробовал - получилось грустно и все равно цикл отработал 1000 раз

Спасибо.

Ax2009

[S.Kuskov]

Сгенерируйте исключение сразу после вызова infolog.shutDown(true);

[f18]

try его ловит дальше по коду

[Perc]

Цитата:

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

try его ловит дальше по коду

А если сгенерировать то что try не ловит? типа

    infolog.shutDown(true);
    new DictClass(ClassNum(Info)).callStatic("mmm");

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

[lvan]

Я бы смотрел в сторону убийства процесса AX32.exe, например через те же winapi функции
Интересно узнать, зачем вам это понадобилось?

[gl00mie]

Зачем сразу убийства?.. ExitProcess()

[f18]

lvan
Я бы смотрел в сторону убийства процесса AX32.exe, например через те же winapi функции

>> не знал функци, поэтому и спросил :-)


Интересно узнать, зачем вам это понадобилось?

>> это сложно. Очень грубо говоря багфиксинг.


gl00mie Зачем сразу убийства?.. ExitProcess()

>> Спасибо - попробую, отпишусь.

[f18]

Цитата:

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

Зачем сразу убийства?.. ExitProcess()

Работает великолепно (а главное оч быстро)!
Спасибо большое!

[michel1971]

определяем ID процесса

static int GetCurrentProcessId()
{
    Dll             kernel32          = new Dll(#KERNELDLL);
    DllFunction     processId         = new DllFunction(kernel32, "GetCurrentProcessId");
    ;
    processId.returns(ExtTypes:: DWord);

    return processId.call();
}

затем убиваем его

static void TerminateProcess(int    _processId)
{
    Dll             kernel32            = new Dll(#KERNELDLL);
    DllFunction     closeHandle         = new DllFunction(kernel32, "CloseHandle");
    DllFunction     terminateProcess    = new DllFunction(kernel32, "TerminateProcess");
    DllFunction     openProcess         = new DllFunction(kernel32, "OpenProcess");

    int             hProcess;

    closeHandle.returns(ExtTypes:: DWORD);
    closeHandle.arg(ExtTypes:: DWORD);

    terminateProcess.returns(ExtTypes:: DWord);
    terminateProcess.arg(ExtTypes:: DWord, ExtTypes:: DWord);

    openProcess.returns(ExtTypes:: DWord);
    openProcess.arg(ExtTypes:: DWord, ExtTypes::DWord, ExtTypes:: DWord);

    hProcess = openProcess.call(1, false, _processId);

    terminateProcess.call(hProcess, 1);

    closeHandle.call(hProcess);
}

[f18]

Если не сложно, для людей не сильно понимающих разницу - в чем принципиальная разница?

[mazzy]

Цитата:

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

Сколько раз отработает цикл

    int i;
    for (i = 1; i <= 1000; i++)
    {
        print i;
        infolog.shutDown(true);
    }

2. как завершить работу приложения.
// WinAPI::exitWindows(#EWX_FORCE) - пробовал - получилось грустно и все равно цикл отработал 1000 раз

Цикл отработает 1000 раз.

infolog.shutDown(true) всего лишь информирует систему, что Аксапту нужно закрыть когда будет возможность. Аксапта выйдет, когда перейдет в режим ожидания.
Пока выполняется код выхода из системы не будет.

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

чтобы заставить ваш код завершить выполнение, не надо ломать dll'ки. достаточно обычных break и return.

[f18]

Цитата:

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

Цикл отработает 1000 раз.

infolog.shutDown(true) всего лишь информирует систему, что Аксапту нужно закрыть когда будет возможность. Аксапта выйдет, когда перейдет в режим ожидания.
Пока выполняется код выхода из системы не будет.

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

чтобы заставить ваш код завершить выполнение, не надо ломать dll'ки. достаточно обычных break и return.

речь идет о трудно вычислимом баге, и попытке его поймать. То что это концептуально неправильно ясно, но все равно спасибо за дополнительное целенаведение.

Стоит делема - остановить пользователей из за иногда возникающей проблемы генерирующей по 4,5 млн записей в лог за 240 минут (а на лог еще и умудрились повесить генератор оповещений, да еще и не один пользователь т.е. 4,5 млн * кол-во пользователей, а потом еще и невозможность открыть аксапту при логине пользователей), или, до выяснения, в своем коде, гарантированно без транзакций при возникновении подозрения на бестактное поведение - просто закрывать аксапту.
Да, это не красиво, да может быть прощет в архитектуре и лога и поведении системы, но для того что бы работа не остановилась и было время на корректное исправление и приведения системы с break и return - нужно время и ... вот такая заплатка.

[raz]

Цитата:

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

речь идет о трудно вычислимом баге, и попытке его поймать. То что это концептуально неправильно ясно, но все равно спасибо за дополнительное целенаведение.

Стоит делема - остановить пользователей из за иногда возникающей проблемы генерирующей по 4,5 млн записей в лог за 240 минут (а на лог еще и умудрились повесить генератор оповещений, да еще и не один пользователь т.е. 4,5 млн * кол-во пользователей, а потом еще и невозможность открыть аксапту при логине пользователей), или, до выяснения, в своем коде, гарантированно без транзакций при возникновении подозрения на бестактное поведение - просто закрывать аксапту.
Да, это не красиво, да может быть прощет в архитектуре и лога и поведении системы, но для того что бы работа не остановилась и было время на корректное исправление и приведения системы с break и return - нужно время и ... вот такая заплатка.

А если попытаться найти причину?
Статус "Отменено" в строках заказа

[f18]

Цитата:

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

А если попытаться найти причину?
Статус "Отменено" в строках заказа

Буду рад если поможете.

Итак что есть ...

Есть некая логика
Класс TSession - хранит в себе информацию о неком пользователе системы, ссылку на TProcess, ссылку на TFormUpdater

TProcess - класс выполняющий некую работу в системе, в зависимости от введенной пользователем информации. TFormUpdater обновляется классом TProcess и его заддача хранить текущие переменные для отображения на экране. Логика создавалась не для форм аксапты, но жизнь такова, что есть формы работающие с этими классами и в аксапте - прикреплены примеры форм.
На форме только одно окно (СтрингЭдит) для ввода информации. Задачи этого контролла - после нажатия пользователем энтера передать эту информацию в TSession (допустим метод ВВОД) , очистится и перечитать в свои объекты на форме состояние измененного TFormUpdater. TSession вызывает метод ВВОД класса TProcess. В TProcess.ВВОД стоит try catch и если происходит исключительное состояние - запонить инфолог в некий лог, что бы пользователь мог его прочитать.
Теперь форма в аксапте. СтрингЭдит - исходя из задач кот перед ним стоят - реализован в виде эдит метода с кодом (набираю руками - могу ошибится)

edit str (boolean _set, str _value)
{
    if (set)
    {
        TSession.(_value);
    }
    return "";
}

Что произошло - в лог записалось много записей, почему?
Как вариант - пользователь ввел какое-то значение в СтрингЭдит, нажал на форме эскейп, форма спросила - Я Изменилась, сохранить незаписаннные данные - а пользователь нажал - сохранить ...

Возможные направления исправления ошибки - отказаться от эдит метода и отрабатывать просто модифай + попросить форму не заадавать вопроса, но здесь сложнее, обработка многошаговая, есть шаги когда вопрос просто необходимо задавать.
Трай в эдит методе не могу делать - большая обработка инфолога + не факт что такое же можно будет сделать в форме не аксапты. Пока до форм не аксапты не добрались - и ошибку не пофиксили было принято решение пользователям продолжать работать в системе, уведомить что бы все отказывались от всего предлагаемого + жуть-жуть-жжжжжуть.

[raz]

Цитата:

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

Что произошло - в лог записалось много записей, почему?

Если я правильно понимаю, то лог - это некий доработанный лог, не SysDataBaseLog аксапты, причем это таблица.
Если я прав, то можно настоить журнал базы данных на эту таблицу, и, после повторения проблемы, проанализировать стек вызовов.

[EVGL]

А что? Зависание системы в seamless-терминальном окне - это действительно серьезная проблема.

[mazzy]

Цитата:

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

А что? Зависание системы в seamless-терминальном окне - это действительно серьезная проблема.

ну, не так же бороться с такими зависами.
вызывать sysprogressinfo, вставлять sleep, отдавать управление аксапте через task, обращаться к wait формы... хоть это и неправильно, но лучше чем принудительное убивание dll'ек изнутри самой программы.

и еще.
стоит четко различать состояния когда:
1. поток кода выполняется в самой аксапте (как в этой теме пример с циклом и тут надо тупо юзать break/return чтобы завершить свой код) и
2. аксапта ждет ответа от SQL-сервера

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

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

[raz]

Ну жжжуткий фикс наверно стоит оставить, до нахождения причин. Ну и не факт, что стек поможет. Кстати, стек можно и добавить в TLog (если что), а может и еще чего туда писать (значения переменных...) для последующего анализа.

[f18]

Цитата:

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

Ну жжжуткий фикс наверно стоит оставить, до нахождения причин. Ну и не факт, что стек поможет. Кстати, стек можно и добавить в TLog (если что), а может и еще чего туда писать (значения переменных...) для последующего анализа.

не додумал, тогда и журнал бд не нужен. Спасибо.

[Pandasama]

лови некроманта!