logist @ 06.09.17, 18:16
,
Получило вот таким образом, но не получается поставить количество, есоли можете, подскажите как сделать
&НаСервере
Процедура ПоехалиНаСервере()
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
|ldo56_zayavki_upakovka.emailzakaz Как EMail,
|ldo56_zayavki_upakovka.FIO Как ФИО,
|ldo56_zayavki_upakovka.upakovka Как Упаковка,
|ldo56_zayavki_upakovka.kolichestvo Как Количество,
|ldo56_zayavki_upakovka.mb3 Как Заказчик,
|ldo56_zayavki_upakovka.tadavremyazakaza Как ДатаСоздания
|ИЗ
|ВнешнийИсточникДанных.Сайт.Таблица.ldo56_zayavki_upakovka КАК ldo56_zayavki_upakovka";
Результат = Запрос.Выполнить().Выгрузить();
Для Каждого ЭлементРезультата из Результат Цикл
Попытка
НовыйДокумент = Документы.Упаковка.СоздатьДокумент();
НовыйДокумент.Заказчик = Справочники.Представительства.НайтиПоНаименованию(ЭлементРезультата.Заказчик);
НовыйДокумент.ФИО = ЭлементРезультата.ФИО;
НовыйДокумент.EMail = ЭлементРезультата.EMail;
НоваяСтрока = Документы.Упаковка.СоздатьДокумент();
НовыйДокумент.УпаковочныйМатериал.Добавить().УпаковочныйМатериал = Справочники.УпаковочныйМатериал.НайтиПоНаименованию(ЭлементРезультата.Упаковка);
НовыйДокумент.Дата = ТекущаяДата();
НовыйДокумент.Записать(РежимЗаписиДокумента.Проведение);
Исключение
КонецПопытки;
КонецЦикла;
КонецПроцедуры