From 666688e4d239aefce4593ed0d48b3882adc50320 Mon Sep 17 00:00:00 2001 From: mihailkudravcev Date: Mon, 17 Aug 2026 12:00:09 +0300 Subject: [PATCH] =?UTF-8?q?=D0=A0=D0=9A=5F=D0=9F=D1=80=D0=BE=D0=B2=D0=B5?= =?UTF-8?q?=D1=80=D0=BA=D0=B0=D0=A1=D0=B5=D1=80=D0=B8=D0=B9=201.3.1.74:=20?= =?UTF-8?q?=D0=BD=D0=B5=20=D0=BF=D0=B5=D1=80=D0=B5=D0=B7=D0=B0=D0=BF=D0=B8?= =?UTF-8?q?=D1=81=D1=8B=D0=B2=D0=B0=D1=82=D1=8C=20=D0=BF=D0=B0=D1=80=D0=B0?= =?UTF-8?q?=D0=BC=D0=B5=D1=82=D1=80=20=D0=BD=D0=B0=D0=B8=D0=BC=D0=B5=D0=BD?= =?UTF-8?q?=D0=BE=D0=B2=D0=B0=D0=BD=D0=B8=D1=8F.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Co-authored-by: Cursor --- CHANGELOG.md | 6 +++++ VERSION | 2 +- src/Configuration.xml | 2 +- .../Forms/Форма/Ext/Form/Module.bsl | 22 +++++++++---------- 4 files changed, 19 insertions(+), 13 deletions(-) diff --git a/CHANGELOG.md b/CHANGELOG.md index 531b1de..df44e63 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -4,6 +4,12 @@ --- +## 1.3.1.74 (2026-08-17) + +### РК_ПроверкаСерий — парсинг наименования из выборки + +- Исправлена ошибка «Поле объекта недоступно для записи (Наименование)» при «Найти проблемы»: параметры функций парсинга не перезаписываются. + ## 1.3.1.73 (2026-08-17) ### РК_ПроверкаСерий — исправление поиска проблем diff --git a/VERSION b/VERSION index b6f8657..e3a6414 100644 --- a/VERSION +++ b/VERSION @@ -1 +1 @@ -1.3.1.73 +1.3.1.74 diff --git a/src/Configuration.xml b/src/Configuration.xml index a00793a..3c9e7b5 100644 --- a/src/Configuration.xml +++ b/src/Configuration.xml @@ -62,7 +62,7 @@ Role.РК_ОсновнаяРоль - 1.3.1.73 + 1.3.1.74 Language.Русский diff --git a/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl b/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl index 551d4f9..59b3e2b 100644 --- a/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl +++ b/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl @@ -440,16 +440,16 @@ КонецФункции &НаСервере -Функция ИзвлечьНомерИзНаименования(Текст) +Функция ИзвлечьНомерИзНаименования(ТекстНаименования) - Текст = СокрЛП(Текст); - Если Не ЗначениеЗаполнено(Текст) Тогда + СтрокаТекста = СокрЛП(ТекстНаименования); + Если Не ЗначениеЗаполнено(СтрокаТекста) Тогда Возврат ""; КонецЕсли; - ПозДо = Найти(НРег(Текст), "до "); + ПозДо = Найти(НРег(СтрокаТекста), "до "); Если ПозДо > 0 Тогда - ЛеваяЧасть = СокрЛП(Лев(Текст, ПозДо - 1)); + ЛеваяЧасть = СокрЛП(Лев(СтрокаТекста, ПозДо - 1)); Если Не ЗначениеЗаполнено(ЛеваяЧасть) Тогда Возврат ""; КонецЕсли; @@ -460,24 +460,24 @@ Возврат ЛеваяЧасть; КонецЕсли; - Возврат Текст; + Возврат СтрокаТекста; КонецФункции &НаСервере -Функция ИзвлечьГоденДоИзНаименования(Текст) +Функция ИзвлечьГоденДоИзНаименования(ТекстНаименования) - Текст = СокрЛП(Текст); - Если Не ЗначениеЗаполнено(Текст) Тогда + СтрокаТекста = СокрЛП(ТекстНаименования); + Если Не ЗначениеЗаполнено(СтрокаТекста) Тогда Возврат '00010101'; КонецЕсли; - ПозДо = Найти(НРег(Текст), "до "); + ПозДо = Найти(НРег(СтрокаТекста), "до "); Если ПозДо = 0 Тогда Возврат '00010101'; КонецЕсли; - Фрагмент = СокрЛП(Сред(Текст, ПозДо + 3)); + Фрагмент = СокрЛП(Сред(СтрокаТекста, ПозДо + 3)); Возврат РазобратьДатуИзФрагмента(Фрагмент); КонецФункции