Комментарий = ВыборкаПоДокументам.Комментарий;
ПараметрСтрокиВывода = 0;
СтрокаВывода = "";
ДлинаСтрокиВывода = 90;
Пока не Комментарий = "" Цикл
СтрокаВывода = СокрЛП(Лев(Комментарий,ДлинаСтрокиВывода+1));
ПараметрСтрокиВывода = ДлинаСтрокиВывода;
//блок положение ПС
ПоложениеПС = СтрНайти(СтрокаВывода,""+Символы.ПС);
Если не ПоложениеПС =0 Тогда
ПараметрСтрокиВывода = ПоложениеПС-1;
СтрокаВывода = СокрЛ(Лев(СтрокаВывода,ПараметрСтрокиВывода));
КонецЕсли;
Если СтрДлина(СтрокаВывода) > ДлинаСтрокиВывода Тогда
//блок уберем пернос
ПоложениеПробел = СтрНайти(СтрокаВывода,строка(" "),НаправлениеПоиска.СКонца);
Если не ПоложениеПробел =0 Тогда
ПараметрСтрокиВывода = ПоложениеПробел-1;
СтрокаВывода = СокрЛ(Лев(СтрокаВывода, ПараметрСтрокиВывода));
иначе
ПараметрСтрокиВывода = ДлинаСтрокиВывода;
СтрокаВывода = СокрЛ(Лев(СтрокаВывода,ПоложениеПробел));
КонецЕсли;
КонецЕсли;
ОбластьКомментарийСтрока.Параметры.Комментарий = СтрокаВывода;
ТабличныйДокумент.Вывести(ОбластьКомментарийСтрока);
СтрокаВывода = "";
Комментарий = Прав(Комментарий,СтрДлина(Комментарий) - ПараметрСтрокиВывода-1);
КонецЦикла;
.png)
