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

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

1. 44 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 44 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").ФизическоеЛицо;
		СправочникОбъект.ФизическоеЛицо = Справочники.Сотрудники.НайтиПоНаименованию("Емельянов Николай Дмитриевич").ФизическоеЛицо;
		

		//Записываем
		Попытка
			СправочникОбъект.Записать();
		Исключение
			Сообщить(ОписаниеОшибки());
		КонецПопытки;
Показать
vi329; f003and; +2 – Ответить
Оставьте свое сообщение
Вопросы с вознаграждением
Система компоновки данных (медленный вывод в коллекцию значений при РСВ)  1 $m Dev УПП1 v8::СКД
Отчёт СКД. Данные выводятся не в те ту строку.  0.9 $m Dev УТ11 v8 ИТ-компания 1С
Путевые листы в БП 3.0  0.5 $m TMS БП3.0
Тонкая настройка СКД (добавление строки)  1.49 $m Dev
Доработать запрос отчета в СКД для регистра сведений Цены Номенклатуры  0.5 $m Dev
Как выгрузить список новых созданных контрагентов (создаются программно)  1 $m Dev
Синхронизация УТ 11.4 и БП 3.0, справочник Виды номенклатуры  0.09 $m Обмен БП3.0 УТ11
Курсовые разницы в РБ по 159 указу  2 $m БУ 1cv8.cf БП1.6 Беларусь 1С БУ Бухгалтер Программист Вопрос
Доступ в 1С по web-сервису. Внутренний и внешний сервера.  0.44 $m Admin v8
Не отображается общая параметризуемая команда в списке глобальных команд на форме элемента  0.1 $m Dev
Проблема при возврате по безналу бп 3.0  1 $m БУ
Нужна помощь в доработке обработки СБИС  5 $m Dev УТ10
Не указано значение параметра "Тип кода маркировки"  0.15 $m Dev УТ11 Маркировка
Резервы отпусков разница БУ и НУ  1 $m Зарплата ЗУП3.x
Не удалось заблокировать таблицу _NODE15215  0.5 $m Dev ДО УТ11
УТ 10.3. Маркировка. ОСНО + ПСН  3 $m Торговля УТ10 Розничная и сетевая торговля (FMCG) НДС ПСН (патентная система налогообложения) Вопрос
Проверка при обмене  0.16 $m Dev
Не переносится номенклатура в 1с Бухгалтерию  1 $m Торговля Розница
УТ 11.4 автоматическое создание документа "Установка цен номенклатуры" при проведение "Приобретения товаров и услуг"  1 $m Dev
Не проходит обмен по расписанию УТ 10.3 - БП 3.0 (Базовая)  1 $m Dev