Загрузка данных


&НаСервере
Функция СоздатьЗаказГрузоотправителяВозвратный(КоличествоЗаказов, Грузоотправитель)
	
	Склад = Неопределено;
	
	Для Каждого СтрокаДерева Из ЗаказыДерево.ПолучитьЭлементы() Цикл
		Склад = СтрокаДерева.ПунктЗаказНоменклатура;
		Прервать;
	КонецЦикла;
	
	//НовыйДокумент = Документы.уатЗаказГрузоотправителя.СоздатьДокумент();
	//НовыйДокумент.ВидДоставки  = Перечисления.уатВидыДоставки_уэ.СкладСклад;
	//НовыйДокумент.ВидПеревозки = ПредопределенноеЗначение("Справочник.уатВидыПеревозок.АвтомобильнаяГрузовая");
	//
	
	УстановитьПривилегированныйРежим(Истина);
	ДокументОбъект = Документы.уатЗаказГрузоотправителя.СоздатьДокумент();
	ДокументОбъект.Дата                    = ТекущаяДата();
	ДокументОбъект.Организация             = Объект.Организация;
	ДокументОбъект.Ответственный           = Пользователи.ТекущийПользователь();
	ДокументОбъект.ДетализацияЗакрытия     = Перечисления.уатДетализацияЗаказаГрузоотправителя_уэ.ПоЗаказам;
	ДокументОбъект.ВидДоставки             = Перечисления.уатВидыДоставки_уэ.СкладСклад;
	ДокументОбъект.ВидПеревозки            = ПредопределенноеЗначение("Справочник.уатВидыПеревозок.АвтомобильнаяГрузовая");
	ДокументОбъект.ВидОперации             = Перечисления.уатВидыОперацийЗаказГрузоотправителя.МестнаяДоставка;
	//ДокументОбъект.ВалютаДокумента         = Валюта;
	//ДокументОбъект.ВалютаТоваров           = Валюта;
	ДокументОбъект.КратностьВзаиморасчетов = 1;
	ДокументОбъект.КурсВзаиморасчетов      = 1;
	ДокументОбъект.Контрагент              = Объект.Контрагент;
	ДокументОбъект.Подразделение           = Объект.Подразделение;
	ДокументОбъект.Грузоотправитель        = Грузоотправитель;
	ДокументОбъект.АдресОтправления        = Справочники.уатПунктыНазначения.НайтиПоНаименованию(Грузоотправитель);;
	ДокументОбъект.ОтправлениеС            = НачалоДня(ТекущаяДата());
	ДокументОбъект.ОтправлениеПо           = КонецДня(ТекущаяДата());
	//ДокументОбъект.СтоянкаПунктОтправления = ВремяПогрузки;
	ДокументОбъект.Грузополучатель         = Склад;
	ДокументОбъект.АдресНазначения         = Справочники.уатПунктыНазначения.НайтиПоНаименованию(Склад);
	//ДокументОбъект.НаправлениеПеревозки    = лАдресНазначения.НаправлениеПеревозки;
	ДокументОбъект.ДоставкаС               = НачалоДня(ТекущаяДата());
	ДокументОбъект.ДоставкаПо              = КонецДня(ТекущаяДата());
	//ДокументОбъект.СтоянкаПунктНазначения  = ВремяРазгрузки;
	ДокументОбъект.ДатаВходящегоДокумента  = ТекущаяДата();
	//ДокументОбъект.НомерПоУчетуЗаказчика   = НомерПоУчетуЗаказчика;
	ДокументОбъект.Комментарий             = "Возвратный документ для формирования ЭТРН";
	
	НоваяСтрока = ДокументОбъект.ГрузовойСостав.Добавить();
	НоваяСтрока.КоличествоМест = КоличествоЗаказов;
	НоваяСтрока.ВесБрутто = 33 * КоличествоЗаказов;
	НоваяСтрока.Объем = 0.1 * КоличествоЗаказов;
	НоваяСтрока.ВидУпаковки = Справочники.уатВидыУпаковки_уэ.НайтиПоНаименованию("Паллета");
	
	ДокументОбъект.Записать(РежимЗаписиДокумента.Проведение);
	УстановитьПривилегированныйРежим(Ложь);
	
КонецФункции