Такой вопрос: у меня на форме документа при выборе контрагента, должны меняться данные в 3х строках, как так сделать?

есть функция Написать, в ней заполняются данные 3х строк, и нужно чтобы при выборе контрагента эта функция заного каждый раз срабатывала

Процедура ПриИзмененииТвоегоКонтрагента()
ВызватьМоюПроцедуру();
КонецПроцедуры

В процедуре "ПриИзменении" поля формы вызывать функцию.

И зачем использовать функцию? Она у тебя что то возвращает?

ну я вызываю функцию при изменении контрагента, но только он мне результат выдает один, то есть у меня к примеру 3 контрагента, у каждого из них свои данные для заполнения тех самых 3х строк, которые должны изменяться. При изменении контрагента данные строк заполняются данными только одного контрагента, а не каждого в отдельности

а как ты одновременно меняеш 3-х контров сразу?

А откуда у тебя должны браться эти 3 контрагента?

не одновременно, по очереди, ща прилеплю скрин

http://pikucha.ru/i926j - при выборе контрагента
http://pikucha.ru/i926k - договора этого контрагента
http://pikucha.ru/i926l - выбираем другого контрагента
http://pikucha.ru/i926m - договора другого контрагента
В поле справочная информация данные должны изменяться соответственно договорам контрагентов, но этого не происходит

Функция Долг (ЭлементыФормы)  Экспорт
       
   Дог1 = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("000000001");
   Если НЕ Дог1.ПометкаУдаления Тогда
       Если Дог1.СрокДействия > Дата Тогда
           ЭлементыФормы.ГиперСсылкаДоговорНаУслуги.ЦветТекста = WebЦвета.Зеленый;    
           ЭлементыФормы.ГиперСсылкаДоговорНаУслуги.Заголовок= Дог1.Ссылка;
       Иначе
           ЭлементыФормы.ГиперСсылкаДоговорНаУслуги.ЦветТекста = WebЦвета.Красный;
           ЭлементыФормы.ГиперСсылкаДоговорНаУслуги.Заголовок= Дог1.Ссылка;
       КонецЕсли;
   Иначе
       ЭлементыФормы.ГиперСсылкаДоговорНаУслуги.ЦветТекста = WebЦвета.ОранжевоКрасный;
       ЭлементыФормы.ГиперСсылкаДоговорНаУслуги.Заголовок = "Договора на услуги нет";
   КонецЕсли;
   
   Дог2 = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("000000003");
   Если НЕ Дог2.ПометкаУдаления Тогда
       Если Дог2.СрокДействия > Дата Тогда
           ЭлементыФормы.НадписьПодпискаИТС.ЦветТекста = WebЦвета.Зеленый;
           ЭлементыФормы.НадписьПодпискаИТС.Заголовок= Дог2.Ссылка;
       Иначе
           ЭлементыФормы.НадписьПодпискаИТС.ЦветТекста = WebЦвета.Красный;
           ЭлементыФормы.НадписьПодпискаИТС.Заголовок= Дог2.Ссылка;
       КонецЕсли;
   Иначе
       ЭлементыФормы.НадписьПодпискаИТС.ЦветТекста = WebЦвета.ОранжевоКрасный;
       ЭлементыФормы.НадписьПодпискаИТС.Заголовок = "Договора на ИТС нет";
   КонецЕсли;
   
   Запрос = Новый Запрос;
   Запрос.Текст ="ВЫБРАТЬ
   |    ВзаиморасчетыСКонтрагентамиОстатки.СуммаВзаиморасчетовОстаток
   |ИЗ
   |    РегистрНакопления.ВзаиморасчетыСКонтрагентами.Остатки(
   |    &Дата,
   |    ДоговорКонтрагента.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ОбучениеКОРП)
   |    ИЛИ ДоговорКонтрагента.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ОбучениеФЛ)
   |    ИЛИ ДоговорКонтрагента.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ОбучениеЮЛ)
   |    ИЛИ ДоговорКонтрагента.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.Поставка)
   |    И Контрагент = &Контрагент) КАК ВзаиморасчетыСКонтрагентамиОстатки";
   Запрос.УстановитьПараметр("Дата", ТекущаяДата());
   Запрос.УстановитьПараметр("Контрагент",Контрагент);
   СальдоРезультат = Запрос.Выполнить().Выбрать();
   Если СальдоРезультат.Выбрать().Следующий() Тогда
   Если СальдоРезультат < 0 Тогда
       ЭлементыФормы.НадписьСальдоВзаиморасчетов.ЦветТекста = WebЦвета.Красный;
       ЭлементыФормы.НадписьСальдоВзаиморасчетов.Заголовок = "Долг Контрагента: " + СальдоРезультат;
   Иначе
     ЭлементыФормы.НадписьСальдоВзаиморасчетов.ЦветТекста = WebЦвета.Зеленый;
       ЭлементыФормы.НадписьСальдоВзаиморасчетов.Заголовок = "Долг Организации" + СальдоРезультат;
   КонецЕсли;
Иначе
     ЭлементыФормы.НадписьСальдоВзаиморасчетов.ЦветТекста = WebЦвета.ОранжевоКрасный;
       ЭлементыФормы.НадписьСальдоВзаиморасчетов.Заголовок = "Взаиморасчетов по договорам нет";

   КонецЕсли;

Потом в форме я вызваю эту функцию ПриИзменении контрагента

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

я один дурак или все видять что контрагент в доке один (одно поле), откуда он знает что раньше было в этом поле и при чем тут 3 контрагента?

Дог1, Дог2 - где заполняются? реквизит на форме же один

(13) ты не понял, смотри
Есть одно поле контрагент, при выборе контрагента, данные в справочной информации заполняются его договорами
Потом мы выбираем другого контрагента, в этом же поле, и справочная инфомрация заполняется данными контрагента, которого мы выбрали

(14) Дог1, Дог2 это просто названия переменных для поиска данных, на основании найденных данных идет заполнение красным или зеленым цветом

(15) вот здесь

   СальдоРезультат = Запрос.Выполнить().Выбрать();
   Если СальдоРезультат.Выбрать().Следующий() Тогда

нереальный бред. Зачем две выбоки создаете?

(17) случайно выбрать во второй строке получилось)

как сделать, чтобы при изменении контрагента справочная информация заполнялась данными его документов?

(18) ну получается у вас это случайно договора не пишутся. Так и передайте там всем, случайно, дескать не заполняется.

(20) а по существу?

СальдоРезультат = Запрос.Выполнить().Выбрать();
...
Если СальдоРезультат < 0 Тогда

Тоже ерунда написана

(22) результат я получаю в виде чисел, и если меньше 0, то идет надпись одного цвета, иначе другого, почему ерунда?

ты получаешь не число а элемент выборки в переменной "СальдоРезультат"

Если СальдоРезультат.СуммаВзаиморасчетовОстаток <0 Тогда

(24) то есть мне нужно элементу выборки присвоить значение число и только потом сравнивать?

(26) см (25)

Отладкой пользоваться умеешь?

(28) умею
есть функция встроенная в УПП для перезаполнения элементов формы?)

не слыхал о такой

(26) Жесть какая :(

ну присваивай нужным реквизитам/элементам формы нужные значения, что мешает не пойму?

блин, почему договора не перезаполняются? пробовал запросом:

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

в этом кроде я не вижу перезаполнения договоров, я вижу смену цвета у гипперсылок в зависимости от условия "Срок действия"

(34) я не понимаю как их перезаполнить

Договоры у тебя в каких реквизитах хранятся?

у документа есть реквизиты, в которых хранятся данные.

у меня есть справочник договоры контрагентов в нем и хранятся договоры

В документе должна храниться ссылка на нужный договор

название договора содержится в реквизите Наименование

на форме где эти договора должны отображаться?

посмотри, есть ли у документа реквизиты "Договор" или что-тол вроде того?

ребят, подключаемся, человеку нужно помочь!

на форме моего бизнес процесса должны отображаться только наименования этих договоров, а наименования этих договоров хранятся в справочники.договорыконтрагентов.наименование

то есть мне нужно, чтобы при перевыборе контрагента, в части Справочная информация на моей форме бизнес процесса обновлялись наименования договоров

http://pikucha.ru/i926x

Посмотри в каком элементе управления формы должны отображаться договора (гиперссылка, поле ввода или что там еще). Потом посмотри связан ли этот элемент управления с данными - так узнаешь откуда берутся данные в этом элементе управления.

http://pikucha.ru/i926z

поищи в коде формы это наименование элемента управления - откуда заполняются эти договра

форма договора не поможет никак совершенно точно, можешь не рассылать. Нужно рыться в форме бизнеспроцесса

это гиперссылки

http://pikucha.ru/i926B, у нее есть событие, Нажатие, в котором прописан код:

Процедура ГиперСсылкаДоговорНаУслугиНажатие(Элемент)
   Если НЕ Дог1.ПометкаУдаления Тогда
       Если Дог1.Код = "000000001" Тогда    
           ОткрытьЗначение(Дог1);
       Иначе
       КонецЕсли;
   КонецЕсли;
КонецПроцедуры

Посмотри в свойствах этой гиперссылки е6сть ли "Данные"?

(53) да,  есть

Погодь, кажись данные хранятся в Дог1

Какие данные?

(55) в данных у меня ничего не стоит

(56) контрагента туда?

не, не надо

(59) какие тогда данные поставить? создавать новый реквизит, и ему привязывать справочник договора контрагентов?

(59) наверно "Заголовок" надо менять. Да он и меняет у себя в коде, только как-то совершенно случайным образом.

код (33) в какой процедуре располагается?

(60) у вас смотрите, в функции долг
 
Дог2 = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("000000003");

то есть вы жестко прописали договор. Он и будет. Независимо от контрагента.

Судя по скриншотам, вижу что при смене контрагента не меняется средний договор в правом нижнем углу. Давай код процедуры ПриИзмененииКонтрагента()

(62)
Функция Долг (ЭлементыФормы)
в модуле формы

Процедура КонтрагентПриИзменении(Элемент)

       
        Долг(ЭлементыФормы);
       
   Если Элемент.Значение = Неопределено Тогда
       Элемент.Значение = Справочники.Контрагенты.ПустаяСсылка();
   КонецЕсли;
   
   Если ТипЗнч(Элемент.Значение) = Тип("СправочникСсылка.Контрагенты") Тогда
       Если НЕ ЗначениеЗаполнено (Контрагент) Тогда
           КонтактноеЛицоКонтрагента = Справочники.КонтактныеЛицаКонтрагентов.ПустаяСсылка();
       Иначе
           Если ТипЗнч(КонтактноеЛицоКонтрагента) = Тип("Строка") ИЛИ (ТипЗнч(КонтактноеЛицоКонтрагента) <> Тип("Строка") И (НЕ ЗначениеЗаполнено (КонтактноеЛицоКонтрагента) ИЛИ КонтактноеЛицоКонтрагента.Владелец <> Контрагент)) Тогда
               Попытка
                   КонтактноеЛицоКонтрагента = Контрагент.ОсновноеКонтактноеЛицо;
               Исключение
                   // Из-за ограничения прав на уровне записей прочитать не смогли
               КонецПопытки;
           КонецЕсли;
       КонецЕсли;
   Иначе
       Если ТипЗнч(КонтактноеЛицоКонтрагента) <> Тип("Строка") Тогда
           КонтактноеЛицоКонтрагента = "";
       КонецЕсли;
       ДанныеНезарегистрированногоКонтрагента.НаименованиеКонтрагента = Контрагент;
   КонецЕсли;
   
   //ДоступностьИсточникаИнформации();
   
   //ОбновитьКонтактнуюИнформацию();
   
   мПоследнееЗначениеЭлементаТайпингаКонтрагент = Элемент.Значение;
   

КонецПроцедуры

(63) истину глаголит!

(63) истину глаголит

Дог2 = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("000000003");
   Если НЕ Дог2.ПометкаУдаления Тогда
       Если Дог2.СрокДействия > Дата Тогда
           ЭлементыФормы.НадписьПодпискаИТС.ЦветТекста = WebЦвета.Зеленый;
           ЭлементыФормы.НадписьПодпискаИТС.Заголовок= Дог2.Ссылка;
       Иначе
           ЭлементыФормы.НадписьПодпискаИТС.ЦветТекста = WebЦвета.Красный;
           ЭлементыФормы.НадписьПодпискаИТС.Заголовок= Дог2.Ссылка;
       КонецЕсли;
   Иначе
       ЭлементыФормы.НадписьПодпискаИТС.ЦветТекста = WebЦвета.ОранжевоКрасный;
       ЭлементыФормы.НадписьПодпискаИТС.Заголовок = "Договора на ИТС нет";
   КонецЕсли;

--
Независимо от контрагента берется договор с кодом "000000003"

(63) я сделал для дог1 поиск по запросу, то есть жесткой привязки нет, но все равно ничего не меняется

(69)

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

(71) привязки нет, но данные все равно не меняются

А первый договор с номером "000000001"

И только 3-й расчитывается по контрагенту

в запросе (71) нет отбора по контрагенту

(74) нужно еще установить параметр получается?

он у тебя находит все время первый попавшийся договор независимо от контрагента, возможно один и тот же

в запрос добавить условие по контрагенту

Что-то вроде

Запрос.Текст = "ВЫБРАТЬ
                  |    ДоговорыКонтрагентов.Ссылка КАК Ссылка,
                  |    ДоговорыКонтрагентов.СрокДействия КАК СрокДействия
                  |ИЗ
                  |    Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
                  |ГДЕ
                  |    ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ИТС) И ДоговорыКонтрагентов.Владелец=&Контрагент";

Запрос.УстановитьПараметр("Контрагент", Контрагент);

(77)да, сделал, помогло, и такой теперь вопрос, у меня два запроса:

Запрос.Текст = "ВЫБРАТЬ
                  |    ДоговорыКонтрагентов.Ссылка КАК Ссылка,
                  |    ДоговорыКонтрагентов.СрокДействия КАК СрокДействия
                  |ИЗ
                  |    Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
                  |ГДЕ
                  |    ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ИТС)
                  |    И ДоговорыКонтрагентов.Владелец = &Владелец";




и второй:

Запрос.Текст = "ВЫБРАТЬ
                  |    ДоговорыКонтрагентов.Ссылка КАК Ссылка,
                  |    ДоговорыКонтрагентов.СрокДействия КАК СрокДействия
                  |ИЗ
                  |    Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
                  |ГДЕ
                  |    ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.Сопровождение)
                  |    И ДоговорыКонтрагентов.Владелец = &Владелец";

ну норм

если я сделаю так:

Запрос.Текст = "ВЫБРАТЬ
                  |    ДоговорыКонтрагентов.Ссылка КАК Ссылка,
                  |    ДоговорыКонтрагентов.СрокДействия КАК СрокДействия
                  |ИЗ
                  |    Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
                  |ГДЕ
                  |    ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.Сопровождение)
                  |ИЛИ
| ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ИТС)
|    И ДоговорыКонтрагентов.Владелец = &Владелец";

можно потом будет вытаскиывать к примеру просто Дог, без всяких лог1 дог2? чтобы меньше запросов было?

а что ты хочешь получить?

у меня просто на одну строку должны идти данные с видом взаиморасчетов ИТС, в другую строку с видом взаиморасчетов сопровождение

вопервых у тебя неправильно построено условие, нужно


ВЫБРАТЬ
                  |    ДоговорыКонтрагентов.Ссылка КАК Ссылка,
                  |    ДоговорыКонтрагентов.СрокДействия КАК СрокДействия
                  |ИЗ
                  |    Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
                  |ГДЕ
                  |    (ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.Сопровождение)
                  |ИЛИ
| ДоговорыКонтрагентов.ВидВзаиморасчетов = ЗНАЧЕНИЕ(Справочник.ВидыВзаиморасчетов.ИТС))
|    И ДоговорыКонтрагентов.Владелец = &Владелец

мне не нравятся на каждую из них свой запрос, я хочу сделать один общий, данные то у них одинаковые, кроме вида взаиморасчетов, вот и хочу объеденить 2 запроса, и потом просто вызывать данные

во вторых, насколько я понял, смысл что в первой ссылке всегда только ИТС , во второй - только Сопросвождение. В Последнем случае порядок может быть любой, плюс могут быть оба ИТС или оба сопровождение

ок, ясно, спасибо за помощь

не советую, одним словом. Либо нужно сложный запрос лепить. Нет смысла

пожалуйста :)

Только теперь при закрытии документа данные не сохраняются, почему?

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