- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
Функция ПолучитьДоговорКонтрагента(Организация,Подразделение,Контрагент) Экспорт
ЗапросДоговор = Новый Запрос;
ЗапросДоговор.Текст = "ВЫБРАТЬ
| ДоговорыКонтрагентов.Ссылка
|ИЗ
| Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
|ГДЕ
| ДоговорыКонтрагентов.Организация = &Организация
| И ДоговорыКонтрагентов.Подразделение = &Подразделение
| И ДоговорыКонтрагентов.Владелец = &Владелец
|
|СГРУППИРОВАТЬ ПО
| ДоговорыКонтрагентов.Ссылка";
ЗапросДоговор.УстановитьПараметр("Организация",Организация);
ЗапросДоговор.УстановитьПараметр("Подразделение",Подразделение);
ЗапросДоговор.УстановитьПараметр("Владелец",Контрагент);
Результат = ЗапросДоговор.Выполнить();
Если НЕ Результат.Пустой() Тогда
Возврат Результат.Выбрать().Следующий();
Иначе
Возврат Справочники.ДоговорыКонтрагентов.ПустаяСсылка();
КонецЕсли;
КонецФункции