diff --git a/CHANGELOG.md b/CHANGELOG.md
index e2acf17..ce46e62 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -4,6 +4,12 @@
 
 ---
 
+## 1.3.1.79 (2026-08-17)
+
+### Исправление
+
+- Компиляция формы: `ДеньМесяца` заменён на платформенный `День()`; локальные переменные даты переименованы, чтобы не затенять функции.
+
 ## 1.3.1.78 (2026-08-17)
 
 ### РК_ПроверкаСерий — анализ таблицы проблем
diff --git a/VERSION b/VERSION
index 482e359..7dc27ba 100644
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-1.3.1.78
+1.3.1.79
diff --git a/src/Configuration.xml b/src/Configuration.xml
index adb33f3..a363c40 100644
--- a/src/Configuration.xml
+++ b/src/Configuration.xml
@@ -62,7 +62,7 @@
 				<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
 			</DefaultRoles>
 			<Vendor/>
-			<Version>1.3.1.78</Version>
+			<Version>1.3.1.79</Version>
 			<DefaultStyle/>
 			<DefaultLanguage>Language.Русский</DefaultLanguage>
 			<BriefInformation/>
diff --git a/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl b/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl
index db594dd..1816c3c 100644
--- a/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl
+++ b/src/DataProcessors/РК_ПроверкаСерий/Forms/Форма/Ext/Form/Module.bsl
@@ -859,25 +859,25 @@
 
 	Попытка
 		Если Части.Количество() >= 3 Тогда
-			День = Число(СокрЛП(Части[0]));
-			Месяц = Число(СокрЛП(Части[1]));
-			Год = Число(СокрЛП(Части[2]));
+			НомерДня = Число(СокрЛП(Части[0]));
+			НомерМесяца = Число(СокрЛП(Части[1]));
+			НомерГода = Число(СокрЛП(Части[2]));
 		Иначе
-			День = 1;
-			Месяц = Число(СокрЛП(Части[0]));
-			Год = Число(СокрЛП(Части[1]));
-			Если Год >= 100 И Месяц > 12 Тогда
-				День = Месяц;
-				Месяц = 1;
+			НомерДня = 1;
+			НомерМесяца = Число(СокрЛП(Части[0]));
+			НомерГода = Число(СокрЛП(Части[1]));
+			Если НомерГода >= 100 И НомерМесяца > 12 Тогда
+				НомерДня = НомерМесяца;
+				НомерМесяца = 1;
 			КонецЕсли;
 		КонецЕсли;
-		Если Год < 100 Тогда
-			Год = Год + 2000;
+		Если НомерГода < 100 Тогда
+			НомерГода = НомерГода + 2000;
 		КонецЕсли;
-		Если Части.Количество() = 2 И День = 1 Тогда
-			День = ДеньМесяца(КонецМесяца(Дата(Год, Месяц, 1)));
+		Если Части.Количество() = 2 И НомерДня = 1 Тогда
+			НомерДня = День(КонецМесяца(Дата(НомерГода, НомерМесяца, 1)));
 		КонецЕсли;
-		Возврат Дата(Год, Месяц, День);
+		Возврат Дата(НомерГода, НомерМесяца, НомерДня);
 	Исключение
 		Возврат '00010101';
 	КонецПопытки;