Наследование от Object

[Alks]

Кстати насчёт потоков.
Как сказано в помощи методы класса Object распадаются на три ветки - методы для работы в многпоточной среде, методы для работы с тайм-аутами и методы .
Так вот методы wait и notify - относятся к многопоточности (хотя в самой аксапте я её еще ни разу не видел).
А методы setTimeout, cancelTimeout и getTimeoutTimerHandle судя по всему работают с обычными MS Windows таймерами. Т.е. дело обходится без дополнительных потоков - просто на основной поток приложения вешаются таймеры и когда они срабатывают (через стандартную очередь сообщений) этот поток активирует код нашего Object-а. А-ля Win API.

[Alks]

Цитата:

Изначально опубликовано mpogorelov

приведи пожалуйста пример как ты это делал

PHP код:

class Application extends xApplication
{
..........
    // aa_dav
    BarcodeScanner BarcodeScanner;
}

void startupPost()
{
    WorkplaceParameters WorkplaceParameters; // aa_dav
....................
  // aa_dav
    WorkplaceParameters = WorkplaceParameters::findOrCreate();
    if ( WorkplaceParameters.BarcodeScannerExists == NoYes::Yes )
    {
        BarcodeScanner = new BarcodeScanner( WorkplaceParameters );
        BarcodeScanner.proceedTimer();
    }
} 


Код самого класса

PHP код:

public class BarcodeScanner extends Object
{
    COM oposScanner;
}
void proceedTimer()
{
    this.setTimeOut( "checkDevice", 1000 );
}
void new( WorkplaceParameters WorkplaceParameters )
{
    int regKey;
    #WinAPI
    ;
    super();
    oposScanner = null;
    if ( WorkplaceParameters.BarcodeScannerExists == NoYes::Yes )
    {
        try
        {
            regKey = WinAPI::regOpenKey( #HKEY_CLASSES_ROOT,
                                "AxaptaOposScannerLib.AxaptaOposScanner", #KEY_READ );
            if ( regKey )
            {
                oposScanner = new COM( "AxaptaOposScannerLib.AxaptaOposScanner" );
                oposScanner.Open();
                if ( oposScanner.ErrorMsg() != "" )
                {
                    error( "Ошибка инициализации сканнера штрих-кодов: " + oposScanner.ErrorMsg() );
                    oposScanner.finalize();
                    oposScanner = null;
                }
                // Release registry resource
                WinAPI::closeRegistry( regKey );
            }
            else
            {
                error( "Не зарегистрирован COM-объект сканнера штрих-кодов!" );
            }
        }
        catch
        {
            // Ignore errors
            oposScanner = null;
        }
    }
}
void checkDevice()
{
    Object o;
    ObjectIdent oi;
    TreeNode tn, rtn;
    TreeNodeIterator it;
    xInfo xInfo = new xInfo();
    int i;
    ;
    this.proceedTimer();
    if ( oposScanner != null )
    {
        if ( oposScanner.DeviceEnabled() == false )
        {
            // Reactivate scanner
            oposScanner.DeviceEnabled( true );
            oposScanner.DataEventEnabled( true );
            // Proceed with attention...
            oi = infolog.parmLastActivatedForm();
            if ( oi )
            {
                o = oi.object();
                if ( o )
                {
                    tn = o.form();
                    rtn = xInfo.findNode( "\\Forms\\" );
                    rtn = rtn.AOTfindChild( tn.AOTname() );
                    tn = rtn;
                    if ( tn )
                    {
                        tn = tn.AOTfindChild( "Methods" );
                        if ( tn )
                        {
                            tn = tn.AOTfindChild( "ActivateBarcode" );
                            if ( tn )
                            {
                                try
                                {
                                    o.ActivateBarcode( removeLRSpaces( oposScanner.ScanData() ) );
                                }
                                catch
                                { }
                            }
                        }
                    }
                }
            }
        }
    }
} 


Кстати - возможно еще что твой объект создаётся на сервере в 3-х звеньевой архитектуре, обязательно проставь ему RunOn в Client.

[mpogorelov]

спасибо за пример

сделал подобным образом
почему-то всё равно не работает
буду разбираться

[db]

Цитата:

Изначально опубликовано Alks
Кстати насчёт потоков.
Как сказано в помощи методы класса Object распадаются на три ветки - методы для работы в многпоточной среде, методы для работы с тайм-аутами и методы .
Так вот методы wait и notify - относятся к многопоточности (хотя в самой аксапте я её еще ни разу не видел).

wait() и notify() - банальное управление циклом выборки сообщений. никакой многопоточностью тут не пахло никогда. кроме того notify() и notifyall() реализованы одинаково байт в байт

в 3.0 появилась настоящая, хоть и малость глючная многопоточность - класс Thread. Пример есть в форме Tutorial_Thread

[mazzy]

Цитата:

Изначально опубликовано mpogorelov
Цель: написание агента который висел бы в памяти и выполнял нужные действия с какой-то переодичностью

Прежде чем читать дальше и разбираться в вашем коде, можно задать вопросы?
Чем ваш подход отличается от сервера выполнения пакетов?
Чем вас не устроил стандартный сервер пакетов?
Почему вы решили вкладывать силы в свою разработку?

[mpogorelov]

Цитата:

Изначально опубликовано mazzy

Прежде чем читать дальше и разбираться в вашем коде, можно задать вопросы?
Чем ваш подход отличается от сервера выполнения пакетов?
Чем вас не устроил стандартный сервер пакетов?
Почему вы решили вкладывать силы в свою разработку?

Задача стояла следующая:
Axapta должна реагировать на внешнее событие, а именно открывать нужную форму.
Реализована задача была так:
Внешнее приложение через COMConnector пишет в табличку требуемые параметры. В Axapta работает класс наследованный от Object. На метод этого класса, который читает данные из таблички и открывает форму на клиенте, подвешан таймер.

Как решить эту задачу с помощью пакетов мне не понятно.

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

[mazzy]

класс, который можно выполнять в пакетах:
Tutorial_RunbaseBatch
Tutorial_RunbaseForm
Tutorial_RunbaseReport

по поводу вашей задачи.
разберитесь как действует форма
tutorial_Sushi
tutorial_SushiWatcher

причем для вас важен метод tutorial_SushiWatcher.lookForSushiOrder()
последняя его строчка.

так вот. Суть пакетов. При запуске сервера пакетов, открывается форма, которая периодически опрашивает таблицу пакетов. И выполняет их.
Ваша задача - при наступлении события не "писать в табличку нужные параметры", а запустить пакет с нужными вам параметрами. Все остальное сделает сервер пакетов.

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

[mpogorelov]

Цитата:

Изначально опубликовано mazzy
класс, который можно выполнять в пакетах:
причем для вас важен метод tutorial_SushiWatcher.lookForSushiOrder()
последняя его строчка.

собственно по такому принципу и работает мой класс

Цитата:

Ваша задача - при наступлении события не "писать в табличку нужные параметры", а запустить пакет с нужными вам параметрами. Все остальное сделает сервер пакетов.

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

[mazzy]

можно.
посмотрите в форму, которая реализует сервер пакетов