RDT1C/src/DataProcessors/ирИсторияГита/Ext/ObjectModule.bsl
Администратор 1d3d2e831a Базы пользователя ОС 1
1007325 	Task 	Добавлены команды "Создать резервную копию" и "Загрузить из файла" в подменю "Прочее" и автосоздание резервной копии списка
  Из адаптера Турбоконф 1
	1007440 	Bug 	В открытом окне подсказки по вызову метода исправлено обновление после смены метода
  История Гита 1
	1007444 	Task 	Добавлены проверки пути к репозиторию
  Консоль запросов 1
	1007442 	Task 	При активации строки структуры запроса поиск связанной строки результата пакета теперь делается сначала по имени
  Конструктор запроса 1
	1007434 	Bug 	Исправлена ошибка разбора текстов запросов с виртуальными таблицами среза первых/последних на платформе 8.2
  Общее 2
	1007441 	Bug 	Исправлена внесенная в 7.97 ошибка при открытии форм с фоновыми запросами к ИИ на платформе 8.3.13-
	1007436 	Bug 	Исправлены внесенные в 7.97 ошибки нового механизма фоновых HTTP запросов на платформах 8.3.25-
  Поле текста программы 9
	1007428 	Task 	В окне "Возможные ошибки модуля" добавлен фильтра по подсистемам для проверки всех модулей
	1007414 	Task 	Добавлено подменю "Навигация"
	1007421 	Task 	Добавлены типизирующие комментарии для обозначения ПостроительЗапроса по таблице БД
	1007438 	Task 	Команда "Советовать ИИ" переименована в "Обсудить ИИ"
	1007418 	Task 	Сделана отправка Напарнику базовой информации о структуре вовлеченных управляемых форм
	1007429 	Bug 	В методе СловаКонтекстаПредопределенные "Перейти к родителю" работает иногда некорректно
	1007437 	Bug 	В окне автодополнения теперь обрабатываются ошибки отправки запуска запросов ИИ
	1007424 	Bug 	Восстановлена видимость методов модулей расширений конфигурации в динамических модулях
	1007430 	Bug 	Исправлена некорректная вставка из списка автодополнения слова-генератора <УдалитьИзКоллекции>
  Прочее 1
	1007420 	Task 	При открытии первой формы инструментов теперь проверяется версия платформы
  Различные значения колонки 1
	1007435 	Bug 	Исправлена ошибка открытия на платформе 8.2
  Структура формы 1 Свернуть все/Развернуть все
	1007431 	Bug 	Исправлена ошибка открытия из обычной формы
  Установщик расширения ИР 1
	1007432 	Bug 	Исправлена проверка на то что платформа является учебной в английском интерфейсе системы (/Len)
  Чат ИИ 1
	1007439 	Task 	Добавлены поля "Код" и "Запрос", оформление блоков кода 1С в ответах, флажки передачи контекста, кнопки "Сравнить" и "Применить"
2025-10-22 19:31:27 +03:00

93 lines
5.8 KiB
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

//ирПортативный Перем ирПортативный Экспорт;
//ирПортативный Перем ирОбщий Экспорт;
//ирПортативный Перем ирСервер Экспорт;
//ирПортативный Перем ирКэш Экспорт;
//ирПортативный Перем ирКлиент Экспорт;
Перем мПлатформа Экспорт;
Функция РазделительАтрибутовКоммитов() Экспорт
Возврат "##";
КонецФункции
Функция ПараметрыВыводаДанныхКоммита(Знач ДляPowerShell = Ложь, Знач ДобавитьСтатистику = Ложь) Экспорт
Результат = СтрЗаменить(" --pretty=format:'|%H|%ad|%an|%B|%P|%d|'", "|", РазделительАтрибутовКоммитов()) + ФорматДаты(ДляPowerShell);
Если ДобавитьСтатистику Тогда
Результат = Результат + " --shortstat";
КонецЕсли;
Если Не ДляPowerShell Тогда
Результат = СтрЗаменить(Результат, "'", """");
КонецЕсли;
Возврат Результат;
КонецФункции
Функция ФорматДаты(Знач ДляPowerShell = Ложь) Экспорт
Результат = " --date=format:'%d.%m.%Y %H:%M:%S'";
Если Не ДляPowerShell Тогда
Результат = СтрЗаменить(Результат, "'", """");
КонецЕсли;
Возврат Результат;
КонецФункции
Функция НачалоКомандыГита() Экспорт
ПроверитьПапкуГита(Истина);
Возврат "git -C """ + ПапкаГита + """ ";
КонецФункции
Функция ПроверитьПапкуГита(Знач ВыбрасыватьИсключение = Ложь) Экспорт
Файл = Новый Файл(ПапкаГита);
Результат = Истина;
Если ирОбщий.СтрНачинаетсяСЛкс(ПапкаГита, "\\") Тогда
Если ВыбрасыватьИсключение Тогда
ВызватьИсключение "UNC путь к репозиторию не поддерживается";
Иначе
Результат = Ложь;
КонецЕсли;
КонецЕсли;
Если Не Файл.Существует() Тогда
Если ВыбрасыватьИсключение Тогда
ВызватьИсключение "Папка репозитория не существует";
Иначе
Результат = Ложь;
КонецЕсли;
КонецЕсли;
Возврат Результат;
КонецФункции
Функция ДатаПоследнегоКоммита(Знач ПолноеИмяФайла = "") Экспорт
Если Не ЗначениеЗаполнено(ПапкаГита) Тогда
Возврат Неопределено;
КонецЕсли;
СтрокаКоманды = НачалоКомандыГита() + "log -1 " + ФорматДаты() + " --format=""%ad""";
Если ЗначениеЗаполнено(ПолноеИмяФайла) Тогда
ИмяФайлаГита = СтрЗаменить(ПолноеИмяФайла, ПапкаГита + ирОбщий.РазделительПутиКФайлуЛкс(), "");
ИмяФайлаГита = СтрЗаменить(ИмяФайлаГита, "\", "/");
СтрокаКоманды = СтрокаКоманды + " -- """ + ИмяФайлаГита + """";
КонецЕсли;
Текст = ирОбщий.ВыполнитьКомандуОСЛкс(СтрокаКоманды,,,,, КодировкаТекста.UTF8);
Результат = Дата(Текст);
Возврат Результат;
КонецФункции
//ирПортативный лФайл = Новый Файл(ИспользуемоеИмяФайла);
//ирПортативный ПолноеИмяФайлаБазовогоМодуля = Лев(лФайл.Путь, СтрДлина(лФайл.Путь) - СтрДлина("Модули\")) + "ирПортативный.epf";
//ирПортативный #Если Клиент Тогда
//ирПортативный Контейнер = Новый Структура();
//ирПортативный Оповестить("ирПолучитьБазовуюФорму", Контейнер);
//ирПортативный Если Не Контейнер.Свойство("ирПортативный", ирПортативный) Тогда
//ирПортативный ирПортативный = ВнешниеОбработки.ПолучитьФорму(ПолноеИмяФайлаБазовогоМодуля);
//ирПортативный ирПортативный.Открыть();
//ирПортативный КонецЕсли;
//ирПортативный #Иначе
//ирПортативный ирПортативный = ВнешниеОбработки.Создать(ПолноеИмяФайлаБазовогоМодуля, Ложь); // Это будет второй экземпляр объекта
//ирПортативный #КонецЕсли
//ирПортативный ирОбщий = ирПортативный.ОбщийМодульЛкс("ирОбщий");
//ирПортативный ирКэш = ирПортативный.ОбщийМодульЛкс("ирКэш");
//ирПортативный ирСервер = ирПортативный.ОбщийМодульЛкс("ирСервер");
//ирПортативный ирКлиент = ирПортативный.ОбщийМодульЛкс("ирКлиент");
мПлатформа = ирКэш.Получить();
#Если Клиент Тогда
ПапкаГита = ирКлиент.ГитРепозиторий();
#КонецЕсли