mirror of
https://github.com/tormozit/RDT1C.git
synced 2025-12-17 05:04:11 +00:00
+В глобальных командах управляемых форм "Редактировать объект" и "Обработать объекты" реализована поддержка строк регистров
*Исправлена свежая ошибка не найденной функции ИнфоСервераПриложений при попытке получения информации для технической поддержки в портативном варианте
*Исправлены мелкие ошибки в управляемых формах в клиент-серверном варианте
Редактор объекта БД
В управляемой форме на закладке "Связанные данные"
*Исправлено отображение пиктограмм таблиц БД
+Реализована работа флажка "Только непустые"
+Добавлена команда "Обновить количество"
В управляемой форме
+Реализовано открытие объектов из таблицы "Ссылки на объект" при двойном щелчке
*Исправлена сортировка и отображение пиктограмм таблиц в списке движений
*Исправлена ошибка при загрузке ссылочного объекта с реквизитом типа ХранилищеЗначения
*Исправлена ошибка после включения флажка "Движения"
+В таблице реквизитов добавлена колонка "Функциональные опции" с отображением их значений и окраской отключенных
Адаптация расширения
*Команды разделены на подключаемые и глобальные, для которых показаны сочетания клавиш
Консоль запросов
+Автосохранение файла восстановления теперь выполняется с замером длительности и сообщением в случае превышении 2-х секундного порога
Консоль кода
+Автосохранение файла восстановления теперь выполняется с замером длительности и сообщением в случае превышении 2-х секундного порога
Редактор предопределенных
+В таблице типов добавлена редактируемая колонка "Инициализация выполнена"
+Кнопка "Инициализировать" теперь позволяет автоматически сбросить признак инициализированности у всех типов, у которых полностью отсутствуют предопределенные данные
Конструктор запроса
*В редакторе условия соединения исправлено автоматическое включение элемента отбора при изменении правого/левого поля активизацией строки
Динамический список
+Для регистров в подменю последних выбранных теперь показываются составные представления
*Исправлена ошибка нажатия кнопки последнего выбранного для регистра
*Исправлена ошибка в варианте Расширение в клиент-серверной базе при вызове редактора объекта для регистра
Форма списка значений
+Реализована возможность подбора без указания доступных типов для значений списка
89 lines
5.7 KiB
Plaintext
89 lines
5.7 KiB
Plaintext
|
||
&НаСервере
|
||
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
|
||
|
||
//Если Не ирКэш.ЛиЭтоРасширениеКонфигурацииЛкс() Тогда
|
||
// Сообщить("Операция доступна только в варианте Расширение");
|
||
// Отказ = Истина;
|
||
// Возврат;
|
||
//КонецЕсли;
|
||
Элементы.ФормаВыполнить.Доступность = ирКэш.ЛиЭтоРасширениеКонфигурацииЛкс();
|
||
ПометкиКоманд = ХранилищеОбщихНастроек.Загрузить(, "ирАдаптацияРасширения.ПометкиКоманд",, ирКэш.ИмяПродукта());
|
||
Если ПометкиКоманд = Неопределено Тогда
|
||
СохранитьНастройкиАдаптации(Истина);
|
||
КонецЕсли;
|
||
СписокСочетанийКлавиш = Новый Массив;
|
||
СписокСочетанийКлавиш.Добавить(Метаданные.ОбщиеКоманды.ирОбработатьОбъектыИзАктивнойФормы.Имя);
|
||
СписокСочетанийКлавиш.Добавить(Метаданные.ОбщиеКоманды.ирРедактироватьОбъектИзАктивнойФормы.Имя);
|
||
Для Каждого МетаКоманда Из Метаданные.ОбщиеКоманды Цикл
|
||
Если Истина
|
||
И Метаданные.Подсистемы.ИнструментыРазработчикаTormozit.Состав.Содержит(МетаКоманда)
|
||
И МетаКоманда.Группа.Получить() = Метаданные.ГруппыКоманд.ирКоманднаяПанельФормы
|
||
Тогда
|
||
Если СписокСочетанийКлавиш.Найти(МетаКоманда.Имя) <> Неопределено Тогда
|
||
СтрокаГорячейКлавиши = ГлобальныеСочетанияКлавиш.Добавить();
|
||
СтрокаГорячейКлавиши.ИмяКоманды = МетаКоманда.Имя;
|
||
СтрокаГорячейКлавиши.СинонимКоманды = МетаКоманда.Представление();
|
||
СтрокаГорячейКлавиши.Подсказка = МетаКоманда.Подсказка;
|
||
СтрокаГорячейКлавиши.СочетаниеКлавиш = ирОбщий.ПреставлениеСочетанияКлавишЛкс(МетаКоманда.СочетаниеКлавиш);
|
||
Иначе
|
||
СтрокаКоманды = СписокКоманд.Добавить();
|
||
СтрокаКоманды.ИмяКоманды = МетаКоманда.Имя;
|
||
СтрокаКоманды.СинонимКоманды = МетаКоманда.Представление();
|
||
СтрокаКоманды.Подсказка = МетаКоманда.Подсказка;
|
||
Если Истина
|
||
И ПометкиКоманд <> Неопределено
|
||
И ПометкиКоманд.Свойство(СтрокаКоманды.ИмяКоманды)
|
||
Тогда
|
||
СтрокаКоманды.Подключить = ПометкиКоманд[СтрокаКоманды.ИмяКоманды];
|
||
Иначе
|
||
СтрокаКоманды.Подключить = Ложь
|
||
Или СтрокаКоманды.ИмяКоманды = Метаданные.ОбщиеКоманды.ирРедактироватьОбъект.Имя
|
||
Или СтрокаКоманды.ИмяКоманды = Метаданные.ОбщиеКоманды.ирОбработатьОбъекты.Имя
|
||
Или СтрокаКоманды.ИмяКоманды = Метаданные.ОбщиеКоманды.ирРедактироватьИзмененияНаУзле.Имя;
|
||
КонецЕсли;
|
||
КонецЕсли;
|
||
КонецЕсли;
|
||
КонецЦикла;
|
||
СписокКоманд.Сортировать("СинонимКоманды");
|
||
Если Параметры.Автооткрытие Тогда
|
||
Сообщить("Открыть это окно можно в разделе ""Инструменты разработчика""/""Сервис""");
|
||
КонецЕсли;
|
||
|
||
КонецПроцедуры
|
||
|
||
&НаКлиенте
|
||
Процедура ВыполнитьОперацию(Команда)
|
||
|
||
СохранитьНастройкиАдаптации();
|
||
Если ирОбщий.АдаптироватьРасширениеЛкс() Тогда
|
||
ЗавершитьРаботуСистемы(, Истина);
|
||
КонецЕсли;
|
||
|
||
КонецПроцедуры
|
||
|
||
&НаСервере
|
||
Процедура СохранитьНастройкиАдаптации(ПустуюСтруктуру = Ложь)
|
||
|
||
ПометкиКоманд = Новый Структура;
|
||
Если Не ПустуюСтруктуру Тогда
|
||
Для Каждого СтрокаКоманды Из СписокКоманд Цикл
|
||
ПометкиКоманд.Вставить(СтрокаКоманды.ИмяКоманды, СтрокаКоманды.Подключить);
|
||
КонецЦикла;
|
||
КонецЕсли;
|
||
ХранилищеОбщихНастроек.Сохранить(, "ирАдаптацияРасширения.ПометкиКоманд", ПометкиКоманд,, ирКэш.ИмяПродукта());
|
||
|
||
КонецПроцедуры
|
||
|
||
&НаКлиенте
|
||
Процедура ПриОткрытии(Отказ)
|
||
|
||
#Если ТонкийКлиент Или ВебКлиент Тогда
|
||
Отказ = Истина;
|
||
ОткрытьФорму("Обработка.ирПортативный.Форма.ФормаУправляемая");
|
||
#КонецЕсли
|
||
|
||
КонецПроцедуры
|
||
|
||
|