1С Форум

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

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

13.07.2017 17:11:34

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

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

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

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

20.07.2017 14:37:29

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

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

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

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

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

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

КонецЕсли;

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

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

Администратор Администратор Сообщений: 1065 Регистрация: 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с	Алексей 21.10.19 17:01
ЭКСПОТОР - Выгрузка номенклатуры из 1С - Соответствия категорий номенклатуры	Александр Носов 21.10.19 16:22
СМС и EMAIL РАССЫЛКА из 1С - Обновления подситемы "Рассылки смс уведомлений"	Администратор 21.10.19 14:17
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Нечеткое распознавание номенклатуры	Александр Носов 21.10.19 13:41
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Вопросы-ответы по разработке "Загрузка из Excel в 1с"	Александр Носов 21.10.19 13:37
ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - Программа пишет что IP адрес заблокирован	Александр Носов 21.10.19 6:10
ЭКСПОТОР - Выгрузка номенклатуры из 1С - Выгружает таблицу без артикулов	Администратор 18.10.19 16:42
БОНЛИОН - Бонусная система для 1С - Вопросы-ответы по программе "Учет бонусных карт в 1с8"	Администратор 18.10.19 16:41
ЭКСПОТОР - Выгрузка номенклатуры из 1С - Формат выгрузки YML. Ошибка: Не установлена цена на товар.	Администратор 17.10.19 12:26
БОНЛИОН - Бонусная система для 1С - Возврат товара от покупателя	Дмитрий 17.10.19 10:26

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

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