Ошибка при установке значения xdto

Уже более 10 000 компаний работают
в облачной 1С от 42Clouds

— Консультация по 1С Бесплатно!

— Поддержка 24/7 по техническим вопросам: в чате, по телефону, по почте

— Все типовые конфигурации онлайн, доступ через RDP, Remote App, Web

В данной статье я свел воедино все, что на данный момент знаю о механизме XDTO. Материал носит достаточно ознакомительный характер, и предназначен в первую очередь для начинающих разработчиков. Рассмотрены основные составные части механизма XDTO, примеры использования XDTO и базовые приемы работы.

Содержание

XSD схемы и пакеты XDTO. Пространства имен

XML схемы описывают структуру XML-документа на языке XSD – XML Schema Definition Language.
Схемы XSD предназначены для решения следующих задач:

• Перечисление элементов в документе XML и проверка наличия в документе только объявленных элементов.
• Объявление и определение атрибутов, модифицирующих элементы документа.
• Определение иерархических отношений между элементами – какой является родительским, а какой – дочерним.
• Определение состояний и моделей содержания для элементов и атрибутов.
• Задание типов данных.
• Установка значений по умолчанию.
• Поддержка использования пространств имен.

Стандартные пакеты XDTO

&НаСервере
Процедура ВывестиВсеПакетыНаСервере()
	Для Каждого Пакет Из ФабрикаXDTO.Пакеты Цикл
		Сообщить(Пакет.URIПространстваИмен);
	КонецЦикла;
КонецПроцедуры

&НаКлиенте
Процедура ВывестиВсеПакеты(Команда)
	ВывестиВсеПакетыНаСервере();
КонецПроцедуры

Создание, импорт и экспорт схем XSD

На первом уровне иерархии могут располагаться следующие элементы пакета:

• Директивы импорта – перечень директив импорта – в них указываются внешние пространства имен, которые используются в данном пакете. При работе с данным пакетом XDTO средствами встроенного языка данный перечень директив импорта будет доступен в виде объекта КоллекцияПакетовXDTO, содержащегося в свойстве Зависимости пакета XDTO. Важно! Если указать пространство имен, не определенное в данной конфигурации (т.е. отсутствующее как среди стандартных пакетов, так и среди пакетов, созданных в конфигураторе), сохранить конфигурацию будет нельзя, т.к. платформа выдаст сообщение об ошибке: “Ошибка проверки модели XDTO: xdto-package-3.3 пакет: test

  Импортируемый пакет типов ‘<тут имя пространства имен>’ не определен“

• Типы значений – перечень типов значений XDTO, которые содержит пакет XDTO.

• Типы объектов – перечень типов объектов XDTO, которые содержит пакет XDTO

• Свойства – перечень свойств пакета XDTO. Представляет собой объявления объектов/значений, которые могут являться корневыми элементами документов XML, принадлежащих URI пространству имен пакета XDTO.

Типы значений XDTO

Объект ТипЗначенияXDTO используется для описания типов простых значений, в которых не могут быть выделены отдельные составляющие. Примерами простых значений являются разнообразные строки, числа, даты и т. п. Ссылки на объекты также относятся к простым значениям. Для указания ссылки в качестве типа значения XDTO следует указать базовый тип AnyRef (http://v8.1c.ru/8.1/data/enterprise), а также задать свойство “Вариант” – “Атомарный”.

• Имя – имя типа значения XDTO;

• Базовый тип – базовый тип для данного типа значения XDTO. Базовые типы могут наследоваться от других типов значений XDTO, а самым верхним типом в иерархии наследования является тип anySimpleType

• Вариант – вариант простого типа (атомарный тип, список, объединение).

• Тип элемента – тип элемента списка в случае, когда тип значения XDTO определяется списком. При этом все фасеты и свойство Типы объединения должны быть пустыми;

• Типы объединения – список типов, образующих объединение в случае, когда тип значения XDTO определяется объединением. Объединяться могут только типы значений XDTO. При этом все фасеты и свойство Тип Элемента должны быть пустыми;

• Длина – фасет длины. Длина задается в единицах длины, которые зависят от типа значения. Для типа string и anyURI это будет количество символов в строке, а для двоичных данных (hexBinary и base64Binary) длина содержит количество байт.

• Минимальная длина – фасет минимальной длины;

• Максимальная длина – фасет максимальной длины;

• Пробельные символы – фасет пробельных символов; позволяет описать ограничение – допустимы ли в строке любые пробельные символы, такие как неразрывный пробел, перенос строки, или табуляция;

• Минимум, включающий границу – фасет минимума, включающего границу; Любое значение данного типа должно быть больше указанному значению;

• Минимум, не включающий границу – фасет минимума, не включающего границу. Любое значение данного типа должно быть больше указанного значения;

• Максимум, включающий границу – фасет максимума, включающего границу;

• Максимум, не включающий границу – фасет максимума, не включающего границу;

• Общее количество цифр – фасет общего количества цифр;

• Количество цифр дробной части – фасет количества цифр дробной части.s

Типы объектов XDTO

• Открытый – признак, является ли тип объекта XDTO открытым. Данное свойство показывает, может ли экземпляр объекта XDTO содержать свойства, не определенные в его типе. Это соответствует реализации модели open content;

• Абстрактный – признак, является ли тип объекта XDTO абстрактным; Абстрактные типы используются для реализации наследования и расширения дочерними типами;

• Смешанный – показывает, имеет ли соответствующий объект XDTO смешанное содержание (mixed content в схеме XML). Если значение свойства Истина, то значение Последовательный обязательно равно Истина, так как смешанное содержание невозможно смоделировать без применения последовательности XDTO;

• Упорядоченный – признак, является ли порядок следования элементов, представляющих значения свойств, строго соответствующим порядку следования свойств в типе объекта XDTO. Если Ложь, то на входе порядок следования элементов XML не контролируется, а на выходе определяется порядком следования свойств, если только свойство Последовательный не имеет значение Истина;

• Последовательный – показывает, содержит ли экземпляр соответствующего объекта XDTO последовательность XDTO. Истина в тех случаях, когда порядок следования вложенных элементов XML не может однозначно определяться порядком следования свойств в типе или соответствующий объект XDTO имеет смешанное содержание. Последовательность XDTO позволяет задать в явном виде порядок следования элементов, как они будут представлены в документе XML. Для объектов типов, у которых свойство Ложь, порядок вложенных элементов соответствует порядку следования свойств.

Свойства XDTO

• Имя – имя свойства. Следует обеспечить уникальность имени свойства в пределах описания одного типа объекта XDTO.

• Ссылка – ссылка на корневое определения свойств пакета

• Тип – тип свойства. Может быть как типом значения XDTO, так и типом объекта XDTO;

• Минимальное количество – минимальное количество значений свойства. Минимальное количество значений свойства может принимать значения <= 0;

• Максимальное количество – свойство типа объекта XDTO может быть определено как содержащее одно или множество значений. Свойство считается содержащим одно значение, если Максимальное количество = 1. Для значений свойства > 1 считается, что свойство может принимать множество значений. Такое свойство в структуре объекта моделируется списком. Свойство Максимальное количество показывает максимальное количество значений свойства. Максимальное количество > 1 может быть задано только для свойств, представленных в виде элемента XML. Значение -1 соответствует unbounded в схеме XML, т.е. количество значений этого свойства может быть не ограниченным. Например, мы создаем свойство, описывающее табличную часть Товары. В этом случае мы можем указать максимальное количество -1, т.к. заранее не знаем, сколько строк будет в табличной части. Можно указать тип значения, соответствующий описанию содержимого одной строки ТЧ, либо создать описание типов (см. ниже)

• Возможно пустое – показывает, может ли свойство принимать неопределенное значение. Истина может быть определено только для свойств с формой представления Элемент. Если Максимальное количество > 1, неопределенное значение является допустимым для элемента списка значений свойства;

• Фиксированное – указывает, является ли значение свойства фиксированным. Истина – само фиксированное значение можно получить через свойство По умолчанию;

• По умолчанию –  значение свойства по умолчанию. Тип значения по умолчанию может быть только типом значения XDTO. При этом, данное значение должно быть совместимо с типом свойства (быть того же типа, что и тип свойства или же унаследованного типа). При создании объекта XDTO свойство, если оно допускает единственное значение, принимает значение по умолчанию. Для свойств с множеством значений список значения пуст, независимо от того, определено или нет значение по умолчанию;

• Форма – форма представления свойства в XML. Это может быть Атрибут, Элемент или Текст. Если формой представления является Атрибут или Текст, то значение свойства Максимальное количество не может быть больше 1. Если свойство принимает значение Текст, то значение свойства Минимальное количество также должно быть равным 1. У одного типа только одно свойство может иметь форму представления Текст, при этом все остальные свойства должны иметь форму представления Атрибут;

• Локальное имя – локальное имя, используемое для представления свойства. Для свойств с формой представления Текст – пустая строка.

Определения типов XDTO

Директивы импорта XDTO

В рамках создаваемого пакета XDTO (без использования директивы импорта) можно использовать:

• типы, определенные только в данном пакете (использующие текущее пространство имен)
• типы, стандартные для XML (пространство имен http://www.w3.org/2001/XMLSchema)

Фабрика XDTO и модель данных

Простой пример создания документа XML

// Получим нужные типы данных XDTO
ТипТестНоменклатура = ФабрикаXDTO.Тип("http://www.sample-package.org", "Номенклатура");
ТипТестЕдИзм = ФабрикаXDTO.Тип("http://www.sample-package.org", "ЕдиницаИзмерения");
// Обратите внимание, здесь мы получаем тип из определения типа для свойства СтатьяЗатрат
ТипТестСтатья = ТипТестНоменклатура.Свойства.Получить("СтатьяЗатрат").Тип;

//Сперва создаем объекты, которые затем поместим в свойства номенклатуры
ЕдИзм = ФабрикаXDTO.Создать(ТипТестЕдИзм);
ЕдИзм.Коэффициент = 1;
ЕдИзм.Код = 123;
ЕдИзм.Наименование = "Кг";

СтатьяЗатрат = ФабрикаXDTO.Создать(ТипТестСтатья);
СтатьяЗатрат.Наименование = "Основная деятельность";
СтатьяЗатрат.СчетЗатрат = 26;

Ном = ФабрикаXDTO.Создать(ТипТестНоменклатура);
Ном.Наименование = "тестовая номенклатура";
//Помещаем в свойства соответствующие объекты XDTO
Ном.ЕдиницаИзмерения = ЕдИзм;
Ном.СтатьяЗатрат = СтатьяЗатрат;

//Сформируем XML документ
Запись = Новый ЗаписьXML;
Запись.УстановитьСтроку();
ФабрикаXDTO.ЗаписатьXML(Запись, Ном);
ДанныеXML = Запись.Закрыть();

Сообщить(ДанныеXML);

Пример создания фабрики XDTO c нужной моделью данных

Модель = ФабрикаXDTO.Создать(ФабрикаXDTO.Тип("http://v8.1c.ru/8.1/xdto","Model"));
СвояФабрика = Новый ФабрикаXDTO(Модель);

МассивПространствИмен = Новый Массив;
МассивПространствИмен.Добавить("http://www.sample-package.org");
ВтораяМодель = ФабрикаXDTO.ЭкспортМоделиXDTO(МассивПространствИмен);
Запись = Новый ЗаписьXML;
Запись.УстановитьСтроку();
ФабрикаXDTO.ЗаписатьXML(Запись,ВтораяМодель,"Model","http://v8.1c.ru/8.1/xdto",,НазначениеТипаXML.Явное);
МодельXML = Запись.Закрыть();

ЧтениеXML = Новый ЧтениеXML;
ЧтениеXML.УстановитьСтроку(МодельXML);
ОбъектModel = ФабрикаXDTO.ПрочитатьXML(ЧтениеXML);
ВтораяФабрика = Новый ФабрикаXDTO(ОбъектModel);

Создание фабрики XDTO из схем XML

МассивПространствИмен = Новый Массив;
МассивПространствИмен.Добавить("http://www.sample-package.org");
НаборСхем = ФабрикаXDTO.ЭкспортСхемыXML(МассивПространствИмен);
ТретьяФабрика = Новый ФабрикаXDTO(НаборСхем);

Для Счетчик = 0 по НаборСхем.Количество() - 1 Цикл
            Схема = НаборСхем.Получить(Счетчик);
            Схема.ОбновитьЭлементDOM();
            ЗаписьDOM = Новый ЗаписьDOM;
            ЗаписьXMLСтрока = Новый ЗаписьXML;
            ЗаписьXMLСтрока.УстановитьСтроку();
            ЗаписьXMLФайл = Новый ЗаписьXML;
            ЗаписьDOM.Записать(Схема.ДокументDOM, ЗаписьXMLСтрока);
            ЗаписьXMLФайл.ОткрытьФайл(ИмяФайла + "[" + Формат(Счетчик,"ЧЦ=10;ЧГ=0;ЧН=") + "].xsd");
            ЗаписьXMLФайл.ЗаписатьБезОбработки(ЗаписьXMLСтрока.Закрыть());
            ЗаписьXMLФайл.Закрыть();
КонецЦикла;

Схемы = Новый Массив;
Схемы.Добавить("d:testtest1.xsd");
Схемы.Добавить("d:testtest2.xsd");
ЧетвертаяФабрика = СоздатьФабрикуXDTO(Схемы);

XDTO сериализация

//Простая сериализация в XML. Подходит только для загрузки в идентичную конфигурацию
	ЗаписьXML = Новый ЗаписьXML;
	ЗаписьXML.УстановитьСтроку();
	ЗаписатьXML(ЗаписьXML, Номенклатура.ПолучитьОбъект());
	ИтоговаяСтрока = ЗаписьXML.Закрыть();
	Сообщить(ИтоговаяСтрока);
	
	//Сериализация через глобальный сериализатор. В этом случае мы получаем пространства имен
	ЗаписьXML = Новый ЗаписьXML;
	ЗаписьXML.УстановитьСтроку();
	СериализаторXDTO.ЗаписатьXML(ЗаписьXML, Номенклатура.ПолучитьОбъект(), НазначениеТипаXML.Явное);
	ИтоговаяСтрока = ЗаписьXML.Закрыть();
	Сообщить(ИтоговаяСтрока);
	
	//Десериализация через СериализаторXDTO
	ЧтениеXML = Новый ЧтениеXML;
	ЧтениеXML.УстановитьСтроку(ИтоговаяСтрока);
	ОбъектНоменклатура = СериализаторXDTO.ПрочитатьXML(ЧтениеXML);

SOAP сервисы и XDTO

Разработка своего веб-сервиса

Функция goods(CostItem)
	
	ТипGoods = ФабрикаXDTO.Пакеты.Получить("http://www.sample-package.org").Получить("goods");
	ТипgoodsRow = ФабрикаXDTO.Пакеты.Получить("http://www.sample-package.org").Получить("goodsRow");
	Goods = ФабрикаXDTO.Создать(ТипGoods);
	
	Запрос = Новый Запрос("ВЫБРАТЬ
	|	ОстаткиТоваровОстатки.Товар.Код КАК Code,
	|	ОстаткиТоваровОстатки.Товар.Наименование КАК Name,
	|	ОстаткиТоваровОстатки.КоличествоОстаток КАК Quantity
	|ИЗ
	|	РегистрНакопления.ОстаткиТоваров.Остатки(
	|			,
	|			ВЫБОР
	|				КОГДА &СтатьяЗатрат = НЕОПРЕДЕЛЕНО
	|					ТОГДА ИСТИНА
	|				ИНАЧЕ Товар.СтатьяЗатрат = &СтатьяЗатрат
	|			КОНЕЦ) КАК ОстаткиТоваровОстатки");
	
	НайденнаяСтатья = Справочники.СтатьиЗатрат.НайтиПоКоду("CostItem");
	Если НайденнаяСтатья = Справочники.СтатьиЗатрат.ПустаяСсылка() Тогда
		НайденнаяСтатья = Неопределено;
	КонецЕсли;
	Запрос.УстановитьПараметр("СтатьяЗатрат", НайденнаяСтатья);
	
	Выборка = Запрос.Выполнить().Выбрать();
	Пока Выборка.Следующий() Цикл
		goodsRow = ФабрикаXDTO.Создать(ТипgoodsRow);
		ЗаполнитьЗначенияСвойств(goodsRow, Выборка);
		Goods.goodsRow.Добавить(goodsRow);
	КонецЦикла;
	
	Возврат Goods;
	
КонецФункции

// Получим WSОпределение
WSОпределение			= Новый WSОпределения("http://localhost/xdto/ws/ws1.1cws?wsdl");
// Создадим WSПрокси - специальный объект для вызова веб-сервиса
// параметры конструктора можно посмотреть непосредственно в WSОпределение
// там будут и списки сервисов с пространствами имен и названием самого сервиса, а также
// имена точек подключения
WSПроксиGoods			= Новый WSПрокси(WSОпределение, "test", "ВыгрузкаНоменклатуры", "ВыгрузкаНоменклатурыSoap");

// вызовем операцию goods с параметром CostItem = "123" (это код элемента справочника Статьи затрат)
ТаблицаОстатков = WSПроксиGoods.goods("123");

// Обойдем коллекцию строк, которую мы получили от сервиса, и выведем остатки
Для Каждого СтрокаОстатка Из ТаблицаОстатков.goodsRow Цикл
	Сообщить(СтрШаблон("Код %1, Наименование %2, Остаток %3", СтрокаОстатка.Code, СтрокаОстатка.Name, СтрокаОстатка.Quantity));
КонецЦикла;

Использование внешних веб-сервисов через WS-ссылки

Прокси = WSСсылки.Converter.СоздатьWSПрокси("http://www.dataaccess.com/webservicesserver/", "NumberConversion", "NumberConversionSoap");
Результат = Прокси.NumberToWords(12345);
Сообщить(Результат);

//Создаем прокси для обращения к внешнему веб-сервису,
// передаем в функцию URI пространства имен, имя сервиса, имя порта.
Прокси = WSСсылки.WSСсылкаЦБР.СоздатьWSПрокси("http://web.cbr.ru/", "DailyInfo", "DailyInfoSoap");

//Получаем тип параметра, который передается в метод GetCursOnDate.
// Для этого получаем сперва пакет по имени URI, а затем тип по имени этого типа
ТипWSПараметра = Прокси.ФабрикаXDTO.Пакеты.Получить("http://web.cbr.ru/").Получить("GetCursOnDate");

//Создаем параметр на основе типа и заполняем значение параметра On_Date.
WSПараметр  = Прокси.ФабрикаXDTO.Создать(ТипWSПараметра);
WSПараметр.On_Date= ТекущаяДата();

//Вызываем метод веб-сервиса, записываем результат в переменную КурсыВалют.
КурсыВалют = Прокси.GetCursOnDate(WSПараметр);

Для Каждого Элемент Из КурсыВалют.GetCursOnDateResult.diffgram.ValuteData.ValuteCursOnDate Цикл 
    Сообщить(СтрШаблон("Валюта %1; номинал %2; код %3; симв. код %4; курс %5",
		СокрЛП(Элемент.Vname) ,Элемент.Vnom, Элемент.Vcode, Элемент.VChCode, Элемент.Vcurs));
КонецЦикла;

Другие примеры использования XDTO

Аналогично можно программно управлять и многими другими объектами 1С, которые сериализуются в/из XDTO (об этом можно узнать из документации либо встроенной справки), например:

• Диаграммы
• Схемы компоновки данных
• Хранилища значений

и другие

Доброго времени суток. Просьба не кидаться тухлыми помидорами, только учусь Т.к. учусь опишу задачу, вдруг совсем неправильно подхожу к ее решению.

Задача такая: необходимо открыть форму выбора справочника с отбором. Для этого получаю данные отбора из регистра запросом. С клиентской процедуры решил использовать функцию на сервере, которая вернет массив запроса. В последующем результат я обработаю уже на клиенте и открою форму с отбором.

В момент возвращения массива на клиентскую процедуру возникает ошибка, довольно длинная:

//НачалоОшибки

Ошибка передачи данных между клиентом и сервером. Значение недопустимого типа.

по причине:

Ошибка преобразования данных XDTO:

Запись значения свойства ‘ret’:

    форма: Элемент

    имя: {http://v8.1c.ru/8.2/managed-application/modules}ret

по причине:

Ошибка преобразования данных XDTO:

Запись значения свойства ‘Value’:

    форма: Элемент

    имя: {http://v8.1c.ru/8.1/data/core}Value

по причине:

Ошибка отображения типов:

Отсутствует отображение для типа ‘СтрокаТаблицыЗначений’

по причине:

Ошибка передачи данных между клиентом и сервером. Значение недопустимого типа.

по причине:

Ошибка преобразования данных XDTO:

Запись значения свойства ‘ret’:

    форма: Элемент

    имя: {http://v8.1c.ru/8.2/managed-application/modules}ret

по причине:

Ошибка преобразования данных XDTO:

Запись значения свойства ‘Value’:

    форма: Элемент

    имя: {http://v8.1c.ru/8.1/data/core}Value

по причине:

Ошибка отображения типов:

Отсутствует отображение для типа ‘СтрокаТаблицыЗначений’

//Конецошибки

Сам код:

&НаСервере

Функция Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод)

    Запрос = Новый Запрос;

    Запрос.Текст =

    «ВЫБРАТЬ

    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура КАК Номенклатура,

    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция КАК АлкогольнаяПродукция

    |ИЗ

    |    РегистрСведений.алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры КАК алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры

    |

    |СГРУППИРОВАТЬ ПО

    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура,

    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция»;

        
    Запрос.УстановитьПараметр(«Наименование», СтрокаСАлкПрод);

    
    РезультатЗапроса = Запрос.Выполнить().Выгрузить();

    
    ПараметрыОтбора = Новый Структура();

    ПараметрыОтбора.Вставить(«АлкогольнаяПродукция»,СтрокаСАлкПрод);

    НайденныеСтроки = РезультатЗапроса.НайтиСтроки(ПараметрыОтбора);

    
    Возврат(НайденныеСтроки);    

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

&НаКлиенте

Процедура Бит_ТоварыНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)

    НайденныеСтроки = «ы»;

    
    ТекДанные = ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;

    СтрокаСАлкПрод = ТекДанные.АлкогольнаяПродукция;

    СтандартаяОбработка = ложь;

    
    Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);

    
    ПараметрыОтбораФормы = Новый Структура();

    Для каждого стр из НайденныеСтроки Цикл

        Значение = стр.Номенклатура;

        ПараметрыОтбораФормы.Вставить(«Номенклатура»,Значение);

    КонецЦикла;

    
    ПараметрыОтбораФормы = ПолучитьИзВременногоХранилища(АдресХранилища);

    Форма = ПолучитьФорму(«Справочник.Номенклатура.ФормаВыбора»,ПараметрыОтбораФормы);

    Форма.Открыть();    

КонецПроцедуры

ну ругайтесь, пожалуйста. облазил сколько смог перед тем как зарегаться тут

Да еще и код не выделился..

&НаСервере
Функция Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод)
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура КАК Номенклатура,
    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция КАК АлкогольнаяПродукция
    |ИЗ
    |    РегистрСведений.алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры КАК алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры
    |
    |СГРУППИРОВАТЬ ПО
    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура,
    |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция";
        
    Запрос.УстановитьПараметр("Наименование", СтрокаСАлкПрод);
    
    РезультатЗапроса = Запрос.Выполнить().Выгрузить();
    
    ПараметрыОтбора = Новый Структура();
    ПараметрыОтбора.Вставить("АлкогольнаяПродукция",СтрокаСАлкПрод);
    НайденныеСтроки = РезультатЗапроса.НайтиСтроки(ПараметрыОтбора);
    
    Возврат(НайденныеСтроки);    
КонецФункции

&НаКлиенте
Процедура Бит_ТоварыНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
    НайденныеСтроки = "ы";
    
    ТекДанные = ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;
    СтрокаСАлкПрод = ТекДанные.АлкогольнаяПродукция;
    СтандартаяОбработка = ложь;
    
    Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);
    
    ПараметрыОтбораФормы = Новый Структура();
    Для каждого стр из НайденныеСтроки Цикл
        Значение = стр.Номенклатура;
        ПараметрыОтбораФормы.Вставить("Номенклатура",Значение);
    КонецЦикла;
    
    ПараметрыОтбораФормы = ПолучитьИзВременногоХранилища(АдресХранилища);
    Форма = ПолучитьФорму("Справочник.Номенклатура.ФормаВыбора",ПараметрыОтбораФормы);
    Форма.Открыть();    
КонецПроцедуры

(7) Преобразовал в структуру в функции на сервере, до вызова функции в процедуре объявил Переменную ПараметрыОтбораФормы, иначе ругался. В момент возвращения в процедуру значения ПараметрыОтбораФормы = неопределенно становится. По идее структуру можно же с сервера на клиент возвращать?

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

    
    Возврат(ПараметрыОтбораФормы);    
КонецФункции

&НаКлиенте
Процедура Бит_ТоварыНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
    Перем ПараметрыОтбораФормы; 
    
    ТекДанные = ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;
    СтрокаСАлкПрод = ТекДанные.АлкогольнаяПродукция;
    СтандартаяОбработка = ложь;
    
    Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);

(8)

Перем ПараметрыОтбораФормы;

вот это тебя подвело

зачем оно тебе?

«ПараметрыОтбораФормы = Новый Структура();

    Для каждого стр из НайденныеСтроки Цикл

        Значение = стр.Номенклатура;

        ПараметрыОтбораФормы.Вставить(«Номенклатура»,Значение);

    КонецЦикла;

»

Извините, а сегодня точно не пятница, а понедельник?

(11) В ТЧ обработке устанавливается соответствие между (АП) алкогольной продукцией(пришла из егаиса) и номенклатурой в 1С. В случае когда одной АП соответствует несколько позиции номенклатуры 1С нужно открыть форму выбора справочника номенклатура с предложенным списком вариантов на основе регистра сведений. В регистре сведений прописывается связка всех соответствии АП-номенклатура.

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

Чтобы открыть форму с отбором вроде как нужно иметь структуру с одной колонкой — нашими параметрами отбора.

На данный момент столкнулся с несколькими проблемами:

1) не могу вернуть хоть какую-то инфу серверной функцией.

2) пробовал параметры руками проставлять(тестировал смогу открыть форму выбора с желаемыми позициями или нет) — тоже не получилось задуманное.

(21) + это написать вместо

НайденныеСтроки = РезультатЗапроса.НайтиСтроки(ПараметрыОтбора);

Ну и возвращать МассивСтрок;

(30) Спасибо большое за советы, дошел до финала — открытие формы. Не разобрался моментом как из массива получить структуру.

МассивОтбора = Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);    ОткрытьФорму("Справочник.алкВидыАкциза.ФормаВыбора",МассивОтбора);

Бьет ошибку несоответствие типов. передается массив, ожидает увидеть структуру.

https://makrus.ru/chastye-voprosy-po-1s/kak-otkryt-formu-vybora-s-opredelennym-otborom-v-1s-82.html

Вот здесь хороший пример есть для обычных форм. Второй кусок кода демонстрирует проверку при отборе ВидСравнение.Всписке. То что нужно, но для УФ надо такое же(

(35) У вас в коде или ошибка или я пробка.. я, конечно, склоняюсь ко второму варианту, но уточню:

СтрСписок = Новый Структура("Ссылка", СЗ);
ПараметрыФормы = Новый Структура("Отбор", СтрСЗ);
    ОткрытьФорму("Справочник.Номенклатура.ФормаВыбора", ПараметрыФормы);

По коду:

СЗ — список значений. СтрСписок — теперь структура из нашего массива. ПараметрыФормы — новая структура из какого-то СтрСЗ? я связь потерял

(38) (40) (41) Сделал как в 29, все отрабатывает, но уходит в типовой код и открывает совсем другую форму.

&НаКлиенте
Процедура Бит_ТоварыНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
    
    ТекДанные = ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;
    СтрокаСАлкПрод = ТекДанные.АлкогольнаяПродукция;
    СтандартаяОбработка = ложь;
    
    СЗ = Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);
    
    
    СтрСписок = Новый Структура("Ссылка", СЗ);
    ПараметрыФормы = Новый Структура("Отбор", СтрСписок);
    ОткрытьФорму("Справочник.Номенклатура.ФормаВыбора", ПараметрыФормы);
    
КонецПроцедуры

Видимо не достаточно что стоит стандартная обработка = ложь

(45) Функция которая вернула СписокЗначений

&НаСервере
Функция Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод)
    Запрос = Новый Запрос;
    Запрос.Текст = 
        "ВЫБРАТЬ
        |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура.Наименование КАК НоменклатураНаименование
        |ИЗ
        |    РегистрСведений.алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры КАК алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры
        |ГДЕ
        |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция.Ссылка = &Наименование
        |
        |СГРУППИРОВАТЬ ПО
        |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура.Наименование";
    
    Запрос.УстановитьПараметр("Наименование", СтрокаСАлкПрод);
    
    РезультатЗапроса = Запрос.Выполнить().Выгрузить();
    СЗ = Новый СписокЗначений();
    Для Каждого стр из РезультатЗапроса Цикл
        СЗ.Добавить(стр.НоменклатураНаименование);
    КонецЦикла;
    Возврат(СЗ);    
КонецФункции

(46) Да, моя невнимательность была. Теперь же форма открывается одна — моя. Точнее пытается открыться, но в процессе заменяется типовой формой другой, то есть проходит в типовую процедуру сразу же после выполнения команды открытьформу.

Заметил что как только выхожу из своей процедуры стандартная обработка автоматом проставляется «Истина»! сцуко…

Попадает в следующую процедуру:

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

Вот тут замена идет

ИначеЕсли ВидФормы = "ФормаВыбора" Тогда
        ВыборГруппИЭлементов = Неопределено;
        Если Параметры.Свойство("ВыборГруппИЭлементов",ВыборГруппИЭлементов) Тогда
            Если ВыборГруппИЭлементов = ИспользованиеГруппИЭлементов.ГруппыИЭлементы Тогда
                СтандартнаяОбработка = Ложь;
                ВыбраннаяФорма = "ФормаВыбораГруппИЭлементов";
            КонецЕсли;
        Иначе
            СтандартнаяОбработка = Ложь;
            ВыбраннаяФорма = "ФормаВыбораГруппИЭлементов";
        КонецЕсли;
    КонецЕсли;
    
КонецПроцедуры

(55) Открываю самостоятельно, имя прописываю.

Если прописываю Справочник.Номенклатура.ФормаВыбора — моя форма заменяется другой.

Если же Справочник.Номенклатура.Форма.ФормаВыбора, то открывается нужная форма, но пустая

&НаКлиенте
Процедура Бит_ТоварыНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
    
    ТекДанные = ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;
    СтрокаСАлкПрод = ТекДанные.АлкогольнаяПродукция;
    
    СтандартнаяОбработка = Ложь;
    
    СЗ = Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);
    
    СтрСписок = Новый Структура("Ссылка", СЗ);
    ПараметрыФормы = Новый Структура("Отбор", СтрСписок);
    ОткрытьФорму("Справочник.Номенклатура.Форма.ФормаВыбора", ПараметрыФормы);
    
КонецПроцедуры

«Но форма выбора открывается пустой, без списка номенклатуры» — смотреть отладчиком какие данные (и каких типов) получились в СЗ.

«Также стандартнаяобработка после выхода из моей процедуры меняется на Истину.» — в смысле «после выхода»? Куда вышло? Может в том месте уже свой параметр СтандартнаяОбработка?

(59) Действительно — проблема в ссылке была. Задача решена, всем огромное спасибо. Рабочий код прилагается

&НаСервере
Функция Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод)
    Запрос = Новый Запрос;
    Запрос.Текст = 
        "ВЫБРАТЬ
        |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура КАК Номенклатура
        |ИЗ
        |    РегистрСведений.алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры КАК алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры
        |ГДЕ
        |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.АлкогольнаяПродукция.Ссылка = &Наименование
        |
        |СГРУППИРОВАТЬ ПО
        |    алкСоответствияАлкогольнойПродукцииЕГАИСИНоменклатуры.Номенклатура";
    
    Запрос.УстановитьПараметр("Наименование", СтрокаСАлкПрод);
    
    РезультатЗапроса = Запрос.Выполнить().Выгрузить();
    СЗ = Новый СписокЗначений();
    Для Каждого стр из РезультатЗапроса Цикл
        СЗ.Добавить(стр.Номенклатура);
    КонецЦикла;
    Возврат(СЗ);    
КонецФункции

&НаКлиенте
Процедура Бит_ТоварыНоменклатураНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
    
    ТекДанные = ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;
    СтрокаСАлкПрод = ТекДанные.АлкогольнаяПродукция;
    
    СтандартнаяОбработка = Ложь;
    
    СЗ = Бит_ТоварыНоменклатураНачалоВыбораНаСервере(СтрокаСАлкПрод);
    
    СтрСписок = Новый Структура("Ссылка", СЗ);
    ПараметрыФормы = Новый Структура("Отбор", СтрСписок);
    ОткрытьФорму("Справочник.Номенклатура.Форма.ФормаВыбора", ПараметрыФормы);
КонецПроцедуры

Ilnazio

74 — 17.06.20 — 11:59