mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2024-12-29 02:57:35 +02:00
Доработки интерфейса CLI
This commit is contained in:
parent
54cae9c018
commit
9151e8ee2a
File diff suppressed because it is too large
Load Diff
@ -867,7 +867,7 @@
|
||||
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
ВыполнитьСборкуМусора();
|
||||
ОсвободитьОбъект(ТекущиеДанные);
|
||||
|
@ -674,7 +674,7 @@
|
||||
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
ВыполнитьСборкуМусора();
|
||||
ОсвободитьОбъект(ТекущиеДанные);
|
||||
|
@ -1718,7 +1718,7 @@
|
||||
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
ВыполнитьСборкуМусора();
|
||||
ОсвободитьОбъект(ПромежуточныйРезультат);
|
||||
@ -1831,7 +1831,7 @@
|
||||
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ПрочитаноБайт, ОбщийРазмер, "МБ", МБайт));
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ПрочитаноБайт, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
ВыполнитьСборкуМусора();
|
||||
ОсвободитьОбъект(ТекущиеДанные);
|
||||
|
@ -36,6 +36,7 @@
|
||||
//@skip-check module-structure-top-region
|
||||
//@skip-check module-structure-method-in-regions
|
||||
//@skip-check wrong-string-literal-content
|
||||
//@skip-check use-non-recommended-method
|
||||
|
||||
#Область СлужебныйПрограммныйИнтерфейс
|
||||
|
||||
@ -889,7 +890,11 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция ИнформацияОПрогрессе(Знач Текущее, Знач Всего, Знач ЕдИзм, Знач Делитель = 1) Экспорт
|
||||
Процедура ИнформацияОПрогрессе(Знач Текущее, Знач Всего, Знач ЕдИзм, Знач Делитель = 1) Экспорт
|
||||
|
||||
Если Не ЭтоOneScript() Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Целое = 100;
|
||||
Текущее = Окр(Текущее / Делитель, 2);
|
||||
@ -900,11 +905,24 @@
|
||||
СтрВсего = ЧислоВСтроку(Всего);
|
||||
СтрПроцент = ЧислоВСтроку(Процент);
|
||||
|
||||
Информация = СтрТекущее + "/" + СтрВсего + " " + ЕдИзм + " ( " + СтрПроцент + "% )";
|
||||
Прогресс = "Прогресс [" + СтрПроцент + "%" + "] ▐";
|
||||
Информация = "▌ " + СтрТекущее + "/" + СтрВсего + " " + ЕдИзм;
|
||||
|
||||
Возврат Информация;
|
||||
// Прогресс бар
|
||||
ДлинаПолоски = 30;
|
||||
Счетчик = 0;
|
||||
Показатель = Цел(Текущее / Всего * ДлинаПолоски);
|
||||
|
||||
КонецФункции
|
||||
Пока Счетчик < ДлинаПолоски Цикл
|
||||
Буфер = Буфер + ?(Счетчик < Показатель, "█", " ");
|
||||
Счетчик = Счетчик + 1;
|
||||
КонецЦикла;
|
||||
|
||||
ВывестиТекстВТекущуюСтроку(Прогресс, , Истина);
|
||||
ВывестиТекстВТекущуюСтроку(Буфер, "Зеленый");
|
||||
ВывестиТекстВТекущуюСтроку(Информация);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
@ -1281,6 +1299,36 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ВывестиТекстВТекущуюСтроку(Знач Текст, Знач Цвет = "", Знач ВНачало = Ложь) Экспорт
|
||||
|
||||
Если Не ЭтоOneScript() Тогда
|
||||
Консоль = Неопределено;
|
||||
ЦветКонсоли = Новый Соответствие;
|
||||
КонецЕсли;
|
||||
|
||||
Кодировка = Консоль.КодировкаВыходногоПотока;
|
||||
ПотовкВывода = Консоль.ОткрытьСтандартныйПотокВывода();
|
||||
ЗаписьВывода = Новый ЗаписьДанных(ПотовкВывода, Кодировка);
|
||||
|
||||
Если НЕ ЗначениеЗаполнено(Цвет) Тогда
|
||||
Цвет = ЦветКонсоли.Белый;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗнч(Цвет) = Тип("Строка") Тогда
|
||||
Консоль.ЦветТекста = ЦветКонсоли[Цвет];
|
||||
Иначе
|
||||
Консоль.ЦветТекста = Цвет;
|
||||
КонецЕсли;
|
||||
|
||||
Если ВНачало Тогда
|
||||
Ескейп = Символы.ВК;
|
||||
ЗаписьВывода.ЗаписатьСимволы(Ескейп);
|
||||
КонецЕсли;
|
||||
|
||||
ЗаписьВывода.ЗаписатьСимволы(Текст);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Функция ВыполнитьЗапросСТелом(Знач URL, Знач Вид, Знач Параметры = "", Знач ДопЗаголовки = "", Знач JSON = Истина,
|
||||
Знач ПолныйОтвет = Ложь, Знач ФайлОтвета = Неопределено)
|
||||
|
||||
|
@ -865,9 +865,9 @@
|
||||
|
||||
ТекущаяПозиция = СледующаяПозиция;
|
||||
|
||||
// !OInt КБайт = 1024;
|
||||
// !OInt МБайт = КБайт * КБайт;
|
||||
// !OInt Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
// !OInt ВыполнитьСборкуМусора();
|
||||
// !OInt ОсвободитьОбъект(ТекущиеДанные);
|
||||
|
@ -672,9 +672,9 @@
|
||||
Возврат РезультатПроверки;
|
||||
КонецЕсли;
|
||||
|
||||
// !OInt КБайт = 1024;
|
||||
// !OInt МБайт = КБайт * КБайт;
|
||||
// !OInt Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
// !OInt ВыполнитьСборкуМусора();
|
||||
// !OInt ОсвободитьОбъект(ТекущиеДанные);
|
||||
|
@ -1716,9 +1716,9 @@
|
||||
ПромежуточныйРезультат = ПолучитьОбъектЦеликом(ОсновныеДанные, ЗаголовокИсточника);
|
||||
ЗаписьФайла.Записать(ПромежуточныйРезультат);
|
||||
|
||||
// !OInt КБайт = 1024;
|
||||
// !OInt МБайт = КБайт * КБайт;
|
||||
// !OInt Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт));
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ТекущаяПозиция, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
// !OInt ВыполнитьСборкуМусора();
|
||||
// !OInt ОсвободитьОбъект(ПромежуточныйРезультат);
|
||||
@ -1829,9 +1829,9 @@
|
||||
|
||||
МассивТегов.Добавить(ETag);
|
||||
|
||||
// !OInt КБайт = 1024;
|
||||
// !OInt МБайт = КБайт * КБайт;
|
||||
// !OInt Сообщить(OPI_Инструменты.ИнформацияОПрогрессе(ПрочитаноБайт, ОбщийРазмер, "МБ", МБайт));
|
||||
КБайт = 1024;
|
||||
МБайт = КБайт * КБайт;
|
||||
OPI_Инструменты.ИнформацияОПрогрессе(ПрочитаноБайт, ОбщийРазмер, "МБ", МБайт);
|
||||
|
||||
// !OInt ВыполнитьСборкуМусора();
|
||||
// !OInt ОсвободитьОбъект(ТекущиеДанные);
|
||||
|
@ -36,6 +36,7 @@
|
||||
//@skip-check module-structure-top-region
|
||||
//@skip-check module-structure-method-in-regions
|
||||
//@skip-check wrong-string-literal-content
|
||||
//@skip-check use-non-recommended-method
|
||||
|
||||
#Область СлужебныйПрограммныйИнтерфейс
|
||||
|
||||
@ -889,7 +890,11 @@
|
||||
|
||||
КонецФункции
|
||||
|
||||
Функция ИнформацияОПрогрессе(Знач Текущее, Знач Всего, Знач ЕдИзм, Знач Делитель = 1) Экспорт
|
||||
Процедура ИнформацияОПрогрессе(Знач Текущее, Знач Всего, Знач ЕдИзм, Знач Делитель = 1) Экспорт
|
||||
|
||||
Если Не ЭтоOneScript() Тогда
|
||||
Возврат;
|
||||
КонецЕсли;
|
||||
|
||||
Целое = 100;
|
||||
Текущее = Окр(Текущее / Делитель, 2);
|
||||
@ -900,11 +905,24 @@
|
||||
СтрВсего = ЧислоВСтроку(Всего);
|
||||
СтрПроцент = ЧислоВСтроку(Процент);
|
||||
|
||||
Информация = СтрТекущее + "/" + СтрВсего + " " + ЕдИзм + " ( " + СтрПроцент + "% )";
|
||||
Прогресс = "Прогресс [" + СтрПроцент + "%" + "] ▐";
|
||||
Информация = "▌ " + СтрТекущее + "/" + СтрВсего + " " + ЕдИзм;
|
||||
|
||||
Возврат Информация;
|
||||
// Прогресс бар
|
||||
ДлинаПолоски = 30;
|
||||
Счетчик = 0;
|
||||
Показатель = Цел(Текущее / Всего * ДлинаПолоски);
|
||||
|
||||
КонецФункции
|
||||
Пока Счетчик < ДлинаПолоски Цикл
|
||||
Буфер = Буфер + ?(Счетчик < Показатель, "█", " ");
|
||||
Счетчик = Счетчик + 1;
|
||||
КонецЦикла;
|
||||
|
||||
ВывестиТекстВТекущуюСтроку(Прогресс, , Истина);
|
||||
ВывестиТекстВТекущуюСтроку(Буфер, "Зеленый");
|
||||
ВывестиТекстВТекущуюСтроку(Информация);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
#КонецОбласти
|
||||
|
||||
@ -1281,6 +1299,36 @@
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Процедура ВывестиТекстВТекущуюСтроку(Знач Текст, Знач Цвет = "", Знач ВНачало = Ложь) Экспорт
|
||||
|
||||
Если Не ЭтоOneScript() Тогда
|
||||
Консоль = Неопределено;
|
||||
ЦветКонсоли = Новый Соответствие;
|
||||
КонецЕсли;
|
||||
|
||||
Кодировка = Консоль.КодировкаВыходногоПотока;
|
||||
ПотовкВывода = Консоль.ОткрытьСтандартныйПотокВывода();
|
||||
ЗаписьВывода = Новый ЗаписьДанных(ПотовкВывода, Кодировка);
|
||||
|
||||
Если Не ЗначениеЗаполнено(Цвет) Тогда
|
||||
Цвет = ЦветКонсоли.Белый;
|
||||
КонецЕсли;
|
||||
|
||||
Если ТипЗнч(Цвет) = Тип("Строка") Тогда
|
||||
Консоль.ЦветТекста = ЦветКонсоли[Цвет];
|
||||
Иначе
|
||||
Консоль.ЦветТекста = Цвет;
|
||||
КонецЕсли;
|
||||
|
||||
Если ВНачало Тогда
|
||||
Ескейп = Символы.ВК;
|
||||
ЗаписьВывода.ЗаписатьСимволы(Ескейп);
|
||||
КонецЕсли;
|
||||
|
||||
ЗаписьВывода.ЗаписатьСимволы(Текст);
|
||||
|
||||
КонецПроцедуры
|
||||
|
||||
Функция ВыполнитьЗапросСТелом(Знач URL, Знач Вид, Знач Параметры = "", Знач ДопЗаголовки = "", Знач JSON = Истина,
|
||||
Знач ПолныйОтвет = Ложь, Знач ФайлОтвета = Неопределено)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user