Имя: Пароль:
1C
1C 7.7
v7: Опять по клюшкам не ставит программно номер
0 asder117
 
27.07.16
23:05
Д
1 asder117
 
27.07.16
23:07
(0) Доброго времени суток. имеем код:
    СчфПолуч = СоздатьОбъект("Документ.СчетФактураПолученный");
    СпрКонтр = СоздатьОбъект("Справочник.Номенклатура");
    догКонтр = СоздатьОбъект("Справочник.Договоры");
    
    ///
    СчфПолуч.Новый();
    //СчфПолуч.УстановитьНовыйНомер(" ");
    СчфПолуч.ДатаДок = ДатаСчетФактуры1;
    СчфПолуч.БланкСтрогойОтчетности = 0;
    //СчфПолуч.ВерсияОбъекта = ;
    СчфПолуч.ВидОперации =Перечисление.ВидыОперацийСчетаФактурыПолученного.ПоступлениеКомиссионеру;
    СчфПолуч.ВключатьВКнигуПокупок = 0;
    СчфПолуч.Всего = СуммаСНДС ;
    СчфПолуч.ДатаНомерСчетаФактуры = "---;"+Строка(ДатаСчетФактуры1);
    //СчфПолуч.ДатаОплаты = ;0
    СчфПолуч.ДатаОприходования = ДатаСчетФактуры1;
    СчфПолуч.ДатаСчетаФактуры = ДатаСчетФактуры1;
    СчфПолуч.Договор = догКонтр.НайтиПоКоду("000001");
    //СчфПолуч.ДокументОприходования = ;
    СчфПолуч.КодВидаОперации = "04";
    СчфПолуч.Контрагент = СпрКонтр.НайтиПоКоду("00000453");
    СчфПолуч.КонтрагентЯвляетсяОбособленнымПодразделением = 0;
    СчфПолуч.КППОбособленногоПодразделенияКонтрагента = "    ";
    СчфПолуч.Курс = 0;
    СчфПолуч.НДС10 = 0;
    СчфПолуч.НДС20 = СуммаНДС;
    СчфПолуч.НДСпоСтавкеНольПроцентов = 0;
    СчфПолуч.НеВключатьВЖурналРегистрации = 0;
    СчфПолуч.НомерСчетаФактуры = "---";
    СчфПолуч.СпособПолучения = 1;
    СчфПолуч.Субконто1 = СпрКонтр.НайтиПоКоду("00000453");;
    СчфПолуч.Субконто2 = догКонтр.НайтиПоКоду("000001");
    //СчфПолуч.Субконто3 = ;
    СчфПолуч.Субсчет19 = СчетПоКоду("19.3") ;
    СчфПолуч.СуммаБезНДС10 = 0;
    СчфПолуч.СуммаБезНДС20 = СуммаБезНДС;
    СчфПолуч.СуммаСовсемБезНДС = 0;
    СчфПолуч.Счет = СчетПоКоду("60.1");
    СчфПолуч.СчетФактураБезНДС = 0;
    СчфПолуч.СчетФактураНаВозврат = 0;
    СчфПолуч.ФормироватьПроводки = 0;
    СчфПолуч.Комментарий = комент;
СчфПолуч.УстановитьНовыйНомер();
    СчфПолуч.Записать();

Припопытке записи пишет неверный номер....в чем может быть причина. спасибо заранее
2 ShAV
 
27.07.16
23:12
Использование УстановитьНовыйНомер() не является гарантией присвоения нового номера. В некоторых "тяжелых" случаях приходится искать новый номер перебором, либо восстанавливать нумерацию.
3 asder117
 
27.07.16
23:14
(2) Я уже понял похоже у меня бухи номера ручками вояли
4 Злопчинский
 
27.07.16
23:15
1. В документах в пределах нумератора для данного вида есть номер, заканчивающийся не на цифру
или
2. есть номер, без ведущих нулей - перенумеруй счф-полученные штатными номерами (по простому ряду натуральных чисел, без вычурности - номер документа счет-фактуры полученный - это НЕ ВХОДЯЩИЙ НОМЕР СЧФ!!! не надо у номер документа пихать номер входящей счф!!!)
5 ShAV
 
27.07.16
23:15
(3) классика :)
6 Злопчинский
 
27.07.16
23:16
(3) сделай тупо поле НомерДок видимым, но недоступным, и все.
7 Злопчинский
 
27.07.16
23:16
(5) я бы сказал классика-piдорассика
8 asder117
 
27.07.16
23:21
(6) Попробую. А что это им даст?
9 asder117
 
27.07.16
23:24
(5) (7) Классика не то слово. но никогда не думал что увязну в 7. докатился.
10 Злопчинский
 
27.07.16
23:39
(8) в НомерДок не будут сувать кривый ручонки. для счфполученного НомерДок - это всего лишь некий нумератор записей в журнале документов, не имеющий никакого отношения ни к бух, ни налоговому учету
11 asder117
 
27.07.16
23:40
(10) понял приму к сведению