Периодическая операция для изменения значений

[user_ax]

Мне наш ещё один программист подсказал почти такой же способ, как и вы, но с одним "но": создать 2 объекта datasource для двух таблиц EmplTable и VendSpListJour и в источник EmplTable привязать к VendSpListJour, как дочерний, после активировать их связи и тогда получается то, что мне необходимо В любом случае спасибку нажал вам за то, что потратили своё время и помогли мне.

[Ace of Database]

Если когда-нибудь будете делать через Query в АОТ, то метод paсk должен выглядеть так:

public container pack()
{
    return [#CurrentVersion, #CurrentList, (queryRun) ? queryRun.pack() : conNull()];
}

а метод unpack так:

public boolean unpack(container packedClass)
{
    version     version = runbase::getVersion(packedClass);
    container   queryCon;

    switch (version)
    {
        case #CurrentVersion:
            [version,#CurrentList,queryCon] = packedClass;
            if (sysQuery::isPackedOk(queryCon))
                queryRun = new queryRun(queryCon);
            else
                this.initQuery();
            break;
        default:
            return false;
    }

    return true;
}

[Ace of Database]

Еще для себя напишу, чтобы не забыть
На моем примере на картинке в начале этой темы я показал форму, которая построена на Query, использующую таблицу InventBatch. Это необычная таблица, привязанная сразу к двум таблицам в запросе: к таблице InventDim по полю InventBatchId и к таблице InventTable по полю ItemId.

Чтобы запрос с этой таблицей работал корректно, я источник данных для нее сделал дочерним к InventDim через дизайнер Query в АОТ, а в методе initQuery() моего класса программно добавил связку с источником данных InventTable

void initQuery()
{
    Query query = new Query(queryStr(zInventAdvanceProdDateReport));
    QueryBuildDatasource    qbds;
    QueryBuildRange         qbr;
    ;

    qbds = query.dataSourceTable(tableNum(InventBatch));
    qbr = sysQuery::findOrCreateRange(qbds, fieldNum(InventBatch, ItemId));
    qbr.value("((ItemId == InventTable_1.ItemId))");
    qbr.status(RangeStatus::Hidden);

    queryRun = new QueryRun(query);
}

[user_ax]

Подниму этот вопрос.

Мне нужно производить определённые действия(проставлять checkbox-ы) только для тех строк в таблице, в которых поле сотрудник равно тому, что я выбрал в динамическом фильтре. В туториалах нет такого. Подскажите, как мне сравнивать со значением из дин.фильтра моё значение?

Заранее спасибо за ответы.

[gl00mie]

Global::inRange(), хотя если есть "динамический фильтр", то, наверно, есть и запрос, и лучше использовать запрос, а не пытаться его расковырять и анализировать "вручную".

[user_ax]

Цитата:

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

Global::inRange(), хотя если есть "динамический фильтр", то, наверно, есть и запрос, и лучше использовать запрос, а не пытаться его расковырять и анализировать "вручную".

Да, вы правы, запрос есть. Я и хочу в запросе использовать значение из этого фильтра. Не знаю как, правда. Поэтому и спрашиваю.

[gl00mie]

Если читать тему с начала, то получается, что уже есть QueryRun с запросом, критерии фильтрации записей уже определены пользователем (через э.. динамический фильтр), запрос этот включает ту таблицу, записи в которой надо обновить. Так что еще нужно для полного счастья? По идее - только прописать в запросе для нужной таблицы qbds.update(true), открыть транзакцию и начать выбирать записи для обновления согласно указанным пользователем критериям. В чем же загвоздка-то?

[user_ax]

Цитата:

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

Если читать тему с начала, то получается, что уже есть QueryRun с запросом, критерии фильтрации записей уже определены пользователем (через э.. динамический фильтр), запрос этот включает ту таблицу, записи в которой надо обновить. Так что еще нужно для полного счастья? По идее - только прописать в запросе для нужной таблицы qbds.update(true), открыть транзакцию и начать выбирать записи для обновления согласно указанным пользователем критериям. В чем же загвоздка-то?

Есть просто queryrun, запрос делал не через query, а через while select.

[S.Kuskov]

Цитата:

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

Есть queryrun ... запрос делал через while select.

А зачем тогда есть queryrun?

[user_ax]

Цитата:

Сообщение от S.Kuskov

А зачем тогда есть queryrun?

Я вот тоже теперь думаю..надо переписывать запрос под квери... или же предложить просто тот динамический фильтр сделать в виде поля и всё ))

[user_ax]

Что-то нашаманил, что критерии в динамическом фильтре не выбираются вообще, будто заблокированы. Буду переписывать этот запрос с нуля. И, да, уважаемый gl00mie, вы меня неправильно поняли. Я не буду через квери обновлять записи в таблице, я с его помощью просто хочу выбрать их

[lev]

Цитата:

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

Что-то нашаманил, что критерии в динамическом фильтре не выбираются вообще, будто заблокированы.

А покажите код, который формирует запрос. Скорее всего у Вас там есть строчка типа:

QueryBuildRange.status(RangeStatus::Locked);

[user_ax]

Цитата:

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

А покажите код, который формирует запрос. Скорее всего у Вас там есть строчка типа:

QueryBuildRange.status(RangeStatus::Locked);

Нет такой строчки. Я нашёл в чём была проблема блокировки. Это группировка записей. Если заккоментировать строку

qbds_vendinvoice.orderMode(OrderMode::GroupBy);

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

[user_ax]

Всё-таки не до конца понятно, как применить этот динамический фильтр. В методе initQuery находится мой запрос и динамический фильтр на него не действует, то есть, если выбираю критерии - в запрос они не добавляются...
Может быть его нужно как-то активизировать или что ?
Подскажите, пожалуйста.

Метод initParmDefault

public void initParmDefault()
{

    this.initQuery();
    super();


}

Метод initQuery

void initQuery()
{
    Query query = new Query();
    QueryBuildDataSource qbds_vendsp,qbds_vendsplist,qbds_vendinvoice;
     QueryBuildRange  qbr;
      
    ;

    qbds_vendsplist = query.addDataSource(tablenum(VendSpListTrans));
    qbds_vendsplist.orderMode(OrderMode::GroupBy);
    qbds_vendsplist.addSelectionField(fieldnum(VendSpListTrans,InternalSp));
    qbds_vendsplist.addSelectionField(fieldnum(VendSpListTrans,SpClosed));
    qbds_vendsplist.addSelectionField(fieldnum(VendSpListTrans,ItemId));
    qbds_vendsplist.addSelectionField(fieldnum(VendSpListTrans,SpQty));
    qbds_vendsplist.addSortField(fieldnum(VendSpListTrans,InternalSp));
    qbds_vendsplist.addSortField(fieldnum(VendSpListTrans,Itemid));
    qbds_vendsplist.addSortField(fieldnum(VendSpListTrans,SpClosed));
    qbds_vendsplist.addSortField(fieldnum(VendSpListTrans,SpQty));

     //->скрытие полей-индексов в динамических фильтрах
    qbr = qbds_vendsplist.addRange(fieldnum(VendSpListTrans,InternalSpTrans));
    qbr.status(RangeStatus::Hidden);
    //<-
    qbds_vendinvoice = qbds_vendsplist.addDataSource(tablenum(VendInvoiceTrans));
    qbds_vendinvoice.orderMode(OrderMode::GroupBy);
    qbds_vendinvoice.addSelectionField(fieldnum(VendInvoiceTrans,ItemId));
    qbds_vendinvoice.addSelectionField(fieldnum(VendInvoiceTrans,InternalSp));
    qbds_vendinvoice.addSortField(fieldnum(VendInvoiceTrans,ItemId));
    qbds_vendinvoice.addSortField(fieldnum(VendInvoiceTrans,InternalSp));
//    qbds_vendinvoice.addSortField(fieldnum(VendInvoiceTrans,Qty));
    qbds_vendinvoice.addSelectionField(fieldnum(VendInvoiceTrans,Qty),SelectionField::Sum);
    qbds_vendinvoice.addLink(fieldnum(VendSpListTrans,InternalSp), fieldnum(VendInvoiceTrans,InternalSp));
    //->скрытие полей-индексов в динамических фильтрах
    qbr = qbds_vendinvoice.addRange(fieldnum(VendInvoiceTrans,PurchId));
    qbr.status(RangeStatus::Hidden);
    qbr = qbds_vendinvoice.addRange(fieldnum(VendInvoiceTrans,InvoiceDate));
    qbr.status(RangeStatus::Hidden);
    qbr = qbds_vendinvoice.addRange(fieldnum(VendInvoiceTrans,InvoiceId));
    qbr.status(RangeStatus::Hidden);
    qbr = qbds_vendinvoice.addRange(fieldnum(VendInvoiceTrans,LineNum));
    qbr.status(RangeStatus::Hidden);
    qbr = qbds_vendinvoice.addRange(fieldnum(VendInvoiceTrans,numberSequenceGroup));
    qbr.status(RangeStatus::Hidden);
    qbr = qbds_vendinvoice.addRange(fieldnum(VendInvoiceTrans,InternalInvoiceId));
    qbr.status(RangeStatus::Hidden);
     //<-
    qbds_vendsp = qbds_vendinvoice.addDataSource(tablenum(VendSpListJour));
  
    qbds_vendsp.addSelectionField(fieldnum(VendSpListJour,SpClosed));
    qbds_vendsp.addRange(fieldnum(VendSpListJour,EmplId));
    qbds_vendsp.addLink(fieldnum(VendInvoiceTrans,InternalSp),fieldnum(VendSpListJour,InternalSp));

    info(qbds_vendsplist.toString());

    queryRun = new SysQueryRun(query);

[gl00mie]

Цитата:

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

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

Я не утверждал, что Query/QueryRun может генерить SQL-операторы update вместо select'а, однако, в Аксапте при обновлении записей в цикле (без использования update_recordset) принято в этом цикле выбирать записи на обновление (по аналогии с while select forupdate). Можно, конечно, в цикле их выбирать без указания, что они будут обновляться (по аналогии с while select), и потом либо перевыбирать на обновление, либо отрубать проверку, что запись была выбрана на обновление, но в общем случае надо понимать, зачем делать именно так, вместо того чтобы изначально просто выбирать записи на обновление и не усложнять код.

Цитата:

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

В методе initQuery находится мой запрос и динамический фильтр на него не действует, то есть, если выбираю критерии - в запрос они не добавляются... Может быть его нужно как-то активизировать или что ?

А класс запускается изначально где, на сервере или на клиенте? И где он собственно использует запрос для выборки данных, на сервере или на клиенте? Если на сервере, то учитывают ли pack/unpack, что надо паковать запрос? Потому что без этого изменения, внесенные в критерии фильтрации запроса на клиенте, при возврате управления на сервер будут утеряны.

[S.Kuskov]

Цитата:

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

Может быть его нужно как-то активизировать или что ?
Подскажите, пожалуйста.

А метод initParmDefault срабатывает? Поставьте в нём точку останова или выведите тестовое сообщение, что бы проверить.

Измените значение макроса CurrentVersion в методе classDeclaration, что бы указать что старые сохранённые значения параметров уже устарели и нужно заново проинициализировать их значениями поумолчанию.

[user_ax]

Цитата:

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

Я не утверждал, что Query/QueryRun может генерить SQL-операторы update вместо select'а, однако, в Аксапте при обновлении записей в цикле (без использования update_recordset) принято в этом цикле выбирать записи на обновление (по аналогии с while select forupdate). Можно, конечно, в цикле их выбирать без указания, что они будут обновляться (по аналогии с while select), и потом либо перевыбирать на обновление, либо отрубать проверку, что запись была выбрана на обновление, но в общем случае надо понимать, зачем делать именно так, вместо того чтобы изначально просто выбирать записи на обновление и не усложнять код.А класс запускается изначально где, на сервере или на клиенте? И где он собственно использует запрос для выборки данных, на сервере или на клиенте? Если на сервере, то учитывают ли pack/unpack, что надо паковать запрос? Потому что без этого изменения, внесенные в критерии фильтрации запроса на клиенте, при возврате управления на сервер будут утеряны.

То есть, правильнее будет сделать update через query, а не обычным способом? То есть, должно быть какое-то условие обновления и если это условие выполняется - qbds.update(true) ? Никогда не применял раньше подобную констркцию и не сталкивался с динамическими фильтрами в принципе, посему и пишу здесь


В свойстве Run On стоит Called From.
В методе пакую запрос посредством

  return [#CurrentVersion,#CurrentList, queryrun.query().pack()];

и в unpack

 switch (version)
    {
        case #CurrentVersion:
            [version,#CurrentList] = packedClass;
           if (SysQuery::isPackedOk(queryCon))
                queryRun = new QueryRun(queryCon);
            else
                this.initQuery();
            break;
        default:
            return false;
    }

[user_ax]

Цитата:

Сообщение от S.Kuskov

А метод initParmDefault срабатывает? Поставьте в нём точку останова или выведите тестовое сообщение, что бы проверить.

Измените значение макроса CurrentVersion в методе classDeclaration, что бы указать что старые сохранённые значения параметров уже устарели и нужно заново проинициализировать их значениями поумолчанию.

Да, срабатывает, при нажатии на ОК заходит в него.

Значение макросов менял, не помогает, всё равно делает выборку всех значений, независимо от фильтра.

[S.Kuskov]

Цитата:

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

В методе пакую запрос посредством

  return [#CurrentVersion,#CurrentList, queryrun.query().pack()];

и в unpack

 switch (version)
    {
        case #CurrentVersion:
            [version,#CurrentList] = packedClass;
           if (SysQuery::isPackedOk(queryCon))
                queryRun = new QueryRun(queryCon);
            else
                this.initQuery();
            break;
        default:
            return false;
    }

я вижу что вы пакуете запрос, но не вижу где вы распаковываете его в переменную queryCon...

[version,#CurrentList, queryCon] = packedClass;

[user_ax]

Цитата:

Сообщение от S.Kuskov

я вижу что вы пакуете запрос, но не вижу где вы распаковываете его в переменную queryCon...

[version,#CurrentList, queryCon] = packedClass;

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