Как узнать, что форма открыта через "Перейти к форме основной таблицы"?

[mazzy]

element.args().caller() - хорошая мысль. но очень грубо
element.args().lookup*() - прекрасно. спасибо.

но я пошел уже другим путем и отрефакторил.
принцип по которому я пошел:

1. я не добавляю свой датасорса в форму. что делает модификацию сильно легче - один edit-метод на форме + 1 контрол на форме
2. я использую тот факт, что после super() в инициализации есть только Query, а QueryRun == null
3. я работаю только с queryrun().query(), использую research(). И никогда сам не вызываю executeQuery(), который пересоздает queryRun из АОТ
4. в частности, я добавляю свой датасорс только после того, как пользователь выбрал какой-то пункт в переключателе
5. я отрефакторил код и трактую отсутствие моего датасорса как вполне валидное состояние "Все записи"

получился вот такой код:

protected static MdmViewMode get(FormDataSource fdsMain, TableId shadowTableId)
{
    MdmViewMode             ret;

    EnumId                  enumId      = enumnum(MdmType);
    QueryRun                qr          = fdsMain ? fdsMain.queryRun() : null;
    QueryBuildDataSource    qbds        = qr      ? qr.query().dataSourceTable(shadowTableId, 1) : null;
    SysDictField            field       = qbds    ? SysDictTable::fieldWithEnum(qbds.table(), enumId) : null;
    QueryBuildRange         qbr         = field   ? qbds.findRange(field.id()) : null;
    str                     rangeValue  = qbr     ? qbr.value() : '';
    ;

    if( !qbds || !qbds.enabled() )
    {
        ret = MdmViewMode::All;
    }
    else if( qbds && qbds.joinMode() == JoinMode::NoExistsJoin && rangeValue == SysQuery::value(MdmEnumViewMode::completed()) )
    {
        ret = MdmViewMode::InProcess;
    }
    else if( qbds && qbds.joinMode() == JoinMode::NoExistsJoin && rangeValue == SysQuery::value(MdmType::StopProcessing) )
    {
        ret = MdmViewMode::Active;
    }
    else if( qbds && qbds.joinMode() == JoinMode::ExistsJoin && rangeValue == SysQuery::value(MdmType::StopProcessing) )
    {
        ret = MdmViewMode::Stopped;
    }
    else if( qbds && qbds.joinMode() == JoinMode::ExistsJoin && rangeValue == SysQuery::value(MdmType::Error) )
    {
        ret = MdmViewMode::Error;
    }
    else
    {
        ret = MdmViewMode::UserDefined;
    }

    return ret;
}

// предполагаем, что в запросе только один range по полю mdmType
protected static boolean set(
    FormDataSource  fdsMain,
    TableId         shadowTableId,
    MdmViewMode     viewMode)
{
    EnumId                  enumId      = enumnum(MdmType);
    QueryRun                qr          = fdsMain ? fdsMain.queryRun() : null;
    QueryBuildDataSource    qbds        = qr      ? SysQuery::findOrCreateDataSource(qr.query(), shadowTableId, fdsMain.table()) : null;
    SysDictField            field       = qbds    ? SysDictTable::fieldWithEnum(qbds.table(), enumId) : null;
    str                     rangeValue;
    ;

    if( qbds && field )
    {
        startLengthyOperation();

        switch( viewMode )
        {
            case MdmViewMode::UserDefined:
                qbds.enabled(true);
                qbds.relations(true);
                qbds.joinMode(JoinMode::InnerJoin);
                rangeValue = SysQuery::valueUnlimited();
                break;

            case MdmViewMode::All:
                qbds.enabled(false);
                qbds.relations(true);
                qbds.joinMode(JoinMode::ExistsJoin);
                rangeValue = SysQuery::valueUnlimited();
                break;

            case MdmViewMode::InProcess:
                qbds.enabled(true);
                qbds.relations(true);
                qbds.joinMode(JoinMode::NoExistsJoin);
                rangeValue = SysQuery::value(MdmEnumViewMode::completed());
                break;

            case MdmViewMode::Active:
                qbds.enabled(true);
                qbds.relations(true);
                qbds.joinMode(JoinMode::NoExistsJoin);
                rangeValue = SysQuery::value(MdmType::StopProcessing);
                break;

            case MdmViewMode::Stopped:
                qbds.enabled(true);
                qbds.relations(true);
                qbds.joinMode(JoinMode::ExistsJoin);
                rangeValue = SysQuery::value(MdmType::StopProcessing);
                break;

            case MdmViewMode::Error:
                qbds.enabled(true);
                qbds.relations(true);
                qbds.joinMode(JoinMode::ExistsJoin);
                rangeValue = SysQuery::value(MdmType::Error);
                break;

            default:
                throw error(Error::unsupportedEnum(funcname(), viewMode));
        }

        qbds.fetchMode(QueryFetchMode::One2One);
        qbds.firstOnly(true);

        SysQuery::findOrCreateRange(qbds, field.id()).value(rangeValue);

        fdsMain.research();

        endLengthyOperation();
        return true;
    }

    return false;
}

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

до жамка:


после жамка:


спасибо за советы и помощь.

[TasmanianDevil]

Цитата:

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

никогда сам не вызываю executeQuery(), который пересоздает
queryRun из АОТ

Я таки уже и дико извиняюсь, что влезаю в дискуссию, но оно не из AOT, а из текущего экземпляра query() источника данных текущего экземпляра формы создается с учетом уже сделанных ранее на этом query() изменений - в противном случае тупо не работали бы фильтры (которые делают через query() источника данных, как например фильтры по разнесенности,неразнесенности в журнальном фреймворке)
К томе же реализация фильтров через queryRun().query() - не самый лучший вариант.
Кто мешает пользователю в такой форме поиграться с запросом и вызвать стандартными средствами executeQuery(), похоронив все созданное непосильным трудом в queryRun().query() ?

[mazzy]

Цитата:

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

Я таки уже и дико извиняюсь, что влезаю в дискуссию, но оно не из AOT, а из текущего экземпляра query() источника данных

угу. я там вообще коряво сформулировал. но править уже нет желаения.

Цитата:

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

К томе же реализация фильтров через queryRun().query() - не самый лучший вариант.
Кто мешает пользователю в такой форме поиграться с запросом и вызвать стандартными средствами executeQuery(), похоронив все созданное непосильным трудом в queryRun().query() ?

Именно! никто не мешает пользователю поиграться. В том числе и я не мешаю.

если пользователь "сломает" мои фильтры,
то метод get вернет MdmViewMode::UserDefined
для моего кода это вполне штатная ситуация.

Именно с queryRun!
Это самый лучший вариант.