---

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

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