VDogovor:=VBuyer.ОсновнойДоговорКонтрагента;
   if VDogovor.Пустая()
    then begin
           VDogovor:=V.Catalogs.ДоговорыКонтрагентов.СоздатьЭлемент();
           VDogovor.Владелец:=VBuyer.Ссылка;
           VDogovor.Наименование:='Основной договор';
           VDogovor.Номер:='0001';
           VDogovor.Дата:='20130101'; //  '01.01.2013';
           VDogovor.ВалютаВзаиморасчетов:=V.Справочники.Валюты.НайтиПоНаименованию('руб.').Ссылка;
           VDogovor.ВидДоговора:=V.Перечисления.ВидыДоговоровКонтрагентов.СПокупателем;
           VDogovor.Организация:=VOurs.Ссылка;
           VDogovor.Комментарий:='Автосоздание Chilly';
           VDogovor.Записать;
           VBuyer.ОсновнойДоговорКонтрагента:=VDogovor.Ссылка.ПолучитьОбъект; // [1]
             или
           VBuyer.ОсновнойДоговорКонтрагента:=VDogovor.Ссылка;                        //  [2]
         end
    else begin
         end;