Есть внешняя обработка, в модуле ее формы есть рабочий код.
Можно ли из процедуры листинг ниже, отмеченные фрагменты (отмеченные *) перенести на выполнение в процедуры с директивой &НаКлиенте с использованием оповещения?
&НаСервере
Процедура ТаблицаЗначенийВCSV(ТЗРез, Разделитель)
//Преобразуем Таблицу значений в Табличный документ
ТабличныйДокумент = ТаблицаЗначенийВТабличныйДокумент(ТЗРез);
ОбластьПоиска = ТабличныйДокумент.Область(1,1,1,1);
Пока Истина Цикл
ОбластьПоиска = ТабличныйДокумент.НайтиТекст(Символы.Таб, ОбластьПоиска);
Если ОбластьПоиска = Неопределено Тогда
Прервать;
КонецЕсли;
ОбластьПоиска.Текст = СтрЗаменить(ОбластьПоиска.Текст, Символы.Таб, "<$СимволТабуляции$/>");
КонецЦикла;
// Сохраняем Табличный документ как текст, в полученном текстовом документе значения каждой ячейки разделяются через символ табуляции
*ТабличныйДокумент.Записать(Объект.ПутьКФайлу, ТипФайлаТабличногоДокумента.TXT);
*//как перенести запись в процедуру &НаКлиенте
//Извлекаем полученный Текстовый документ
ТекстовыйФайл = Новый ТекстовыйДокумент;
ТекстовыйФайл.Прочитать(Объект.ПутьКФайлу, КодировкаТекста.UTF8, Символы.ПС);
Текст = ТекстовыйФайл.ПолучитьТекст();
//Заменяем сформированные символы табуляции на символ разделитель csv файла переданный параметром функции
Текст = СтрЗаменить(Текст, Символы.Таб, Разделитель);
// Востанавливаем ранее экранированные символы табуляции в самих данных
Текст = СтрЗаменить(Текст, "<$СимволТабуляции$/>", Символы.Таб);
// Сохраняем сформированный текст csv-файла
ТекстовыйФайл.УстановитьТекст(Текст);
*ТекстовыйФайл.Записать(Объект.ПутьКФайлу, , Символы.ПС);
*//как перенести запись в процедуру &НаКлиенте
КонецПроцедуры
