Редактор отчётов для Axapta

[Ярослав Щекин]

Во вложенном файле --- новая версия AxRepEditor.

Изменения:

. Исправлена ошибка: Fontsize control'а не наследовался из его секции.
. Исправлена ошибка: свойства активного control'а не обновлялись после 'align as table'.
. Выделение control-ов перенесено с Shift-Click на CTRL-Click.
. Добавлено: при нажатии ALT во время перемещения активного control-а перемещение происходит только по вертикали или по горизонтали от исходного положения.

To Link: Вы не пробовали реализовать автоэкспорт отчета и вызов утилиты с параметром пути к файлу?

To All: Вы не заметили каких-либо ошибок? Кто-нибудь попробовал работу с другими версиями Axapta?

[maximka]

Цитата:

Сообщение от Ярослав Щекин

To All: Вы не заметили каких-либо ошибок? Кто-нибудь попробовал работу с другими версиями Axapta?

Для четверочных отчетов у меня не заработало...

[Ярослав Щекин]

Так и пишет --- не работаю?
Вы не могли бы выложить какой-нибудь (небольшой) отчёт из четвёрки?

[axalex]

Цитата:

Сообщение от Ярослав Щекин

Так и пишет --- не работаю?

Пишет:

[Ярослав Щекин]

Пожалуйста, выложите отчёт (любой из отчётов), в котором происходит ошибка.

[maximka]

Цитата:

invalid key "Thickness" for node "26"
invalid key "Thickness" for node "26"
while executing
"mytree get $sectnode Thickness"
(procedure "CreateCanvasSection" line 17)
invoked from within
"CreateCanvasSection $cv $sectnode"
invoked from within
"mytree walk root -order both {cact cnode} {
set NType [mytree get $cnode NODE_TYPE]
if {$cact eq "enter"} {
if {$NType in $G_SectionTyp..."
(procedure "Tree2Canvas" line 6)
invoked from within
"Tree2Canvas $::G_Canvas"
(procedure "C_LoadFile" line 9)
invoked from within
"C_LoadFile"
(menu invoke)

AX 4.0 Report_InventTransferShip.xpo

[Ярослав Щекин]

Спасибо всем за присланные отчёты.
Выкладываю новую версию.

Для загрузки отчётов Ax 4.0/5.0 нужно перед загрузкой в "File encoding" выбрать "utf-8".

Тем не менее, отчёт из Report_InventTransferShip.xpo выглядит странно, наверное, в алгоритм автоматического размещения control-ов в Axapta 4.0 внесены какие-то изменения.

Также необходимо проверить, будут ли загружаться отредактированные отчёты в Axapta (не забудьте сделать backup загружаемого отчёта).

[axalex]

Цитата:

Сообщение от Ярослав Щекин

To All: Вы не заметили каких-либо ошибок? Кто-нибудь попробовал работу с другими версиями Axapta?

В 5.0 тоже не вышло.

[Link]

Цитата:

Сообщение от Ярослав Щекин

To Link: Вы не пробовали реализовать автоэкспорт отчета и вызов утилиты с параметром пути к файлу??

Готово. Сделана в 2009ой Аксапте.

Реализовано через SysContextMenu, так же есть кнопочка для Табакса.

[Ярослав Щекин]

Спасибо. Но, когда я пытался адаптировать этот проект под свою Axapta 3.0, то выяснил, что отчёт экспортируется без меток (вызовом treeNodeExport). Вы не знаете, каким образом заставить Axapta экспортировать их?

[Link]

Цитата:

Сообщение от Ярослав Щекин

Спасибо. Но, когда я пытался адаптировать этот проект под свою Axapta 3.0, то выяснил, что отчёт экспортируется без меток (вызовом treeNodeExport). Вы не знаете, каким образом заставить Axapta экспортировать их?

// >> DEV:mxk 18/08/11-16:09:19  DEV_ReportEditorExternal>>
/* System export flags
#define.noExport(0)                 // Do not export
#define.export(1)                   // Export
#define.expKeepIds(0x0100)          // Export with ID's
#define.expLables(0x0400)           // Export labels
#define.expProjectOnly(0x800)       // Export project only
#define.expLockOnExport(0x1000)     // Lock exported elements
#define.expDefaultValues(0x2000)    // Export default properties values
#define.expLayer(0x4000)            // Export current layer only*/
protected void export(  TreeNode _node      = reportNode,
                        FilePath _fileName  = xpoFile)
{
    int                     flag            = (#expKeepIds + #expLables + #expLockOnExport);
;
    if (_node)
    {
        _node.treeNodeExport(_fileName, flag);
    }
}

// >> DEV:mxk 18/08/11-16:09:19  DEV_ReportEditorExternal>>
/* System import flags
#define.impOk(0x0000)               // Element imported
#define.impError(0x0001)            // Element is not imported
#define.impReImport(0x0002)         // Reimport is needed
#define.impReImporting(0x0004)      // Reimporting
#define.impStopped(0x0008)          // Stop import
#define.impNeverOverwrite(0x0010)   // Do not overwrite elements
#define.impQueryOverwrite(0x0020)   // Display a dialog asking if you want to override or not
#define.impGetCompareNode(0x0040)   // Import into node not in tree
#define.impRemoveExcess(0x0080)     // Delete subelements not found in tree
#define.impKeepIds(0x0100)          // Keep ID's after import
#define.impFormCopyPaste(0x0200)    // Using import to copy and paste form-controls
#define.impLabels(0x0400)           // Import labels
#define.impOverrideLocks(0x0800)    // Override locks
#define.impAddToProject(0x2000)     // Import into project
#define.impIgnoreCheckStatus(0x8000)// Import even if object is checked in*/
protected void import(  TreeNode _importNode    = reportNode,
                        FilePath _fileName      = xpoFile)
{
    SysImportElements       import;
    SysCompilerOutput       compiler;
    TmpAotImport            tmpAotImport;

    TreeNode                treeNodeImport;
    int                     importId;
    int                     elements;
    int                     flag            = (#impKeepIds + #impOverrideLocks + #impLabels + #impIgnoreCheckStatus + #impRemoveExcess);
    boolean                 importOk
;
    try
    {
        // Import file and compile it
        import = new SysImportElements();
        import.newFile(xpoFile);

        import.parmAddToProject(false);
        import.parmImportAot(true);
        import.parmImportWithIds(false);
        import.import(#impRemoveExcess | #impIgnoreCheckStatus);

        // retrieve the compilation log and use it to produce the external log
        tmpAotImport = import.getTmpImportAot();
        compiler = infolog.compilerOutput();

        info(strfmt("Report %1 successfully imported.", _importNode.treeNodeName()));
    }
    catch(Exception::Error)
    {
        error(strfmt("@SYS97044", xpoFile));
    }
}

[Ярослав Щекин]

Нет, метки всё равно не экспортируются.

[Link]

Цитата:

Сообщение от Ярослав Щекин

Нет, метки всё равно не экспортируются.

Проверил в 2009 - работает. Только нужно изменить код в \Classes\SysImportLabel\label2Xml для нужного языка иначе будет ошибка.

    setIterator = new SetIterator(_languageSet ? Set::create(_languageSet.pack()) : con2Set(['en-gb']));

[Ярослав Щекин]

А в Axapta 3.0 --- не работает. Интересно, в ней это вообще возможно сделать?