создание документа 8,2

Всем привет! В чем дело подскажите на писал процедуру создания документа номер документа не присваивается
Процедура СоздатьПриходнуюНакладную(Отказ)

    ДокуменНовый                         = Документы.ПриходнаяНакладная.СоздатьДокумент();
    ДокуменНовый.Дата                    = Дата;
    ДокуменНовый.Организация             = Организация;
    ДокуменНовый.Автор                   = ПараметрыСеанса.ТекущийПользователь;
    ДокуменНовый.ВидОперации             = Перечисления.ВидОперацииПриходнаяНакладная.Приход;
    ДокуменНовый.ВалютаВзаиморасчетов    = ВалютаВзаиморасчетов;
    ДокуменНовый.ВалютаДокумента         = ВалютаДокумента;
    ДокуменНовый.КратностьВзаиморасчетов = КратностьВзаиморасчетов;
    ДокуменНовый.КратностьДокумента      = КратностьДокумента;
    ДокуменНовый.КурсВзаиморасчетов      = КурсВзаиморасчетов;
    ДокуменНовый.КурсДокумента           = КурсДокумента;
    ДокуменНовый.ДоговорКонтрагента      = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("00003035");
    ДокуменНовый.КатегорияЦен            = КатегорияЦен;
    ДокуменНовый.Контрагент              = Контрагент;
    ДокуменНовый.Статья                  = Статья;
    ДокуменНовый.СуммаВключаетНДС        = СуммаВключаетНДС;
    ДокуменНовый.СуммаДокумента          = СуммаДокумента;
    ДокуменНовый.УчитыватьНДС            = УчитыватьНДС;
    ДокуменНовый.Комментарий             = Ссылка;
    ДокуменНовый.Склад                   = Склад;
    ДокуменНовый.ДокументОснование       = Ссылка;

        Для Каждого СтрокаДокумента Из Ссылка.Услуги Цикл
            НоваяСтрока = ДокуменНовый.Услуги.Добавить();
            ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаДокумента);
        КонецЦикла;
    ДокуменНовый.Записать(РежимЗаписиДокумента.Запись);
    Сообщить("Создана приходно накладная: " + ДокуменНовый.Ссылка);
КонецПроцедуры