Имя: Пароль:
1C
1С v8
Как программно сделать договор контрагента основным
,
0 Allisa
 
03.11.11
07:32
Доброе утро!УПП 8.2
У нас у организации сменилось название и чтобы не создавать вручную договоры, мы решили скопировать имеющиеся и переименовать организацию. А как сделать чтобы новый договор стал основным?
1 Нуф-Нуф
 
03.11.11
07:37
ОсновнойДоговорКонтрагента
2 tdm
 
03.11.11
07:37
в справочнике контрагенты реквизит такой - основной договор
3 Allisa
 
03.11.11
07:40
да, но он недоступен для записи, ему приравнивается ссылка на текущие данные. Там что форму придется получать ,чтобы добраться до справочникаСписка.Договоры?
4 Allisa
 
03.11.11
07:41
Если ОсновнойДоговорКонтрагента = ЭлементыФормы.Договоры.ТекущиеДанные.Ссылка Тогда
   ОсновнойДоговорКонтрагента = Справочники.ДоговорыКонтрагентов.ПустаяСсылка();
Иначе
   ОсновнойДоговорКонтрагента = ЭлементыФормы.Договоры.ТекущиеДанные.Ссылка;
КонецЕсли;
5 shuhard
 
03.11.11
07:42
(0) а на фига при переименовании организации новые договора плодить ?
6 lopus
 
03.11.11
07:43
Чего? А 1 вариант не подходит что ли.
7 Рэйв
 
03.11.11
07:43
Зачем ты с элеменатми формы работаешь?

Обрашайся к реквизитам объекта, а не формы
8 Allisa
 
03.11.11
07:43
чтобы старые договора в документах остались
9 Allisa
 
03.11.11
07:43
Это код из справочника контрагента, стандартный. Это они так основной договор выбирают
10 shuhard
 
03.11.11
07:44
(8) бред
11 golden-pack
 
03.11.11
07:44
Про блокировки никто не хочет отвечать, а на вопрос про основной договор будет 100 ответов ))) mista.ru
12 Рэйв
 
03.11.11
07:44
(11)Для разбора с блокировками надо бубен из шкафа доставать..Ленмиво:-)
13 Рэйв
 
03.11.11
07:46
(9)Тебе нужно что-то вроде

ОсновнойДоговорКонтрагента =СвежесозданныйДоговорСсылка
14 catena
 
03.11.11
07:57
Эм... А движения на новые договора тоже перекидывать будете?
15 Allisa
 
03.11.11
08:05
нет, просто будут создаваться новые документы на новую организацию
16 Мимохожий Однако
 
03.11.11
08:12
Если организация новая, то и договора новые надо заводить по мере перезаключения.
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн