Добавлен механизм подключения библиотеки к регистру "Версии подсистем" (

#48) * Добавлен механизм подключения библиотеки к регистру "Версии подсистем" * Изменение по задаче "Программное изменение запроса динамического списка"
firstBitSportivnaya · Apr 17, 2024 · b730bf2 · b730bf2
1 parent 89a04c6
commit b730bf2
Show file tree

Hide file tree

Showing 4 changed files with 143 additions and 5 deletions.
diff --git a/src/CommonModules/__ОбновлениеИнформационнойБазыПБП.xml b/src/CommonModules/__ОбновлениеИнформационнойБазыПБП.xml
@@ -0,0 +1,23 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<MetaDataObject xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" version="2.16">
+	<CommonModule uuid="216db7de-b7a7-4dc0-b7ac-bbfaa7fb6907">
+		<Properties>
+			<Name>__ОбновлениеИнформационнойБазыПБП</Name>
+			<Synonym>
+				<v8:item>
+					<v8:lang>ru</v8:lang>
+					<v8:content>Обновление информационной базы ПБП</v8:content>
+				</v8:item>
+			</Synonym>
+			<Comment/>
+			<Global>false</Global>
+			<ClientManagedApplication>false</ClientManagedApplication>
+			<Server>true</Server>
+			<ExternalConnection>true</ExternalConnection>
+			<ClientOrdinaryApplication>true</ClientOrdinaryApplication>
+			<ServerCall>false</ServerCall>
+			<Privileged>false</Privileged>
+			<ReturnValuesReuse>DontUse</ReturnValuesReuse>
+		</Properties>
+	</CommonModule>
+</MetaDataObject>
diff --git a/src/CommonModules/__ОбновлениеИнформационнойБазыПБП/Ext/Module.bsl b/src/CommonModules/__ОбновлениеИнформационнойБазыПБП/Ext/Module.bsl
@@ -0,0 +1,118 @@
+// Библиотека проектных подсистем для упрощения разработки архитектуры на 1С: Предприятие 8,
+// включая доработку типовых конфигураций.
+//
+// Copyright First BIT company
+//
+//   Licensed under the Apache License, Version 2.0 (the "License");
+//   you may not use this file except in compliance with the License.
+//   You may obtain a copy of the License at
+//
+//       http://www.apache.org/licenses/LICENSE-2.0
+//
+//   Unless required by applicable law or agreed to in writing, software
+//   distributed under the License is distributed on an "AS IS" BASIS,
+//   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+//   See the License for the specific language governing permissions and
+//   limitations under the License.
+//
+// URL:    https://github.com/firstBitSportivnaya/PSSL/
+//
+
+///////////////////////////////////////////////////////////////////////////////////////////////////////
+// Модуль предназначен для подключения обработчиков обновления информационной базы,
+// подключения библиотеки к регистру "Версии подсистем".
+//
+// Для того чтобы выполнилось обновление, необходимо в модуле БСП "ПодсистемыКонфигурацииПереопределяемый"
+// в процедуре "ПриДобавленииПодсистем" вставить строчку "ОбщийМодуль.ПриДобавленииПодсистем(МодулиПодсистем)".
+// пример: "__ОбновлениеИнформационнойБазыПБП.ПриДобавленииПодсистем(МодулиПодсистем)".
+// Подробную информацию по подключению подсистем см. на сайте ИТС -> Библиотека стандартных подсистем.
+///////////////////////////////////////////////////////////////////////////////////////////////////////
+
+#Область ПрограммныйИнтерфейс
+
+#Область ДляВызоваИзДругихПодсистем
+
+// См. ПодсистемыКонфигурацииПереопределяемый.ПриДобавленииПодсистем.
+Процедура ПриДобавленииПодсистем(МодулиПодсистем) Экспорт
+
+	МодулиПодсистем.Добавить("__ОбновлениеИнформационнойБазыПБП");
+
+КонецПроцедуры
+
+// СтандартныеПодсистемы.ОбновлениеВерсииИБ
+
+////////////////////////////////////////////////////////////////////////////////
+// Сведения о библиотеке (или конфигурации).
+
+// Заполняет основные сведения о библиотеке или основной конфигурации.
+// Библиотека, имя которой имя совпадает с именем конфигурации в метаданных, определяется как основная конфигурация.
+// 
+// Параметры:
+//  Описание - Структура:
+//
+//   * Имя                 - Строка - имя библиотеки, например, "СтандартныеПодсистемы".
+//   * Версия              - Строка - версия в формате из 4-х цифр, например, "2.1.3.1".
+//
+//   * ИдентификаторИнтернетПоддержки - Строка - уникальное имя программы в сервисах Интернет-поддержки.
+//   * ТребуемыеПодсистемы - Массив - имена других библиотек (Строка), от которых зависит данная библиотека.
+//                                    Обработчики обновления таких библиотек должны быть вызваны ранее
+//                                    обработчиков обновления данной библиотеки.
+//                                    При циклических зависимостях или, напротив, отсутствии каких-либо зависимостей,
+//                                    порядок вызова обработчиков обновления определяется порядком добавления модулей
+//                                    в процедуре ПриДобавленииПодсистем общего модуля
+//                                    ПодсистемыКонфигурацииПереопределяемый.
+//   * РежимВыполненияОтложенныхОбработчиков - Строка - "Последовательно" - отложенные обработчики обновления выполняются
+//                                    последовательно в интервале от номера версии информационной базы до номера
+//                                    версии конфигурации включительно или "Параллельно" - отложенный обработчик после
+//                                    обработки первой порции данных передает управление следующему обработчику, а после
+//                                    выполнения последнего обработчика цикл повторяется заново.
+//   * ЗаполнятьДанныеНовыхПодсистемПриПереходеСДругойПрограммы - Булево - если установить Истина, то при переходе с
+//                                    другой программы будут автоматически выполнены обработчики начального заполнения
+//                                    новых подсистем. При описании обработчика обновления можно при необходимости
+//                                    отключить его выполнение, указав свойство НеВыполнятьПриПереходеСДругойПрограммы.
+//
+Процедура ПриДобавленииПодсистемы(Описание) Экспорт
+
+	Описание.Имя = "ПроектнаяБиблиотекаПодсистем";
+	Описание.Версия = "1.0.0.1";
+
+	// Требуется библиотека стандартных подсистем.
+	Описание.ТребуемыеПодсистемы.Добавить("СтандартныеПодсистемы");
+
+КонецПроцедуры
+
+////////////////////////////////////////////////////////////////////////////////
+// Обработчики обновления информационной базы.
+
+Процедура ПриДобавленииОбработчиковОбновления(Обработчики) Экспорт
+
+КонецПроцедуры
+
+Процедура ПередОбновлениемИнформационнойБазы() Экспорт
+
+КонецПроцедуры
+
+Процедура ПослеОбновленияИнформационнойБазы(Знач ПредыдущаяВерсия, Знач ТекущаяВерсия,
+		Знач ВыполненныеОбработчики, ВыводитьОписаниеОбновлений, МонопольныйРежим) Экспорт
+
+КонецПроцедуры
+
+Процедура ПриПодготовкеМакетаОписанияОбновлений(Знач Макет) Экспорт
+
+КонецПроцедуры
+
+Процедура ПриДобавленииОбработчиковПереходаСДругойПрограммы(Обработчики) Экспорт
+
+КонецПроцедуры
+
+Процедура ПриОпределенииРежимаОбновленияДанных(РежимОбновленияДанных, СтандартнаяОбработка) Экспорт
+
+КонецПроцедуры
+
+Процедура ПриЗавершенииПереходаСДругойПрограммы(Знач ПредыдущееИмяКонфигурации, Знач ПредыдущаяВерсияКонфигурации, Параметры) Экспорт
+
+КонецПроцедуры
+
+#КонецОбласти
+
+#КонецОбласти
diff --git a/src/CommonModules/__СхемыЗапросов/Ext/Module.bsl b/src/CommonModules/__СхемыЗапросов/Ext/Module.bsl
@@ -767,10 +767,6 @@
 //
 Функция ОписаниеТаблицы(ТипТаблицы, ИмяТаблицы, ПсевдонимТаблицы, ДоступныеПоля = Неопределено, ТекстЗапроса = Неопределено) Экспорт
 
-	// ++ Обход ошибки отстутствия модуля БСП, не переносить
-	СтроковыеФункцииКлиентСервер = Неопределено;
-	// -- Обход ошибки отстутствия модуля БСП, не переносить
-
 	Описание = Новый Структура;
 	Описание.Вставить("ТипТаблицы",       ТипТаблицы);
 	Описание.Вставить("ИмяТаблицы",       ИмяТаблицы);
@@ -780,7 +776,7 @@
 	Если ТипЗнч(ДоступныеПоля) = Тип("Строка") Тогда
 		Описание.Вставить(
 			"ДоступныеПоля",
-			СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(
+			__СтроковыеФункцииСлужебныйКлиентСервер.РазложитьСтрокуВМассивПодстрок(
 				ДоступныеПоля, ",", Истина, Истина));
 	Иначе
 		Описание.Вставить("ДоступныеПоля", ДоступныеПоля);

diff --git a/src/Configuration.xml b/src/Configuration.xml
@@ -281,6 +281,7 @@
 			<CommonModule>__МодификацияКонфигурацииПереопределяемый</CommonModule>
 			<CommonModule>__МодификацияКонфигурацииПереопределяемыйДокумент</CommonModule>
 			<CommonModule>__МодификацияКонфигурацииПереопределяемыйПланВидовХарактеристик</CommonModule>
+			<CommonModule>__ОбновлениеИнформационнойБазыПБП</CommonModule>
 			<CommonModule>__ОбщегоНазначенияВызовСервера</CommonModule>
 			<CommonModule>__ОбщегоНазначенияКлиент</CommonModule>
 			<CommonModule>__ОбщегоНазначенияКлиентСервер</CommonModule>