RDT1C/CommonModules/ирИнтерфейсДляВстраивания/Ext/Module.bsl
Администратор 8093344de9 Некоторые исправления ошибочно не попали в предыдущую версию но описаны в ее изменениях
Консоль запросов
        *Исправлены ошибки для типа запроса ADO без преобразования результата
    Контекстная подсказка
        *Исправлена ошибка проверки кода на встроенном языке при наличии в тексте ключевого слова "In"
    Общее
        *Исправлена недопустимая операция на 8.3.11 при включенном флажке "низкоуровневое получение описаний объектов"
    Вариант Расширение
        *Обеспечена совместимость с 8.3.11
2017-08-25 06:35:44 +03:00

69 lines
4.7 KiB
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

// Версия модуля X.XX
// Встройте этот модуль с именем ирИнтерфейс в состав целевой конфигурации, чтобы обеспечить слабую интеграцию с расширением "Инструменты разработчика".
#Если Клиент Тогда
Функция ПредложитьЗагрузитьРасширениеЛкс() Экспорт
Ответ = Вопрос("Расширение конфигурации ""Инструменты разработчика"" не установлено. Хотите открыть страницу скачивания?", РежимДиалогаВопрос.ОКОтмена);
Если Ответ = КодВозвратаДиалога.ОК Тогда
ЗапуститьПриложение("http://devtool1c.ucoz.ru/index/rasshirenie_variant/0-52");
КонецЕсли;
КонецФункции
#КонецЕсли
#Если Не ТонкийКлиент И Не ВебКлиент Тогда
Функция ЛиРасширениеУстановлено() Экспорт
Результат = Вычислить("РасширенияКонфигурации").Получить(Новый Структура("Имя", "ИнструментыРазработчикаTormozit")).Количество() > 0;
Возврат Результат;
КонецФункции
// Конструктор таблицы параметров алгоритма
// Результат - ТаблицаЗначений - колонки "Имя, Значение, Вход, Выход, ТипЗначения, Комментарий"
Функция НоваяТаблицаПараметровАлгоритмаЛкс() Экспорт
ОбщийМодульИР = Вычислить("ирОбщий");
#Если Сервер И Не Сервер Тогда
ОбщийМодульИР = ирОбщий;
#КонецЕсли
Возврат ОбщийМодульИР.НоваяТаблицаПараметровАлгоритмаЛкс();
КонецФункции
// Конструктор таблицы методов контекстной подсказки
// Результат - ТаблицаЗначений - колонки "Имя, ТипЗначения"
Функция НоваяТаблицаМетодовПодсказкиЛкс() Экспорт
ОбщийМодульИР = Вычислить("ирОбщий");
#Если Сервер И Не Сервер Тогда
ОбщийМодульИР = ирОбщий;
#КонецЕсли
Возврат ОбщийМодульИР.НоваяТаблицаМетодовПодсказкиЛкс();
КонецФункции
// Открыть редактирование текста алгоритма с параметрами в консоли кода
// Парамерты:
// СтруктураАлгоритма - Структура - возвращаемый
// "ТекстАлгоритма" - Строка - текст алгоритма,
// "ВнутренниеПараметры" - ТаблицаЗначений - таблица с конструктором НоваяТаблицаПараметровАлгоритмаЛкс с внутренними (значения определяются при редактировании) параметрами алгоритма;
// ВнешниеПараметры* - ТаблицаЗначений - таблица с конструктором НоваяТаблицаПараметровАлгоритмаЛкс с внешними (значения определяются при каждом выполнении) параметрами алгоритма;
// Методы* - ТаблицаЗначений - таблица с конструктором НоваяТаблицаМетодовПодсказкиЛкс с дополнительными методами доступными в алгоритме;
// Результат - Булево - принял ли изменения пользователь
Функция РедактироватьАлгоритмЧерезСтруктуруЛкс(СтруктураАлгоритма, ВнешниеПараметры = Неопределено, Методы = Неопределено) Экспорт
ОбщийМодульИР = Вычислить("ирОбщий");
#Если Сервер И Не Сервер Тогда
ОбщийМодульИР = ирОбщий;
#КонецЕсли
Возврат ОбщийМодульИР.РедактироватьАлгоритмЧерезСтруктуруЛкс(СтруктураАлгоритма, ВнешниеПараметры, Методы);
КонецФункции
#КонецЕсли