Актуализация подсистемы загрузки таб дока #146
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
|
|
@@ -116,6 +116,14 @@ | |
| <ContextMenu name="ТаблицаКонфликтовЗаменитьЭлементомИзКодаКонтекстноеМеню" id="27"/> | ||
| <ExtendedTooltip name="ТаблицаКонфликтовЗаменитьЭлементомИзКодаРасширеннаяПодсказка" id="28"/> | ||
| </CheckBoxField> | ||
| <InputField name="ТаблицаКонфликтовКоллизииИдентификатора" id="36"> | ||
| <DataPath>ТаблицаКонфликтов.Ошибка</DataPath> | ||
| <ReadOnly>true</ReadOnly> | ||
| <EditMode>EnterOnInput</EditMode> | ||
| <ExtendedEditMultipleValues>true</ExtendedEditMultipleValues> | ||
| <ContextMenu name="ТаблицаКонфликтовКоллизииИдентификатораКонтекстноеМеню" id="37"/> | ||
| <ExtendedTooltip name="ТаблицаКонфликтовКоллизииИдентификатораРасширеннаяПодсказка" id="38"/> | ||
| </InputField> | ||
| <ColumnGroup name="ГруппаЭлементВБазе" id="19"> | ||
| <Title> | ||
| <v8:item> | ||
|
|
@@ -176,6 +184,17 @@ | |
| <v8:Type>xs:boolean</v8:Type> | ||
| </Type> | ||
| </Column> | ||
| <Column name="Ошибка" id="2"> | ||
| <Title> | ||
| <v8:item> | ||
| <v8:lang>ru</v8:lang> | ||
| <v8:content>Ошибка</v8:content> | ||
| </v8:item> | ||
| </Title> | ||
| <Type> | ||
| <v8:Type>cfg:EnumRef.пбп_ВидыОшибокПредопределенныхЭлементов</v8:Type> | ||
| </Type> | ||
| </Column> | ||
| </Columns> | ||
| </Attribute> | ||
| <Attribute name="ОбработатьЭлементы" id="4"> | ||
|
|
||
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
|
|
@@ -14,6 +14,8 @@ | |
| ОбработатьКонфликтныеЭлементы(АдресТаблицы); | ||
| КонецЕсли; | ||
|
|
||
| УстановитьУсловноеОформление(); | ||
|
|
||
| КонецПроцедуры | ||
|
|
||
| &НаКлиенте | ||
|
|
@@ -76,13 +78,14 @@ | |
| ДобавляемыеРеквизиты = Новый Структура; | ||
| Для Каждого Колонка Из Таблица.Колонки Цикл | ||
| Если ИсключаемыеПоля.Свойство(Колонка.Имя) | ||
| Или СтрНачинаетсяС(Колонка.Имя, "Служебный_") Тогда | ||
| Продолжить; | ||
| КонецЕсли; | ||
| ДобавляемыеРеквизиты.Вставить(ПрефиксКод + Колонка.Имя, Колонка.ТипЗначения); | ||
| ДобавляемыеРеквизиты.Вставить(ПрефиксБаза + Колонка.Имя, Колонка.ТипЗначения); | ||
| Поля.Добавить(Колонка.Имя, Колонка.Имя); | ||
| КонецЦикла; | ||
|
|
||
| пбп_РаботаСФормами.СоздатьРеквизитыТаблицы(ЭтотОбъект, "ТаблицаКонфликтов", ДобавляемыеРеквизиты); | ||
|
|
||
| ШиринаКолонки = 5; | ||
|
|
@@ -121,7 +124,7 @@ | |
|
|
||
| МенеджерОбъекта = пбп_ОбщегоНазначенияСлужебный.МенеджерОбъектаПоПолномуИмени(ИмяФормыВладельца); | ||
|
|
||
| СписокПредопределенных = Таблица.ВыгрузитьКолонку("Служебный_ПредопределенныйЭлемент"); | ||
|
|
||
| Запрос = Новый Запрос; | ||
| Запрос.Текст = | ||
|
|
@@ -150,14 +153,18 @@ | |
| нСтрока[ПрефиксКод + КлючЗначение.Ключ] = КлючЗначение.Значение; | ||
| КонецЦикла; | ||
|
|
||
| Если Строка.Служебный_ДублированиеИдентификаторов Тогда | ||
| нСтрока.Ошибка = Перечисления.пбп_ВидыОшибокПредопределенныхЭлементов.ДублированиеИдентификаторов; | ||
| Иначе | ||
| нСтрока.Ошибка = Перечисления.пбп_ВидыОшибокПредопределенныхЭлементов.РасхождениеЭлементаСКодом; | ||
| КонецЕсли; | ||
|
|
||
| Выборка.Сбросить(); | ||
| Если Выборка.НайтиСледующий(Строка.Служебный_ПредопределенныйЭлемент, "Ссылка") Тогда | ||
| ЗаполнитьЗначенияСвойств(БазоваяСтруктура, Выборка); | ||
| Для Каждого КлючЗначение Из БазоваяСтруктура Цикл | ||
| нСтрока[ПрефиксБаза + КлючЗначение.Ключ] = КлючЗначение.Значение; | ||
| КонецЦикла; | ||
| КонецЕсли; | ||
| КонецЦикла; | ||
|
|
||
|
|
@@ -181,13 +188,23 @@ | |
| Таблица.Индексы.Добавить(ИдентификаторНастройки); | ||
| Для Каждого Строка Из ТаблицаКонфликтов Цикл | ||
| Стр = Таблица.Найти(Строка[ПрефиксКод + ИдентификаторНастройки], ИдентификаторНастройки); | ||
|
|
||
| Если Строка.Ошибка = Перечисления.пбп_ВидыОшибокПредопределенныхЭлементов.ДублированиеИдентификаторов Тогда | ||
| Таблица.Удалить(Стр); | ||
| Продолжить; | ||
| КонецЕсли; | ||
|
|
||
| Если Строка.ЗаменитьЭлементомИзКода Тогда | ||
| Стр.Служебный_ОбновитьЭлемент = Истина; | ||
| Иначе | ||
| Стр.Служебный_УстановитьФлагРучноеИзменение = Истина; | ||
| КонецЕсли; | ||
| КонецЦикла; | ||
|
|
||
| Если Не ЗначениеЗаполнено(Таблица) Тогда | ||
| Возврат; | ||
| КонецЕсли; | ||
|
|
||
| Менеджер = пбп_ОбщегоНазначенияСлужебный.МенеджерОбъектаПоПолномуИмени(ИмяФормыВладельца); | ||
| ДопПараметры = пбп_ПредопределенныеЗначения.ДопПараметрыОбработкиПредопределенныхЭлементов( | ||
| Таблица, Менеджер); | ||
|
|
@@ -199,24 +216,31 @@ | |
| Процедура ЗаполнитьОтметки(ЗначениеОтметки) | ||
| Модифицированность = Истина; | ||
| Для Каждого Строка Из ТаблицаКонфликтов Цикл | ||
| Если Строка.Ошибка = | ||
| ПредопределенноеЗначение("Перечисление.пбп_ВидыОшибокПредопределенныхЭлементов.ДублированиеИдентификаторов") Тогда | ||
| Продолжить; | ||
| КонецЕсли; | ||
| Строка.ЗаменитьЭлементомИзКода = ЗначениеОтметки; | ||
| КонецЦикла; | ||
| КонецПроцедуры | ||
|
|
||
| &НаСервере | ||
| Процедура УстановитьУсловноеОформление() | ||
|
|
||
| УсловноеОформление.Элементы.Очистить(); | ||
|
|
||
| Элемент = УсловноеОформление.Элементы.Добавить(); | ||
|
|
||
| ПолеЭлемента = Элемент.Поля.Элементы.Добавить(); | ||
| ПолеЭлемента.Поле = Новый ПолеКомпоновкиДанных(Элементы.ТаблицаКонфликтовЗаменитьЭлементомИзКода.Имя); | ||
|
|
||
| ОтборЭлемента = Элемент.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных")); | ||
| ОтборЭлемента.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("ТаблицаКонфликтов.Ошибка"); | ||
| ОтборЭлемента.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно; | ||
| ОтборЭлемента.ПравоеЗначение = Перечисления.пбп_ВидыОшибокПредопределенныхЭлементов.ДублированиеИдентификаторов; | ||
|
|
||
| Элемент.Оформление.УстановитьЗначениеПараметра("ТолькоПросмотр", Истина); | ||
|
|
||
| КонецПроцедуры | ||
|
|
||
| #КонецОбласти | ||
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -1,24 +1,22 @@ | ||
| // Библиотека проектных подсистем для упрощения разработки архитектуры на 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/ | ||
| // | ||
|
|
||
| #Область ПрограммныйИнтерфейс | ||
|
|
||
|
|
@@ -27,23 +25,18 @@ | |
| // Параметры: | ||
| // АдресВХранилище - Строка - Адрес файла во временном хранилище | ||
| // Расширение - Строка - Расширение файла (xls, xlsx) | ||
| // ПараметрыЧтения - Структура - структура параметров загрузки Excel-файла | ||
| // см. пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер.ПолучитьПараметрыЧтенияФайла | ||
| // | ||
| Процедура ФормированиеТаблицы(АдресВХранилище, Расширение, ПараметрыЧтения) Экспорт | ||
|
|
||
| ТаблицаСвойств = ПолучитьИзВременногоХранилища(ПараметрыЧтения.АдресМакета); | ||
|
|
||
| ТаблицаДанных = пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер | ||
| .КонвертироватьДанныеТабличногоДокументаВТаблицуЗначений( | ||
| АдресВХранилище, Расширение, ТаблицаСвойств, ПараметрыЧтения); | ||
|
|
||
| ПоместитьВоВременноеХранилище(ТаблицаДанных, ПараметрыЧтения.АдресПомещения); | ||
|
|
||
| КонецПроцедуры | ||
|
|
||
|
|
@@ -78,19 +71,18 @@ | |
| // | ||
| Функция ИнициализироватьТаблицуСоСвойствамиКолонок() Экспорт | ||
|
|
||
| Возврат пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер.ИнициализироватьТаблицуСоСвойствамиКолонок(); | ||
|
|
||
| КонецФункции | ||
|
|
||
| // Получить параметры чтения файла | ||
| // | ||
| // Возвращаемое значение: | ||
| // Структура - см. пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер.ПолучитьПараметрыЧтенияФайла | ||
| // | ||
| Функция ПолучитьПараметрыЧтенияФайла() Экспорт | ||
|
|
||
| Возврат пбп_ЗагрузкаФайлаЧерезТабличныйДокументСервер.ПолучитьПараметрыЧтенияФайла(); | ||
|
|
||
| КонецФункции | ||
|
|
||
|
|
||
Oops, something went wrong.
Oops, something went wrong.
Add this suggestion to a batch that can be applied as a single commit.
This suggestion is invalid because no changes were made to the code.
Suggestions cannot be applied while the pull request is closed.
Suggestions cannot be applied while viewing a subset of changes.
Only one suggestion per line can be applied in a batch.
Add this suggestion to a batch that can be applied as a single commit.
Applying suggestions on deleted lines is not supported.
You must change the existing code in this line in order to create a valid suggestion.
Outdated suggestions cannot be applied.
This suggestion has been applied or marked resolved.
Suggestions cannot be applied from pending reviews.
Suggestions cannot be applied on multi-line comments.
Suggestions cannot be applied while the pull request is queued to merge.
Suggestion cannot be applied right now. Please check back later.
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Это точно относится к данному PR?