DAX2009: экспорт через Группы определений + Excel 2013

[oleggy]

Всем привет.
На терминале был удален Excel 2010 а вместо него установлен Excel 2013 из за чего перестал работать импорт/экспорт через группы определений.

Quote:

[c] \Classes\SysExcelApplication\save - 4
[c] \Classes\SysDataExcelCOM\save - 5
[c] \Classes\SysDataExcelCOM\buildWorkbooks - 89
[c] \Classes\SysDataExportExcel\export - 35
[c] \Classes\SysDataExportBase\run - 5
[c] \Classes\SysDataExport\main - 20
[c] \Classes\FormFunctionButtonControl\Clicked

Quote:

Метод "save" в COM-объекте класса "Excel.Application" возвратил код ошибки 0x800A03EC (<неизвестно>), который означает: Save method of Application class failed.

Подебажил, пришел к выводу что система вот тут:

Quote:

[c] \Classes\SysExcelApplication\construct - 1
[c] \Classes\SysDataExcelCOM\new - 4
[c] \Classes\SysDataExcelCOM\construct - 17
[c] \Classes\SysDataExportExcel\export - 30
[c] \Classes\SysDataExportBase\run - 5
[c] \Classes\SysDataExport\main - 20
[c] \Classes\FormFunctionButtonControl\Clicked

static client SysExcelApplication construct()
{
    SysExcelApplication     ret;
    COM                     excel;
    real                    excelVersion;
    ;

    try
    {
        excel = new COM(#EXCEL);
    }
    catch (Exception::Internal)
    {
        if (excel == null)
        {
            throw error("@SYS98748");
        }
    }

    excelVersion = str2num(excel.version());

    if (excelVersion >= 12.0)
        ret = SysExcelApplication_2007::construct(excel); // <-- тут
    else if (excelVersion >= 10.0)
        ret = SysExcelApplication_XP::construct(excel);
    else
        ret = SysExcelApplication_2000::construct(excel);

    return ret;
}

Видит что раз в системе установлен excel версии 15 (2013) значит подойдет класс SysExcelApplication_2007 и при попытке сохранить сгенерированный файл возникает ошибка, типа в Excel 2013 нет подходящего метода? Я верно понял ошибку?

Подскажите есть уже готовые решения внедряющие такую поддержку Excel 2013 ?
Как обойти такую ошибку?

[SRF]

Вот тут обсуждалась подобная проблема, возможно там уже посмотрели

Экспорт/импорт данных при помощи группы определения

Судя по ответам, можно попробовать вызвать save на workbook, т.е.

Classes\SysDataExcelCOM\save, вызывать не excel.save(), а как нибудь так excel.workbooks().workbook().saveAs\save

И для корректного отображения придётся допилить метод, но это можно и не делать.

private LabelString excelVersion()
{
    COM     excelCOM = excel.comObject();
    // BP Deviation documented
    real    excelVersion = str2num(excelCOM.version());

    switch (true)
    {
        case excelVersion < 10 :
            return #xlVersionOffice2000;

        case excelVersion == 10 :
            return #xlVersionOfficeXP;

        case excelVersion == 11 :
            return #xlVersionOffice2003;

        case excelVersion == 12 :
            return #xlVersionOffice2007;

    }

    return #xlVersionOffice2000;
}

[oleggy]

Quote:

Originally Posted by SRF

И для корректного отображения придётся допилить метод, но это можно и не

Речь про метод SysDataExcelCOM::excelVersion() ?

Он у меня в том же виде как у вас или я что то упустил?

[SRF]

Да, я про этот метод. Я к тому, что версия > 12 будет отображаться как office 2000, для эстетики надо бы и этот метод поправить, а так на функциональность он конечно влиять не будет.