HelpF.pro

Получить основной договор контрагента

    &НаСервере

    Процедура НайтиДоговорКонтрАгента(ФормаОрганизация,ФормаКонтрагент)

    Сообщить(ФормаКонтрагент);

    КАгент = Новый Структура;

    КАгент.Вставить("Организация",ФормаОрганизация);

    КАгент.Вставить("Контрагент",ФормаКонтрагент);

    КАгент.Вставить("ВидДоговора",Перечисления.ВидыДоговоровКонтрагентов.СПокупателем);

    Сообщить(РегистрыСведений.ОсновныеДоговорыКонтрагента.Получить(ТекущаяДата(),КАгент)[0]);

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


Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq83/view/1909.html