diff --git a/test/Тест_Итератор/Ext/ObjectModule.bsl b/test/Тест_Итератор/Ext/ObjectModule.bsl index 65440ea..b55dd40 100644 --- a/test/Тест_Итератор/Ext/ObjectModule.bsl +++ b/test/Тест_Итератор/Ext/ObjectModule.bsl @@ -321,138 +321,252 @@ Процедура Тест_ВГраница() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(123).Добавить(456).ВГраница()).Равно(1); КонецПроцедуры Процедура Тест_Количество() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(123).Добавить(456).Количество()).Равно(2); КонецПроцедуры Процедура Тест_Вставить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(123).Вставить(0, 42).Получить(0)).Равно(42); КонецПроцедуры Процедура Тест_Добавить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().Начать().Добавить(42).Получить(0)).Равно(42); КонецПроцедуры Процедура Тест_Найти() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(41).Добавить(42)._Найти(42)).Равно(1); КонецПроцедуры Процедура Тест_Очистить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(42).Очистить().Количество()).Равно(0); КонецПроцедуры Процедура Тест_Получить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(42).Получить(0)).Равно(42); КонецПроцедуры Процедура Тест_Удалить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(42).Удалить(0).Количество()).Равно(0); КонецПроцедуры Процедура Тест_Установить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(333).Установить(0, 42).Получить(0)).Равно(42); КонецПроцедуры Процедура Тест_Пустой() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(42).Пустой()).ЭтоЛожь(); + Ожидаем.Что(Итератор().Начать().Пустой()).ЭтоИстина(); КонецПроцедуры Процедура Тест_Содержит() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().Начать().Содержит(42)).ЭтоЛожь(); + Ожидаем.Что(Итератор().НачатьС(42).Содержит(42)).ЭтоИстина(); КонецПроцедуры Процедура Тест_Первый() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(42).Добавить(234).Первый()).Равно(42); КонецПроцедуры Процедура Тест_Последний() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(34636).Добавить(42).Последний()).Равно(42); КонецПроцедуры Процедура Тест_СнятьПервый() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().НачатьС(42).Добавить(874); + Ожидаем.Что(Ит.СнятьПервый()).Равно(42); + Ожидаем.Что(Ит.Количество()).Равно(1); КонецПроцедуры Процедура Тест_СнятьПоследний() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().НачатьС(235).Добавить(42); + Ожидаем.Что(Ит.СнятьПоследний()).Равно(42); + Ожидаем.Что(Ит.Количество()).Равно(1); КонецПроцедуры Процедура Тест_Дополнить() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(1).Добавить(2).Дополнить(Итератор().ВзятьИз("345")).СобратьСтроку("")).Равно("12345"); КонецПроцедуры Процедура Тест_ТолькоУникальные() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().ВзятьИз("1231245563477218980").ТолькоУникальные().СобратьСтроку("")).Равно("1234567890"); КонецПроцедуры Процедура Тест_РазностьС() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().ВзятьИз("123456").РазностьС(Итератор().ВзятьИз("4567890")).СобратьСтроку("")).Равно("123"); КонецПроцедуры Процедура Тест_УдалитьЗначение() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().ВзятьИз("123123123").УдалитьЗначение("3").СобратьСтроку("")).Равно("12123123"); КонецПроцедуры Процедура Тест_УдалитьВсеВхождения() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().ВзятьИз("123123123").УдалитьВсеВхождения("3").СобратьСтроку("")).Равно("121212"); КонецПроцедуры Процедура Тест_УдалитьВсеВхожденияТипа() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор().НачатьС(1).Добавить("2").Добавить(3).Добавить("4").УдалитьВсеВхожденияТипа(Тип("Строка")).СобратьСтроку("")).Равно("13"); КонецПроцедуры Процедура Тест_СделатьПлоским() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .Добавить(Итератор().ВзятьИз("123")) + .Добавить(Итератор().НачатьС(1).Добавить(2).Добавить(3)) + .Добавить(Итератор().РазделитьСтроку("1,2,3", ",")) + .СделатьПлоским() + .СобратьСтроку("") + ).Равно("123123123"); КонецПроцедуры Процедура Тест_СброситьПозицию() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("1234567890").КакЧисла(); + Ит.УстановитьИндекс(4); + Ожидаем.Что(Ит.ТекущийЭлемент()).Равно(5); + Ит.СброситьПозицию(); + Ожидаем.Что(Ит.ТекущийЭлемент()).Равно(1); КонецПроцедуры Процедура Тест_Следующий() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("123").КакЧисла(); + Ит.Следующий(); + Ит.Следующий(); + Ожидаем.Что(Ит.ТекущийЭлемент()).Равно(2); КонецПроцедуры Процедура Тест_ТекущийИндекс() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("1234"); + Ит.Следующий(); + Ит.Следующий(); + Ит.Следующий(); + Ожидаем.Что(Ит.ТекущийИндекс()).Равно(2); КонецПроцедуры Процедура Тест_ТекущийЭлемент() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("12").КакЧисла(); + Ит.Следующий(); + Ожидаем.Что(Ит.ТекущийЭлемент()).Равно(1); КонецПроцедуры Процедура Тест_СледующийЭлемент() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("12").КакЧисла(); + Ожидаем.Что(Ит.СледующийЭлемент()).Равно(1); КонецПроцедуры Процедура Тест_УстановитьИндекс() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("1234").КакЧисла(); + Ит.УстановитьИндекс(2); + Ожидаем.Что(Ит.ТекущийЭлемент()).Равно(3); КонецПроцедуры Процедура Тест_Продвинуть() Экспорт - ВызватьИсключение "Не реализовано";КонецПроцедуры + Ит = Итератор().ВзятьИз("12345").КакЧисла(); + Ит.Продвинуть(3); + Ожидаем.Что(Ит.ТекущийЭлемент()).Равно(4); +КонецПроцедуры Процедура Тест_ИндексКорректен() Экспорт - ВызватьИсключение "Не реализовано"; + Ит = Итератор().ВзятьИз("12345").КакЧисла(); + Ит.УстановитьИндекс(9); + Ожидаем.Что(Ит.ИндексКорректен()).ЭтоЛожь(); + Ит.СброситьПозицию(); + Ожидаем.Что(Ит.ИндексКорректен()).ЭтоИстина(); КонецПроцедуры Процедура Тест_Максимум() Экспорт - ВызватьИсключение "Не реализовано";КонецПроцедуры + Ожидаем.Что(Итератор() + .НачатьС(1) + .Добавить(10) + .Добавить(42) + .Добавить(40) + .Добавить(42) + .Максимум() + ).Равно(42); +КонецПроцедуры Процедура Тест_Минимум() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .НачатьС(42) + .Добавить(50) + .Добавить(42) + .Добавить(60) + .Добавить(50) + .Минимум() + ).Равно(42); КонецПроцедуры Процедура Тест_Сумма() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .НачатьС(10) + .Добавить(5) + .Добавить(20) + .Добавить(2) + .Добавить(5) + .Сумма() + ).Равно(42); КонецПроцедуры Процедура Тест_Произведение() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .ВзятьИз("237") + .КакЧисла() + .Произведение() + ).Равно(42); КонецПроцедуры Процедура Тест_Среднее() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .РазделитьСтроку("74,24,32,38", ",") + .КакЧисла() + .Среднее() + ).Равно(42); КонецПроцедуры Процедура Тест_Медиана() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .РазделитьСтроку("10,20,30,54,60,70", ",") + .КакЧисла() + .Медиана() + ).Равно(42); КонецПроцедуры Процедура Тест_КакСтроки() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .НачатьС(42) + .КакСтроки() + .Первый() + ).Равно("42"); КонецПроцедуры Процедура Тест_КакЧисла() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .НачатьС("42") + .КакЧисла() + .Первый() + ).Равно(42); КонецПроцедуры Процедура Тест_КакДаты() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .НачатьС("01.09.2022 00:00:00") + .КакДаты() + .Первый() + ).Равно(Дата(2022, 9, 1)); КонецПроцедуры Процедура Тест_КакБулево() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .НачатьС("") + .КакБулево() + .Первый() + ).ЭтоЛожь(); КонецПроцедуры Процедура Тест_ВерноВсе() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .ВзятьИз("111111") + .КакЧисла() + .КакБулево() + .ВерноВсе() + ).ЭтоИстина(); + + Ожидаем.Что(Итератор() + .ВзятьИз("111101") + .КакЧисла() + .КакБулево() + .ВерноВсе() + ).ЭтоЛожь(); КонецПроцедуры Процедура Тест_ВерноЛюбое() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .ВзятьИз("010100") + .КакЧисла() + .КакБулево() + .ВерноЛюбое() + ).ЭтоИстина(); КонецПроцедуры Процедура Тест_ВерноТолькоОдно() Экспорт - ВызватьИсключение "Не реализовано"; + Ожидаем.Что(Итератор() + .ВзятьИз("010100") + .КакЧисла() + .КакБулево() + .ВерноТолькоОдно() + ).ЭтоЛожь(); + + Ожидаем.Что(Итератор() + .ВзятьИз("000100") + .КакЧисла() + .КакБулево() + .ВерноТолькоОдно() + ).ЭтоИстина(); КонецПроцедуры