IRdsSortAttributes.LoadFrom

Синтаксис Fore

LoadFrom(Element: Variant);

Синтаксис Fore.NET

LoadFrom(Element: object);

Параметры

Element. Объект, из которого будут загружены параметры сортировки значений атрибутов.

Описание

Метод LoadFrom загружает параметры сортировки значений атрибутов из XML.

Пример Fore

Для выполнения примера в репозитории предполагается наличие репозитория НСИ с идентификатором «RDS». Данный репозиторий должен содержать табличный справочник НСИ с идентификатором «D_EXP_IMP», имеющий схемы экспорта. В файловой системе должен содержаться файл «C:\SortAtt.xml» с параметрами фильтрации значений атрибутов в схеме экспорта данного справочника в формате XML.

Добавьте ссылки на системные сборки «Metabase», «Rds», «Xml».

Sub UserProc;
Var
    mb: IMetabase;
    rdsKey: Integer;
    dictObj: IMetabaseObject;
    Dict: IRdsDictionary;
    sExport: IMetaRdsExportSchema;
    dictSort: IRdsSortAttributes;
    Doc: IXmlDomDocument;
Begin
    mb := MetabaseClass.Active;
    // Получаем ключ репозитория НСИ
    rdsKey := mb.GetObjectKeyById("RDS");
    // Получаем табличный справочник НСИ
    dictObj := mb.ItemByIdNamespace("D_EXP_IMP", rdsKey).Edit;
    Dict := dictObj As IRdsDictionary;
    // Получаем первую схему экспорта
    sExport := Dict.ExportSchemas.Item(0) As IMetaRdsExportSchema;
    // Получаем параметры сортировки
    dictSort := sExport.SortAttributes;
    // Загружаем параметры сортировки из файла
    Doc := New DOMDocument.Create;
    Doc.load("C:\SortAtt.xml");
    dictSort.LoadFrom(Doc.documentElement);
    // Сохраняем справочник
    dictObj.Save;
End Sub UserProc;

После выполнения примера параметры сортировки атрибутов в первой схеме экспорта будут загружены из файла «С:\SortAtt.xml».

Пример Fore.NET

Для выполнения примера в репозитории предполагается наличие репозитория НСИ с идентификатором «RDS». Данный репозиторий должен содержать табличный справочник НСИ с идентификатором «D_EXP_IMP», имеющий схемы экспорта. В файловой системе должен содержаться файл «C:\SortAtt.xml», с параметрами фильтрации значений атрибутов в схеме экспорта данного справочника в формате XML.

Imports Prognoz.Platform.Interop.MsXml2;
Imports Prognoz.Platform.Interop.Rds;
…
[STAThread]
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    rdsKey: uinteger;
    dictObj: IMetabaseObject;
    Dict: IRdsDictionary;
    sExport: IMetaRdsExportSchema;
    dictSort: IRdsSortAttributes;
    Doc: IXmlDomDocument;
Begin
    mb := Params.Metabase;
    // Получаем ключ репозитория НСИ
    rdsKey := mb.GetObjectKeyById("RDS");
    // Получаем табличный справочник НСИ
    dictObj := mb.ItemByIdNamespace["D_EXP_IMP", rdsKey].Edit();
    Dict := dictObj As IRdsDictionary;
    // Получаем первую схему экспорта
    sExport := Dict.ExportSchemas.Item[0] As IMetaRdsExportSchema;
    // Получаем параметры сортировки
    dictSort := sExport.SortAttributes;
    // Загружаем параметры сортировки из файла
    Doc := New DOMDocumentClass.Create();
    Doc.load("C:\SortAtt.xml");
    dictSort.LoadFrom(Doc.documentElement);
    // Сохраняем справочник
    dictObj.Save();
End Sub;

См. также:

IRdsSortAttributes