1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-10-08 22:51:57 +02:00

Пересборка доков

This commit is contained in:
Anton Titovets
2024-08-13 16:47:32 +03:00
parent 7caed69c1d
commit 5e44ab953c
503 changed files with 4888 additions and 4900 deletions

View File

@@ -554,22 +554,10 @@
ТекстПримера = Новый ТекстовыйДокумент();
ТекстПримера.Прочитать(ПутьПримера);
Результат = "";
Для Н = 1 По ТекстПримера.КоличествоСтрок() Цикл
ТекущаяСтрока = СокрЛП(ТекстПримера.ПолучитьСтроку(Н));
Результат = Результат + " " + ТекущаяСтрока + Символы.ПС;
КонецЦикла;
Результат = ТекстПримера.ПолучитьТекст();
Если ЗначениеЗаполнено(Результат) Тогда
Результат = Лев(Результат, СтрДлина(Результат) - 1);
Пока СтрНайти(Результат, Символы.ПС + Символы.ПС) <> 0 Цикл
Результат = СтрЗаменить(Результат, Символы.ПС + Символы.ПС, Символы.ПС);
КонецЦикла;
КонецЕсли;
КонецЕсли;