Изменение периодического реквизита.

[Danil]

Есть справочник "основные средства", в нём периодический реквизит "СчетЗатрат".Нужно сделать обработку, которая изменить один счет на другой с изменением даты.Можно небольшой пример кода, если кто знает 

[JEKA]

Установить(<?>,);
Синтаксис:
Установить(<Дата>,<Значение>)
Назначение:
Установить значение периодического реквизита справочника на заданную дату.
Параметры:
<Дата> - выражение со значением требуемой даты;
<Значение> - выражение, содержащее устанавливаемое значение периодического реквизита справочника.
Замечание:
Метод  можно использовать только для периодических реквизитов справочника и если для справочника еще не применялся метод ИспользоватьДату. Метод  можно использовать только для объектов-справочников, созданных функцией СоздатьОбъект.

или

УстановитьРеквизитСправочника(<?>,,,,,,);
Синтаксис:
УстановитьРеквизитСправочника(<ЭлементСправочника>,<НазваниеРеквизита>,<Значение>,<ДатаУстановки>,<ИмяТипа>,<Длина>,<Точность>)
Назначение:
Записать значение периодического реквизита справочника с привязкой к проведению документа.
Параметры:
<ЭлементСправочника> - элемент справочника, в который будет запись;
<НазваниеРеквизита> - название периодического реквизита справочника;
<Значение> - новое значение периодического реквизита;
<ДатаУстановки> - дата установки нового значения периодического реквизита. Дата установки имеет смысл только для не оперативных документов.
<ИмяТипа> - необязательный параметр. Строковое выражение - название  типа данных (или Вид субконто);
<Длина> - необязательный параметр. Число - длина числового или строкового значения;
<Точность> - необязательный параметр. Число знаков после десятичной точки.
Замечание:
Параметры <ИмяТипа>, <Длина> и <Точность> следует указывать при установке значения периодического реквизита справочника, имеющего неопределенный тип.
Замечание:
Метод доступен только в Модуле документа в предопределенной процедуре ОбработкаПроведения.

[Danil]

Нашёл простой вариант, но он отлично работает.

Процедура Сформировать()
   СпрОс = СоздатьОбъект("Справочник.ОсновныеСредства");
   СпрОс.ВыбратьЭлементы();
   сообщить("Идёт обработка!!!");
   Пока СпрОС.ПолучитьЭлемент() = 1 Цикл
      СпрОс.СчетЗатрат.Установить(ТекущаяДата(),СчетПоКоду("7210"));
   КонецЦикла;
   сообщить("Обработка завершена!!!");
КонецПроцедуры