diff --git "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form.xml" "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form.xml" index 9cd4632..6419c51 100644 --- "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form.xml" +++ "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form.xml" @@ -588,6 +588,39 @@ xs:boolean + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Убрать линии связей на задний план</v8:content> + </v8:item> + + + xs:boolean + + + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Выводить типы элементов</v8:content> + </v8:item> + + + xs:boolean + + + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Выводить ссылочные реквизиты</v8:content> + </v8:item> + + + xs:boolean + + diff --git "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" index 8a791f2..bd1d6eb 100644 --- "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" +++ "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260/Ext/Form/Module.bsl" @@ -5,17 +5,20 @@ Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) // Заполнение предопределенными данными - ШиринаСтраницы = 827; - ВысотаСтраницы = 1169; - ШиринаТаблицы = 240; - ШиринаПоляСвойство = 60; - ШиринаПоляОписание = 180; - ВысотаСтрок = 30; - НачальнаяКоординатаX = 0; - НачальнаяКоординатаY = 0; - РазделительИмениИТипа = ":"; - СкрытьТаблицыПодШапку = Ложь; - РасстояниеМеждуТаблицами = 30; + ШиринаСтраницы = 827; + ВысотаСтраницы = 1169; + ШиринаТаблицы = 240; + ШиринаПоляСвойство = 60; + ШиринаПоляОписание = 180; + ВысотаСтрок = 30; + НачальнаяКоординатаX = 0; + НачальнаяКоординатаY = 0; + РазделительИмениИТипа = ":"; + СкрытьТаблицыПодШапку = Ложь; + РасстояниеМеждуТаблицами = 30; + ВыводитьТипыЭлементов = Ложь; + УбратьЛинииСвязейНаЗаднийПлан = Истина; + ВыводитьСсылочныеРеквизиты = Ложь; Элементы.ТипВыводимыхМетаданных.Доступность = Ложь; @@ -138,18 +141,20 @@ Процедура ОткрытьФормуНастроекВывода(Команда) ПараметрыОткрытия = Новый Структура; - ПараметрыОткрытия.Вставить("ВысотаСтраницы" , ВысотаСтраницы); - ПараметрыОткрытия.Вставить("ВысотаСтрок" , ВысотаСтрок); - ПараметрыОткрытия.Вставить("НачальнаяКоординатаX" , НачальнаяКоординатаX); - ПараметрыОткрытия.Вставить("НачальнаяКоординатаY" , НачальнаяКоординатаY); - ПараметрыОткрытия.Вставить("РазделительИмениИТипа" , РазделительИмениИТипа); - ПараметрыОткрытия.Вставить("РасстояниеМеждуТаблицами" , РасстояниеМеждуТаблицами); - ПараметрыОткрытия.Вставить("СкрытьТаблицыПодШапку" , СкрытьТаблицыПодШапку); - ПараметрыОткрытия.Вставить("ШиринаПоляОписание" , ШиринаПоляОписание); - ПараметрыОткрытия.Вставить("ШиринаПоляСвойство" , ШиринаПоляСвойство); - ПараметрыОткрытия.Вставить("ШиринаСтраницы" , ШиринаСтраницы); - ПараметрыОткрытия.Вставить("ШиринаТаблицы" , ШиринаТаблицы); - + ПараметрыОткрытия.Вставить("ВыводитьТипыЭлементов" , ВыводитьТипыЭлементов); + ПараметрыОткрытия.Вставить("ВыводитьСсылочныеРеквизиты" , ВыводитьСсылочныеРеквизиты); + ПараметрыОткрытия.Вставить("ВысотаСтраницы" , ВысотаСтраницы); + ПараметрыОткрытия.Вставить("ВысотаСтрок" , ВысотаСтрок); + ПараметрыОткрытия.Вставить("НачальнаяКоординатаX" , НачальнаяКоординатаX); + ПараметрыОткрытия.Вставить("НачальнаяКоординатаY" , НачальнаяКоординатаY); + ПараметрыОткрытия.Вставить("РазделительИмениИТипа" , РазделительИмениИТипа); + ПараметрыОткрытия.Вставить("РасстояниеМеждуТаблицами" , РасстояниеМеждуТаблицами); + ПараметрыОткрытия.Вставить("СкрытьТаблицыПодШапку" , СкрытьТаблицыПодШапку); + ПараметрыОткрытия.Вставить("УбратьЛинииСвязейНаЗаднийПлан" , УбратьЛинииСвязейНаЗаднийПлан); + ПараметрыОткрытия.Вставить("ШиринаПоляОписание" , ШиринаПоляОписание); + ПараметрыОткрытия.Вставить("ШиринаПоляСвойство" , ШиринаПоляСвойство); + ПараметрыОткрытия.Вставить("ШиринаСтраницы" , ШиринаСтраницы); + ПараметрыОткрытия.Вставить("ШиринаТаблицы" , ШиринаТаблицы); ОткрытьФорму("ВнешняяОбработка.ERДиаграммаМетаданныхDrawIO.Форма.ФормаНастроекВывода", ПараметрыОткрытия, ЭтотОбъект, Новый УникальныйИдентификатор); @@ -229,13 +234,17 @@ Если ПроверитьНеобходимВыводКлючевогоРеквизита(РодительскаяСтрока.Имя, ОбъектМетаданных, СтандартныйРеквизит.Имя) Тогда + Если ВыводитьСсылочныеРеквизиты И ПроверитьЭтоПримитивныйТип(СтандартныйРеквизит.Тип) Тогда + Продолжить; + КонецЕсли; + СтрокаРеквизита = СтрокаОбъекта.Строки.Добавить(); СтрокаРеквизита.Имя = СтандартныйРеквизит.Имя; СтрокаРеквизита.ТипЗначения = СтандартныйРеквизит.Тип; СтрокаРеквизита.Наименование = ?(ПустаяСтрока(СтандартныйРеквизит.Синоним), СтандартныйРеквизит.Имя, СтандартныйРеквизит.Синоним); СтрокаРеквизита.Путь = "Справочник." + СтрокаОбъекта.Имя + "." + СтрокаРеквизита.Имя; СтрокаРеквизита.КлючевойРеквизит = Истина; - СтрокаРеквизита.ПримитивныйТип = ПроверитьЭтоПримитивныйТип(СтрокаРеквизита.ТипЗначения); + СтрокаРеквизита.ПримитивныйТип = ПроверитьЭтоПримитивныйТип(СтандартныйРеквизит.Тип); КонецЕсли; @@ -244,6 +253,10 @@ // Добавляем реквизиты и табличные части Для Каждого РеквизитОбъекта Из ОбъектМетаданных.Реквизиты Цикл + Если ВыводитьСсылочныеРеквизиты И ПроверитьЭтоПримитивныйТип(РеквизитОбъекта.Тип) Тогда + Продолжить; + КонецЕсли; + СтрокаРеквизита = СтрокаОбъекта.Строки.Добавить(); СтрокаРеквизита.Имя = РеквизитОбъекта.Имя; СтрокаРеквизита.ТипЗначения = РеквизитОбъекта.Тип; @@ -265,6 +278,10 @@ Для Каждого РеквизитТабличнойЧасти Из ТабличнаяЧасть.Реквизиты Цикл + Если ВыводитьСсылочныеРеквизиты И ПроверитьЭтоПримитивныйТип(РеквизитТабличнойЧасти.Тип) Тогда + Продолжить; + КонецЕсли; + СтрокаРеквизитаТабличнойЧасти = СтрокаТабличнойЧасти.Строки.Добавить(); СтрокаРеквизитаТабличнойЧасти.Имя = РеквизитТабличнойЧасти.Имя; СтрокаРеквизитаТабличнойЧасти.ТипЗначения = РеквизитТабличнойЧасти.Тип; @@ -306,6 +323,10 @@ // Добавляем стандартные реквизиты Для Каждого СтандартныйРеквизит Из ОбъектМетаданных.СтандартныеРеквизиты Цикл + Если ВыводитьСсылочныеРеквизиты И ПроверитьЭтоПримитивныйТип(СтандартныйРеквизит.Тип) Тогда + Продолжить; + КонецЕсли; + Если ПроверитьНеобходимВыводКлючевогоРеквизита(РодительскаяСтрока.Имя, ОбъектМетаданных, СтандартныйРеквизит.Имя) Тогда СтрокаРеквизита = СтрокаОбъекта.Строки.Добавить(); @@ -322,6 +343,10 @@ // Добавляем реквизиты и табличные части Для Каждого РеквизитОбъекта Из ОбъектМетаданных.Реквизиты Цикл + Если ВыводитьСсылочныеРеквизиты И ПроверитьЭтоПримитивныйТип(РеквизитОбъекта.Тип) Тогда + Продолжить; + КонецЕсли; + СтрокаРеквизита = СтрокаОбъекта.Строки.Добавить(); СтрокаРеквизита.Имя = РеквизитОбъекта.Имя; СтрокаРеквизита.ТипЗначения = РеквизитОбъекта.Тип; @@ -343,6 +368,10 @@ Для Каждого РеквизитТабличнойЧасти Из ТабличнаяЧасть.Реквизиты Цикл + Если ВыводитьСсылочныеРеквизиты И ПроверитьЭтоПримитивныйТип(РеквизитТабличнойЧасти.Тип) Тогда + Продолжить; + КонецЕсли; + СтрокаРеквизитаТабличнойЧасти = СтрокаТабличнойЧасти.Строки.Добавить(); СтрокаРеквизитаТабличнойЧасти.Имя = РеквизитТабличнойЧасти.Имя; СтрокаРеквизитаТабличнойЧасти.ТипЗначения = РеквизитТабличнойЧасти.Тип; @@ -524,6 +553,7 @@ ТаблицаЭлементов = Новый ТаблицаЗначений; ТаблицаЭлементов.Колонки.Добавить("id" , Новый ОписаниеТипов("Число")); // Идентификатор - Для всех элементов ТаблицаЭлементов.Колонки.Добавить("parent" , Новый ОписаниеТипов("Число")); // Родитель - Для всех элементов + ТаблицаЭлементов.Колонки.Добавить("style" , Новый ОписаниеТипов("Строка")); // Стиль элементов - Для всех элементов ТаблицаЭлементов.Колонки.Добавить("inccol" , Новый ОписаниеТипов("Число")); // Итератор колонок / орбит - Для таблиц - не выгружается! ТаблицаЭлементов.Колонки.Добавить("incline" , Новый ОписаниеТипов("Число")); // Итератор строк / таблиц - Для таблиц - не выгружается! ТаблицаЭлементов.Колонки.Добавить("container", Новый ОписаниеТипов("Число")); // Контейнер - Для таблиц @@ -532,6 +562,7 @@ ТаблицаЭлементов.Колонки.Добавить("type" , Новый ОписаниеТипов("ОписаниеТипов")); // Тип - для таблиц - не выгружается! ТаблицаЭлементов.Колонки.Добавить("x" , Новый ОписаниеТипов("Число")); // Расположение по абсциссе - Для таблиц ТаблицаЭлементов.Колонки.Добавить("y" , Новый ОписаниеТипов("Число")); // Расположение по ординате - Для таблиц + ТаблицаЭлементов.Колонки.Добавить("value" , Новый ОписаниеТипов("Строка")); // Значение - Для всех элементов ТаблицаЭлементов.Колонки.Добавить("width" , Новый ОписаниеТипов("Число")); // Ширина - Для таблиц ТаблицаЭлементов.Колонки.Добавить("height" , Новый ОписаниеТипов("Число")); // Высота - Для таблиц ТаблицаЭлементов.Колонки.Добавить("source" , Новый ОписаниеТипов("Строка")); // Источник - Для связей @@ -586,11 +617,27 @@ КонецЕсли; - Для Каждого РодительскаяСтрока Из ВыбранныеСтроки Цикл + Если УбратьЛинииСвязейНаЗаднийПлан Тогда + + Для Каждого РодительскаяСтрока Из ВыбранныеСтроки Цикл + + СформироватьСвязиМетаданныхДляРеквизитовВXML(ЗаписьXML, ИдентификаторЭлемента, ТаблицаЭлементов, РодительскаяСтрока); + + КонецЦикла; - СформироватьСвязиМетаданныхДляРеквизитовВXML(ЗаписьXML, ИдентификаторЭлемента, ТаблицаЭлементов, РодительскаяСтрока); + ВывестиВсеНакопленныеЭлементыВXML(ЗаписьXML, ТаблицаЭлементов); - КонецЦикла; + Иначе + + ВывестиВсеНакопленныеЭлементыВXML(ЗаписьXML, ТаблицаЭлементов); + + Для Каждого РодительскаяСтрока Из ВыбранныеСтроки Цикл + + СформироватьСвязиМетаданныхДляРеквизитовВXML(ЗаписьXML, ИдентификаторЭлемента, ТаблицаЭлементов, РодительскаяСтрока); + + КонецЦикла; + + КонецЕсли; ЗаписьXML.ЗаписатьКонецЭлемента(); // root ЗаписьXML.ЗаписатьКонецЭлемента(); // mxGraphModel @@ -626,29 +673,14 @@ Координаты.Вставить("X", ЦентрX - ШиринаТаблицы / 2); Координаты.Вставить("Y", ЦентрY - ВысотаТаблицы / 2); - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , ГоловнаяСтрока.Путь); - ЗаписьXML.ЗаписатьАтрибут("style" , ПолучитьСтильВЗависимостиОтФигурыЭлемента("table")); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , "1"); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("x" , Формат(Координаты.X, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("y" , Формат(Координаты.Y, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("width" , Формат(ШиринаТаблицы, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("height" , Формат(ВысотаТаблицы, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.inccol = 0; НовыйЭлемент.incline = 0; + НовыйЭлемент.style = ПолучитьСтильВЗависимостиОтФигурыЭлемента("table"); НовыйЭлемент.parent = 1; НовыйЭлемент.shape = "table"; + НовыйЭлемент.value = ГоловнаяСтрока.Путь; НовыйЭлемент.path = ГоловнаяСтрока.Путь; НовыйЭлемент.type = ГоловнаяСтрока.ТипЗначения; НовыйЭлемент.x = Координаты.X; @@ -693,29 +725,14 @@ Координаты = ПолучитьНовыеКоординатыТаблицыПоОрбите( ИдентификаторЭлемента, ТаблицаЭлементов, ИтераторТаблиц, ИтераторОрбиты, ВысотаТаблицы); - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , СтрокаМетаданных.Путь); - ЗаписьXML.ЗаписатьАтрибут("style" , ПолучитьСтильВЗависимостиОтФигурыЭлемента("table")); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , "1"); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("x" , Формат(Координаты.X, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("y" , Формат(Координаты.Y, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("width" , Формат(ШиринаТаблицы, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("height" , Формат(ВысотаТаблицы, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.inccol = ИтераторОрбиты; НовыйЭлемент.incline = ИтераторТаблиц; НовыйЭлемент.parent = 1; + НовыйЭлемент.style = ПолучитьСтильВЗависимостиОтФигурыЭлемента("table"); НовыйЭлемент.shape = "table"; + НовыйЭлемент.value = СтрокаМетаданных.Путь; НовыйЭлемент.path = СтрокаМетаданных.Путь; НовыйЭлемент.type = СтрокаМетаданных.ТипЗначения; НовыйЭлемент.x = Координаты.X; @@ -771,28 +788,12 @@ Координаты = ПолучитьНовыеКоординатыТаблицыПоСетке(ИдентификаторЭлемента, ТаблицаЭлементов, СеткаРазметки, ИтераторТаблицТекущейСтроки, ИтераторСтрокВСетке); - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , СтрокаМетаданных.Путь); - ЗаписьXML.ЗаписатьАтрибут("style" , ПолучитьСтильВЗависимостиОтФигурыЭлемента("table")); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , "1"); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("x" , Формат(Координаты.X, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("y" , Формат(Координаты.Y, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("width" , Формат(ШиринаТаблицы, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("height" , Формат(ВысотаТаблицы, "ЧН=0; ЧГ=")); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.inccol = ИтераторТаблицТекущейСтроки; НовыйЭлемент.incline = ИтераторСтрокВСетке; НовыйЭлемент.parent = 1; + НовыйЭлемент.style = ПолучитьСтильВЗависимостиОтФигурыЭлемента("table"); НовыйЭлемент.shape = "table"; НовыйЭлемент.path = СтрокаМетаданных.Путь; НовыйЭлемент.type = СтрокаМетаданных.ТипЗначения; @@ -855,26 +856,12 @@ Стиль = СтрЗаменить(Стиль, "fillColor=none", "fillColor=#e6f4ff"); КонецЕсли; - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , ""); - ЗаписьXML.ЗаписатьАтрибут("style" , Стиль); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(ИдентификаторРодителя)); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("y" , Строка(КоординатаY)); - ЗаписьXML.ЗаписатьАтрибут("width" , Строка(ШиринаТаблицы)); - ЗаписьXML.ЗаписатьАтрибут("height" , Строка(ВысотаСтрок)); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.parent = ИдентификаторРодителя; - НовыйЭлемент.shape = "partialRectangleContainer"; + НовыйЭлемент.style = Стиль; + НовыйЭлемент.shape = "partialRectangle"; + НовыйЭлемент.value = ""; НовыйЭлемент.path = СтрокаРеквизитов.Путь; НовыйЭлемент.type = СтрокаРеквизитов.ТипЗначения; НовыйЭлемент.x = КоординатаX; @@ -905,26 +892,13 @@ Стиль = СтрЗаменить(Стиль, "fillColor=none", "fillColor=#e6f4ff"); КонецЕсли; - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , ПредставлениеСвойства); - ЗаписьXML.ЗаписатьАтрибут("style" , Стиль); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(ИдентификаторКонтейнера)); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("width" , Строка(ШиринаПоляСвойство)); - ЗаписьXML.ЗаписатьАтрибут("height" , Строка(ВысотаСтрок)); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.parent = ИдентификаторРодителя; НовыйЭлемент.container = ИдентификаторКонтейнера; - НовыйЭлемент.shape = "partialRectangleType" + ТипСтиляФигуры; + НовыйЭлемент.style = Стиль; + НовыйЭлемент.shape = "partialRectangle"; + НовыйЭлемент.value = ПредставлениеСвойства; НовыйЭлемент.path = СтрокаРеквизитов.Путь; НовыйЭлемент.type = СтрокаРеквизитов.ТипЗначения; НовыйЭлемент.x = КоординатаX; @@ -951,27 +925,22 @@ Стиль = СтрЗаменить(Стиль, "fillColor=none", "fillColor=#e6f4ff"); КонецЕсли; - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , СтрокаРеквизитов.Имя); - ЗаписьXML.ЗаписатьАтрибут("style" , Стиль); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(ИдентификаторКонтейнера)); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("x" , Строка(КоординатаX)); - ЗаписьXML.ЗаписатьАтрибут("width" , Строка(ШиринаПоляОписание)); - ЗаписьXML.ЗаписатьАтрибут("height" , Строка(ВысотаСтрок)); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.parent = ИдентификаторРодителя; НовыйЭлемент.container = ИдентификаторКонтейнера; - НовыйЭлемент.shape = "partialRectangleDesc" + ТипСтиляФигуры; + НовыйЭлемент.style = Стиль; + НовыйЭлемент.shape = "partialRectangle"; + + Если ВыводитьТипыЭлементов Тогда + СтрокаТипов = ПолучитьНаименованияТиповОбъектаМетаданныхСтрокой(СтрокаРеквизитов.ТипЗначения); + + НовыйЭлемент.value = СтрокаРеквизитов.Имя + + ?(ПустаяСтрока(СтрокаТипов), "", " " + РазделительИмениИТипа + " " + СтрокаТипов); + Иначе + НовыйЭлемент.value = СтрокаРеквизитов.Имя; + КонецЕсли; + НовыйЭлемент.path = СтрокаРеквизитов.Путь; НовыйЭлемент.type = СтрокаРеквизитов.ТипЗначения; НовыйЭлемент.x = КоординатаX; @@ -1021,26 +990,12 @@ // Стиль = Стиль + "dashed=1;"; //КонецЕсли; - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , ""); - ЗаписьXML.ЗаписатьАтрибут("style" , Стиль); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(ИдентификаторРодителя)); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("y" , Строка(КоординатаY)); - ЗаписьXML.ЗаписатьАтрибут("width" , Строка(ШиринаТаблицы)); - ЗаписьXML.ЗаписатьАтрибут("height" , Строка(ВысотаСтрок)); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.parent = ИдентификаторРодителя; - НовыйЭлемент.shape = "partialRectangleContainer"; + НовыйЭлемент.style = Стиль; + НовыйЭлемент.shape = "partialRectangle"; + НовыйЭлемент.value = ""; НовыйЭлемент.path = СтрокаРеквизитаТаблЧасти.Путь; НовыйЭлемент.type = СтрокаРеквизитаТаблЧасти.ТипЗначения; НовыйЭлемент.x = КоординатаX; @@ -1064,26 +1019,13 @@ // Стиль = Стиль + "dashed=1;"; //КонецЕсли; - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , ПредставлениеСвойства); - ЗаписьXML.ЗаписатьАтрибут("style" , Стиль); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(ИдентификаторКонтейнера)); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("width" , Строка(ШиринаПоляСвойство)); - ЗаписьXML.ЗаписатьАтрибут("height" , Строка(ВысотаСтрок)); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.parent = ИдентификаторРодителя; + НовыйЭлемент.style = Стиль; НовыйЭлемент.container = ИдентификаторКонтейнера; - НовыйЭлемент.shape = "partialRectangleTypeUsual"; + НовыйЭлемент.shape = "partialRectangle"; + НовыйЭлемент.value = ПредставлениеСвойства; НовыйЭлемент.path = СтрокаРеквизитаТаблЧасти.Путь; НовыйЭлемент.type = СтрокаРеквизитаТаблЧасти.ТипЗначения; НовыйЭлемент.x = КоординатаX; @@ -1105,27 +1047,22 @@ // Стиль = Стиль + "dashed=1;"; //КонецЕсли; - ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); - ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ИдентификаторЭлемента)); - ЗаписьXML.ЗаписатьАтрибут("value" , СтрокаРеквизитаТаблЧасти.Имя); - ЗаписьXML.ЗаписатьАтрибут("style" , Стиль); - ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); - ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(ИдентификаторКонтейнера)); - - ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); - ЗаписьXML.ЗаписатьАтрибут("x" , Строка(КоординатаX)); - ЗаписьXML.ЗаписатьАтрибут("width" , Строка(ШиринаПоляОписание)); - ЗаписьXML.ЗаписатьАтрибут("height" , Строка(ВысотаСтрок)); - ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); - ЗаписьXML.ЗаписатьКонецЭлемента(); - - ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell - НовыйЭлемент = ТаблицаЭлементов.Добавить(); НовыйЭлемент.id = ИдентификаторЭлемента; НовыйЭлемент.parent = ИдентификаторРодителя; + НовыйЭлемент.style = Стиль; НовыйЭлемент.container = ИдентификаторКонтейнера; - НовыйЭлемент.shape = "partialRectangleDescUsual"; + НовыйЭлемент.shape = "partialRectangle"; + + Если ВыводитьТипыЭлементов Тогда + СтрокаТипов = ПолучитьНаименованияТиповОбъектаМетаданныхСтрокой(СтрокаРеквизитаТаблЧасти.ТипЗначения); + + НовыйЭлемент.value = СтрокаРеквизитаТаблЧасти.Имя + + ?(ПустаяСтрока(СтрокаТипов), "", " " + РазделительИмениИТипа + " " + СтрокаТипов); + Иначе + НовыйЭлемент.value = СтрокаРеквизитаТаблЧасти.Имя; + КонецЕсли; + НовыйЭлемент.path = СтрокаРеквизитаТаблЧасти.Путь; НовыйЭлемент.type = СтрокаРеквизитаТаблЧасти.ТипЗначения; НовыйЭлемент.x = КоординатаX; @@ -1195,7 +1132,8 @@ СтруктураОтбораКонтейнера = Новый Структура; СтруктураОтбораКонтейнера.Вставить("path" , ПолныйПутьКРеквизиту); - СтруктураОтбораКонтейнера.Вставить("shape" , "partialRectangleContainer"); + СтруктураОтбораКонтейнера.Вставить("shape" , "partialRectangle"); + СтруктураОтбораКонтейнера.Вставить("container", 0); ВыведенныйКонтейнерСтроки = ТаблицаЭлементов.НайтиСтроки(СтруктураОтбораКонтейнера); Если ВыведенныйКонтейнерСтроки.Количество() Тогда @@ -1288,6 +1226,37 @@ КонецПроцедуры +&НаСервере +Процедура ВывестиВсеНакопленныеЭлементыВXML(ЗаписьXML, ТаблицаЭлементов) + + Для Каждого ЭлементКВыводу Из ТаблицаЭлементов Цикл + + ЗаписьXML.ЗаписатьНачалоЭлемента("mxCell"); + ЗаписьXML.ЗаписатьАтрибут("id" , Строка(ЭлементКВыводу.id)); + ЗаписьXML.ЗаписатьАтрибут("value" , ЭлементКВыводу.value); + ЗаписьXML.ЗаписатьАтрибут("style" , ЭлементКВыводу.style); + ЗаписьXML.ЗаписатьАтрибут("vertex" , "1"); + + Если ЭлементКВыводу.shape = "table" Тогда + ЗаписьXML.ЗаписатьАтрибут("parent" , "1"); + Иначе + ЗаписьXML.ЗаписатьАтрибут("parent" , Строка(?(ЗначениеЗаполнено(ЭлементКВыводу.container), ЭлементКВыводу.container, ЭлементКВыводу.parent))); + КонецЕсли; + + ЗаписьXML.ЗаписатьНачалоЭлемента("mxGeometry"); + ЗаписьXML.ЗаписатьАтрибут("x" , Формат(ЭлементКВыводу.x, "ЧН=0; ЧГ=")); + ЗаписьXML.ЗаписатьАтрибут("y" , Формат(ЭлементКВыводу.y, "ЧН=0; ЧГ=")); + ЗаписьXML.ЗаписатьАтрибут("width" , Формат(ЭлементКВыводу.width, "ЧН=0; ЧГ=")); + ЗаписьXML.ЗаписатьАтрибут("height" , Формат(ЭлементКВыводу.height, "ЧН=0; ЧГ=")); + ЗаписьXML.ЗаписатьАтрибут("as" , "geometry"); + ЗаписьXML.ЗаписатьКонецЭлемента(); + + ЗаписьXML.ЗаписатьКонецЭлемента(); // mxCell + + КонецЦикла; + +КонецПроцедуры + #КонецОбласти // РаботаСXML #Область Прочее @@ -1500,6 +1469,33 @@ КонецФункции +&НаСервереБезКонтекста +Функция ПолучитьНаименованияТиповОбъектаМетаданныхСтрокой(ТипЗначения) + + СтрокаТипов = ""; + + Для Каждого ТипПеречисление Из ТипЗначения.Типы() Цикл + + МассивТипов = Новый Массив; + МассивТипов.Добавить(ТипПеречисление); + Если ПроверитьЭтоПримитивныйТип(Новый ОписаниеТипов(МассивТипов)) Тогда + СтрокаТипов = СтрокаТипов + ?(ПустаяСтрока(СтрокаТипов), "", ", ") + Строка(ТипПеречисление); + Продолжить + КонецЕсли; + + ПоискМетаданных = Метаданные.НайтиПоТипу(ТипПеречисление).ПолноеИмя(); + + ПоискМетаданныхРазделитель = СтрРазделить(ПоискМетаданных, "."); + + СтрокаТипов = СтрокаТипов + ?(ПустаяСтрока(СтрокаТипов), "", ", ") + + ПоискМетаданныхРазделитель[0] + "Ссылка" + "." + ПоискМетаданныхРазделитель[1]; + + КонецЦикла; + + Возврат СтрокаТипов; + +КонецФункции + &НаСервереБезКонтекста Функция ПолучитьПредставлениеСвойства(СтрокаРеквизитов) diff --git "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form.xml" "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form.xml" index f7cc610..e7387ea 100644 --- "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form.xml" +++ "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form.xml" @@ -166,6 +166,9 @@ 6 + + ШиринаТаблицыПриИзменении + ВысотаСтрок @@ -240,19 +243,78 @@ - - РазделительИмениИТипа - 6 - false - 6 - - - - - СкрытьТаблицыПодШапку + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Группа работа с типами</v8:content> + </v8:item> + + + + ru + Группа работа с типами + + + None + false + + + + ВыводитьТипыЭлементов + Auto + + + + ВыводитьТипыЭлементовПриИзменении + + + + РазделительИмениИТипа + 6 + false + 6 + + + + + + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Группа сокрытие элементов</v8:content> + </v8:item> + + + + ru + Группа сокрытие элементов + + + None + false + + + + СкрытьТаблицыПодШапку + Auto + + + + + УбратьЛинииСвязейНаЗаднийПлан + Auto + + + + + + + ВыводитьСсылочныеРеквизиты Auto - - + + @@ -444,6 +506,39 @@ ShowError + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Выводить типы элементов</v8:content> + </v8:item> + + + xs:boolean + + + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Убрать линии связей на задний план</v8:content> + </v8:item> + + + xs:boolean + + + + + <v8:item> + <v8:lang>ru</v8:lang> + <v8:content>Выводить ссылочные реквизиты</v8:content> + </v8:item> + + + xs:boolean + + diff --git "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form/Module.bsl" "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form/Module.bsl" index a6e352a..7347891 100644 --- "a/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form/Module.bsl" +++ "b/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/ER\320\224\320\270\320\260\320\263\321\200\320\260\320\274\320\274\320\260\320\234\320\265\321\202\320\260\320\264\320\260\320\275\320\275\321\213\321\205DrawIO/Forms/\320\244\320\276\321\200\320\274\320\260\320\235\320\260\321\201\321\202\321\200\320\276\320\265\320\272\320\222\321\213\320\262\320\276\320\264\320\260/Ext/Form/Module.bsl" @@ -4,17 +4,37 @@ &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) - ВысотаСтраницы = Параметры.ВысотаСтраницы; - ВысотаСтрок = Параметры.ВысотаСтрок; - НачальнаяКоординатаX = Параметры.НачальнаяКоординатаX; - НачальнаяКоординатаY = Параметры.НачальнаяКоординатаY; - РазделительИмениИТипа = Параметры.РазделительИмениИТипа; - РасстояниеМеждуТаблицами = Параметры.РасстояниеМеждуТаблицами; - СкрытьТаблицыПодШапку = Параметры.СкрытьТаблицыПодШапку; - ШиринаПоляОписание = Параметры.ШиринаПоляОписание; - ШиринаПоляСвойство = Параметры.ШиринаПоляСвойство; - ШиринаСтраницы = Параметры.ШиринаСтраницы; - ШиринаТаблицы = Параметры.ШиринаТаблицы; + ВыводитьТипыЭлементов = Параметры.ВыводитьТипыЭлементов; + ВыводитьСсылочныеРеквизиты = Параметры.ВыводитьСсылочныеРеквизиты; + ВысотаСтраницы = Параметры.ВысотаСтраницы; + ВысотаСтрок = Параметры.ВысотаСтрок; + НачальнаяКоординатаX = Параметры.НачальнаяКоординатаX; + НачальнаяКоординатаY = Параметры.НачальнаяКоординатаY; + РазделительИмениИТипа = Параметры.РазделительИмениИТипа; + РасстояниеМеждуТаблицами = Параметры.РасстояниеМеждуТаблицами; + СкрытьТаблицыПодШапку = Параметры.СкрытьТаблицыПодШапку; + УбратьЛинииСвязейНаЗаднийПлан = Параметры.УбратьЛинииСвязейНаЗаднийПлан; + ШиринаПоляОписание = Параметры.ШиринаПоляОписание; + ШиринаПоляСвойство = Параметры.ШиринаПоляСвойство; + ШиринаСтраницы = Параметры.ШиринаСтраницы; + ШиринаТаблицы = Параметры.ШиринаТаблицы; + + Элементы.РазделительИмениИТипа.Доступность = ВыводитьТипыЭлементов; + +КонецПроцедуры + +&НаКлиенте +Процедура ШиринаТаблицыПриИзменении(Элемент) + + ШиринаПоляСвойство = ШиринаТаблицы * 0.25; + ШиринаПоляОписание = ШиринаТаблицы * 0.75; + +КонецПроцедуры + +&НаКлиенте +Процедура ВыводитьТипыЭлементовПриИзменении(Элемент) + + Элементы.РазделительИмениИТипа.Доступность = ВыводитьТипыЭлементов; КонецПроцедуры @@ -61,17 +81,20 @@ ОсновнаяФорма = ЭтотОбъект.ВладелецФормы; - ОсновнаяФорма.ВысотаСтраницы = ВысотаСтраницы; - ОсновнаяФорма.ВысотаСтрок = ВысотаСтрок; - ОсновнаяФорма.НачальнаяКоординатаX = НачальнаяКоординатаX; - ОсновнаяФорма.НачальнаяКоординатаY = НачальнаяКоординатаY; - ОсновнаяФорма.РазделительИмениИТипа = РазделительИмениИТипа; - ОсновнаяФорма.РасстояниеМеждуТаблицами = РасстояниеМеждуТаблицами; - ОсновнаяФорма.СкрытьТаблицыПодШапку = СкрытьТаблицыПодШапку; - ОсновнаяФорма.ШиринаПоляОписание = ШиринаПоляОписание; - ОсновнаяФорма.ШиринаПоляСвойство = ШиринаПоляСвойство; - ОсновнаяФорма.ШиринаСтраницы = ШиринаСтраницы; - ОсновнаяФорма.ШиринаТаблицы = ШиринаТаблицы; + ОсновнаяФорма.ВыводитьТипыЭлементов = ВыводитьТипыЭлементов; + ОсновнаяФорма.ВыводитьСсылочныеРеквизиты = ВыводитьСсылочныеРеквизиты; + ОсновнаяФорма.ВысотаСтраницы = ВысотаСтраницы; + ОсновнаяФорма.ВысотаСтрок = ВысотаСтрок; + ОсновнаяФорма.НачальнаяКоординатаX = НачальнаяКоординатаX; + ОсновнаяФорма.НачальнаяКоординатаY = НачальнаяКоординатаY; + ОсновнаяФорма.РазделительИмениИТипа = РазделительИмениИТипа; + ОсновнаяФорма.РасстояниеМеждуТаблицами = РасстояниеМеждуТаблицами; + ОсновнаяФорма.СкрытьТаблицыПодШапку = СкрытьТаблицыПодШапку; + ОсновнаяФорма.УбратьЛинииСвязейНаЗаднийПлан = УбратьЛинииСвязейНаЗаднийПлан; + ОсновнаяФорма.ШиринаПоляОписание = ШиринаПоляОписание; + ОсновнаяФорма.ШиринаПоляСвойство = ШиринаПоляСвойство; + ОсновнаяФорма.ШиринаСтраницы = ШиринаСтраницы; + ОсновнаяФорма.ШиринаТаблицы = ШиринаТаблицы; ЭтаФорма.Закрыть();