1c/crm3_26.rhana
4
0
Fork 0
Code Issues 7 Pull Requests Actions Packages Projects Releases 1 Wiki Activity

РК_ПроверкаСерий 1.3.1.84: номер из срока годности по умолчанию при пустом сроке.

Browse Source
This commit is contained in:
mihailkudravcev
2026-08-19 10:48:54 +03:00
parent 87e9c891d0
commit 0954a70b03
4 changed files with 16 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files
CHANGELOG.md
+6
View File
@@ -4,6 +4,12 @@
---
## 1.3.1.84 (2026-08-19)
### РК_ПроверкаСерий — автономер при «Пустой срок годности» (#17 / #14)
- Если `Номер` пустой и по политике вида номер обязателен, то предложение номера `a-YYMMDD` формируется из даты срока (в т.ч. из **«Срок годности по умолчанию»**), даже когда строка проблемы содержит только «Пустой срок годности».
## 1.3.1.83 (2026-08-18)
### РК_ПроверкаСерий — автономер из срока годности (#17)
VERSION
+1 -1
View File
@@ -1 +1 @@
1.3.1.83
1.3.1.84
src/Configuration.xml
+1 -1
View File
@@ -62,7 +62,7 @@
<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
</DefaultRoles>
<Vendor/>
<Version>1.3.1.83</Version>
<Version>1.3.1.84</Version>
<DefaultStyle/>
<DefaultLanguage>Language.Русский</DefaultLanguage>
<BriefInformation/>
src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl
+8 -9
View File
@@ -507,6 +507,7 @@
КонецЕсли;
ПересчитатьПредложенияСтрокиПроблемы(Стр, КэшНастроек);
Настройки = НастройкиСерийВида(Стр.ВидНоменклатуры, КэшНастроек);
ИзмененийВСтроке = 0;
Если СтрНайти(Стр.Проблема, "Пустой срок годности") > 0
@@ -516,7 +517,7 @@
ИзмененийВСтроке = ИзмененийВСтроке + 1;
КонецЕсли;
Если СтрНайти(Стр.Проблема, "Пустой номер") > 0
Если Настройки.ИспользоватьНомерСерии
И Не ЗначениеЗаполнено(СокрЛП(Стр.Номер))
И Не ЗначениеЗаполнено(СокрЛП(Стр.ПредложенныйНомер)) Тогда
ПредложенияНомера = ПредложенияПоНомеруИзСрока(
@@ -530,7 +531,7 @@
КонецЕсли;
КонецЕсли;
Если СтрНайти(Стр.Проблема, "Пустой номер") > 0
Если Настройки.ИспользоватьНомерСерии
И ЗначениеЗаполнено(СокрЛП(Стр.ПредложенныйНомер))
И Не ЗначениеЗаполнено(СокрЛП(Стр.Номер)) Тогда
Стр.Номер = СокрЛП(Стр.ПредложенныйНомер);
@@ -644,7 +645,7 @@
Стр.ПредложенныйГоденДо = ПредложенныйГоденДоПоСтроке(ТекстНаименования);
КонецЕсли;
Если ИспНомер И СтрНайти(Стр.Проблема, "Пустой номер") > 0 Тогда
Если ИспНомер И Не ЗначениеЗаполнено(СокрЛП(Стр.Номер)) Тогда
ПредложенияНомера = ПредложенияПоНомеруИзСрока(
ТекстНаименования, Стр.ГоденДо, Стр.ПредложенныйГоденДо);
Стр.ПредложенныйНомер = ПредложенияНомера.Номер;
@@ -678,7 +679,7 @@
ГоденДоЗаписи = ГоденДоДляИсправленияСтроки(Стр);
НаименованиеЗаписи = НаименованиеДляИсправленияСтроки(Стр);
Если СтрНайти(Стр.Проблема, "Пустой номер") > 0
Если Не ЗначениеЗаполнено(СокрЛП(Стр.Номер))
И ЗначениеЗаполнено(НомерЗаписи) Тогда
ЕстьИзменения = Истина;
КонецЕсли;
@@ -689,8 +690,7 @@
КонецЕсли;
Если (СтрНайти(Стр.Проблема, "Пустое наименование") > 0
Или (СтрНайти(Стр.Проблема, "Пустой номер") > 0
И Не ЗначениеЗаполнено(СокрЛП(Стр.Наименование))))
И Не ЗначениеЗаполнено(СокрЛП(Стр.Наименование)))
И ЗначениеЗаполнено(НаименованиеЗаписи) Тогда
ЕстьИзменения = Истина;
КонецЕсли;
@@ -706,7 +706,7 @@
Результат.Исправлено = Результат.Исправлено + 1;
Иначе
ОбСерии = Стр.Серия.ПолучитьОбъект();
Если СтрНайти(Стр.Проблема, "Пустой номер") > 0
Если Не ЗначениеЗаполнено(СокрЛП(Стр.Номер))
И ЗначениеЗаполнено(НомерЗаписи) Тогда
ОбСерии.Номер = НомерЗаписи;
КонецЕсли;
@@ -715,8 +715,7 @@
ОбСерии.ГоденДо = ГоденДоЗаписи;
КонецЕсли;
Если (СтрНайти(Стр.Проблема, "Пустое наименование") > 0
Или (СтрНайти(Стр.Проблема, "Пустой номер") > 0
И Не ЗначениеЗаполнено(СокрЛП(Стр.Наименование))))
И Не ЗначениеЗаполнено(СокрЛП(Стр.Наименование)))
И ЗначениеЗаполнено(НаименованиеЗаписи) Тогда
ОбСерии.Наименование = НаименованиеЗаписи;
КонецЕсли;