ВыгрузитьТекущуюОбластьДанныхВФайлИРазделитьНаЧасти (БСП)

Выгрузить текущую область данных файл разделить на части. Выгружает данные приложения в zip-архив, разбивает, при необходимости,

// Выгружает данные приложения в zip-архив, разбивает, при необходимости,
// на части и помещает результат во временное хранилище.
//
// Параметры:
//   АдресХранилища - Строка - адрес во временном хранилище для размещения результата,
//   РазмерЧастиВМегабайтах - Число - размер одной части файла в мегабайтах.
//
Процедура ВыгрузитьТекущуюОбластьДанныхВФайлИРазделитьНаЧасти(АдресХранилища, АдресХранилищаФайла, ЭтоВебКлиент, РазмерЧастиВМегабайтах = 0) Экспорт
	
	ИмяФайла = ВыгрузитьТекущуюОбластьДанныхВАрхив();
	
	Попытка
		
		ЧастиФайла = РазделитьФайлНаЧасти(ИмяФайла, ЭтоВебКлиент, РазмерЧастиВМегабайтах);
		
		Если ТипЗнч(ЧастиФайла) = Тип("ДвоичныеДанные") Тогда
			
			ПоместитьВоВременноеХранилище(ЧастиФайла, АдресХранилищаФайла);
			ПоместитьВоВременноеХранилище(АдресХранилищаФайла, АдресХранилища);
			
		Иначе
			
			ПоместитьВоВременноеХранилище(ЧастиФайла, АдресХранилища);
			
		КонецЕсли;
		
		ВыгрузкаЗагрузкаДанныхСлужебный.УдалитьВременныйФайл(ИмяФайла);
		
	Исключение
		
		ТекстИсключения = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
		
		ВыгрузкаЗагрузкаДанныхСлужебный.УдалитьВременныйФайл(ИмяФайла);
		
		ВызватьИсключение ТекстИсключения;
		
	КонецПопытки;
	
КонецПроцедуры

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////

// Выгружает данные приложения в zip-архив, разбивает, при необходимости,
// на части и помещает результат во временное хранилище.
//
// Параметры:
//   АдресХранилища - Строка - адрес во временном хранилище для размещения результата,
//   РазмерЧастиВМегабайтах - Число - размер одной части файла в мегабайтах.
//
Процедура ВыгрузитьТекущуюОбластьДанныхВФайлИРазделитьНаЧасти(АдресХранилища, АдресХранилищаФайла, ЭтоВебКлиент, РазмерЧастиВМегабайтах = 0) Экспорт
	
	ИмяФайла = ВыгрузитьТекущуюОбластьДанныхВАрхив();
	
	Попытка
		
		ЧастиФайла = РазделитьФайлНаЧасти(ИмяФайла, ЭтоВебКлиент, РазмерЧастиВМегабайтах);
		
		Если ТипЗнч(ЧастиФайла) = Тип("ДвоичныеДанные") Тогда
			
			ПоместитьВоВременноеХранилище(ЧастиФайла, АдресХранилищаФайла);
			ПоместитьВоВременноеХранилище(АдресХранилищаФайла, АдресХранилища);
			
		Иначе
			
			ПоместитьВоВременноеХранилище(ЧастиФайла, АдресХранилища);
			
		КонецЕсли;
		
		ВыгрузкаЗагрузкаДанныхСлужебный.УдалитьВременныйФайл(ИмяФайла);
		
	Исключение
		
		ТекстИсключения = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
		
		ВыгрузкаЗагрузкаДанныхСлужебный.УдалитьВременныйФайл(ИмяФайла);
		
		ВызватьИсключение ТекстИсключения;
		
	КонецПопытки;
	
КонецПроцедуры

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////