Имя: Пароль:
1C
1С v8
Как присвоить контрагенту банк?
,
0 George_e30
 
04.10.18
13:10
Всем доброго дня!

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

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

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

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

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

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

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

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