8.х не могу записать новое значение строки документа

Код:

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

КонецЦикла;

:unsure:

[warn=Читайте правила]1. Используйте тэг

Код:

2. Прочитайте, как [url="/index.php?act=announce&id=8"]правильно задавать вопрос[/url]
3. Оба этих требования висят в шапке темы - если вы не читаете, то что написано прямо перед глазами, как вы собираетесь вникать в ответ?[/warn]

Код:

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