Программное создание серий из Входящего ВСД

Управление торговлей, редакция 11 (11.4.6.174)
Пытаюсь создать документ Поступление  товаров и услуг и создать серию номенклатуры. Серия номенклатуры не создается и в документ серия не проставляется. Помогите разобраться.

Для каждого ТоварСообщения из Сообщение.Товары Цикл
            Если Не ЗначениеЗаполнено(ТоварСообщения.Номенклатура) Тогда
                Сообщить("Перед созданием поступления необходимо сопоставить номенклатуру поставщика и нашу номенклатуру");
                Возврат Неопределено;
            КонецЕсли;

            ТоварПТУ = ПТУ.Товары.Добавить();

            //ЗаполнитьЗначенияСвойств(ТоварПТУ, ТоварСообщения);
            ТоварПТУ.Номенклатура = ТоварСообщения.Номенклатура;
            ТоварПТУ.КоличествоУпаковок = ТоварСообщения.Количество;
            НоваяСерия = Справочники.СерииНоменклатуры.СоздатьЭлемент();
            НоваяСерия.ВидНоменклатуры = ТоварПТУ.Номенклатура.ВидНоменклатуры;
            НоваяСерия.ДатаПроизводства = ТоварСообщения.ДатаПроизводства;
            НоваяСерия.ГоденДо = ТоварСообщения.СрокГодности;
            НоваяСерия.НомерКИЗГИСМ    = ТоварСообщения.НомерКИЗГИСМ;
            НоваяСерия.Записать();
            Если Не ЗначениеЗаполнено(НоваяСерия.Наименование) Тогда
                НоваяСерия.Наименование = "от " + Формат(НоваяСерия.ДатаПроизводства, "ДФ=dd.MM.yy") + " до " + Формат(НоваяСерия.СрокГодности, "ДФ=dd.MM.yy");
                НоваяСерия.Записать();
            КонецЕсли;
            ТоварПТУ.СтатусУказанияСерий = 14;
            ТоварПТУ.Серия = НоваяСерия.Ссылка;
            СтрокаСерий=ПТУ.Серии.Добавить();
            СтрокаСерий.Номенклатура=ТоварПТУ.Номенклатура;
            СтрокаСерий.Серия=ТоварПТУ.Серия;
            СтрокаСерий.Склад=ПТУ.Склад;
            СтрокаСерий.Количество=ТоварПТУ.КоличествоУпаковок;

        КонецЦикла;