Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
28 мар 2024, 17:42

Не удается программно записать контрагента

Автор nataliya_vl, 27 апр 2016, 15:50

0 Пользователей и 1 гость просматривают эту тему.

nataliya_vl

//добавляем партнера и контрагента и организацию
      новыйП=справочники.Партнеры.СоздатьЭлемент();
      новыйП.НаименованиеПолное=Наименование;
      новыйП.ЮрФизЛицо=перечисления.ЮрФизЛицо.ЮрЛицо;
      новыйП.Клиент=истина;
      попытка
         НовыйП.Записать();
      исключение
         сообщить ("партнер "+ Наименование  +" не сохранен");
      конецпопытки;
      
      новыйО=справочники.организации.создатьэлемент();
      новыйО.Наименование=наименование;
      новыйО.НаименованиеПолное=наименование;
      новыйО.НаименованиеСокращенное=наименование;
      новыйО.ИНН=инн;
      новыйО.кпп=кпп;
      новыйО.ЮрФизЛицо=перечисления.ЮрФизЛицо.ЮрЛицо;
      попытка
         новыйО.записать();
      исключение
         сообщить (    " НЕ добавлена организация "+Наименование + строка(ИНН) );
      конецпопытки;
      
      
      НовыйКА = Справочники.Контрагенты.СоздатьЭлемент();
      НовыйКА.ИНН=ИНН;
      НовыйКА.КПП=КПП;
      НовыйКА.Партнер=НовыйП.Ссылка;
      НовыйКА.НаименованиеПолное=Наименование;
      новыйКА.ЮрФизЛицо=перечисления.ЮрФизЛицо.ЮрЛицо;
      попытка
         НовыйКА.Записать();     
      исключение
         сообщить   ("НЕ добавлен контрагент "+Наименование + строка(ИНН) );
      конецпопытки;
      сообщить("добавлен контрагент "+новыйКА.Наименование + строка(ИНН) );
      Возврат НовыйКА.Ссылка;

Организация записывается, партнер - нет, контрагент - нет. Ошибок не выдает,на исключение не выходит, по после  записи ссылка на объект пуста.

Что не так?  Может быть, не хватает каких-либо обязательных реквизитов?

xdto


VivaBrunko


nataliya_vl

каким образом?
Сюда выложить целиком или как отправить? 


xdto

Не понятно чему равна у Вас наименование??


новыйП=справочники.Партнеры.СоздатьЭлемент();
     НовыйП.Наименование = "Партнер";
      новыйП.НаименованиеПолное= "Партнер";
      новыйП.ЮрФизЛицо=перечисления.ЮрФизЛицо.ЮрЛицо;
      новыйП.Клиент=истина;
      попытка
         НовыйП.Записать();
      исключение
         сообщить ("партнер "+ НовыйП.Наименование  +" не сохранен");
      конецпопытки;
так все работает

Rasty

Цитата: xdto от 27 апр 2016, 16:26
Не понятно чему равна у Вас наименование??


новыйП=справочники.Партнеры.СоздатьЭлемент();
     НовыйП.Наименование = "Партнер";
      новыйП.НаименованиеПолное= "Партнер";
      новыйП.ЮрФизЛицо=перечисления.ЮрФизЛицо.ЮрЛицо;
      новыйП.Клиент=истина;
      попытка
         НовыйП.Записать();
      исключение
         сообщить ("партнер "+ НовыйП.Наименование  +" не сохранен");
      конецпопытки;
так все работает
ага, наименование в справочнике всегда должно быть заполнено, это обязательное поле
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

nataliya_vl

Наименование заполненяется, я уверена.  Если смотреть партнеров в консоли запросов, то там все заполнено, но поле "ссылка" пустое,может быть поэтому и контрагенты не добавляются ( там ссылка на партнера пустая получается)?

xdto

Откуда берЁт значение? Причем тут Ссылка, ссылка это UID не важно заполнено оно или нет ссылка есть на существующем элементе или объекте Вы же создаете новую это значение должно откуда та взять или прописать

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск