Можно ли из кода изменить свойства Field в таблице, не в DS?

[TasmanianDevil]

Что только мОлодежь не придумает, лишь не работать

Задача какова - единым инструментом в любой форме рулить доступностью редактирования определенных полей определенной таблицы на основании определенных правил. Руление это необходимо в двух случаях - при переходе на новую запись и при редактировании текущей.

Есть какой-нибудь общий системный класс, позволяющий глобально из одного места добраться до источников данных любой формы ? Есть, SysSetupFormRun, упомянутый S.Kuskov. Позволяет этот класс отслеживать смену позиции в источнике данных управляемой формы и идентифицировать сам источник, в котором произошли изменения? Нет, он больше для элементов управления, контролов то бишь, заточен. Более подходящим бы класс FormDataSource, но он системный и скрытый, в его active() не залезешь. Это первая птичка обломинго ...

Есть какой нибудь класс, общий для всех таблиц, позволяющий отслеживать изменения полей в табличной переменной ? Есть, xRecord - но он системный и скрытый. Влезть в его modifiedField() не выйдет. Это птичка обломинго номер два...

Глобально эту задачу доступными средствами не решить - просто смиритесь с этим и делайте как все, класс-обработчик доступа в каждую форму.

P.S. Можно, конечно, проявить профессиональную Йаркость™, хакнув приложение,сняв атрибут скрытости с FormDataSource и xRecord.

[makbeth]

Цитата:

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

Есть какой-нибудь общий системный класс, позволяющий глобально из одного места добраться до источников данных любой формы ? Есть, SysSetupFormRun, упомянутый S.Kuskov. Позволяет этот класс отслеживать смену позиции в источнике данных управляемой формы и идентифицировать сам источник, в котором произошли изменения? Нет, он больше для элементов управления, контролов то бишь, заточен. Более подходящим бы класс FormDataSource, но он системный и скрытый, в его active() не залезешь. Это первая птичка обломинго ...

Ну не такая уже и прям обломинго. Сходу могу назвать целых два способа руления событием active на любой форме:
1. info.formNotify и, например, основанный на нем в 2009 FormRunListener_RU
2. Рисование наследника FormObjectSetNotify и использование addNotifyHandler на датасорсе. Позволяет отслеживать несколько событий датасорса, в т.ч. и active. Правда у меня в итоге не прижился, ибо при его использовании если на форме в гриде потащить за скроллбар мышью, то при отпускании мыши клиент заворачивал ласты. Что-то в ядре там перемудрили. Это на 2009, в 2012 может поправили.

Цитата:

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

Есть какой нибудь класс, общий для всех таблиц, позволяющий отслеживать изменения полей в табличной переменной ? Есть, xRecord - но он системный и скрытый. Влезть в его modifiedField() не выйдет. Это птичка обломинго номер два...

Глобально эту задачу доступными средствами не решить - просто смиритесь с этим и делайте как все, класс-обработчик доступа в каждую форму.

Ну, в 2009 наверное да, но в 2012 - почему бы и нет?

fds.object(fieldnum(...)).registerOverrideMethod(...)

И - вперед
PS: сам тоже не пробовал, но ведь уже есть куда копать...

[TasmanianDevil]

Цитата:

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

1. info.formNotify и, например, основанный на нем в 2009 FormRunListener_RU
2. Рисование наследника FormObjectSetNotify и использование addNotifyHandler на датасорсе.
...

fds.object(fieldnum(...)).registerOverrideMethod(...)

Максим, а вообще без допрограммирования на форме/датасорсе всяких регистраторов извещений ?
Чтоб создать форму в АОТ с нуля, кинуть ей датасорс, грид, в грид поля, открыть форму и наслаждаться изменениями доступности полей при навигации и редактировании по предопределенным где-то правилам...

Цитата:

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

...
Чтоб создать форму в АОТ с нуля, кинуть ей датасорс, грид, в грид поля, открыть форму и наслаждаться изменениями доступности полей при навигации и редактировании по предопределенным где-то правилам...

Чуть ранее

Цитата:

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

Есть, SysSetupFormRun,

[makbeth]

Цитата:

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

Максим, а вообще без допрограммирования на форме/датасорсе всяких регистраторов извещений ?

"А вообще без программирования" нам кушать станет не на что

А так - все верно. Определенные изменения в SysSetupFormRun придется сделать.
Хотя мне больше нравится подход, когда определенный движок уже реализован в сторонке, но чтобы добавить поддержку это движка на форму, стоит внести изменения только в эту форму (например, написав что-то типа myMegaEngine.activateFor(element) в init), а не проверять нужна ли поддержка для каждой формы при ее открытии. Тем более для чего может пригодится такая вот необходимость влезать в каждую форму я даже не представляю.

[TasmanianDevil]

Цитата:

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

"А вообще без программирования" нам кушать станет не на что

Фундаментальный продукт. позволяющий избавиться от мелкого программерства стоит дороже и правильное его позиционирование не даст умереть с голоду.

Цитата:

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

А так - все верно. Определенные изменения в SysSetupFormRun придется сделать.

Хорошо, по навигации все отловится через SysSetupFormRun - а при редактированиии записи ? Спозиционировались, механизм отработал, начинаем редактировать и по результату редактирования доступ должен измениться. Чегой-то мне кажется, что без доступа к xRecord.modifiedField() вряд ли получится

[gl00mie]

Цитата:

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

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

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

Цитата:

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

Хорошо, по навигации все отловится через SysSetupFormRun - а при редактированиии записи?

Узко мыслите Кроме виндового клиента у Аксапты еще есть веб-клиент Корпоративного портала, есть всякие там интеграции, в т.ч. через Excel какой-нить, и там эти "фундаментальные продукты", висящие гроздью на SysSetupFormRun, просто идут лесом. А всё потому, что идет попытка смешать бизнес-логику с презентационной. Подсвечивание поля как доступного/недоступного для редактирования на форме, - это сугубо презентационная логика, которую при желании можно и обойти. Если же требуется реализовать запрет на изменение поля в рамках бизнес-логики, то это нужно делать явно не на xRecord.modifiedField() и прочих FormDataSource.active()

[Ruff]

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

static void ShowMostUsedTables(Args _args)
{
////////////////////////////////////////////////////////////////
// С заданными ниже параметрами Job работает около 5-7 секунд, меняйте с осторожностью:)

    #define.DSCountCriteria     (10)        // критерий попадания в "ТОП" (минимальное количество ссылающихся DS)
    #define.TableFilter         ("*")       // доп. фильтр, например: "Invent*", "Ledger*", "Vend*"
////////////////////////////////////////////////////////////////
    xRefReferences      xref;
    xRefPaths           forms, tables;

    RecordSortedList    sortedList = new RecordSortedList(tablenum(xRefPaths));

    ;
    sortedList.sortOrder(fieldnum(xRefPaths, ApplObjectPathRecId), fieldnum(xRefPaths, RecId));
    
    // перебрать таблицы
    while select Path, RecId from tables
        group by tables.Path, RecId
        where     tables.Path like "\\\\Data Dictionary\\\\Tables\\\\" + #TableFilter   
            &&  !(tables.Path like "*\\\\Tables\\\\?*\\\\*")                            // исключить все подузлы
    // подсчитать ссылки "Чем используется"
    join    count (RecId) from xref                                                     
        where   xref.referencePathRecId     == tables.RecId
            &&  xref.line                   == 0                                        // исключить ссылки из X++ кода
    // наложить фильтр на ссылки
    exists join forms                                                                   
        where   forms.RecId     == xref.xRefPathRecId
            &&    forms.Path    like "\\\\Forms\\\\?*\\\\Data Sources\\\\*"             // интересуют DS форм
            &&  !(forms.Path    like "*\\\\Fields\\\\*")                                // не интересуют поля и прочее
            &&  !(forms.Path    like "*\\\\Ranges\\\\*")
            &&  !(forms.Path    like "*\\\\Sorting\\\\*")                    
    {
        if (xref.RecId >= #DSCountCriteria)
        {
            tables.ApplObjectPathRecId = -xref.RecId;  // минус - для убывающей сортировки
            sortedList.ins(tables);
        }
    }
    setprefix(strfmt("Найдено %1 таблиц (по фильтру %2) с количеством ссылающихся FormDS >= %3", sortedList.len(), #TableFilter, #DSCountCriteria));
    info("Сount of FormDS; TableName");

    sortedList.first(tables);
    do{
        info(strfmt("%1; %2", -tables.ApplObjectPathRecId, tables.pathName()));
    } 
    while (sortedList.next(tables));
}

На кастомизированной DAX2009 "Топ" выглядит примерно так (см. вложение):

[TasmanianDevil]

Цитата:

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

К счастью, нету таких - и не надо

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

Цитата:

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

Потому что все эти "фундаментальные продукты" не всякий консультант нормально использовать может,

Опять-таки не надо за все и про всех. Всякий путь ищет себе другую работу, если при наличии адекватной документации, где изложена цель/объем изменений и приложена подробная инструкция, этот всякий имеет проблемы с использованием востребованной клиентом разработки.

Цитата:

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

а клиент не понимает, зачем ему ради "одного-единственного поля" пытаются продать дорогущий "комбайн" + кучу часов консалтинга для его настройки.

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

Цитата:

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

Узко мыслите

Дык чего ждать от низкорожденного IT-чандалы, не понимающего местами необъятного широкомыслия разработческих брахманов из MBS, воплотивших в системе божественную безупречность и логичность