1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-02-03 13:22:19 +02:00
Code Issues Releases Activity

Добавление параметра версии

Browse Source
This commit is contained in:
Anton Titovets 2024-04-11 10:02:23 +03:00
parent f3a8b34e87
commit e9f8c8c978
3 changed files with 21 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
cli/core/Classes/Приложение.os
View File

@ -8,6 +8,7 @@
Перем Отладка; Перем Отладка;
Перем Тестирование; Перем Тестирование;
Перем ФайлВывода; Перем ФайлВывода;
Перем Версия;
#Область СлужебныеПроцедурыИФункции #Область СлужебныеПроцедурыИФункции
@ -15,6 +16,7 @@
Процедура ОсновнойОбработчик() Процедура ОсновнойОбработчик()
Версия = "1.6.0";
Отладка = Ложь; Отладка = Ложь;
Тестирование = Ложь; Тестирование = Ложь;
Парсер = Новый ПарсерАргументовКоманднойСтроки(); Парсер = Новый ПарсерАргументовКоманднойСтроки();
@ -31,7 +33,7 @@
ТекущаяКоманда = Результат["Команда"]; ТекущаяКоманда = Результат["Команда"];
Если ТекущаяКоманда = Неопределено Тогда Если ТекущаяКоманда = Неопределено Тогда
Справка.ВывестиНачальнуюСтраницу(Команды); Справка.ВывестиНачальнуюСтраницу(Команды, Версия);
Иначе Иначе
ВыполнитьОбработкуКоманды(Результат); ВыполнитьОбработкуКоманды(Результат);
КонецЕсли; КонецЕсли;
@ -43,6 +45,7 @@
Парсер.ДобавитьПараметр("-h"); Парсер.ДобавитьПараметр("-h");
Парсер.ДобавитьПараметр("-help"); Парсер.ДобавитьПараметр("-help");
Парсер.ДобавитьПараметр("--help"); Парсер.ДобавитьПараметр("--help");
Парсер.ДобавитьПараметр("--version");
КонецПроцедуры КонецПроцедуры
@ -132,6 +135,10 @@
ТаблицаПараметров = ОбъектОПИ.СоответствиеТаблицПараметров[Команда]; ТаблицаПараметров = ОбъектОПИ.СоответствиеТаблицПараметров[Команда];
Если Метод = "--version" Тогда
Версии.ПроверитьВерсию(Версия);
КонецЕсли;
Если Не ЗначениеЗаполнено(Метод) Или Метод = "--help" Тогда Если Не ЗначениеЗаполнено(Метод) Или Метод = "--help" Тогда
Справка.ВывестиСправкуПоМетодам(Команда, ТаблицаПараметров); Справка.ВывестиСправкуПоМетодам(Команда, ТаблицаПараметров);
КонецЕсли; КонецЕсли;

4
cli/help/Modules/Справка.os
View File

@ -2,7 +2,7 @@
#Область СлужебныйПрограммныйИнтерфейс #Область СлужебныйПрограммныйИнтерфейс
Процедура ВывестиНачальнуюСтраницу(Знач СоответствиеКомандМодулей) Экспорт Процедура ВывестиНачальнуюСтраницу(Знач СоответствиеКомандМодулей, Знач Версия) Экспорт
СписокКоманд = ""; СписокКоманд = "";
@ -22,7 +22,7 @@
| \____/ /___/ /_/ |_/ /_/ | \____/ /___/ /_/ |_/ /_/
| |
| |
| Добро пожаловать в OInt v 1.6.0! | Добро пожаловать в OInt v " + Версия + "!
| |
| Структура команд: | Структура команд:
| OInt БИБЛИОТЕКА МЕТОД [Параметры] | OInt БИБЛИОТЕКА МЕТОД [Параметры]

11
cli/tools/Modules/Версии.os Normal file
View File

@ -0,0 +1,11 @@
Процедура ПроверитьВерсию(Знач ТекущаяВерсия) Экспорт
Информация = Новый СистемнаяИнформация;
Платформа = Строка(Информация.ТипПлатформы);
Сообщить("Текущая версия OInt: " + ТекущаяВерсия, СтатусСообщения.Информация);
Сообщить("Платформа : " + Платформа, СтатусСообщения.Внимание);
ЗавершитьРаботу(0);
КонецПроцедуры