Установка/Удаление флажка в справочнике из документа при его проведении 1С 7.7

"Здравствуйте, помогите пожалуйста сделать вот такую штуку в 1С предприятие 7.7.<br><br>"Необходимо из документа Списание ОС, при его проведении, чтобы снималась(убиралась) галочка (флаг) УчтенЛизинг в Справочнике Основные Средства."<br><br> В Свойствах Реквизита справочника ОС УчтенЛизинг указываю,что этот реквизит Периодический,ИзменяетсяДокументами и Ручное изменение<br> На форму справочника кинул флажок "Учтено по лизингу". В свойствах этого флажка указал идентификатор УчтенЛизинг.<br><br> В модуле Документа СписаниеОС прописываю<br>УстановитьРеквизитСправочника(ОсновноеСредство, "УчтенЛизинг", 0);<br>Подскажите пожалуйста правильно ли это (если да, то почему флажок в справочнике не убирается), или нет, если нет, то каким способом это можно сделать? И нужно ли в самом справочнике (в модуле), что нибудь прописывать.<br>"

Ошибку выдает или нет?<br>А записать измененный элемент не забыли?

"Вот часть кода, при выполнении которой и должен убираться флажок УчтенЛизинг в справочнике Основные средства. Посмотрите пожалуйста может что не так тут???<br><br>ДокПоступлениеОС = СоздатьОбъект ("Документ.ПоступлениеОС");<br>ДокПоступлениеОС.ВыбратьДокументы();<br>       <br>Пока ДокПоступлениеОС.ПолучитьДокумент() = 1 Цикл<br> ДокПоступлениеОС.ВыбратьСтроки();<br> Пока ДокПоступлениеОС.ПолучитьСтроку () = 1 Цикл<br>      Если ДокПоступлениеОС.ОбъектВнеоборотныхАктивов.ОсновныеСредства = +ОсновноеСредство Тогда<br>       Если ТипСписания = 3 Тогда<br>       Операция.НоваяПроводка ();<br>       Операция.НомерЖурнала = "ОС";<br>       Операция.СодержаниеПроводки = """";<br>       Операция.Дебет.Счет = СчетПоКоду ("76.8"); <br>       Операция.Дебет.Контрагенты = ДокПоступлениеОС.Контрагент;<br>       Операция.Дебет.Договоры = ДокПоступлениеОС.Договор;<br>       Операция.Кредит.Счет = СчетПоКоду ("08.11");<br>       Операция.Кредит.ОбъектыСтроительства = +ДокПоступлениеОС.ОбъектВнеоборотныхАктивов;<br>       Операция.Сумма = ДокПоступлениеОС.СуммаВыкупногоПлатежа - +ДокПоступлениеОС.НДСВыкупногоПлатежа; <br>            <br>       Операция.НоваяПроводка ();<br>       Операция.НомерЖурнала = "ПС";<br>       Операция.СодержаниеПроводки = "Списано НДС";<br>       Операция.Дебет.Счет = СчетПоКоду ("76.8");<br>       Операция.Дебет.Контрагенты = ДокПоступлениеОС.Контрагент;<br>       Операция.Дебет.Договоры = ДокПоступлениеОС.Договор;<br>       Операция.Кредит.Счет = СчетПоКоду ("19.11");<br>       Операция.Кредит.Контрагенты = ДокПоступлениеОС.Контрагент; <br>       Операция.Сумма = ДокПоступлениеОС.НДСВыкупногоПлатежа; <br>                        <br>       УстановитьРеквизитСправочника(ОсновноеСредство, "УчтенЛизинг", 0);<br>       СпрОС.Записать();<br>       КонецЕсли;<br>      КонецЕсли; <br> КонецЦикла;<br>КонецЦикла;"

"СпрОС.НайтиЭлемент(ДокПоступлениеОС.ОС); // или как там ОС называется в строке дока<br>УстановитьРеквизитСправочника(СпрОС.ТекущийЭлемент(), "УчтенЛизинг", 0);<br>СпрОС.Записать();<br>"