Преобразование OPI -> OInt (workflow)

OInt/core/Modules/OPI_GoogleDrive.os

@@ -540,14 +540,12 @@
     
     Если ЗначениеЗаполнено(Файл) Тогда
         
-        OPI_ПреобразованиеТипов.ПолучитьДвоичныеДанные(Файл);     
+        РазмерЧасти = 268435457;      
+        Размер      = OPI_Инструменты.ПреобразоватьДанныеСПолучениемРазмера(Файл, РазмерЧасти);
+   
         СоответствиеФайла.Вставить(Файл, MIME);
         
-        Размер      = Файл.Размер();
+        Если Размер < РазмерЧасти И ТипЗнч(Файл) = Тип("ДвоичныеДанные") Тогда
-        РазмерЧасти = 268435456;
-        РазмерЧасти = РазмерЧасти + 1;
-        
-        Если Размер < РазмерЧасти Тогда
             Ответ = ЗагрузитьМалыйФайл(ОписаниеJSON, СоответствиеФайла, Заголовки, Идентификатор);
         Иначе
             Ответ = ЗагрузитьБольшойФайл(Описание, СоответствиеФайла, Заголовки, Идентификатор);
@@ -615,11 +613,12 @@
     ТекущаяПозиция   = 0;
     ОбщийРазмер      = Двоичные.Размер();
     СтрОбщийРазмер   = OPI_Инструменты.ЧислоВСтроку(ОбщийРазмер);
+    ЧтениеДанных     = Новый ЧтениеДанных(Двоичные);
+    ИсходныйПоток    = ЧтениеДанных.ИсходныйПоток();
     
     Пока ПрочитаноБайт < ОбщийРазмер Цикл
             
-        ЧтениеДанных     = Новый ЧтениеДанных(Двоичные);
+        ПрочитаноБайт    = ИсходныйПоток.ТекущаяПозиция();
-        ПрочитаноБайт    = ЧтениеДанных.Пропустить(ТекущаяПозиция);
         Результат        = ЧтениеДанных.Прочитать(РазмерЧасти);
         ТекущиеДанные    = Результат.ПолучитьДвоичныеДанные();
         РазмерТекущих    = ТекущиеДанные.Размер();

OInt/tools/Modules/OPI_ПолучениеДанныхТестов.os

@@ -452,9 +452,14 @@
             СоздатьКаталог(ПутьЛоговБиблиотеки);
         КонецЕсли;
 		 
+		ПутьКФайлу = ПутьЛоговБиблиотеки + "/" + Метод + ".log";
+		ФайлЛога   = Новый Файл(ПутьКФайлу);
+		
+		Если Не ФайлЛога.Существует() Тогда
 			ДокументЛога = Новый ТекстовыйДокумент;
 			ДокументЛога.УстановитьТекст(Данные);
-		ДокументЛога.Записать(ПутьЛоговБиблиотеки + "/" + Метод + ".log");
+			ДокументЛога.Записать(ПутьКФайлу);
+		КонецЕсли;
 		
 	Исключение
 		Сообщить("Не удалось записать файл лога!: " + ОписаниеОшибки());	

OInt/tools/Modules/OPI_ПреобразованиеТипов.os

@@ -51,12 +51,7 @@
                 
             ИначеЕсли СтрНайти(Значение, "//") Тогда
                                 
-                ИВФ = ПолучитьИмяВременногоФайла();
+                Значение = OPI_Инструменты.Get(Значение);
-                КопироватьФайл(Значение, ИВФ);
-                
-                Значение = Новый ДвоичныеДанные(ИВФ);
-                
-                УдалитьФайлы(ИВФ);
                 
             Иначе
                 
@@ -72,6 +67,27 @@
     
 КонецПроцедуры
 
+Процедура ПолучитьДвоичныеИлиПоток(Значение) Экспорт
+    
+    Если Значение = Неопределено Тогда
+        Возврат;
+    КонецЕсли;
+    
+    Если ТипЗнч(Значение) <> Тип("Строка") Тогда
+        ПолучитьДвоичныеДанные(Значение);
+        Возврат;
+    КонецЕсли;
+    
+    Файл = Новый Файл(Значение);
+    
+    Если Файл.Существует() Тогда
+        Значение = Новый ФайловыйПоток(Значение, РежимОткрытияФайла.Открыть, ДоступКФайлу.Чтение);     
+    Иначе
+        ПолучитьДвоичныеДанные(Значение);
+    КонецЕсли;
+    
+КонецПроцедуры
+
 Процедура ПолучитьКоллекцию(Значение) Экспорт
     
     Если Значение = Неопределено Тогда

OInt/tools/Modules/internal/Modules/OPI_Инструменты.os

@@ -385,6 +385,40 @@
     
 КонецФункции
 
+Функция ПреобразоватьДанныеСПолучениемРазмера(Данные, Знач МинимальныйРазмерДляПотока = 0) Экспорт
+    
+    Размер = 0;
+    
+    Если ТипЗнч(Данные) = Тип("Строка") Тогда
+        
+        ФайлНаДиске = Новый Файл(Данные);
+        
+        Если ФайлНаДиске.Существует() Тогда         
+            Размер = ФайлНаДиске.Размер(); 
+        Иначе
+            OPI_ПреобразованиеТипов.ПолучитьДвоичныеДанные(Данные);
+            Размер = Данные.Размер();
+        КонецЕсли;
+        
+    Иначе
+        OPI_ПреобразованиеТипов.ПолучитьДвоичныеДанные(Данные);
+        Размер = Данные.Размер();
+    КонецЕсли;
+    
+    Если ЗначениеЗаполнено(МинимальныйРазмерДляПотока) Тогда
+        Если Размер < МинимальныйРазмерДляПотока Тогда
+            OPI_ПреобразованиеТипов.ПолучитьДвоичныеДанные(Данные);
+        Иначе
+            OPI_ПреобразованиеТипов.ПолучитьДвоичныеИлиПоток(Данные);    
+        КонецЕсли;     
+    Иначе
+        OPI_ПреобразованиеТипов.ПолучитьДвоичныеИлиПоток(Данные);
+    КонецЕсли;
+    
+    Возврат Размер;
+    
+КонецФункции
+
 Процедура ЗначениеВМассив(Значение) Экспорт
     
     Значение_ = Новый Массив;