IDtRecordsetUserData.UserData

Синтаксис Fore

UserData: IXmlDomElement;

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

UserData: Prognoz.Platform.Interop.MsXml2.IXmlDomElement;

Описание

Свойство UserData определяет дополнительные настройки в формате XML для пользовательских источников/приёмников данных.

Комментарии

Особенности работы с XML-файлами представлены на странице «Пример работы с XML-файлами».

Пример Fore

Подключите системные сборки: Dt, MathFin, Metabase, Xml.

Class MyProvider: Object, IDtRecordsetProvider, IDtRecordsetUserData
    UserD: IXmlDomElement;
    
    Public Function Fetch: Array Of Variant;
        Var
            ResArray: Array[0..1, 0..10] Of Variant;
            i, j: integer;
        Begin
            For j := 0 To 10 Do
                For i := 0 To 1 Do
                    If i = 0 Then
                        ResArray[i, j] := "Код-" + j.ToString;
                    Else
                        ResArray[i, j] := Math.RandBetween(0, 100);
                    End If;
                End For;
            End For;
            Return ResArray;
    End Function Fetch;
    
    Public Function get_userData: IXmlDomElement;
        Begin
            Return UserD;
    End Function get_userData;

    Public Sub set_userData(value: IXmlDomElement);
        Begin
            UserD := value;
    End Sub set_userData;
    
End Class MyProvider;

Данный пример является макросом, содержащим реализацию:

• метода, осуществляющего импорт данных по пользовательскому алгоритму. При импорте будет получен массив, содержащий два столбца данных. В первом столбце будут содержаться символьные значения, во втором - случайные вещественные числа в диапазоне от 0 до 100;

• свойства, определяющего дополнительные настройки в формате XML для пользовательских источников/приёмников данных.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Dt;
Imports Prognoz.Platform.Interop.MathFin;
Imports Prognoz.Platform.Interop.MsXml2;
…
Class MyProvider: Object, IDtRecordsetProvider, IDtRecordsetUserData
    UserD: IXmlDomElement;
    
    Public Function Fetch(): System.Array;
        Var
            ResArray: Array[0..1, 0..10];
            i, j: integer;
            CMath: MathClass = New MathClass();
        Begin
            For j := 0 To 10 Do
                For i := 0 To 1 Do
                    If i = 0 Then
                        ResArray[i, j] := "Код-" + j.ToString();
                    Else
                        ResArray[i, j] := CMath.RandBetween(0, 100);
                    End If;
                End For;
            End For;
            Return ResArray;
    End Function Fetch;
    
    Public Property UserData: IXmlDomElement
        Get
        Begin
            Return UserD;
        End Get
        Set
        Begin
        End Set
    End Property UserData;

End Class MyProvider;

См. также:

IDtRecordsetUserData