-
Notifications
You must be signed in to change notification settings - Fork 108
/
Copy pathmessage-output.os
32 lines (22 loc) · 1.63 KB
/
message-output.os
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Перем юТест;
////////////////////////////////////////////////////////////////////
// Программный интерфейс
Функция ПолучитьСписокТестов(ЮнитТестирование) Экспорт
юТест = ЮнитТестирование;
ВсеТесты = Новый Массив;
ВсеТесты.Добавить("ТестДолжен_ПроверитьЧтоСообщитьПринимаетВторойАргумент");
Возврат ВсеТесты;
КонецФункции
Процедура ТестДолжен_ПроверитьЧтоСообщитьПринимаетВторойАргумент() Экспорт
Сообщить("---------------------------------------------------------------------------");
Сообщить(" Проверка корректной передачи второго параметра процедуре 'Сообщить' ");
Сообщить("---------------------------------------------------------------------------");
Сообщить("Обычное");
Сообщить("БезСтатуса", СтатусСообщения.БезСтатуса);
Сообщить("Обычное", СтатусСообщения.Обычное);
Сообщить("Информация", СтатусСообщения.Информация);
Сообщить("Внимание", СтатусСообщения.Внимание);
Сообщить("Важное", СтатусСообщения.Важное);
Сообщить("ОченьВажное", СтатусСообщения.ОченьВажное);
КонецПроцедуры