---

&НаСервереБезКонтекста
Функция ПолучитьСтудентовГруппы(ВыбраннаяГруппа)
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	Студенты.Ссылка КАК СсылкаСтудента
		|ИЗ
		|	Справочник.Студенты КАК Студенты
		|ГДЕ
		|	Студенты.Группа = &Группа
		|	И Студенты.Активен = ИСТИНА";
	
	Запрос.УстановитьПараметр("Группа", ВыбраннаяГруппа);
	
	Результат = Запрос.Выполнить();
	Массив = Новый Массив;
	
	Если Не Результат.Пустой() Тогда
		Выборка = Результат.Выбрать();
		// Исправлено на русский вариант для платформы 1С
		Пока Выборка.Следующий() Цикл 
			Массив.Добавить(Выборка.СсылкаСтудента);
		КонецЦикла;
	КонецЕсли;
	
	Возврат Массив;
	
КонецФункции

&НаКлиенте
Процедура ЗаполнитьСтудентов(Команда)
	
	Если Не ЗначениеЗаполнено(Объект.Группа) Тогда
		ПоказатьПредупреждение(, "Сначала выберите группу в шапке журнала!");
		Возврат;
	КонецЕсли;
	
	МассивСтудентов = ПолучитьСтудентовГруппы(Объект.Группа);
	
	Объект.СеткаЖурнала.Очистить();
	
	Для Каждого ТекСтудент Из МассивСтудентов Цикл
		НоваяСтрока = Объект.SvetkaZhurnala.Добавить(); // Если ТЧ называется СеткаЖурнала, напиши Объект.СеткаЖурнала.Добавить();
		НоваяСтрока.Студент = ТекСтудент;
		НоваяСтрока.Посещаемость = ПредопределенноеЗначение("Перечисление.ВидыПосещаемости.Присутствовал");
	КонецЦикла;
	
КонецПроцедуры