---

Процедура ОбработкаПроведения(Отказ, РежимПроведения)
	
	Для Каждого СтрокаСтудента Из СписокСтудентов Цикл
		
		НоваяЗапись = РегистрыСведений.СведенияОбУспеваемости.СоздатьМенеджерЗаписи();
		
		НоваяЗапись.Период         = Дата;
		НоваяЗапись.Студент        = СтрокаСтудента.Студент;
		НоваяЗапись.Дисциплина     = Дисциплина;
		НоваяЗапись.Преподаватель  = Преподаватель;
		
		// Переводим оценку в нижний регистр и убираем лишние пробелы
		ТекОценка = НРег(СокрЛП(СтрокаСтудента.ИтоговаяОценка));
		
		Если ТекОценка = "зачет" Тогда
			НоваяЗапись.Оценка = 5; // Зачет пишем в базу как 5
		ИначеЕсли ТекОценка = "незачет" Тогда
			НоваяЗапись.Оценка = 2; // Незачет пишем в базу как 2
		Иначе
			// Если вбита обычная цифра, конвертируем строку в число для регистра
			Попытка
				НоваяЗапись.Оценка = Число(СтрокаСтудента.ИтоговаяОценка);
			Исключение
				НоваяЗапись.Оценка = 0;
			КонецПопытки;
		КонецЕсли;
		
		// Теперь посещаемость берем из новой колонки документа, а не жестко "Присутствовал"
		НоваяЗапись.Посещаемость = СтрокаСтудента.Посещаемость;
		
		НоваяЗапись.Записать(Истина);
		
	КонецЦикла;

КонецПроцедуры