Поиск источника ошибки в SysSetupForm

[KiselevSA]

Для облегчения жизни в SysSetupForm был добавлен код для вывода наименования DataSource, полей и т.п.
В одной из форм (чужой) форма валится в стек по причине того, что не найден DataSource в AOT

dataSource = Form...Control.dataSource(); - возвращает значение 17539
dataSourceName = formRun.Form().dataSource(dataSource).Name(); - благополучно падает в стек

Как можно найти ссылку на отсутствующий в AOT DataSource в дизайне формы?

[belugin]

А табакс на ней не валится? Функция определения поля?

[KiselevSA]

Цитата:

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

А табакс на ней не валится? Функция определения поля?

У меня Tabax не установлен. Я же не программирую, мое дело анализ. Можно ради эксперимента установить, но мне придется сначала его освоить ))

[Мариночка]

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

int dataSourceNo;
    int ds_id;
    int i;
    FormBuildDatasource fbds;
    ;
    
 
    id = fc.dataSource();

    dataSourceNo = element.form().dataSourceCount();

    for (i = 1; i <= dataSourceNo; i++)
    {
        fbds = element.form().dataSource(i);
        ds_id = fbds.id();
        
        if (ds_id == id)
            info(fbds.name());
    }

А Form().dataSource() принимает номер датасорса по счету, а вы даете ему айди его.

[belugin]

Благодаря Ивану, в табаксе есть код, выводящий истоячник для текущего поля. Вот он:

    Object              formControlEditField;
    TreeNode            runTreeNode;

    TreeNode getDataSourceNode()
    {
        int         dataSourceId;
        int         fieldExtId;
        str         dataMethodName;
        TreeNode    fieldNode;
    ;
        dataSourceId    = formControlEditField.dataSource();
        fieldExtId      = formControlEditField.dataField();
        dataMethodName  = formControlEditField.dataMethod();
        if (dataSourceId)
        {
            if (fieldExtId)
            {
                fieldNode = TreeNode::findNode(#TablesPath + #AOTRootPath + tableId2Name(currentForm.form().dataSource(dataSourceId).table()) + "\\Fields");
                if (fieldNode)
                    fieldNode = fieldNode.AOTfindChild(fieldId2Name(currentForm.form().dataSource(dataSourceId).table(), fieldExt2Id(fieldExtId)));
                if (fieldNode)
                    fieldNode.AOTnewWindow();
                return fieldNode;
            }
            else
            {
                if (dataMethodName)
                {
                    fieldNode = TreeNode::findNode(strFmt(#DataSourceMethodPath, #FormsPath + #AOTRootPath + currentForm.name(), currentForm.form().dataSource(dataSourceId).name(), dataMethodName));
                    if (fieldNode)
                        fieldNode.AOTedit();
                    else
                    {
                        fieldNode = TreeNode::findNode(strFmt(#MethodPath, #TablesPath + #AOTRootPath + tableId2Name(currentForm.form().dataSource(dataSourceId).table()), dataMethodName));
                        if (fieldNode)
                            fieldNode.AOTedit();
                    }
                }
            }
        }
        return null;
    }

[belugin]

Хотя навреное, для данного случая работать не будет - в дизайне-то нет...

[KiselevSA]

Цитата:

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

Хотя навреное, для данного случая работать не будет - в дизайне-то нет...

Знать бы поле в дизайне? А так строится дерево по дизайну и в каком-то узле все падает. А перебирать все узлы упаришься. Хотя, скорее всего, так и придется сделать ((

[kashperuk]

но и RunTime error по идее не будет

[belugin]

Цитата:

Знать бы поле в дизайне

попробуй табакс - там спецкнопка, которая открывает текущее поле в дизайние

[kashperuk]

Цитата:

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

попробуй табакс - там спецкнопка, которая открывает текущее поле в дизайние

Кстати реально удивляет, почему консультанты не пользуются.
Я своим провел детальную презентацию, так после этого форма Tabax - первая, которую они открывают в системе.

[belugin]

запиши флешик

[KiselevSA]

Так форма-то сама открывается. А вот при вызове SysSetupForm по этой форме все и происходит.
Т.е. я стою на форме, нажимаю правую кнопку, выбираю "Настройка" и падаю в стек

[KiselevSA]

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