0
Arutynov
05.09.14
✎
16:39
|
Создаю СФ на основании реализации . Код таков:
Необходимо равенство номеров реализации и СФ. Вроде присваиваю номер, но программа ставит свой номер после записи.
Для каждого Стрк из Таб цикл
СФ=Документы.СчетФактураВыданный.СоздатьДокумент();
СФ.Дата=Стрк.Date;
СФ.Контрагент = Справочники.Контрагенты.НайтиПоКоду(Стрк.kon);
СФ.ДоговорКонтрагента = СФ.Контрагент.ОсновнойДоговорКонтрагента;
СФ.СуммаДокумента = Число(СокрЛП(Стрк.Symma));
ВалютаДокумента = Справочники.Валюты.НайтиПоНаименованию("руб.");
СФ.ВалютаДокумента = ВалютаДокумента;
СФ.ВидСчетаФактуры=Перечисления.ВидСчетаФактурыВыставленного.НаРеализацию;
СФ.КодВидаОперации="01";
СФ.Выставлен=Истина;
СФ.ДатаВыставления=Стрк.Date;
СФ.КодСпособаВыставления="1";
СтрокаТЧ=СФ.ДокументыОснования.Добавить();
Док=СокрЛП(Стрк.dokosnkod);
СтрокаТЧ.ДокументОснование=Документы.РеализацияТоваровУслуг.НайтиПоНомеру(Док,Стрк.Date);
СФ.Номер=(Док);
СФ.Записать(РежимЗаписиДокумента.Запись,);
КонецЦикла;
|
|