IDatasetInstance.Next

Fore Syntax

Next;

Fore.NET Syntax

Next();

Description

The Next method performs transition to the next record in the data source.

Fore Example

Executing the example requires a table with the T_Data identifier in the repository with a field with the Value identifier. Add links to the Db and Metabase system assemblies.

Sub UserSample;
Var
    MB: IMetabase;
    DSInst: IDatasetInstance;
    Fields: IDatasetInstanceFields;
    Field: IDatasetInstanceField;
    i: Integer;
Begin
    MB := MetabaseClass.Active;
    DSInst := MB.ItemById("T_Data").Open(Null) As IDatasetInstance;
    Fields := DSInst.Fields;
    Field := Fields.FindById("Value");
    While Not DSInst.Eof Do
        i := i + 1;
        Debug.WriteLine("Number: " + i.ToString + "; Value: " + Field.Value);
        DSInst.Next;
    End While;
End Sub UserSample;

After executing the example, the "i" variable contains the number of data source records. The number of fields and values of the Value field are displayed in the console of the development environment.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.Db;
Imports Prognoz.Platform.Interop.Metabase;

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    DSInst: IDatasetInstance;
    Fields: IDatasetInstanceFields;
    Field: IDatasetInstanceField;
    i: Integer;
Begin
    MB := Params.Metabase;
    DSInst := MB.ItemById["T_Data"].Open(Null) As IDatasetInstance;
    Fields := DSInst.Fields;
    Field := Fields.FindById("Value");
    While Not DSInst.Eof() Do
        i := i + 1;
        System.Diagnostics.Debug.WriteLine("Number: " + i.ToString() + "; Value: " + Field.Value);
        DSInst.Next();
    End While;
End Sub;