Вариант замена ссылок не предлагать

Справочника или элемента справочника?

Можно и нельзя одновременно

Средствами 1С нельзя

Средствами MSSQL можно

Хотя вру. Средствами 1С можно

И + это все для элемента справочника

2(5) м... Через ВИД на 8.3.5+?

(7) Неее, более просто

(0)А можно узнать обоснование такой необходимости?

2(8) рассказывай, потому что я например все время думал что нельзя

(10) Просто новый уникальный идентификатор подсовываешь элементу и все. Если про Элемент справочника речь идет.

(11) И как ты это сделаешь?

2(11) https://otvet.imgsmail.ru/download/9596067_7dbab580f45ca278c9133872d5ea0557_800.jpg

(11) а то, что в реквизитах и измерениях других объектов записан старый гуид - пофигу?

(14) ыыыы :) как понял он как раз не хочет замену делать в других объектах

а просто подменить уид который везде прописан на нужный

(15)+ но задачка довольно редкая, обычно дубли и нужно все равно менять в других

2(11) вообще пофигу, их можно поменять с помщь чуть допиленной бработки поиск и замена занчений. Но вот на само " подсовываешь элементу и все." я бы посмотрел

(9) Данные при обмене задублировались. Если делать через замену ссылок слишком дофига документов перепровести. Проще менять уид

(11) "подсовываешь элементу", простите, "в куда"?

Кому тут нужен был способ через 1С поменять UUID у элемента справочника? P.S. (18) тебе это не поможет

(18) При заменен ссылок - как раз именно "перепроводить" ничего не требуется. Перепроводить потребуется то, что из-за смены элементов сменило дальнейшее поведение, т.е. - не убежать никуда.

(18) при дублях не прокатит, сами то подумайте

ну подменили уид у элемента справочника, но этот справочник где раньше был теперь его там нету ))

2(20) мне, ну вернее давно не нужен был, но всегда интересно...

(23) Почту давай, экспромт выкину

задачка полезная только если нужно 2 элемента местами быстро поменять

но тогда не проще ли их переименовать?

octoberhammer<тут собачка>gmail<тут точка>com

будет работать на 8.2.19?

(0) Нет

(18) Рукалицо
Прочитай (14)

(24) А че, секретная технология? Тут выложить нельзя? Или хотя бы в общих чертах...

(27) Лови

(30) Это авторская разработка ))))

(20) Через 1С нельзя поменять гуид справочника.

(33) Ну можно, как оказывается

(32) а все остальные - народные)))

Ну ладно вам, стесняюсь я

(34) Ну да ну да. Идею в общем и целом обрисуешь?

(37) Почту давай

Ай, ладно, пофигу

(18) у меня есть обработка именно для такого :)

http://pastebin.ru/jAob0RTu

(38) [email protected]
Да можешь просто идею сказать.

(41) Это код этой обработки?

(43) Ага

ну вкратце


&НаСервере
Функция ВыполнитьЗаменуНаСервере()
    Результат = Истина;
    УстановитьПривилегированныйРежим(Истина);
    Попытка
        НачатьТранзакцию();
        
            СписокРезультата.Очистить();
            
            // ---------------------------------------------
            // регистрируем связь на новый элемент
            мСоответствияОбъектов = Новый Структура;
            
            // !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
            // хард кодинг, в будующем нужно будет исправить
            //
            мСоответствияОбъектов.Вставить("УзелИнформационнойБазы", ПланыОбмена.ОбменУПР_БухгалтерияПредприятия3.НайтиПоКоду("Р")); // !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
            //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
            
            
            мСоответствияОбъектов.Вставить("УникальныйИдентификаторПриемника", СтрЗаменить(Строка(ТекущееЗначение.УникальныйИдентификатор()), "-", "_"));
            мСоответствияОбъектов.Вставить("УникальныйИдентификаторИсточника", НовоеЗначение);
            мСоответствияОбъектов.Вставить("ТипПриемника", "");
            мСоответствияОбъектов.Вставить("ТипИсточника", "");
            
            РегистрыСведений.СоответствияОбъектовИнформационныхБаз.ДобавитьЗапись(мСоответствияОбъектов, Истина);
            
            мСоответствияОбъектов.Вставить("ТипПриемника", ОбщегоНазначения.СтроковоеПредставлениеТипа(ТипЗнч(ТекущееЗначение)));
            мСоответствияОбъектов.Вставить("ТипИсточника", ОбщегоНазначения.СтроковоеПредставлениеТипа(ТипЗнч(НовоеЗначение)));
            
            РегистрыСведений.СоответствияОбъектовИнформационныхБаз.ДобавитьЗапись(мСоответствияОбъектов, Истина);
            
            // ---------------------------------------------
            // заменяем все ссылки
            мСписок = Новый Массив;
            мСписок.Добавить(ТекущееЗначение);
            ТаблицаСсылок = НайтиПоСсылкам(мСписок);
            
            Для Каждого СтрокаТаблицы Из ТаблицаСсылок Цикл
                Если Метаданные.Справочники.Содержит(СтрокаТаблицы.Метаданные)
                    ИЛИ Метаданные.Документы.Содержит(СтрокаТаблицы.Метаданные) Тогда
                                  
                    мОбъект = СтрокаТаблицы.Данные.ПолучитьОбъект();
                    
                    Для Каждого Реквизит Из СтрокаТаблицы.Метаданные.СтандартныеРеквизиты Цикл
                        Если Реквизит.Имя = "Ссылка" Тогда
                            Продолжить;
                        КонецЕсли;
                        
                        Если мОбъект[Реквизит.Имя] = ТекущееЗначение Тогда
                            мОбъект[Реквизит.Имя] = НовоеЗначение;
                        КонецЕсли;
                    КонецЦикла;
                                  
                    Для Каждого Реквизит Из СтрокаТаблицы.Метаданные.Реквизиты Цикл
                        Если мОбъект[Реквизит.Имя] = ТекущееЗначение Тогда
                            мОбъект[Реквизит.Имя] = НовоеЗначение;
                        КонецЕсли;
                    КонецЦикла;
                    
                    Для Каждого ТабличнаяЧасть Из СтрокаТаблицы.Метаданные.ТабличныеЧасти Цикл
                        Для Каждого СтрокаТабличнойЧасти Из мОбъект[ТабличнаяЧасть.Имя] Цикл
                            Для Каждого Реквизит Из ТабличнаяЧасть.Реквизиты Цикл
                                Если СтрокаТабличнойЧасти[Реквизит.Имя] = ТекущееЗначение Тогда
                                    СтрокаТабличнойЧасти[Реквизит.Имя] = НовоеЗначение;
                                КонецЕсли;
                            КонецЦикла;
                        КонецЦикла;
                    КонецЦикла;
                                                                      
                    Если Метаданные.Документы.Содержит(СтрокаТаблицы.Метаданные) Тогда
                        Если  СокрЛП(СтрокаТаблицы.Метаданные.Проведение) = "Разрешить"
                            И ПерепроводитьДокументы
                            И мОбъект.Проведен Тогда
                            
                            мОбъект.Записать(РежимЗаписиДокумента.Проведение, РежимПроведенияДокумента.Неоперативный);
                        КонецЕсли;
                    КонецЕсли;
                        
                    мОбъект.ОбменДанными.Загрузка = Истина;
                    мОбъект.Записать();
                    
                ИначеЕсли Метаданные.РегистрыСведений.Содержит(СтрокаТаблицы.Метаданные) Тогда
                    Поля = Новый Массив;
                    
                    Для Каждого Измерение Из СтрокаТаблицы.Метаданные.Измерения Цикл
                        Поля.Добавить(Измерение.Имя);
                    КонецЦикла;
                    
                    Для Каждого Ресурс Из СтрокаТаблицы.Метаданные.Ресурсы Цикл
                        Поля.Добавить(Ресурс.Имя);
                    КонецЦикла;
                    
                    МенеджерЗаписи = РегистрыСведений[СтрокаТаблицы.Метаданные.Имя].СоздатьМенеджерЗаписи();    
                    ЗаполнитьЗначенияСвойств(МенеджерЗаписи, СтрокаТаблицы.Данные);
                    МенеджерЗаписи.Прочитать();
                    Для Каждого Поле Из Поля Цикл
                        Если МенеджерЗаписи[Поле] = ТекущееЗначение Тогда
                            МенеджерЗаписи[Поле] = НовоеЗначение;
                        КонецЕсли;
                    КонецЦикла;
                    МенеджерЗаписи.Записать();
                КонецЕсли;
            КонецЦикла;
            
            ТаблицаСсылок = НайтиПоСсылкам(мСписок);
            Для Каждого СтрокаТаблицы Из ТаблицаСсылок Цикл
                Если Метаданные.Документы.Содержит(СтрокаТаблицы.Метаданные) Тогда
                    Если СписокРезультата.НайтиПоЗначению(мОбъект.Ссылка) = Неопределено Тогда
                        СписокРезультата.Добавить(мОбъект.Ссылка);
                    КонецЕсли;
                КонецЕсли;
            КонецЦикла;
            
            ТекущееЗначение.ПолучитьОбъект().УстановитьПометкуУдаления(Истина);
            
        Если Тестирование Тогда     
            ОтменитьТранзакцию();
        Иначе
            ЗафиксироватьТранзакцию();
        КонецЕсли;
    Исключение
        Сообщить(ОписаниеОшибки());
        ОтменитьТранзакцию();
        СписокРезультата.Очистить();
        Результат = Ложь;        
    КонецПопытки;
    УстановитьПривилегированныйРежим(Ложь);
    
    Возврат Результат;
КонецФункции

(44) Что это за хрень-то?
Маленький кусочек обработки поиска и замены значений что ли?
Где там подмена гуида ссылки-то?

2(39)не, ну здрасьте, и в каком там месте подмена УИДа у существующего элемента справочника?
Старый удаляется, новый создается... у существующего ссылка не меняется

Возможно в релизах старше 8.3.5, которые позволяют писать в ВИД можно поменять UID. Но экспериментально - я не пробовал.

(46)(47) Что есть подмена гуида? Изменение у записи Гуида? А чем не устраивает копирование записи и удаление старой? Вариант? Вариант!!! И безо всяких ВИДов и доступов к скулю на прямую

+(49) Задача решена

2(49) Тогда держи еще 101-й вариант:

лайфхак-код - это сериализовать нужный элемент; в тексте, который получился заменить UID, оригинальный элемент удалить;
десериализовать элемент из ХМЛ-текста (в котором уже новый UID). Но все равно это будет новый 'tktvyn справочника. а не старый

(49) Включаем мозг и читаем (0)

преимущество - вообще не нужно будет запорачиваться на проверку и перебор реквизитов и табличных частей.

Запустить выгрузку в идентичную конфигурацию, получить XML, открыть XML как текст, заменить все неправильные guidы на правильные. Загрузить в пустую базу. Если в результате замены не полчится неуникальных записей, считай повезло.

(52) "Вариант замена ссылок не предлагать" - я не заменяю ссылки

Ладно, я так и думал. Стоило один вариант решения предложить - навалились все... По сути одно и то же действие, единственный момент - старая запись тухнет, новая создается. И тут все с XML полезли и т.д. Суть задачи остается исходной. И такое решение имеет место быть

И первый это решение предложил Я!!!

(55) А что ты делаешь? Ты можешь в двух словах сказать, что ты делаешь, а не давать код?

(56) Чем по вашему отличие новой записи от старой? :)

(57) это решение уже десять лет гуляет по инету. Сомневаюсь, что это ты первый предложил.

(55) Ты просто создаешь копию существующего элемента справочника, который потом удаляется. После выполнения этого кода будут битые ссылки в реквизитах, ссылающихся на этот элемент.
Это же банальщина...

(0) Колитесь, что наделали, что так нужен Гуид?

(48) А что за нововведение с ВИДом?

(62) читай (18)

2(63) Через ВИД теперь писать можно. Все это знают.

(56) а ловко ты их :)
там на почту еще не навязчивое предложение увеличить длину полоски не приходило?))

(66) Что ловко-то? :))
— Здравствуйте, у меня болит живот. У вас есть лекарство от живота?
— Да есть, выпейте аскорбинку.
— Но позвольте, аскорбинка не помогает от живота.
— Ладно, я так и думал. Стоило предложить аскорбинку - навалились все... По сути одно и то же действие, прием таблетки. И тут все с животами полезли и т.д. Суть задачи остается исходной. И такое решение имеет место быть. И первый это решение предложил Я!!!

да, ладно, нормальное решение. просто я думал что какой-то взаправдашний, а не читерский способ. Но это уже проблемы моих ожиданий

(68) Да какой способ-то? (61) прав? Если прав, то что _вообще_ было предложено-то? Создание дубля элемента справочника? И это как-то решает проблему ТС?

(68) нормальное, я ж не спорю :) а почту таки проверь :))

проверил, но у меня почта на Маке, а там текст в кракозябликах...

Я вот тут http://catalog.mista.ru/public/317245/ вполне успешно меняю. НО!!!
1. Только на базах SQL.
2. На ваш страх/риск (у меня не глючит), т.е. потом ни чем не кидать, делаем бекапы

(72) Уточнение: Только на базах MSSQL

(71) черд, сорвалась реклама, ушел покупатель :(

(74) Пошли ему картинку, что ты теряешься-то? :))

(72) Уточнение 2: Ссылки в проводках меняет только 3-й алгоритм

(72) Прикольно. Вставлял ссылку на инфостарт, а получился каталог миста. Волшебник что-то с инфостартом не поделил?

(77) Скорее наоборот, партнерство.

всю тему прочитал, а гуид менять так и не научили (

(79) Ты уверен, что все прочитал? (72) в этой обработке я меняю. Прямыми запросами к MSSQL. При желании текст можно почитать. Все в модуле объекта.