Вход | Регистрация

1С:Предприятие :: 1С:Предприятие 8 общая

Как присвоить контрагенту банк?

Как присвоить контрагенту банк?
Я
   George_e30
 
04.10.18 - 13:10
Всем доброго дня!

Контрагент подгружается из текстового файла.

Вот часть кода. Я сумел привязать банковский счет, и даже создать банк, если он отсутствует. Но банк не присваивается контрагенту..

//Контрагент был создан?

Если КонтрагентСоздан = Истина Тогда
    Реквизиты = НовыйКонтрагент.ДополнительныеРеквизиты.Добавить();        
    НовыйКонтрагент.Наименование = ПрочитанныйТекст.ПрочитатьСтроку();
    НовыйКонтрагент.НаименованиеПолное = ПрочитанныйТекст.ПрочитатьСтроку();
        СчетБанк = Справочники.БанковскиеСчета.СоздатьЭлемент();
        СчетБанк.Владелец = НовыйКонтрагент.Ссылка;
        СчетБанк.ВидСчета = "Расчетный";
        СчетБанк.НомерСчета = ПрочитанныйТекст.ПрочитатьСтроку();
        Бик = ПрочитанныйТекст.ПрочитатьСтроку();
        СчетБанк.Банк = Справочники.Банки.НайтиПоКоду(Бик,Истина);
        Если СчетБанк.Банк.Пустая() тогда 
            сообщить("Банк не найден, создаём..");
            НовыйБанк = Справочники.Банки.СоздатьЭлемент();
            НовыйБанк.Код = Бик;
            НовыйБанк.Наименование = ПрочитанныйТекст.ПрочитатьСтроку();
            НовыйБанк.КоррСчет = ПрочитанныйТекст.ПрочитатьСтроку();
            Попытка
                НовыйБанк.Записать();
            Исключение
                Сообщить("запись банка "+ОписаниеОшибки());
            КонецПопытки;    
            СчетБанк.Банк = НовыйБанк;
        Попытка
            СчетБанк.Записать();
        Исключение
            Сообщить("Запись Банковского счета ошибка. Банк создан "+ОписаниеОшибки());
        КонецПопытки;
        
        Иначе
    Попытка
        СчетБанк.Записать();
    Исключение
        Сообщить("Запись Банковского счета ошибка. Банк найден "+ОписаниеОшибки());
    КонецПопытки;
        КонецЕсли;
    НовыйКонтрагент.ОсновнойБанковскийСчет = СчетБанк.Ссылка;
    НовыйКонтрагент.ОсновнойБанковскийСчет.Банк = СчетБанк.Банк.Ссылка;
/

Поле "банк" недоступно для записи
 
 
   shuhard
 
1 - 04.10.18 - 13:10
(0) конфа 1С:Бордель ?
   Малыш Джон
 
2 - 04.10.18 - 13:12
(0) >>СчетБанк.Банк = НовыйБанк;

СчетБанк.Банк - это ссылка
НовыйБанк - это объект
   George_e30
 
3 - 04.10.18 - 13:15
(2) СчетБанк.Банк = НовыйБанк.Ссылка?

Сейчас проверю))

Но если банк есть, то тоже не присваивает..
   Малыш Джон
 
4 - 04.10.18 - 13:20
(3) ошибка не в этом, просто указал на несоответствие
   George_e30
 
5 - 04.10.18 - 13:21
(4) Спасибо, при создании банка отработало) Сейчас поищу почему не прилепляет при наличии банка
   Базис
 
6 - 04.10.18 - 13:24
В Отладчик веруешь?
   Segate
 
7 - 04.10.18 - 13:26
(1)какой банк в борделе? только ПКО!
   George_e30
 
8 - 04.10.18 - 13:28
(6) Так и не понял, как им пользоваться)))
   George_e30
 
9 - 04.10.18 - 13:32
Всем спасибо! получилось всё)
   shuhard
 
10 - 04.10.18 - 13:33
(7) окстись, карты используют все
 
 Рекламное место пустует
   Cool_Profi
 
11 - 04.10.18 - 13:52
(10) Ты тоже в борделе платишь картой?
   shuhard
 
12 - 04.10.18 - 15:57
(11) тоже к чему относиться ?
   Cool_Profi
 
13 - 04.10.18 - 16:12
(12)
"какой банк в борделе?"
" окстись, карты используют все"

Теперь построй логическую цепочку
   shuhard
 
14 - 04.10.18 - 16:28
(13) твоя ошибка в трактовке используют все,
все относиться к получателям платежа, т.е. к борделю, а не к плательщикам =)

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует