Попытка получить версию из имени файла провалилась

Увы, так шоколадно не получится:

Функция СведенияОВнешнейОбработке() Экспорт       
	МД = Метаданные();
	
	ПараметрыРегистрации = ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке(СтандартныеПодсистемыСервер.ВерсияБиблиотеки());
	Заголовок = МД.Синоним;
	ПараметрыРегистрации.Информация = Заголовок;
	ПараметрыРегистрации.Вид = ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиДополнительнаяОбработка();
	
	//В качестве версии использум последнюю часть имени файла
	Сообщить(ИспользуемоеИмяФайла);
	М = СтрРазделить(ИспользуемоеИмяФайла, " ");
	ПараметрыРегистрации.Версия = М[М.Количество()-1];
	
	ПараметрыРегистрации.БезопасныйРежим = Истина; //Для фреша
	
	Команда = ПараметрыРегистрации.Команды.Добавить();
	Команда.Представление = Заголовок;
	Команда.Идентификатор = МД.Имя;
	Команда.Использование = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыОткрытиеФормы();
	Команда.ПоказыватьОповещение = Ложь;
	
	
	Возврат ПараметрыРегистрации;
КонецФункции

Выходит вот так:

fixin

Программирую на 1С с 1999 года. В 1С просто Гений. В 2020 году ушел из офиса на вольные хлеба фриланса. Принимаю заказы.

Читайте также:

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *