Позиционирование в гриде - DAX: Программирование

Alexanderrrr · 30.09.2009, 15:39

Доброго времени суток, уважаемые гуру аксапты!

Не могли бы вы мне помочь в следующем:
имеется форма с тремя датасорсами: RContractTable, ObjectTable, PointAccountTable.
На форме грид, свойство datasourse=RContractTable.

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

X++:

void clicked()
{
    QueryBuildDatasource    pointTable;
    query q;
    queryBuildRange qbr;
    RContractTable              RContract;
    ObjectTable              object;
    PointAccountTable        pointAccount;
    int c;
    ;

    for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); RContract; RContract = RContractTable_ds.getNext())
      {
      c++;
      }

    qbr=pointTable.findRange(FieldNum(ICLPointAccountTable,PointAccountId));
    if (qbr)
    {
    for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); RContract; RContract = RContractTable_ds.getNext())
      {
       object = RContract.joinChild();
       pointAccount = object.joinChild();
    qbr.value(qbr.value()+',!'+pointAccount.PointAccountId);
      }
    }
    else
    {
    if (c==1)
    {
     qbr=pointTable.addRange(FieldNum(ICLPointAccountTable,PointAccountId));
     qbr.value('!'+ICLPointAccountTable.PointAccountId);
      
    }
    else
    {
qbr=pointTable.addRange(FieldNum(ICLPointAccountTable,PointAccountId));
    for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); RContract; RContract = RContractTable_ds.getNext())
      {
                object = RContract.joinChild();
                pointAccount = object.joinChild();

    qbr.value(qbr.value()+',!'+pointAccount.PointAccountId);
      }
    }
    }
 RContractTable_ds.research();
 }

Работает, как и нужно. Но после research курсор уходит на первую запись в гриде.

На форуме читал похожие темы, но то, что мне нужно не нашел..ведь мне нужно запоминать не позицию выделенной строки, а позицию следующей за ней, поскольку выделенная удаляется.
Не направите ли на путь истинный?

п.с. если было такое на форуме, очень извиняюсь..

_scorp_ · 30.09.2009, 16:00

Цитата:

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

Доброго времени суток, уважаемые гуру аксапты!

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

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

Russland · 30.09.2009, 16:16

Попробуйте вслед за циклом, внутри которого удаляются строки прописать:
RContractTable_ds.next();

Должны на следующую строчку перескочить

Alexanderrrr · 30.09.2009, 16:19

Цитата:

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

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

_scorp_ · 30.09.2009, 16:22

Цитата:

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

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

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

Владимир Максимов · 30.09.2009, 16:24

Позиционирование на нужную запись - это методы X_ds.findRecord() или X_ds.findValue(). Определяете запись, на которой хотите оказаться и после X_ds.research() выполняете поиск нужной записи одним из этих методов.

Как определить нужную запись? 100% гарантии надежности определения нет. Один из вариантов - это определить последнюю запись выделенного диапазона, перейти к ней, затем выполнить X_ds.next(). Теоретически, должны бы попасть на одну из записей вне диапазона. Но это без гарантий.

**mazzy** · 30.09.2009, 16:31

Цитата:

Сообщение от Владимир Максимов

Позиционирование на нужную запись - это методы X_ds.findRecord() или X_ds.findValue().

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

Не пользуйтесь этими методами на больших таблицах.

lev · 30.09.2009, 17:02

а можно и вовсе сделать через временную таблицу.
пускай пользователь удаляет в ней что хочет, а потом копирует в Excel

**mazzy** · 30.09.2009, 17:25

где-то на форуме было исследование как лучше хранить галочки - во временных таблицах, в map, в контейнере или еще как. не могу найти

Lucky13 · 30.09.2009, 17:36

Цитата:

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

где-то на форуме было исследование как лучше хранить галочки - во временных таблицах, в map, в контейнере или еще как. не могу найти

Может это? axaptapedia: Tutorial Form MultiSelectCheckBox

**oip** · 30.09.2009, 17:38

Цитата:

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

где-то на форуме было исследование как лучше хранить галочки - во временных таблицах, в map, в контейнере или еще как. не могу найти

axaptapedia: Tutorial Form MultiSelectCheckBox - находится по ключевым словам 'map', 'скорость'. Там всего три темы получается, в одно из них ссылка на нужную.

miklenew · 30.09.2009, 17:34

Alexanderrrr когда сообщение пишите на панели есть кнопочка Х++.
Код будет смотрется лучше.
Сейчас он выглядит ужасно.
После

X++:

 c++;

добавьте

X++:

        if (c >= 2)
            break;

Зачем мучить аксапту. Ведь вам интересно есть ли строки и что их больше 1.
А две или 10 вам уже без разницы.
Вот так же красивее.

X++:

void clicked()
{
    QueryBuildDatasource    pointTable;
    query q;
    queryBuildRange qbr;
    RContractTable              RContract;
    ObjectTable              object;
    PointAccountTable        pointAccount;
    int c;
;

    for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); 
        RContract;
        RContract = RContractTable_ds.getNext())
    {
        c++;
    }

    qbr=pointTable.findRange(FieldNum(ICLPointAccountTable,PointAccountId));
    if (qbr)
    {
        for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); 
            RContract;
            RContract = RContractTable_ds.getNext())
        {
            object = RContract.joinChild();
            pointAccount = object.joinChild();
            qbr.value(qbr.value()+',!'+pointAccount.PointAccountId);
        }
    }
    else
    {
        if (c==1)
        {
            qbr=pointTable.addRange(FieldNum(ICLPointAccountTable,PointAccountId));
            qbr.value('!'+ICLPointAccountTable.PointAccountId);
        }
        else
        {
            qbr=pointTable.addRange(FieldNum(ICLPointAccountTable,PointAccountId));
            for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); 
                RContract;
                RContract = RContractTable_ds.getNext())
            {
                object = RContract.joinChild();
                pointAccount = object.joinChild();

                qbr.value(qbr.value()+',!'+pointAccount.PointAccountId);
            }
        }
    }
    RContractTable_ds.research();
}

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

in.dc · 02.10.2009, 17:17

Цитата:

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

После

X++:

 c++;

добавьте

X++:

        if (c >= 2)
            break;

Зачем мучить аксапту. Ведь вам интересно есть ли строки и что их больше 1.
А две или 10 вам уже без разницы.

Влезу со своими 5 копейками: в таком случае, чтобы определить помечена 1 или несколько строк в общем то не за чем гонять первый цикл:

X++:

void clicked()
{
    int c;
;
    ...
    for (RContract = RContractTable_ds.getFirst(true) ? RContractTable_ds.getFirst(true) : RContractTable_ds.cursor(); 
        RContract;
        RContract = RContractTable_ds.getNext())
    {
        c++;
    }
    ...
}

факт того что помечено несколько (больше 1) строк можно проанализировать через RContractTable_ds.anyMarked().

miklenew · 02.10.2009, 18:15

Цитата:

Сообщение от in.dc

факт того что помечено несколько (больше 1) строк можно проанализировать через RContractTable_ds.anyMarked()

Правильное уточнение. С наскоку не вспомнил.

ivas · 07.10.2009, 19:10

Цитата:

Сообщение от in.dc

факт того что помечено несколько (больше 1) строк можно проанализировать через RContractTable_ds.anyMarked().

Не знаю как в 4ке, а в 3ке функция anyMarked() возвращает true если выделить с Ctrl одну строку, так что будте аккуратны и внимательны)

**mazzy** · 30.09.2009, 17:55

Lucky13, oip, то, что надо. а я на "маркировке" зациклился...

Цитата:

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

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

Если вернуться к исходной задаче, то видна большая проблема в самой постановке.
Предположим вы сделали как у вас просят.
Предположим пользователь решил, что строчку в отчет выводить не надо и удалил строчку.
Предположим что где-то в середине процесса пользователь вдруг вспомнил "Ой, а я зря удалил, печатать все ж таки надо".
Как в вашей постановке пользователь сможет вернуть и напечатать строку, которую раньше удалил из грида?

Ответ: никак, только закрыть форму и начать отмечать строки заново

Поэтому в Аксапте используется маркировка галочками для больших таблиц
а для маленьких списков - пара listview.

dech · 01.10.2009, 08:15

В дополнение ко всему, переименуйте переменную "с" на "х". И все у вас будет!

miklenew · 01.10.2009, 08:43

Цитата:

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

В дополнение ко всему, переименуйте переменную "с" на "х". И все у вас будет!

Почему x? Лучше тогда n.
Но это мне кажется не принципиальным.

Alexanderrrr · 01.10.2009, 13:40

Насоветовали тут))
да, согласен..с постановкой задачи у нас проблемы часто.
да и код написан с недочетами, согласен.
Думаю с галочками будет гораздо проще и проблем меньше

Спасибо всем за помощь!

**Gustav** · 01.10.2009, 14:07

немного офф-топика по ходу...

Цитата:

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

1. Вам известно про ограничение длины строки, которую можно засунуть в QueryBuildRange?

А какое там ограничение?

Я знаю, что есть ограничение EDT Range, которое равно 250 символам и которое срабатывает, если у QueryRun вызывается prompt(), т.е. стандартная форма запроса показывается пользователю. И далее, если пользователь нажмет на OK, но какой-либо критерий (уже неважно, введенный вручную или поданый из кода) будет длинее 250 символов, то возникнет ошибка.

Но, вроде, в коде топикстартера prompt'а нет и в этом случае можно многие тысячи символов поместить в QueryBuildRange и они корректно обработаются. Даже не знаю точно, сколько много. Разве не так?

Похожие темы
Тема	Автор	Раздел	Ответов	Посл. сообщение
Открытие формы с деталями активной записи в гриде	sweeper	DAX: Программирование	4	19.09.2008 15:55
Обработка события нажатие клавиши на гриде	berlioz	DAX: Программирование	17	27.09.2006 09:48
как перечислить все колонки в гриде ?	Omeo	DAX: Программирование	5	16.06.2004 09:22
Позиционирование при переходе к основной таблице	dn	DAX: Программирование	2	29.01.2004 18:35
Lookup поля в Гриде	NeveB	DAX: Программирование	1	10.12.2003 12:18