Ошибка при передаче файла из одной формы в другую

&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
	Если ЭтоАдресВременногоХранилища(СсылкаНаФайлСЗаданием) Тогда
		ДвоичныеДанные = ПолучитьИзВременногоХранилища(СсылкаНаФайлСЗаданием);
		ТекущийОбъект.СписокЗаданий.ДанныеФайлаСЗаданием = Новый ХранилищеЗначения(ДвоичныеДанные, Новый СжатиеДанных(9));
		ТекущийОбъект.СписокЗаданий.ФайлСЗаданием = Имя;       
	КонецЕсли;   	                                 
	
	
КонецПроцедуры

&НаСервере
Процедура ПриЗаписиНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
	Если ЭтоАдресВременногоХранилища(СсылкаНаФайлСЗаданием) Тогда
		УдалитьИзВременногоХранилища(СсылкаНаФайлСЗаданием);
	КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура ПриОткрытии(Отказ)
	Имя = Объект.ФайлСЗаданием;
КонецПроцедуры

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

&НаКлиенте
Процедура ФайлСЗаданиемИмяФайлаНажатие(Элемент)
	ПолучитьФайл(СсылкаНаФайлСЗаданием, ЭтаФорма.ИмяФайла);
КонецПроцедуры