ICachedDataset.Bof

Копировать пример

Sub UserProc;
Var
    MB: IMetabase;
    DSInst: IDatasetInstance;
    Cache: ICachedDataset;
    s: String;
Begin
    MB:=MetabaseClass.Active;
    DSInst:=MB.ItemById("Table_1").Open(Null) As IDatasetInstance;
    Cache:=DSInst.OpenCached;
    If Cache.Bof Then
        s:="Yes";
    Else
        s:="No";
    End If;
    Cache.Close;
    DSInst.Close;
End Sub UserProc;