Имя: Пароль:
1C
1С v8
Управляемые формы, дополнительный реквизит
0 Greeneti
 
12.08.16
21:32
Добрый вечер, всем!
Необходимо было создать в справочнике Партнеры реквизит Подразделение. В документе Поступление денежных средств создать дополнительный реквизит Подразделение. В этом документе при изменении Партнера(покупателя) должно потягиваться его подразделение, но ничего не выходит :( Видимо, потому что при нажатии на Подразделение сначала нужно выбрать либо дополнительный реквизит либо обычный. Или дело вовсе не в этом. Помогите разобраться.

<code>
&НаСервере
Процедура РасшифровкаБезРазбиенияПартнерПриИзмененииНаСервере()

Если Подразделение.Пустая() Тогда
НаименованиеКонтрагента=Объект.Контрагент.Партнер.Ссылка;
Запрос=Новый Запрос();
Запрос.УстановитьПараметр("Ссылка", НаименованиеКонтрагента);
Запрос.Текст="ВЫБРАТЬ
| Партнеры.Ссылка Как Подразделение1,
| Партнеры.Наименование,
| Партнеры.Подразделение КАК Подразделение
|ИЗ
| Справочник.Партнеры КАК Партнеры
|ГДЕ
| Партнеры.Ссылка = &Ссылка";
Результат=Запрос.Выполнить().Выбрать();
Результат.Следующий();
ЭтаФорма.Подразделение=Результат.Подразделение;
//ПодраздПартнера=Объект.Подразделение.ПолучитьОбъект();
//ПодраздПартнера.Заполнить(Результат.Подразделение);
Результат.Сбросить();
КонецЕсли;

КонецПроцедуры
</code>
1 SadrArt
 
12.08.16
22:07
НаименованиеКонтрагента=Объект.Контрагент.Партнер.Ссылка;
Запрос.УстановитьПараметр("Ссылка", НаименованиеКонтрагента);

Тихий ужас..
2 RomanYS
 
12.08.16
22:18
(1) да ппц, откуда они лезут всё время)

(0)забей на запрос, у тебя всё равно плохо получается

Объект.Подразделение = Объект.Контрагент.Партнер.Подразделение;
3 Горогуля
 
13.08.16
04:11
>Результат.Сбросить();
отлично сказано. по отношению к результату твоих трудов
4 Greeneti
 
13.08.16
17:44
Спасибо большое,ребят.