Так как участились случаи переименования Контрагентов, разрабатываем  ИсториюНаименования по Контрагенту:
1. Создала регистр сведений ИсторияНаименованийКонтрагентов;
периодичность 1 год;
Измерение: Контарагент

ресурс: Дата

реквизиты:  Наименование(СправочникСсылкаКонтрагенты)
как связать со сравочником контрагенты?

анастасия пол мужской сейчас это модно ...

Анастасия нормальный пацан )

Не... женский)
А версионирование эт как?

Anastasiy пример переименования контрагента

конфигурация какая?

УПП 1.2

из 8.1 перевели

косяки полезли...

(26) тогда версионирование включить для контрагентов

Настройка программы - Версионирование

спасибо

так у контра что меняется и как ????

(31) Регламент напишите и права на справочник определённому кругу дайте....что б левые не лезли, а будут лезть-по рукам =)))

Включила версионирование по контагентам, посмотрим...

А регламент напишу)))

(33) +100500

Буквально недавно сделал в УПП группу пользователей "Адекватные". Пользователи, не входящие в эту группу, не могут менять критичные реквизиты контрагентов.

)))Тоже вариант))Только меняют название сами контрагенты))

(37) сами контрагенты меняют себя в базе? О.о

(zakk555) Меняется название

Anastasiy? не так, (zakk555) не получится, получится zak555

А что вы пристали? с фоткой?
Анастасий - мужик,
Анастасия - не мужик.

Нет, не в базе=))) В базе наменяли до меня =) Мне бы теперь отследить все эти изменения :)))

Зачем вам версионирование? В подписке запретите всем кроме особо довереных спецюзеров редактировать уже существующих контрагентов.
С версионировнаием вы быдите иметь быстрый поиск причин гемора а с этим у вас его не возникнет

Анастасия - человек :))) А фотку опубликую после работы:))

эээ анастасия - человек - это аналог австралийского "оно"?

(43) +100500 есть уже готовый код работающий, продам не дорого))))

(41) в слове Анастасий ударение на какую букву?

(46) отвали! это моя анастасия - я её сам буду доить и не по демпенговым ценам!!!

Всем спасибо =)))м... правила форума?

(48) ничо по швам не треснет? ))))

(39) пример приведи смены названия

(51) например при изменении формы собственности или при перерегистрации.

(50) и между швами тоже не треснет!

Зачем РС?

Делаешь один справочник ИсторияИзмененийОбъектов.

Делаешь подписку на изменение контрагента, в обработчике пишешь:

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

Всё.

(54) ещё 1 апологет демпинга!

(0) и часто у вас контрагенты явки меняют? второго контрагента не судьба создать? изобретаете велосипед с квадратными колесами

Вечер... фотки нету...

Где фотка?

вы после (54) на фотку рассчитываете? Какие фотки при таком демпенге!!!

))Будет фортка не бузи))) Устала забегалась)))

Бэкап делела из-за версионирования, какой-то косяк с полными правами вылез, а вроде всё норм - буду искать)))

(60) Подсказка: Фотку можно из контакта или одноклассников загрузить...

Я туда не хожу)))

Некогда, кому надо и так знают как найти)))

Слушайте, мелькала тема с ошибкой " Не Полные Права" у кого-нить есть ссылка?

(54) РС например затем, чтоб не плодить лишние ссылки на элемент Контрагенты

периодичность 1 год;
Измерение: Контарагент
ресурс: Дата
реквизиты:  Наименование(СправочникСсылкаКонтрагенты)

жесть

(66) какие ещё "лишние ссылки", ты о чомвопще?

(0) У меня сделано. Один регистр сведений, одна подписка, одна функция получения основных реквизитов контрагентов.
В печатных формах собственной разработки выводится наименование и нужные реквизиты согласно истории контрагента.
Смена ИНН является причиной создания нового контрагента.

(Lama12) Подскажи, функция для вызова: Общий модуль.Глобальный модуль:


Функция ИсторияИзмененийКонтрагентовВоВремени(АктуальноеНаименованиеПолное, ЭлементКонтрагентов) Экспорт

Отбор = Новый Структура("Наименование", ЭлементКонтрагентов);
ЗначениеРесурсов = РегистрыСведений.ИзменениеКонтрагентовВоВремени.ПолучитьПоследнее(АктульноеНаименованиеПолное,Отбор);
ВозвратЗначенияРесурсов.ИзменениеКонтрагентовВоВремени;

КонецФункции

(0)Подробная инструкция:-)

http://ravepoint.narod.ru/aticles/tricks/methods/keephistory.htm

Спасибо, посмотрю))) А я через регист сведений делаю)

(72)Каждый страдает извращениями в меру своей фантазии:-)

Спасибо))

нормальной фотки так и нет..

(Рэйв) А процедуру в общий модуль или объекта?

А чем эта плоха?))(фотка)

(76) Да да, фоточка-то так, чисто для галочки....

Со стороны Сервера или Клиента?

там фотка мужика какого-то. или трансвестита. выложите нормальную фотку

Ну, не знаю, нужна ли Галочке моя фотка...)))))

(75)Вообщето писалось про модуль объекта, но я потом перенес в общий модуль, чтобы проще было подключать новые объекты к этому делу.В ПередЗаписью() потом просто ставил вызов с передачей обънета

А, желательно в неглиже?-))

*объекта

(82) желательно - в полный рост, хотя бы

(81)к (86)

А вызов как выглядел?

к (76)   :-)  блин

(86)ИмяОбщегоМодуля.ЗаписьИстории(Этотобъект)

Спасибо:-)

Хм... История, РежимЗаписи, глТекущий пользователь - переменная неопределена.. И что с этим делать?

С Историей разобралась - мой косяк))) А вот - глТекущийПользователь всё также неопределен...

м,,, (ЭтотОбъект.глТекущийПользователь);
а вот что с режимом записи...

фото

(91):-)

Сделай в начале
глТекущийПользователь=ИмяПользователя();

И да...  Фото бы не помешало:-)

(91)
Заголовок процедуры долен выглядеть вот так

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)

Ну, вроде получилось, поглядим)))

Не работает... Я проделываю это для справочника Контрагенты - при нажатии кнопки История - ничего...

(68) Если не видишь разницы между использованием РС и подчинённого справочника - тогда ни о чём, забей

Правда Ссылка в модуле формыСписка, я заменила на :"ЭлементыФормы.СправочникСписок.ТекущиеДанные.Ссылка"

А на тебя так часто забивали?...

(99) Леди, Вы ещё не сообразили, что число в скобках означает номер сообщения, на которое даётся ответ? Про "забить" было не Вам, не отвлекайтесь

P.S. Сотко!

)) Сорри)
Только, всё равно не работает)

Похоже напутала с макетом..Что-то он не работает

(102)Терпение и труд все перетрут:-)
Не забываем, что написано было для документов и точно следуем инструкции.

+(103)Если переделывать для справочнико, надо чуть переделать

))) Пробую))Если есть что подсказать  - спасибо, не откажусь.

При нажатии на кнрпку История - тишина, что-то не так...)

(106):-)  Может сначала надо записать какие то изменения?

При переименовании контрагента они ведь и так записываются?Версионирование off/

(108)да если прописала в коде.

Наименование и Код - это как Дата и Номер для документов. Это не реквизиты и их изменения надо отслеживать отдельно. Посмотри как это сделано для дата, номер

Если ЗначениеЗаполнено(Ссылка) Тогда  //если объект  уже был записан раньше

     

      //дата и номер не являются реквизитами, поэтому их отследим отдельно

      Если Ссылка.Наименование<>ЭтотОбъект.Наименование  Тогда

            НовСтр=тПроверка.Добавить();

            НовСтр.Автор=Строка(глТекущийПользователь);

            НовСтр.Реквизит="Наименование";

            НовСтр.СтароеЗначение=Строка(Ссылка.Наименование);

            НовСтр.НовоеЗначение=Строка(ЭтотОбъект.Наименование);

            НовСтр.Время=Строка(ТекущаяДата());

      КонецЕсли;  

      Если Ссылка.Код<>ЭтотОбъект.Код  Тогда

            НовСтр=тПроверка.Добавить();

            НовСтр.Автор=Строка(глТекущийПользователь);

            НовСтр.Реквизит="Код";

            НовСтр.СтароеЗначение=Строка(Ссылка.Код);

            НовСтр.НовоеЗначение=Строка(ЭтотОбъект.Код);

            НовСтр.Время=Строка(ТекущаяДата());

      КонецЕсли;

Заменить блок из Даты и Номера , такими вот?

Кстати, на Ссылка тоже писал, переменная неопознана <<?>>Ссылка

"ЭлементыФормы.СправочникСписок.ТекущиеДанные.Ссылка" Для кнопки

(113)При чем тут СправочникСписок?...Чет ты вообще куда то не в ту степь:-)

Иначе не пропускает конфигуратор: <<?>>Ссылка

Тебе историю надо записывать в Модуле Элемента. ПередЗаписью(). Там Ссылка вполне доступна.  Каким боком ты в списке оказалась?

В форме объекта в любое удобное место помещаем кнопку «История», по которой будет выводиться в виде отчета история изменений

Я добавил пункт в стандартные «Действия» объекта( у Контрагентов форма списка самая удобная)

(117)  Ну если дотянешься до ссылки  и дораюотаешь вызов печати истории оттуда, но почему бы и нет:-)

(имхо) Зачем автор изобретает то, что уже есть в конфигурации? Можно взять "за основу" типовые алгоритмы работы с периодическими реквизитами (например - фамилия/имя/отчество у физического лица)...

Как раз это и делала, когда отвлеклась на уже готовое решение)))