Модуль (БСП)

Модуль. Возвращает модуль по имени.

// Возвращает модуль по имени.
//
// Параметры:
//   Имя - Строка - имя общего модуля.
//
// Возвращаемое значение:
//   ОбщийМодуль - 
//
Функция Модуль(Имя) Экспорт
	
	Части = СтрРазделить(Имя, ".");
	Если Части.Количество() = 1 Тогда
		Если Метаданные.ОбщиеМодули.Найти(Имя) = Неопределено Тогда
			ВызватьИсключение СтрШаблон(НСтр("ru = 'Общий модуль ""%1"" не существует!'"), Имя);
		КонецЕсли;
	ИначеЕсли Части.Количество() = 2 Тогда
		Попытка
			Проверка = Новый Структура(Части[0]);
			Проверка = Новый Структура(Части[1]);
		Исключение
			ВызватьИсключение НСтр("ru = 'Неправильный модуль'");
		КонецПопытки;
	Иначе
		ВызватьИсключение НСтр("ru = 'Неправильный модуль'");
	КонецЕсли;
	
	УстановитьБезопасныйРежим(Истина);
	Возврат Вычислить(Имя);
	
КонецФункции

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

// Возвращает модуль по имени.
//
// Параметры:
//   Имя - Строка - имя общего модуля.
//
// Возвращаемое значение:
//   ОбщийМодуль - 
//
Функция Модуль(Имя) Экспорт
	
	Части = СтрРазделить(Имя, ".");
	Если Части.Количество() = 1 Тогда
		Если Метаданные.ОбщиеМодули.Найти(Имя) = Неопределено Тогда
			ВызватьИсключение СтрШаблон(НСтр("ru = 'Общий модуль ""%1"" не существует!'"), Имя);
		КонецЕсли;
	ИначеЕсли Части.Количество() = 2 Тогда
		Попытка
			Проверка = Новый Структура(Части[0]);
			Проверка = Новый Структура(Части[1]);
		Исключение
			ВызватьИсключение НСтр("ru = 'Неправильный модуль'");
		КонецПопытки;
	Иначе
		ВызватьИсключение НСтр("ru = 'Неправильный модуль'");
	КонецЕсли;
	
	УстановитьБезопасныйРежим(Истина);
	Возврат Вычислить(Имя);
	
КонецФункции

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