Если нужно сгруппировать в СКД поле не ограниченной длинны, тогда нужно применить функцию ВЫРАЗИТЬ() для этого поля
ВЫРАЗИТЬ(ПолеНеОграниченнойДлинны КАК Строка(200))
Простыми словами о сложном
ВЫРАЗИТЬ(ПолеНеОграниченнойДлинны КАК Строка(200))
{ХАРАКТЕРИСТИКИ
ТИП(Справочник.Номенклатура)
ВИДЫХАРАКТЕРИСТИК (ВЫБРАТЬ
СвойстваОбъектов.Ссылка,
СвойстваОбъектов.ТипЗначения,
"Свойство: " + СвойстваОбъектов.Наименование КАК Наименование
ИЗ
ПланВидовХарактеристик.СвойстваОбъектов КАК СвойстваОбъектов
ГДЕ
СвойстваОбъектов.НазначениеСвойства = ЗНАЧЕНИЕ(ПланВидовХарактеристик.НазначенияСвойствКатегорийОбъектов.Справочник_Номенклатура))
ПОЛЕКЛЮЧА Ссылка
ПОЛЕИМЕНИ Наименование
ПОЛЕТИПАЗНАЧЕНИЯ ТипЗначения
ЗНАЧЕНИЯХАРАКТЕРИСТИК РегистрСведений.ЗначенияСвойствОбъектов
ПОЛЕОБЪЕКТА Объект
ПОЛЕВИДА Свойство
ПОЛЕЗНАЧЕНИЯ Значение }
{ХАРАКТЕРИСТИКИ
ТИП(Справочник.Номенклатура)
ВИДЫХАРАКТЕРИСТИК (ВЫБРАТЬ
КатегорииОбъектов.Ссылка,
"Категория: " + КатегорииОбъектов.Наименование КАК Наименование
ИЗ
Справочник.КатегорииОбъектов КАК КатегорииОбъектов
ГДЕ
КатегорииОбъектов.НазначениеКатегории = ЗНАЧЕНИЕ(ПланВидовХарактеристик.НазначенияСвойствКатегорийОбъектов.Справочник_Номенклатура))
ПОЛЕКЛЮЧА Ссылка
ПОЛЕИМЕНИ Наименование
ЗНАЧЕНИЯХАРАКТЕРИСТИК РегистрСведений.КатегорииОбъектов
ПОЛЕОБЪЕКТА Объект
ПОЛЕВИДА Категория
}
Взято с ссылкаПроцедура ПриНачалеВыбораЗначения(ИдентЭлемДиалога,ФСО) Если ИдентЭлемДиалога = "Док" Тогда Если ПустоеЗначение(Док) = 0 Тогда ФСО = 0; ОткрытьФорму(Док); КонецЕсли; КонецЕсли; КонецПроцедурыТеперь при нажатии на реквизит Регистратор (Док) откроется сразу форма документа,
Процедура ПриВыбореСтроки() Если Форма.ТекущаяКолонка() = "Док" Тогда Если ПустоеЗначение(Док) = 0 Тогда ОткрытьФорму(Док); КонецЕсли; Иначе ОбТМЦ = СоздатьОбъект("Справочник.АрхивТТН"); ОбТМЦ.НайтиПоКоду(Код,0); ОткрытьФорму(ОбТМЦ.ТекущийЭлемент()); КонецЕсли; КонецПроцедуры Форма.ОбработкаВыбораСтроки(1);
Док = СоздатьОбъект("Документ.ПКО"); //назначем реквизиту Субконтотип Справочник.Номенклатура Док.НазначитьТип("Субконто","Справочник.Номенклатура");
Попытка ТекстовыйДокумент = СоздатьОбъект("Текст"); ТекстовыйДокумент.Записать("D:\1.xml"); ТекстовыйДокумент.Открыть("D:\1.xml"); ТекстовыйДокумент.ДобавитьСтроку(ИмяВыбрФайла); ТекстовыйДокумент.КодоваяСтраница(0); ТекстовыйДокумент.Записать("D:\1.xml"); Предупреждение("ОК"); Исключение Сообщить(ОписаниеОшибки()); КонецПопытки;
Попытка ТекстовыйДокумент = СоздатьОбъект("Текст"); ТекстовыйДокумент.Записать("D:\1.xml"); ТекстовыйДокумент.Открыть("D:\1.xml"); ТекстовыйДокумент.ДобавитьСтроку(ИмяВыбрФайла); ТекстовыйДокумент.КодоваяСтраница(0); ТекстовыйДокумент.Записать("D:\1.xml"); Предупреждение("ОК"); Исключение Сообщить(ОписаниеОшибки()); КонецПопытки;
Если ЗагрузитьВнешнююКомпоненту("v7plus.dll") = 0 Тогда Предупреждение("v7plus!"); Возврат; КонецЕсли; XMLАнализатор = СоздатьОбъект("AddIn.XMLParser"); XMLДокумент = XMLАнализатор.СоздатьДокумент(); XMLДокумент.Загрузить("D:\1.xml"); XMLКорневойРаздел = XMLДокумент.ВыбратьУзлы("*"); XMLКорневойРаздел = XMLКорневойРаздел.ПолучитьУзел(0); ДанныеXML = XMLКорневойРаздел.ВыбратьУзлы("*"); Для Сч1 = 0 По ДанныеXML.КоличествоУзлов() - 1 Цикл ТС = ДанныеXML.ПолучитьУзел(Сч1); ДанныеXML2 = ТС.ВыбратьУзлы("*"); Для Сч2 = 0 По ДанныеXML2.КоличествоУзлов() - 1 Цикл ТС2 = ДанныеXML2.ПолучитьУзел(Сч2); ДанныеXML3 = ТС2.ВыбратьУзлы("*"); Для Сч3 = 0 По ДанныеXML3.КоличествоУзлов() - 1 Цикл ТС3 = ДанныеXML3.ПолучитьУзел(Сч3); Сообщить(ТС3.Текст); КонецЦикла; КонецЦикла; КонецЦикла;
HTTPxml = СоздатьОбъект("MSXML2.xmlHttp.4.0");
HTTPxml.Open("POST", "https://api.novaposhta.ua/v2.0/xml/", 0 ); HTTPxml.setRequestHeader("Content-Type", "text/xml"); HTTPxml.Send(запрос); Результат = HTTPxml.responseText;в переменную Результат будет возвращено ответ в виде .xml
CopyPaste Copyright © 2017 - |- Шаблон создан O Pregador - |- Отредактирован myr4ik07