Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
20 мая 2024, 13:12

Контроль отправки счета клиенту

Автор Heromax, 24 июл 2019, 10:04

0 Пользователей и 1 гость просматривают эту тему.

Heromax

Вообщем клиент дал следующую задачу, есть документ в Бухгалтерия предприятия, редакция 3.0 называется "Счет покупателям". Клиент просит при отправке счета клиенту по кнопке, чтобы в документе проставлялась галочка, что счет отправлен. Кнопка отправить сообщение, обращается к общей команде "ОтправитьПоЭлектроннойПочте", которая в свою очередь ссылается на формы отправки сообщения. Прошу помочь!

MuI_I_Ika

А помочь то с чем? Что вызывает у вас затруднение? Решения задач с "0" это совсем другой раздел.

Heromax

Вообщем решил, кому интересно:
Создал новый реквизит в документе, создал новую команду, которую перенес на форму и привязал процедуру Отправить.
&НаКлиенте
Процедура Отправить(Команда)
Оповещение = Новый ОписаниеОповещения("ПослеЗакрытияВопроса",
        ЭтотОбъект);

    ПоказатьВопрос(Оповещение,
        "Вы точно хотите отправить счет?",
        РежимДиалогаВопрос.ДаНетОтмена,
        0, // таймаут в секундах
        КодВозвратаДиалога.Да, // (необ.) кнопка по умолчанию
        "Отправка счета" // (необ.) заголовок
    );
КонецПроцедуры

&НаКлиенте
Процедура ПослеЗакрытияВопроса(Результат, Параметры) Экспорт
Если Результат = КодВозвратаДиалога.Да Тогда
ПопыткаОтправкиСообщения();
    КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура ПопыткаОтправкиСообщения()
Попытка
ПараметрыФормы = Новый Структура;
ПараметрыФормы.Вставить("ИмяФормыДокумента" , "Документ.СчетНаОплатуПокупателю.Форма.ФормаДокумента");
МассивДок = Новый Массив;
МассивДок.Добавить(Объект.Ссылка);
ПараметрыФормы.Вставить("ОбъектыОтправки"   , МассивДок);
ОткрытьФорму("ОбщаяФорма.ОтправкаДокументовПоЭлектроннойПочте", ПараметрыФормы);
ЭтаФорма.Объект.СчетОтправлен=Истина;
Исключение Сообщить("Ошибка в отправке сообщения!");
КонецПопытки;
КонецПроцедуры



Похожие темы (5)

Рейтинг@Mail.ru

Поиск