Обработка ошибок 1с пример

Содержание:

1.      Обработка исключительной ситуации

2.      Совершаем ошибку в 1С 8.3

3.      А что еще можно делать с результатом попытки?

4.      А ваши транзакции то здесь при чём?  

1.      Обработка исключительной ситуации

—        Приветствую, Амиго! Ты, как я понял, пришёл на мою лекцию по физическим основам изготовления термитных пирамидок для заряда аппаратов гиперболоидной конструкции? Нет? А зачем тогда?

—        Здравствуйте, профессор. Сегодня мы собирались разобрать конструкцию «Попытка-Исключение».

—        А… Это… Ну, тогда вот:

—        Кажется, понятно. А можно примеров добавить?

—        Ох уж эти юные роботы, всегда хотят практики. С примерами это будет выглядеть вот так:

Ох, извини, это для старых баз. На новых космолётах с прошивкой выше 8.1 есть более удобный способ узнать код ошибки.  

2.      Совершаем ошибку в 1С 8.3

Ты и сам можешь попробовать. Главное – придумать ошибку в 1С 8.3. Самая простая ошибка – это разделить что-нибудь на нуль или на, как это говорят на современном сленге, ноль.

В ответ получим:

Нажимаем на кнопку «Подробно…» и видим: Деление на 0 {NudlsProff_Расширение.NudlsProff_ФормаОшибок.Форма(96)}: Результат = 1/0

Добавляем нашей красоты:

Теперь пользователю ВИДНО, что случилось. И ПОНЯТНО, что с этим делать.

Описание=’Деление на 0′

ИмяМодуля=’NudlsProff_Расширение.NudlsProff_ФормаОшибок.Форма’

НомерСтроки=99

ИсходнаяСтрока=’        Результат = 1 / 0;’

Позвоните Профессору Нудлсупо тел+7 (495) 125-23-77

и ознакомьтесь с теорией деления на ноль

https://elementy.ru/email/1530320/Pochemu_nelzya_delit_na_nol     

3.      А что еще можно делать с результатом попытки?

—        А что ещё мы можем делать в результате с попыткой?

—        Мы можем обработать попытку в попытке.

По своей сути Попытка-Исключение – это отлов исключительной ситуации. Ситуации, которая может произойти. Возможно, даже и не по вине юного робота. Робот же должен учесть все возможные ситуации при написании кода и обработать их. Но наш мир не идеален и даже программы не всегда работают идеально. Именно тогда мы и должны проанализировать возможные последствия и понять, что для нас важнее: чтобы код выполнился до конца или вызвать прерывание работы ошибочного кусочка кода, но дать пользователю исправить ситуацию и продолжить работу.

—        Профессор, Вы опять забыли про примеры.

—        Ах, да, конечно. Например, мы записывали файл на диск. Пользователь, конечно, выбрал папку для записи файла, но случайно удалил её во время работы программы. Вся наша программа рухнет из-за невнимательности.

Нельзя просто обернуть код в попытку и обезопасить себя от последствий. Также неправильно и маскировать ошибку общими фразами – дальнейший поиск и исправление этого бага вызовет уйму вопросов. Нужно показать максимально информативное сообщение пользователю, чтобы он передал его в службу поддержки. Всё-же, исключительная ситуация – это баг, который нужно исправлять.  

4.      А ваши транзакции то здесь при чем?

—        То есть если в программе что-то может пойти не так, например, при записи файла на диск, обработке web-hook, работе с API, синхронизации с другими базами, записи изменений в справочник или документ, для безопасности я должен обернуть потенциально опасный кусочек кода в Попытку-Исключение, и тем самым пользователь сможет продолжить работу, а мы всегда будем знать, где именно и почему возникает ошибка?

—        Да, Амиго, все верно! Кстати, поскольку уж речь зашла о записи объектов баз данных, очень важно не забывать правильно закрывать ваши транзакции:

Специалист компании «Кодерлайн» 

Алексей Зятнин

Попытка
  //Некоторые действия
Исключение
  //Действия при ошибке
КонецПопытки;

Показ сообщения об ошибке

Для вывода сообщения об ошибке нужно использовать функцию ОписаниеОшибки();

Пример:

Попытка
    НаборЗаписей.Записать(Истина);
Исключение
    Сообщить(ОписаниеОшибки());
КонецПопытки;

Для выдачи структуированной информации об ошибке в версии 8.2 служит функция ИнформацияОбОшибке().

    Инфо = ИнформацияОбОшибке();
    Сообщить("Описание='" + Инфо.Описание + "'");
    Сообщить("ИмяМодуля='" + Инфо.ИмяМодуля + "'");
    Сообщить("НомерСтроки=" + Инфо.НомерСтроки);
    Сообщить("ИсходнаяСтрока='" + Инфо.ИсходнаяСтрока + "'");

Вызов исключения

В 1С:Предприятие 7.7 оператор ВызватьИсключение; служит для повторного вызова исключения из блока Исключение-КонецПопытки. Для вызова из других частей программы можно использовать внешнюю компоненту или деление на 0, например а=1/0.

В 1С:Предприятие версии 8 есть оператор ВызватьИсключение:

ВызватьИсключение "Текст сообщения об ошибке";

Конструкция Попытка-Исключение-КонецПопытки

Если в модуле на встроенном языке 1С будет ошибка времени выполнения, например деление на 0, то выполнение модуля будет прервано и на экран будет выведено сообщение об ошибке:

&НаКлиенте
Процедура Исключение(Команда)
	а = 5/0;
КонецПроцедуры 

Ошибки времени выполнения (run time) — это ошибки во время выполнения модуля. Еще есть ошибки времени компиляции (compile time) — это ошибки во время компиляции модуля.

Для обработки ошибок времени выполнения можно использовать исключения:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		а = 5/0;
	Исключение
		Сообщить("Нельзя делить на 0");
	КонецПопытки;	
КонецПроцедуры

Если в коде после ключевого слова Попытка будет ошибка времени выполнения, то выполнение программы перейдет на первую строку после ключевого слова Исключение. Если ошибок не будет, то код после ключевого слова Исключение даже не будет выполнен.

Конструкцию Попытка-Исключение-КонецПопытки нельзя использовать для обработки ошибок времени компиляции. Такой модуль все равно не будет скомпилирован:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		а = 5/0;+ //здесь ошибка
	Исключение
		Сообщить("Нельзя делить на 0");
	КонецПопытки;	
КонецПроцедуры

Вызовы процедур и функций внутри попытки тоже будут обработаны:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		ПоделитьНаНоль();
	Исключение
		Сообщить("Нельзя делить на 0");
	КонецПопытки;	
КонецПроцедуры

&НаКлиенте
Процедура ПоделитьНаНоль()
	а = 5/0;	
КонецПроцедуры

В 1С используется единый механизм для обработки всех исключений, как исключений платформы, так и исключений конфигураций. То есть при возникновении ошибки времени выполнения платформа начинает искать ближайший оператор Исключение, относящийся к данному блоку кода. Если ошибка произошла на строке, который не был обернут в конструкцию Попытка-Исключение, но после этой строки есть такая конструкция — ошибка не будет обработана этой конструкцией. Если такой оператор найден, то ошибка будет обработана им. Если не найден, то ошибка обрабатывается платформой, выполнение модуля останавливается.

Оператор ВызватьИсключение

Попытки могут быть вложенными:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		ПоделитьНаНоль();
	Исключение
		Сообщить("Нельзя делить на 0");
	КонецПопытки;	
КонецПроцедуры

&НаКлиенте
Процедура ПоделитьНаНоль()
	Попытка
		а = 5/0;	
	Исключение
		Сообщить("Ошибка в процедуре");	
	КонецПопытки;	
КонецПроцедуры

Если выполнить данный код, то выйдет сообщение «Ошибка в процедуре», то есть код из первого исключения даже не будет выполнен. Чтобы выполнялся код из вышестоящего исключения нужно использовать оператор ВызватьИсключение:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		ПоделитьНаНоль();
	Исключение
		Сообщить("Нельзя делить на 0");
	КонецПопытки;	
КонецПроцедуры

&НаКлиенте
Процедура ПоделитьНаНоль()
	Попытка
		а = 5/0;	
	Исключение
		ВызватьИсключение;	
	КонецПопытки;	
КонецПроцедуры

В этом случае исключение будет проброшено вверх по стеку и обработано первым блоком Попытка-Исключение.

Можно вызывать исключение из кода оператором ВызватьИсключение. Выполнение кода будет прервано, на экране будет сообщение с текстом исключения:

&НаКлиенте
Процедура Исключение(Команда)
	ВызватьИсключение "Исключение вызванное из кода";	
КонецПроцедуры

Информация об ошибке

В 1С нельзя использовать несколько блоков Исключений для разных типов ошибки. Какая бы ошибка не произошла всегда будет вызываться код после оператора Исключение. Для получения описания ошибки можно использовать метод ОписаниеОшибки():

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		а = 4/0;	
	Исключение
		Сообщить(ОписаниеОшибки());
	КонецПопытки;	
КонецПроцедуры

Пример с другим типом ошибки:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		а = ПредопределенноеЗначение("Справочник.Склады.ОсновнойСклад");
		//при этом такого предопределенного элемента нет
	Исключение
		Сообщить(ОписаниеОшибки());
	КонецПопытки;	
КонецПроцедуры

Но правильней использовать метод ИнформацияОбОшибке(), который вернет объект типа ИнформацияОбОшибке:

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		а = 4/0;
	Исключение
		Инф = ИнформацияОбОшибке();
		//объект типа ИнформацияОбОшибке передаем 
		//в метод КраткоеПредставлениеОшибки()
		//для вывода сообщения на экран
		Сообщить(КраткоеПредставлениеОшибки(Инф));
	КонецПопытки;	
КонецПроцедуры

Метод КраткоеПредставлениеОшибки() выведет более понятное для обычного пользователя сообщение: «Деление на 0» вместо «{Обработка.Обработка1.Форма.Форма.Форма(5)}: Деление на 0».

Для более полного описания ошибки можно использовать метод ПодробноеПредставлениеОшибки():

&НаКлиенте
Процедура Исключение(Команда)
	Попытка
		а = 4/0;
	Исключение
		Инф = ИнформацияОбОшибке();
		//объект типа ИнформацияОбОшибке передаем 
		//в метод ПодробноеПредставлениеОшибки()
		//для вывода подробного сообщения на экран
		Сообщить(ПодробноеПредставлениеОшибки(Инф));
	КонецПопытки;	
КонецПроцедуры

Но правильней пользователю сообщать кратное представление, а в журнал регистрации записывать подробное представление ошибки:

&НаКлиенте
Процедура Исключение(Команда)
	//ЗаписьЖурналаРегистрации доступно только на сервере
	Команда1НаСервере();	
КонецПроцедуры

&НаСервере
Процедура Команда1НаСервере()
	Попытка
		а = 4/0;
	Исключение
		Инф = ИнформацияОбОшибке();
		//сообщим пользователю
		Сообщить(КраткоеПредставлениеОшибки(Инф));
		//и запишем в журнал регистрации
		ПодробнаяОшибка = ПодробноеПредставлениеОшибки(Инф);
		ЗаписьЖурналаРегистрации("Ошибка", 
					  УровеньЖурналаРегистрации.Ошибка,,, 
					  ПодробнаяОшибка);
	КонецПопытки;	
КонецПроцедуры

Приведение к нужному типу

При загрузке числовых данных из файла (например из текстового документа) в 1С часто применяется такой прием для получения числа из строки:

&НаКлиенте
Процедура Исключение(Команда)
	//это строка с числом, допустим она была получена из файла
	ЧислоСтрокой = "123.45";
	Попытка	
		//пробуем перевести ее в число
		ЧислоЧислом = Число(ЧислоСтрокой);
	Исключение
		//если не получилось
		ЧислоЧислом = 0;
	КонецПопытки;
	
	//дальше работаем как с числом
	ЧислоЧислом = ЧислоЧислом + 1;
	Сообщить(ЧислоЧислом);
КонецПроцедуры

С точки зрения производительности это не совсем корректно. Правильно использовать объект ОписаниеТипов:

&НаКлиенте
Процедура Исключение(Команда)
	//это строка с числом, допустим она была получена из файла
	ЧислоСтрокой = "123.45";
	
	//создаем объект типа ОписаниеТипов с типом Число 
	ОписаниеТипа = Новый ОписаниеТипов("Число");
	//приводим строку к числу, если не получится вернет значение по умолчанию
	//для числа это 0
	ЧислоЧислом = ОписаниеТипа.ПривестиЗначение(ЧислоСтрокой);
	
	//дальше работаем как с числом
	ЧислоЧислом = ЧислоЧислом + 1;
	Сообщить(ЧислоЧислом);
КонецПроцедуры

Смотрите также:
Электронный учебник по по программированию в 1С
Рекомендации по изучению программирования 1С с нуля
Программное решение для сдачи и подготовки к экзаменам
Программирование в 1С 8.3 с нуля — краткий самоучитель
Комплексная подготовка программистов 1С:Предприятие 8.2
Сайты с уроками программирования и со справочниками
Youtube-каналы с уроками программирования
Сайты для обучения программированию
Лекции и уроки