1С Форум

Пользователь

Сообщений: 3 Регистрация: 16.03.2015

13.07.2017 17:11:34

Помогите пожалуйста написать скрипт вывода ответственных лиц за подписание документов, на основании заказа покупателя или счета на оплату необходимо выводить в форму документа лицо ответственное за подписание, а так же реквизиты документа дающие ему на это полномочия как это технически должно выглядеть:
- конфигурация комплексная автоматизация 1.1
- пользователь выбирает заказ покупателя либо счет на оплату - нажимает сформировать документ - обработка смотрит кто ответственный по данному документу - если в регистре сведений "список уполномоченных лиц организации" данное лицо присутствует, то берет оттуда номер и дату приказа, доверенности или любого другого документа на основании которого оно действует и выводит в печатную форму эти данные, а так же его ФИО и должность
- то есть по сути из регистра сведений "список уполномоченных лиц организации" нужно вывести ФИО должность и номер документа на основании которого действует лицо

Помогите пожалуйста написать данный скрипт !

Администратор

Сообщений: 1907 Регистрация: 28.08.2013

20.07.2017 14:37:29

Скрипт ниже:
-------------------------------------------------------------------

Результат = "";

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

НомерДатаПриказа = "";

Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
НомерДатаПриказа = Выборка.НомерДатаПриказа;
КонецЕсли;

Если ЗначениеЗаполнено(НомерДатаПриказа) Тогда
Результат = "менеджера по продажам " + Параметры.Документ_Ответственный_РП + ", действующего на основании доверенности " + НомерДатаПриказа;
КонецЕсли;

КонецЕсли;

Если Не ЗначениеЗаполнено(Результат) Тогда
ДолжностьРуководителя = ?(ЗначениеЗаполнено(Параметры.ОрганизацияРуководительДолжность_РП), Параметры.ОрганизацияРуководительДолжность_РП, "______________________________");
ФИОРуководителя = ?(ЗначениеЗаполнено(Параметры.ОрганизацияРуководитель_РП), Параметры.ОрганизацияРуководитель_РП, "______________________________");
Результат = "" + ДолжностьРуководителя + " " + ФИОРуководителя;
КонецЕсли;

--------------------------------------------------------------------------

Администратор Администратор Сообщений: 1907 Регистрация: 28.08.2013	#3 0 20.07.2017 15:10:40 Видео инструкци по скрипту

Евгений Доманов Пользователь Сообщений: 3 Регистрация: 16.03.2015	#4 0 21.07.2017 15:57:14 Огромное спасибо, за столь оперативную реакцию ! Пока еще не пробовал все это осуществить, но в выходные обязательно займусь. Изменено: Евгений Доманов - 21.07.2017 23:49:38

ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - парсер не создает общие характеристики	Илья Пшеничников 14.05.21 8:01
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Вопрос по загрузке картинок	Сергей Рождественский 12.05.21 22:26
ЭКСПОТОР - Выгрузка номенклатуры из 1С - выгрузка остатков	Александр Носов 12.05.21 8:56
ЭКСЕЛОН - Загрузка в 1С из EXCEL - нужна помощь	Александр Носов 12.05.21 7:24
АВОШОП - Не работает загрузка по списку	Александр Носов 12.05.21 7:19
АВОШОП - АВОШОП	Александр Носов 06.05.21 9:11
АВОШОП - АВОШОП	Александр Носов 06.05.21 9:09
ЭКСПОТОР - Выгрузка номенклатуры из 1С - Выгрузка нескольких картинок в XML	Александр Носов 04.05.21 20:21
ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - ОБНОВЛЕНИЯ - Общая информация	Администратор 30.04.21 9:11
АВОШОП - ОБНОВЛЕНИЯ системы Avoshop	Администратор 27.04.21 6:53
ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - Отбор номенклатуры по последним добавленым товарам	Александр Носов 26.04.21 8:16
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Удаление нескольких не сопоставленных строк одним нажатием DEL	Александр Носов 22.04.21 7:28
ЭКСПОТОР - Выгрузка номенклатуры из 1С - Неправильные остатки в выгрузках	Александр Носов 22.04.21 7:27
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Загрузка остатков с одинаковыми артикулами	Роман Яцук 20.04.21 7:47
АВОШОП - Загрузка номенклатуры с сайта	Александр Носов 19.04.21 8:08

Скрипт вывода лиц ответственных за подписание договора

ПОСЛЕДНИЕ СООБЩЕНИЯ