Форум программистов, компьютерный форум, киберфорум
1С: Собственные программы
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 5.00/21: Рейтинг темы: голосов - 21, средняя оценка - 5.00
1373 / 596 / 199
Регистрация: 02.08.2011
Сообщений: 2,886
1C 8.x

Заполнить Значения контрагента из Другого контрагента

10.02.2014, 19:11. Показов 4791. Ответов 22
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
1С 8.2 Документооборот 1.3
Нужно программным путем выбрать контрагента и записать его в базу.


Контрагент создавался программным путем
Кликните здесь для просмотра всего текста

1C
1
2
3
4
5
6
7
8
Корреспондент = Справочники.Корреспонденты.НайтиПоКоду(ТекКод);
    Если не ЗначениеЗаполнено(Корреспондент) Тогда 
        Корреспондент = Справочники.Корреспонденты.СоздатьЭлемент();
    Иначе 
        Корреспондент = Корреспондент.ПолучитьОбъект();
    КонецЕсли;
--> Заполнение данных 
        Корреспондент.Записать();



Дальше попытка создать новый Справочник ВнутренниеДокументы
Кликните здесь для просмотра всего текста

1C
1
2
3
4
5
6
ТекДоговор = ИнфоПоСсылке(ТекОрг,ТекНомер,ТекДата); //туи функция просто проверки наличия ссылки в базе и возврата существующей или пустой ссылки
     Если ТекДоговор = Справочники.ВнутренниеДокументы.ПустаяСсылка() Тогда
        НовДоговор = Справочники.ВнутренниеДокументы.СоздатьЭлемент();
     Иначе
        НовДоговор = ТекДоговор.Ссылка.ПолучитьОбъект();
     КонецЕсли;
-->Заполнение
НовДоговор.Записать();


В общем полностью аналогично контрагенту
Начинаю заполнять и есть там такое поле
НовДоговор.Корреспондент

как я не пытался, чтобы в это поле записались данные по корреспонденту, никак не получается
1C
1
2
3
НовДоговор.Корреспондент = Корреспондент
НовДоговор.Ссылка.Корреспондент = Корреспондент
...
Я много вариантов попробовал, но так и не угадал как надо. (и присваиванием и заполнить значение свойств и с получением объекта и без).
Каждый раз при открытии формы реквизит НовДоговор.Корреспондент, пустовал, и в отладчике тоже пустовал.
Корреспондент заполнен, а НовДоговор.Корреспондент остается пустым.
=======================================

мне помощь нужна.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
10.02.2014, 19:11
Ответы с готовыми решениями:

Выбор контрагента
Здравствуйте. Есть справочник контрагенты, который разделяется на группы Клиенты и Поставщики. Возможно ли в документе при выборе...

Подтягивание реквизитов контрагента
Здравствуйте. Только начинаю изучать 1С по книге Радченко + статьи в интернете, прошу сильно не пинать. По ходу возникают вопросы. Может...

БП 2.0 Добавить договор контрагента программно
Добрый день. Никак не могу понять, в чем ошибка. doc = Справочники.ДоговорыКонтрагентов.СоздатьЭлемент(); ...

22
Шизофреник
 Аватар для wladimir_ui
361 / 363 / 83
Регистрация: 25.06.2013
Сообщений: 1,141
10.02.2014, 22:05
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от wladimir_ui Посмотреть сообщение
Как вариант:
Если сразу после строки

НовДоговор.Корреспондент = Корреспондент.Ссылка;

в отладчике в реквизите НовДоговор.Корреспондент есть, а после записи пропадает - кури в отладчике процедуры модуля справочника "ПередЗаписью", "ПриЗаписи" (если они вообще есть) - может по какому нибудь условию зануляется реквизит. Возможно есть еще аналогичные подписки на события.

Также предлогаю заодно покурить и процедуры формы справочника ВнутренниеДокументы: ПриСозданииНаСервере, ПриОткрытии и т.д.

з.ы. всё курить в отладчике, естественно
1
1373 / 596 / 199
Регистрация: 02.08.2011
Сообщений: 2,886
10.02.2014, 22:17  [ТС]

Не по теме:

wladimir_ui, да предлагали уже. Я не забыл



Добавлено через 6 минут
Dethmontt, спасибо.
Вы видите будущее оказывается.

Не по теме:

(сюда не писали, но уже дали ответ в моем предыдущем вопросе)



Короче, ниче курить не надо.
Все просто решилось.

1C
1
НовДоговор.ОбменДанными.Загрузка = истина;
0
Модератор
Эксперт 1С
 Аватар для Dethmontt
4032 / 2977 / 594
Регистрация: 10.03.2011
Сообщений: 11,701
Записей в блоге: 1
11.02.2014, 01:26
Цитата Сообщение от daslex Посмотреть сообщение
Dethmontt, спасибо.
Вы видите будущее оказывается.
телепат 80лвл
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
11.02.2014, 01:26

Как получить ЮрАдрес контрагента 1С 8.3?
Всем привет! Получаю СчетНаОплатуПокупателю и из него ни в какую не получается получить юридический адрес контрагента. &НаСервере ...

УТ 10.3. Заполнение контактных данных контрагента с использованием классификатора
В продолжение темы с обработкой (Предыстория: пишу я обработку, которая загрузит контрагентов-покупателей из экселя в УТ 10,3) Я...

Как выдернуть данные банковского счета контрагента?
Подскажите пожалуйста, как в Модуле менеджера дока Заказ клиента получить данные банковского счета контрагента?: 1. Наименование Банка...

Как добавить в заказ быстрое создание контрагента? Ищу
Видел вот такую штуку в заказе, есть закладка интернет, с помошью которой можно быстро создать контрагента, может кто знает где взять такую...

Поиск по эл. адресу контактного лица контрагента в справочнике контрагенты
Здравствуйте спецы. На скрине отображено окно списка контрагентов, где производится поиск по адресу электронной почты (1.), которая...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
23
Ответ Создать тему
Новые блоги и статьи
Калькулятор для расчета родства
russiannick 07.08.2026
1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь
Мир по моей воле
kumehtar 07.08.2026
Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .
Кредитный калькулятор
Maks 05.08.2026
Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .
У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35".
kumehtar 04.08.2026
С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .
Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники).
Hrethgir 04.08.2026
Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .
Термопринтер QR701
Argus19 03.08.2026
Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .
Создание формы заимствованного документа
Maks 03.08.2026
Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .
Задача предоставления скидок покупателям
Maks 03.08.2026
Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru