Код договора не уникален!
Показывать по
10
20
40
сообщений
- 1
- 2
10.11.2010
10:25
#1
Здравствуйте!
Столкнулся с такой проблемой: при загрузке из екселя в 1С буху договоров контрагентов при записи нового договора вылетает на ошибке "Код не уникален!", сам код не ставлю система ведь должна присваивать его автоматически! пытался в ручную создать новый договор та же самая ошибка! код я в ручную не редактирую... Подскажите, плиз, в чем косяк???
Заранее благодарен!
Столкнулся с такой проблемой: при загрузке из екселя в 1С буху договоров контрагентов при записи нового договора вылетает на ошибке "Код не уникален!", сам код не ставлю система ведь должна присваивать его автоматически! пытался в ручную создать новый договор та же самая ошибка! код я в ручную не редактирую... Подскажите, плиз, в чем косяк???
Заранее благодарен!
10.11.2010
10:28
#3
"в чем ошибка может быть? вот код:
================================
Если ВыборкаДоговор.Следующий() Тогда
НайденныйДоговор = ВыборкаДоговор.Договор;
Иначе
//создадим новый
НовыйДоговор = Справочники.ДоговорыКонтрагентов.СоздатьЭлемент();
НовыйДоговор.Наименование = Договор;
НовыйДоговор.Владелец = Контрагент;
НовыйДоговор.Организация = Организация;
НовыйДоговор.ВалютаВзаиморасчетов = Валюта;
НовыйДоговор.ВидДоговора = ВидДоговора;
НовыйДоговор.ВедениеВзаиморасчетов = Перечисления.ВедениеВзаиморасчетовПоДоговорам.ПоДоговоруВЦелом;
НовыйДоговор.Комментарий = "*загружено автоматически*";
НовыйДоговор.Записать();
НайденныйДоговор = НовыйДоговор.Ссылка;
КонецЕсли;
Возврат НайденныйДоговор;
=====================================
"
================================
Если ВыборкаДоговор.Следующий() Тогда
НайденныйДоговор = ВыборкаДоговор.Договор;
Иначе
//создадим новый
НовыйДоговор = Справочники.ДоговорыКонтрагентов.СоздатьЭлемент();
НовыйДоговор.Наименование = Договор;
НовыйДоговор.Владелец = Контрагент;
НовыйДоговор.Организация = Организация;
НовыйДоговор.ВалютаВзаиморасчетов = Валюта;
НовыйДоговор.ВидДоговора = ВидДоговора;
НовыйДоговор.ВедениеВзаиморасчетов = Перечисления.ВедениеВзаиморасчетовПоДоговорам.ПоДоговоруВЦелом;
НовыйДоговор.Комментарий = "*загружено автоматически*";
НовыйДоговор.Записать();
НайденныйДоговор = НовыйДоговор.Ссылка;
КонецЕсли;
Возврат НайденныйДоговор;
=====================================
"
10.11.2010
10:32
#4
может провести перенумерацию договоров? это не приведет к каким-либо плачевным последствиям? можно ли это в 1С 8.1 сделать стандартными средствами?
- 1
- 2
Читают тему
(гостей: 1)