ICachedDataset.Truncate

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

Sub UserProc;
Var
    MB: IMetabase;
    DSInst: IDatasetInstance;
    Cache: ICachedDataset;
Begin
    MB:=MetabaseClass.Active;
    DSInst:=MB.ItemById("Table_1").Open(Null) As IDatasetInstance;
    Cache:=DSInst.OpenCached;
    Cache.Truncate;
    Cache.Close;
    DSInst.Close;
End Sub UserProc;