Close;
Метод Close осуществляет закрытие курсора.
Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «OBJ_RUBRICATOR».
Sub Main;
Var
MB: IMetabase;
RubInst: IRubricatorInstance;
Loo: IRubricatorValidationsLookup;
Begin
MB := MetabaseClass.Active;
RubInst := mb.ItemById("OBJ_RUBRICATOR").Open(Null) As IRubricatorInstance;
Loo := RubInst.CreateValidationsLookup;
Loo.Open(DictionaryCursorOptions.None);
While Loo.Eof = False Do
Debug.WriteLine("Ключ выполнения валидации " + Loo.Current.Key.ToString + " ; Ключ валидации " + Loo.Current.ValidationKey.ToString);
Loo.Next;
End While;
Loo.Close;
End Sub Main;
После выполнения примера в окно консоли будет выведена информация о выполнениях валидаций.
См. также: