Пакетное задание

[AngelDominantes]

Добрый день. Возникли трудности с пакетным заданием. AX2009. Создал пакетный класс:

class S_RemoveOldRecordsBatch extends RunBaseBatch
{
    anytype dummy;
    #define.CurrentVersion(1)
    #define.Version1(1)
    #localmacro.CurrentList
        dummy
    #endmacro
}

void DelOldRecords()
{
    S_CustVendCommon s_CustVendCommon;
    ;

    ttsbegin;
    while select forupdate s_CustVendCommon
     where  (s_CustVendCommon.NoYesCombo == NoYesCombo::Yes)
     {
        if( intvNo(Today(), s_CustVendCommon.TransDate, intvScale::YearMonth) >= 1)
        {
            s_CustVendCommon.delete();
        }
     }

    ttscommit;
}

public container pack()
{
    return connull();
}

public boolean unpack(container packedClass)
{
   return true;
}

static void main(Args _args)
{
    S_RemoveOldRecordsBatch s_RemoveOldRecordsBatch = new S_RemoveOldRecordsBatch();
    ;
    s_RemoveOldRecordsBatch.DelOldRecords();

}

Все по сути весь класс, при ручном запуске работает при пакетной обработке нет, в свойствах класса указано запускать на сервере.
Для пакетного задания выбрана пакетная группа,
Указано запускать на сервере,
Указан АОС, который является сервером пакетной обработки и выбранная группа входит в этот АОС. Ошибок в журнале нет.