Рефакторинг структуры модулей

src/CopyBase.os

@@ -4,6 +4,8 @@
 #Использовать json
 #Использовать v8runner
 
+#Использовать "."
+
 Перем фЛог;
 
 // Получить имя лога продукта
@@ -111,7 +113,7 @@
 
 Процедура ВыполнитьКоманду(Знач пАргументы)
 	
-	замер = ЗагрузитьСценарий(ОбъединитьПути(ТекущийСценарий().Каталог, "Замеры.os"));
+	замер = Новый Замер;
 	
 	замер.НачатьЗамер();
 	
@@ -123,15 +125,13 @@
 	
 	замер.НачатьЗамер( "ПодключениеСценария" );
 	
-	работаСSQL = ЗагрузитьСценарий(ОбъединитьПути(ТекущийСценарий().Каталог, "ExecQuery_SQLCMD.os"));
-	
 	замер.СообщитьЗамер( "Подключен сценарий по работе с SQL");
 	
 	Если параметры["Source_SQL.UseBackup"] = Истина Тогда
 		
 		замер.НачатьЗамер( "Бекап" );
 		
-		результат = работаСSQL.ВыполнитьБекап( параметры["Source_SQL.Server"], параметры["Source_SQL.User"], параметры["Source_SQL.Password"], параметры["Source_SQL.Base"], параметры["FileBackup"] );
+		результат = РаботаСSQL.ВыполнитьБекап( параметры["Source_SQL.Server"], параметры["Source_SQL.User"], параметры["Source_SQL.Password"], параметры["Source_SQL.Base"], параметры["FileBackup"] );
 		
 		Если Не результат Тогда
 			ЗавершитьРаботу(1);
@@ -145,7 +145,7 @@
 		
 		замер.НачатьЗамер( "Восстановление" );
 		
-		результат = работаСSQL.ВыполнитьСкрипт( параметры["Current_SQL.Server"], параметры["Current_SQL.User"], параметры["Current_SQL.Password"], параметры["Current_SQL.Base"], параметры["Script_Restore"] );
+		результат = РаботаСSQL.ВыполнитьСкрипт( параметры["Current_SQL.Server"], параметры["Current_SQL.User"], параметры["Current_SQL.Password"], параметры["Current_SQL.Base"], параметры["Script_Restore"] );
 		
 		Если Не результат Тогда
 			ЗавершитьРаботу(1);

src/Классы/Замер.os

@@ -1,48 +1,48 @@
-
-Перем фЗамеры;
-Перем фОбщееВремяНачала;
-Перем фПоследнийЗамер;
-
-Процедура НачатьЗамер( Знач пКлючЗамера = "" ) Экспорт
-	Если Не ТипЗнч( фЗамеры ) = Тип("Структура") Тогда
-		фЗамеры = Новый Структура;
-		фОбщееВремяНачала = ТекущаяДата();
-	КонецЕсли;
-	Если Не пКлючЗамера = "" Тогда
-		фЗамеры.Вставить( пКлючЗамера, ТекущаяУниверсальнаяДатаВМиллисекундах() );
-		фПоследнийЗамер = пКлючЗамера;
-	КонецЕсли;
-КонецПроцедуры
-
-Процедура СообщитьЗамер(Знач пСообщение, Знач пКлючЗамера = "", Знач пВывестиОбщееВремяПрефиксом = Истина ) Экспорт
-	
-	Если пКлючЗамера = ""
-		И Не фПоследнийЗамер = "" Тогда
-		затрачено = Окр( ТекущаяУниверсальнаяДатаВМиллисекундах() - фЗамеры[фПоследнийЗамер] );
-	ИначеЕсли Не пКлючЗамера = "" Тогда
-		затрачено = Окр( ТекущаяУниверсальнаяДатаВМиллисекундах() - фЗамеры[пКлючЗамера] );
-	Иначе
-		затрачено = 0;
-	КонецЕсли;
-	
-	Если пВывестиОбщееВремяПрефиксом Тогда
-		
-		затраченоВсего = Формат(Дата(1,1,1) + (ТекущаяДата() - фОбщееВремяНачала), "ДФ=HH:mm:ss" );
-		
-		Сообщить( СтрШаблон("%1. %2 - %3мс", затраченоВсего, пСообщение, затрачено)  );
-		
-	Иначе
-		
-		Сообщить( СтрШаблон("%1 - %2мс", пСообщение, затрачено)  );
-		
-	КонецЕсли
-	
-КонецПроцедуры
-
-Процедура СообщитьЗавершение() Экспорт
-
-	затраченоВсего = Формат(Дата(1,1,1) + (ТекущаяДата() - фОбщееВремяНачала), "ДФ=HH:mm:ss" );
-	
-	Сообщить( СтрШаблон("%1. Завершено", затраченоВсего)  );
-
+
+Перем фЗамеры;
+Перем фОбщееВремяНачала;
+Перем фПоследнийЗамер;
+
+Процедура НачатьЗамер( Знач пКлючЗамера = "" ) Экспорт
+	Если Не ТипЗнч( фЗамеры ) = Тип("Структура") Тогда
+		фЗамеры = Новый Структура;
+		фОбщееВремяНачала = ТекущаяДата();
+	КонецЕсли;
+	Если Не пКлючЗамера = "" Тогда
+		фЗамеры.Вставить( пКлючЗамера, ТекущаяУниверсальнаяДатаВМиллисекундах() );
+		фПоследнийЗамер = пКлючЗамера;
+	КонецЕсли;
+КонецПроцедуры
+
+Процедура СообщитьЗамер(Знач пСообщение, Знач пКлючЗамера = "", Знач пВывестиОбщееВремяПрефиксом = Истина ) Экспорт
+	
+	Если пКлючЗамера = ""
+		И Не фПоследнийЗамер = "" Тогда
+		затрачено = Окр( ТекущаяУниверсальнаяДатаВМиллисекундах() - фЗамеры[фПоследнийЗамер] );
+	ИначеЕсли Не пКлючЗамера = "" Тогда
+		затрачено = Окр( ТекущаяУниверсальнаяДатаВМиллисекундах() - фЗамеры[пКлючЗамера] );
+	Иначе
+		затрачено = 0;
+	КонецЕсли;
+	
+	Если пВывестиОбщееВремяПрефиксом Тогда
+		
+		затраченоВсего = Формат(Дата(1,1,1) + (ТекущаяДата() - фОбщееВремяНачала), "ДФ=HH:mm:ss" );
+		
+		Сообщить( СтрШаблон("%1. %2 - %3мс", затраченоВсего, пСообщение, затрачено)  );
+		
+	Иначе
+		
+		Сообщить( СтрШаблон("%1 - %2мс", пСообщение, затрачено)  );
+		
+	КонецЕсли
+	
+КонецПроцедуры
+
+Процедура СообщитьЗавершение() Экспорт
+
+	затраченоВсего = Формат(Дата(1,1,1) + (ТекущаяДата() - фОбщееВремяНачала), "ДФ=HH:mm:ss" );
+	
+	Сообщить( СтрШаблон("%1. Завершено", затраченоВсего)  );
+
 КонецПроцедуры