Форум Программирование Общие вопросы программирования (Dev)

Создание элемента справочника с нужным GUID, в COM-соединение

1. 43 11.01.17 16:59 Сейчас в теме
Здравствуйте!
Платформа 8.3 (8.3.9.1850).
Есть COM-соединение из базы приёмника (БП), к базе источника (БИ).
Так же есть односторонний перенос справочников Проекты, который идёт по Уникальному идентификатору (из БИ в БП).
После того, как в БП не был найден элемент, необходимо создать его с нужным Уникальным идентификатором.
Т.е. что-то типа: 

НовыйЭлемент = Справочники.Проекты.СоздатьЭлемент();
НовыйЭлемент.УстановитьСсылкуНового(Ссылка_Которой_НЕТ);
НовыйЭлемент.Записать();


Но с COM-соединением ссылку не получить.
Вопрос: как создать элемент справочника с нужным GUID, имея только сам GUID (без каких-либо ссылок)?
+ – Ответить
Найденные решения
2. spacecraft 11.01.17 17:10 Сейчас в теме
(1) 
СтрокаGUID = "a763cfbb-f94f-4c67-8e13-0e96a3a7f353";
НовыйGUID = Новый УникальныйИдентификатор(СтрокаGUID);
Спр = Справочники.Проекты.СоздатьЭлемент();
Спр.УстановитьСсылкуНового(Справочники.Проекты.ПолучитьСсылку(НовыйGUID));
Спр.Записать();
Mahon83; +1 – Ответить
Остальные ответы
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
2. spacecraft 11.01.17 17:10 Сейчас в теме
(1) 
СтрокаGUID = "a763cfbb-f94f-4c67-8e13-0e96a3a7f353";
НовыйGUID = Новый УникальныйИдентификатор(СтрокаGUID);
Спр = Справочники.Проекты.СоздатьЭлемент();
Спр.УстановитьСсылкуНового(Справочники.Проекты.ПолучитьСсылку(НовыйGUID));
Спр.Записать();
Mahon83; +1 – Ответить
3. buriZa 43 11.01.17 17:16 Сейчас в теме
(2) и он подставляет туда битую ссылку и все счастливы.
Спасибо!
+ – Ответить
4. spacecraft 11.01.17 17:25 Сейчас в теме
(3) что значит битую ссылку? Конкретней.
+ – Ответить
5. spacecraft 11.01.17 18:46 Сейчас в теме
(3) ну так как? Попробовали? Битая ссылка не подставилась?
+ – Ответить
6. kasper076 77 12.01.17 11:30 Сейчас в теме
(1)
//Получаем COMConnector
COMConnector = Новый COMObject("V82.COMConnector");
//Устанавливаем соединение с базой
Connection = COMConnector.Connect("File=""C:\1CBase""";Usr=""login"";Pwd=""password"";");
//Находим справочник в подключенной базе
СправочникСсылкаКом = Connection.Справочники.ИмяСправочника.НайтиПоКоду("00000001");
//Получаем УИД справочника из подключенной базы
УИД = Connection.String(СправочникСсылкаКом.UUID());
//Создаем новый элемент справочника
СправочникОбъект = Справочники.ИмяСправочника.СоздатьЭлемент();
//Получаем ссылку по УИД
СправочникСсылка = Справочники.ИмяСправочника.ПолучитьСсылку(Новый УникальныйИдентификатор(УИД));
//Устанавливаем полученную ссылку созданному элементу
СправочникОбъект.УстановитьСсылкуНового(СправочникСсылка);
//Заполняем ревизиты
СправочникОбъект.УстановитьНовыйКод();
//Записываем
СправочникОбъект.Записать();
Показать
user693240_abramovskaya; +1 – Ответить
7. user693240_abramovskaya 02.12.19 11:08 Сейчас в теме 
//Находим справочник в подключенной базе
		СправочникСсылкаКом = Соединение.Справочники.Сотрудники.НайтиПоКоду("0000-01236"); // для примера, ищем Сотрудника  по коду
		
		//Получаем УИД справочника из подключенной базы
		//УИД = Соединение.String(СправочникСсылкаКом.UUID());
		СтрУИД = Соединение.String("УникальныйИдентификатор", СправочникСсылкаКом.UUID());
		
		//Получаем ссылку по УИД
		УИД = Новый УникальныйИдентификатор(СтрУИД); 
		СправочникСсылка = Справочники.Сотрудники.ПолучитьСсылку(УИД);
		
		Если ОбщегоНазначения.СсылкаСуществует(СправочникСсылка) Тогда
			СправочникОбъект = СправочникСсылка.ПолучитьОбъект();
		Иначе
			//Создаем новый элемент справочника
			СправочникОбъект = Справочники.Сотрудники.СоздатьЭлемент();
			СправочникОбъект.ОбменДанными.Загрузка = Истина; // без этой строчки УИД не присваивается
			//Устанавливаем полученную ссылку созданному элементу
			СправочникОбъект.УстановитьСсылкуНового(СправочникСсылка);
		КонецЕсли;
		
		//Заполняем ревизиты
		СправочникОбъект.Код = СправочникСсылкаКом.Code;
		СправочникОбъект.Наименование = СправочникСсылкаКом.Description;
		//СправочникОбъект.ФизическоеЛицо = Справочники.Сотрудники.НайтиПоКоду("00-0000902").ФизическоеЛицо;
		СправочникОбъект.ФизическоеЛицо = Справочники.Сотрудники.НайтиПоНаименованию("Емельянов Николай Дмитриевич").ФизическоеЛицо;
		

		//Записываем
		Попытка
			СправочникОбъект.Записать();
		Исключение
			Сообщить(ОписаниеОшибки());
		КонецПопытки;
Показать
f003and; +1 – Ответить
Оставьте свое сообщение
Вопросы с вознаграждением
Открыть форму записи регистра с параметром из формы справочника  0.35 $m Dev v8
Запретить печатать документ "Товарный чек", пока статус Чека ККМ не будет "Чек пробит", а сам Чек ККМ не будет проведен.  1 $m Dev УТ11 v8
Помогите добавить в запрос поле с выборкой со счета 90.03  0.87 $m Dev
Почему 27 счёт не попадает в поле счёт учёта ?  0.27 $m Dev БГУ
Необходимо в вузе разработать информационную систему для отчетности преподавателей по выполнению научных показателей  2 $m Управление персоналом Обучение, бизнес-тренинг, курсы Автоматизация Аналитика УУ
Помогите, пожалуйста, разобраться с выводом среднего в отчёте СКД  0.43 $m Dev УТ11 v8 ИТ-компания 1С Программист
УТ 10.3 изменяет количетсво товара в чеке ККМ при продаже БезПередачиТовара  0.4 $m Dev
Ошибка СУБД при входе в базу 1С  0.55 $m Admin СУБД PostgreSQL
Работа с файлами на мобильном клиенте  0.3 $m MobileDev v8::Mobile
Грейды программистов 1с  10 $m Общие вопросы управления
MDF SQL ищу битый файл для теста DataNumen SQL Recovery  1 $m Utils
Как получить значение имея НавигационнуюСсылку к полю  0.25 $m Dev
Мобильный клиент. Android. Обрезает строку ввода от сканера  0.35 $m MobileDev
Не приходит письмо от apple после ввода карты для оплаты.  5 $m MobileDev
Прикрепленная подпись и БСП. Возможно ли?  1 $m БСП 8.3.14
заглушка на запуск (управляемое приложение)  1 $m Dev
Сложный расчет ЗП в бухгалтерии (Нужен совет по реализации)  2 $m Зарплата БП3.0 v8
Перетаскивание в списке справочника  0.15 $m Dev
загрузка базы из dt  2 $m Admin
Списание задолженности в валюте управленческого учета  1 $m Финансы УТ11