[РЕШЕНО] Изменение переодических реквизитов справочника из документа

я выложил весь и оба варианта
аналогично так же, для этого не нужно быть телепатом, а всего лишь внимательно прочитать с самого начала тему и понять ее суть.
А еще проще, попробовать самому такой вариант чтобы понять "без телепатии", займет не более 5 минут, все используемые мной процедуры я написал выше.
Хочу добавить, что тема создана для тех программистов, которые сталкивались с такой проблемой и готовы поделиться ее решением, или есть интерес решить ее сообща, другим просьба не отвечать, чтобы не тратить впустую моё и ваше время...

Если будете продолжать в таком тоне, то никто не захочет Вам помочь.
Ваша проблема в невнятном изложении задачи.
Если нужно изменять периодический реквизит проведением документа, то используйте в модуле проведения метод, который указал БухУгодник с самого начала. Флаг "Изменяется документами" должен быть установлен. В истории будет дата, регистратор, строка, значение.
Если изменяете реквизит в других модулях, снимайте этот флаг. В истории будет долько дата и значение.
Пожалуйста.

Флаг стоял, снятии галочки не помогло.
Постараюсь повторить внятно в той последовательности в которой я делал:
В ТиС в справочнике Номенклатура создал периодический реквизит Закуп, с такой же длиной поля что и Цена в поступлении ТМЦ
далее в процедуре гл.модуля глПересчетТаблЧасти после ИначеЕсли ИмяРеквизита = "Сумма" Тогда
.............
Иначе
Конт.Цена = ?(Конт.Количество = 0, 0, Конт.Сумма/Конт.Количество);
добавил строки вызывающие из документа Поступление ТМЦ из поля Сумма, в случае изменения, например закуп был 100 за шт., а стало 250 за 2 шт., соответственно цена поменялась на 125 и хотелось чтобы в справочнике закуп изменился со 100 на 125
вариант 1:

Спойлер

Код:

Если Конт.Номенклатура.Закуп.Получить(ДатаДок) <> Конт.Цена  Тогда
Конт.Номенклатура.Закуп.Установить(ДатаДок,Конт.Цена);
Конт.Номенклатура.Закуп.Записать();
КонецЕсли;

вариант2:

Спойлер

Код:

Если Конт.Номенклатура.Закуп.Получить(ДатаДок) <> Конт.Цена  Тогда
СпрНом = СоздатьОбъект("Справочник.Номенклатура");
СпрНом.ВыбратьЭлементы();
Пока СпрНом.ПолучитьЭлемент() > 0 Цикл
Если СокрЛП(СпрНом) = СокрЛП(Конт.Номенклатура) Тогда
СпрНом.ТекущийЭлемент();
КонецЦикла;
СпрНом.ИспользоватьДату(ДатаДок);
СпрНом.Закуп = Конт.Цена;
СпрНом.Закуп.Записать(); 
КонецЕсли;

в итоге реквизит справочника Закуп не меняется на новый

Попробуйте так (рекомендация на основе РЕАЛЬНО РАБОТАЮЩЕГО кода в моей конфигурации)

Код:

Если Конт.Номенклатура.Закуп.Получить(ДатаДок) <> Конт.Цена  Тогда
СпрЦена =  Конт.Цена;
СпрНом = СоздатьОбъект("Справочник.Номенклатура");
Если СпрНом.НайтиЭлемент(Конт.Номенклатура) =1 Тогда
СпрНом.Закуп.Установить(ДатаДок,СпрЦена);
Иначе
Сообщить("Элемент не найден!");
КонецЕсли;

Флаг снят. У меня изменение происходит по кнопке, когда курсор на строке табличной части документа. Записывать элемент не нужно.

Ура, получилось!
Сердечно благодарен.