|
1 | 1 | Перем ПроверяемоеЗначение; |
| 2 | +Перем ИмяМетода; |
| 3 | +Перем ПараметрыМетода; |
2 | 4 | Перем ДопСообщениеОшибки; |
3 | 5 | Перем ФлагОтрицания; |
| 6 | +Перем ФлагОтрицанияДляСообщения; |
4 | 7 | Перем СтатусыРезультатаТестирования; |
5 | 8 |
|
6 | | -Функция Что(ПроверяемоеЗначениеПараметр, Сообщение = "") Экспорт |
| 9 | +Функция Что(Знач ПроверяемоеЗначениеПараметр, Знач Сообщение = "") Экспорт |
7 | 10 | ПроверяемоеЗначение = ПроверяемоеЗначениеПараметр; |
8 | 11 | ДопСообщениеОшибки = Сообщение; |
9 | 12 | ФлагОтрицания = Ложь; |
|
17 | 20 | Возврат ЭтотОбъект; |
18 | 21 | КонецФункции |
19 | 22 |
|
| 23 | +Функция ЭтоНе() Экспорт |
| 24 | + Возврат Не_(); |
| 25 | +КонецФункции |
| 26 | + |
| 27 | +Функция Метод(Знач ИмяМетодаПараметр, Знач ПараметрыМетодаПараметр = Неопределено) Экспорт |
| 28 | + ИмяМетода = ИмяМетодаПараметр; |
| 29 | + ПараметрыМетода = ПараметрыМетодаПараметр; |
| 30 | + |
| 31 | + Возврат ЭтотОбъект; |
| 32 | +КонецФункции |
| 33 | + |
20 | 34 | Функция ЭтоИстина() Экспорт |
21 | | - Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение) Тогда |
| 35 | + Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение = Истина) Тогда |
22 | 36 | СообщениеОшибки = СформироватьСообщениеОбОшибке(Формат(ПроверяемоеЗначение, "БЛ=Ложь; БИ=Истина"), "является ИСТИНОЙ."); |
23 | 37 | ВызватьОшибкуПроверки(СообщениеОшибки); |
24 | 38 | КонецЕсли; |
25 | 39 |
|
26 | 40 | Возврат ЭтотОбъект; |
27 | 41 | КонецФункции |
28 | 42 |
|
| 43 | +Функция ЕстьИстина() Экспорт |
| 44 | + Возврат ЭтоИстина(); |
| 45 | +КонецФункции |
| 46 | + |
29 | 47 | Функция ЭтоЛожь() Экспорт |
30 | | - Если Не ЛогическоеВыражениеВерно(Не ПроверяемоеЗначение) Тогда |
| 48 | + Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение = Ложь) Тогда |
31 | 49 | СообщениеОшибки = СформироватьСообщениеОбОшибке(Формат(ПроверяемоеЗначение, "БЛ=Ложь; БИ=Истина"), "является ЛОЖЬЮ."); |
32 | 50 | ВызватьОшибкуПроверки(СообщениеОшибки); |
33 | 51 | КонецЕсли; |
34 | 52 |
|
35 | 53 | Возврат ЭтотОбъект; |
36 | 54 | КонецФункции |
37 | 55 |
|
38 | | -Функция Равно(ОжидаемоеЗначение) Экспорт |
| 56 | +Функция ЕстьЛожь() Экспорт |
| 57 | + Возврат ЭтоЛожь(); |
| 58 | +КонецФункции |
| 59 | + |
| 60 | +Функция Равно(Знач ОжидаемоеЗначение) Экспорт |
39 | 61 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение = ОжидаемоеЗначение) Тогда |
40 | 62 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "РАВНО (" + ОжидаемоеЗначение + ")."); |
41 | 63 | ВызватьОшибкуПроверки(СообщениеОшибки); |
|
44 | 66 | Возврат ЭтотОбъект; |
45 | 67 | КонецФункции |
46 | 68 |
|
47 | | -Функция Больше(МеньшееЗначение) Экспорт |
| 69 | +Функция Больше(Знач МеньшееЗначение) Экспорт |
48 | 70 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение > МеньшееЗначение) Тогда |
49 | 71 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "БОЛЬШЕ (" + МеньшееЗначение + ")."); |
50 | 72 | ВызватьОшибкуПроверки(СообщениеОшибки); |
|
53 | 75 | Возврат ЭтотОбъект; |
54 | 76 | КонецФункции |
55 | 77 |
|
56 | | -Функция БольшеИлиРавно(МеньшееИлиРавноеЗначение) Экспорт |
| 78 | +Функция БольшеИлиРавно(Знач МеньшееИлиРавноеЗначение) Экспорт |
57 | 79 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение >= МеньшееИлиРавноеЗначение) Тогда |
58 | 80 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "БОЛЬШЕ ИЛИ РАВНО (" + МеньшееИлиРавноеЗначение + ")."); |
59 | 81 | ВызватьОшибкуПроверки(СообщениеОшибки); |
|
62 | 84 | Возврат ЭтотОбъект; |
63 | 85 | КонецФункции |
64 | 86 |
|
65 | | -Функция Минимум(МинимальноеЗначение) Экспорт |
| 87 | +Функция Минимум(Знач МинимальноеЗначение) Экспорт |
66 | 88 | Возврат БольшеИлиРавно(МинимальноеЗначение); |
67 | 89 | КонецФункции |
68 | 90 |
|
69 | | -Функция МеньшеИлиРавно(БольшееИлиРавноеЗначение) Экспорт |
| 91 | +Функция МеньшеИлиРавно(Знач БольшееИлиРавноеЗначение) Экспорт |
70 | 92 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение <= БольшееИлиРавноеЗначение) Тогда |
71 | 93 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "МЕНЬШЕ ИЛИ РАВНО (" + БольшееИлиРавноеЗначение + ")."); |
72 | 94 | ВызватьОшибкуПроверки(СообщениеОшибки); |
|
75 | 97 | Возврат ЭтотОбъект; |
76 | 98 | КонецФункции |
77 | 99 |
|
78 | | -Функция Максимум(МаксимальноеЗначение) Экспорт |
| 100 | +Функция Максимум(Знач МаксимальноеЗначение) Экспорт |
79 | 101 | Возврат МеньшеИлиРавно(МаксимальноеЗначение); |
80 | 102 | КонецФункции |
81 | 103 |
|
82 | | -Функция Меньше(БольшееЗначение) Экспорт |
| 104 | +Функция Меньше(Знач БольшееЗначение) Экспорт |
83 | 105 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение < БольшееЗначение) Тогда |
84 | 106 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "МЕНЬШЕ (" + БольшееЗначение + ")."); |
85 | 107 | ВызватьОшибкуПроверки(СообщениеОшибки); |
|
115 | 137 | Возврат ЭтотОбъект; |
116 | 138 | КонецФункции |
117 | 139 |
|
| 140 | +Функция ЕстьНеопределено() Экспорт |
| 141 | + Возврат ЭтоНеопределено(); |
| 142 | +КонецФункции |
| 143 | + |
118 | 144 | Функция ЭтоNull() Экспорт |
119 | 145 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение = Null) Тогда |
120 | 146 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "является NULL."); |
|
124 | 150 | Возврат ЭтотОбъект; |
125 | 151 | КонецФункции |
126 | 152 |
|
127 | | -Функция ИмеетТип(ТипИлиИмяТипа) Экспорт |
| 153 | +Функция ЕстьNull() Экспорт |
| 154 | + Возврат ЭтоNull(); |
| 155 | +КонецФункции |
| 156 | + |
| 157 | +Функция ИмеетТип(Знач ТипИлиИмяТипа) Экспорт |
128 | 158 | ОжидаемыйТип = ?(ТипЗнч(ТипИлиИмяТипа) = Тип("Строка"), Тип(ТипИлиИмяТипа), ТипИлиИмяТипа); |
129 | 159 | ТипПроверяемогоЗначения = ТипЗнч(ПроверяемоеЗначение); |
130 | 160 | Если Не ЛогическоеВыражениеВерно(ТипПроверяемогоЗначения = ОжидаемыйТип) Тогда |
|
135 | 165 | Возврат ЭтотОбъект; |
136 | 166 | КонецФункции |
137 | 167 |
|
138 | | -Функция Между(НачальноеЗначение, КонечноеЗначение) Экспорт |
| 168 | +Функция Между(Знач НачальноеЗначение, Знач КонечноеЗначение) Экспорт |
139 | 169 | Если Не ЛогическоеВыражениеВерно(ПроверяемоеЗначение >= НачальноеЗначение И ПроверяемоеЗначение <= КонечноеЗначение) Тогда |
140 | 170 | СообщениеОшибки = СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, "МЕЖДУ (" + НачальноеЗначение + ") и (" + КонечноеЗначение + ")."); |
141 | 171 | ВызватьОшибкуПроверки(СообщениеОшибки); |
|
144 | 174 | Возврат ЭтотОбъект; |
145 | 175 | КонецФункции |
146 | 176 |
|
147 | | -Функция Содержит(ИскомоеЗначение) Экспорт |
| 177 | +Функция Содержит(Знач ИскомоеЗначение) Экспорт |
148 | 178 | Перем ИскомоеЗначениеНайдено; |
149 | 179 |
|
150 | 180 | ТипПроверяемоегоЗначения = ТипЗнч(ПроверяемоеЗначение); |
|
177 | 207 | Возврат ЭтотОбъект; |
178 | 208 | КонецФункции |
179 | 209 |
|
180 | | -Функция ИмеетДлину(ОжидаемаяДлина) Экспорт |
| 210 | +Функция ИмеетДлину(Знач ОжидаемаяДлина) Экспорт |
181 | 211 | Перем ФактическаяДлина; |
182 | 212 |
|
183 | 213 | ТипПроверяемоегоЗначения = ТипЗнч(ПроверяемоеЗначение); |
|
205 | 235 | Возврат ЭтотОбъект; |
206 | 236 | КонецФункции |
207 | 237 |
|
| 238 | +Функция ВыбрасываетИсключение(Знач ФрагментИсключения = "") Экспорт |
| 239 | + Контекст = ПроверяемоеЗначение; |
| 240 | + СтрокаПараметры = ""; |
| 241 | + Если ТипЗнч(ПараметрыМетода) = Тип("Массив") Тогда |
| 242 | + Для Сч = 0 По ПараметрыМетода.Количество() - 1 Цикл |
| 243 | + СтрокаПараметры = СтрокаПараметры + ",ПараметрыМетода[" + Сч + "]"; |
| 244 | + КонецЦикла; |
| 245 | + СтрокаПараметры = Сред(СтрокаПараметры, 2); |
| 246 | + КонецЕсли; |
| 247 | + СтрокаДляВыполнения = "Контекст." + ИмяМетода + "(" + СтрокаПараметры + ")"; |
| 248 | + |
| 249 | + ИсключениеВозникло = Ложь; |
| 250 | + Попытка |
| 251 | + Выполнить(СтрокаДляВыполнения); |
| 252 | + Исключение |
| 253 | + ИсключениеВозникло = Истина; |
| 254 | + ТекстИсключения = ОписаниеОшибки(); |
| 255 | + КонецПопытки; |
| 256 | + |
| 257 | + Если Не ЛогическоеВыражениеВерно(ИсключениеВозникло И Найти(ТекстИсключения, ФрагментИсключения) > 0) Тогда |
| 258 | + СообщениеОшибки = "Ожидали, что " + СтрокаДляВыполнения |
| 259 | + + ?(ФлагОтрицания, " НЕ ", " ") |
| 260 | + + "ВЫБРОСИТ ИСКЛЮЧЕНИЕ" |
| 261 | + + ?(ЗначениеЗаполнено(ФрагментИсключения), " СОДЕРЖАЩЕЕ ТЕКСТ <" + ФрагментИсключения + ">, а был текст <" + ТекстИсключения + ">.", ""); |
| 262 | + ВызватьОшибкуПроверки(СообщениеОшибки); |
| 263 | + КонецЕсли; |
| 264 | + |
| 265 | + Возврат ЭтотОбъект; |
| 266 | +КонецФункции |
| 267 | + |
208 | 268 | // { Helpers |
209 | | -Функция ФорматДСО(ДопСообщениеОшибки) |
| 269 | +Функция ФорматДСО(Знач ДопСообщениеОшибки) |
210 | 270 | Если ДопСообщениеОшибки = "" Тогда |
211 | 271 | Возврат ""; |
212 | 272 | КонецЕсли; |
213 | 273 |
|
214 | 274 | Возврат Символы.ПС + ДопСообщениеОшибки; |
215 | 275 | КонецФункции |
216 | 276 |
|
217 | | -Процедура ВызватьОшибкуПроверки(СообщениеОшибки) |
| 277 | +Процедура ВызватьОшибкуПроверки(Знач СообщениеОшибки) |
218 | 278 | Префикс = "["+ СтатусыРезультатаТестирования.ОшибкаПроверки + "]"; |
219 | 279 | ВызватьИсключение Префикс + " " + СообщениеОшибки; |
220 | 280 | КонецПроцедуры |
221 | 281 |
|
222 | | -Функция ЛогическоеВыражениеВерно(ЛогическоеВыражение) |
| 282 | +Функция ЛогическоеВыражениеВерно(Знач ЛогическоеВыражение) |
223 | 283 | Результат = ФлагОтрицания <> ЛогическоеВыражение; |
| 284 | + ФлагОтрицанияДляСообщения = ФлагОтрицания; |
224 | 285 | ФлагОтрицания = Ложь; |
225 | 286 |
|
226 | 287 | Возврат Результат; |
227 | 288 | КонецФункции |
228 | 289 |
|
229 | | -Функция СформироватьСообщениеОбОшибке(ПроверяемоеЗначение, Ожидание) |
230 | | - Возврат "Ожидали, что проверяемое значение (" + ПроверяемоеЗначение + ")" + ?(ФлагОтрицания, " НЕ ", " ") + Ожидание + ФорматДСО(ДопСообщениеОшибки); |
| 290 | +Функция СформироватьСообщениеОбОшибке(Знач ПроверяемоеЗначение, Знач Ожидание) |
| 291 | + Возврат "Ожидали, что проверяемое значение (" + ПроверяемоеЗначение + ")" + ?(ФлагОтрицанияДляСообщения, " НЕ ", " ") + Ожидание + ФорматДСО(ДопСообщениеОшибки); |
231 | 292 | КонецФункции |
232 | 293 | // } Helpers |
233 | 294 |
|
|
0 commit comments