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

"Здравствуйте, помогите пожалуйста сделать вот такую штуку в 1С предприятие 7.7.

"Необходимо из документа Списание ОС, при его проведении, чтобы снималась(убиралась) галочка (флаг) УчтенЛизинг в Справочнике Основные Средства."

    В Свойствах Реквизита справочника ОС УчтенЛизинг указываю,что этот реквизит Периодический,ИзменяетсяДокументами и Ручное изменение
   На форму справочника кинул флажок "Учтено по лизингу". В свойствах этого флажка указал идентификатор УчтенЛизинг.

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

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

"Вот часть кода, при выполнении которой и должен убираться флажок УчтенЛизинг в справочнике Основные средства. Посмотрите пожалуйста может что не так тут???

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

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