Авторизация
На сайте:
|
|
Форум:
Список тем -> Как получить ФИО ответственного лица по определённой должности ?
|
1. |
|
Сергей finansoft.ru id 1 16.07.2014 11:52
|
|
Функция ФИООтвЛица(Должность)
Запрос=Новый Запрос("ВЫБРАТЬ
| ФИОФизЛицСрезПоследних.Фамилия КАК Фамилия,
| ФИОФизЛицСрезПоследних.Имя КАК Имя,
| ФИОФизЛицСрезПоследних.Отчество КАК Отчество
|ИЗ
| РегистрСведений.ФИОФизЛиц.СрезПоследних(&Дата) КАК ФИОФизЛицСрезПоследних
|ГДЕ
| ФИОФизЛицСрезПоследних.ФизЛицо В (
| ВЫБРАТЬ
| ОтветственныеЛицаОрганизацийСрезПоследних.ФизическоеЛицо.Ссылка
| ИЗ
| РегистрСведений.ОтветственныеЛицаОрганизаций.СрезПоследних(&Дата) КАК ОтветственныеЛицаОрганизацийСрезПоследних
| ГДЕ
| ОтветственныеЛицаОрганизацийСрезПоследних.Должность = &Должность)");
Запрос.УстановитьПараметр("Дата",ТекущаяДата());
Запрос.УстановитьПараметр("Должность",Должность);
РЗ=Запрос.Выполнить().Выбрать();
РЗ.Следующий();
Возврат ""+ РЗ.Фамилия+" " +Лев(РЗ.Имя,1)+". "+Лев(РЗ.Отчество,1)+ ".";
КонецФункции |
Ответить Написать автору на email
|
_0
|
|
|
|
|
|