Запрос данных и запись в реквизит справочника

ШтатноеРасп = Справочники.ШтатноеРасписание;	
	Для Каждого М из ДанныеМ цикл
		Запрос = Новый Запрос;
	    Запрос.Текст = 
		
		"ВЫБРАТЬ РАЗЛИЧНЫЕ
		|	ЗанятостьПозицийШтатногоРасписанияСрезПоследних.Сотрудник.Код КАК СотрудникКод,
		|	ЗанятостьПозицийШтатногоРасписанияСрезПоследних.ПозицияШтатногоРасписания.Ссылка КАК ПозШтатРаспСсылка,
		|	ШтатноеРасписание.Ссылка КАК Ссылка
		|ИЗ
		|	РегистрСведений.ЗанятостьПозицийШтатногоРасписания.СрезПоследних(&ТД, ) КАК ЗанятостьПозицийШтатногоРасписанияСрезПоследних
		|		ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ШтатноеРасписание КАК ШтатноеРасписание
		|		ПО ЗанятостьПозицийШтатногоРасписанияСрезПоследних.ПозицияШтатногоРасписания = ШтатноеРасписание.Ссылка
		|ГДЕ
		|	ЗанятостьПозицийШтатногоРасписанияСрезПоследних.Сотрудник.Код = &Код
		|	И ЗанятостьПозицийШтатногоРасписанияСрезПоследних.ВидЗанятостиПозиции <> &ВидЗанятости";
						
		Запрос.УстановитьПараметр("ТД", ТекущаяДата());
		Запрос.УстановитьПараметр("Код", М[0]);
		Запрос.УстановитьПараметр("ВидЗанятости", Перечисления.ВидыЗанятостиПозицийШтатногоРасписания.Свободна);
		
		РезультатЗапроса = Запрос.Выполнить();
		ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
		Если ВыборкаДетальныеЗаписи.Следующий() тогда
			ШтатРаспОбъект = ШтатноеРасп.ПолучитьОбъект();
			ШтатРаспОбъект.Ключ = М[1]; 
                        ШтатноеРасп.Записать();
		КонецЕсли;