РК_ПроверкаСерий 1.3.1.79: День() вместо несуществующего ДеньМесяца.
Co-authored-by: Cursor <cursoragent@cursor.com>
This commit is contained in:
@@ -4,6 +4,12 @@
|
|||||||
|
|
||||||
---
|
---
|
||||||
|
|
||||||
|
## 1.3.1.79 (2026-08-17)
|
||||||
|
|
||||||
|
### Исправление
|
||||||
|
|
||||||
|
- Компиляция формы: `ДеньМесяца` заменён на платформенный `День()`; локальные переменные даты переименованы, чтобы не затенять функции.
|
||||||
|
|
||||||
## 1.3.1.78 (2026-08-17)
|
## 1.3.1.78 (2026-08-17)
|
||||||
|
|
||||||
### РК_ПроверкаСерий — анализ таблицы проблем
|
### РК_ПроверкаСерий — анализ таблицы проблем
|
||||||
|
|||||||
@@ -62,7 +62,7 @@
|
|||||||
<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
|
<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
|
||||||
</DefaultRoles>
|
</DefaultRoles>
|
||||||
<Vendor/>
|
<Vendor/>
|
||||||
<Version>1.3.1.78</Version>
|
<Version>1.3.1.79</Version>
|
||||||
<DefaultStyle/>
|
<DefaultStyle/>
|
||||||
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
<DefaultLanguage>Language.Русский</DefaultLanguage>
|
||||||
<BriefInformation/>
|
<BriefInformation/>
|
||||||
|
|||||||
@@ -859,25 +859,25 @@
|
|||||||
|
|
||||||
Попытка
|
Попытка
|
||||||
Если Части.Количество() >= 3 Тогда
|
Если Части.Количество() >= 3 Тогда
|
||||||
День = Число(СокрЛП(Части[0]));
|
НомерДня = Число(СокрЛП(Части[0]));
|
||||||
Месяц = Число(СокрЛП(Части[1]));
|
НомерМесяца = Число(СокрЛП(Части[1]));
|
||||||
Год = Число(СокрЛП(Части[2]));
|
НомерГода = Число(СокрЛП(Части[2]));
|
||||||
Иначе
|
Иначе
|
||||||
День = 1;
|
НомерДня = 1;
|
||||||
Месяц = Число(СокрЛП(Части[0]));
|
НомерМесяца = Число(СокрЛП(Части[0]));
|
||||||
Год = Число(СокрЛП(Части[1]));
|
НомерГода = Число(СокрЛП(Части[1]));
|
||||||
Если Год >= 100 И Месяц > 12 Тогда
|
Если НомерГода >= 100 И НомерМесяца > 12 Тогда
|
||||||
День = Месяц;
|
НомерДня = НомерМесяца;
|
||||||
Месяц = 1;
|
НомерМесяца = 1;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Если Год < 100 Тогда
|
Если НомерГода < 100 Тогда
|
||||||
Год = Год + 2000;
|
НомерГода = НомерГода + 2000;
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Если Части.Количество() = 2 И День = 1 Тогда
|
Если Части.Количество() = 2 И НомерДня = 1 Тогда
|
||||||
День = ДеньМесяца(КонецМесяца(Дата(Год, Месяц, 1)));
|
НомерДня = День(КонецМесяца(Дата(НомерГода, НомерМесяца, 1)));
|
||||||
КонецЕсли;
|
КонецЕсли;
|
||||||
Возврат Дата(Год, Месяц, День);
|
Возврат Дата(НомерГода, НомерМесяца, НомерДня);
|
||||||
Исключение
|
Исключение
|
||||||
Возврат '00010101';
|
Возврат '00010101';
|
||||||
КонецПопытки;
|
КонецПопытки;
|
||||||
|
|||||||
Reference in New Issue
Block a user