Как оставить видимым сообщение при закрытии документа 1С

[Hobo73]

Может кому пригодится, додумал сам, тк не нашел, не судите строго, учусь.
Работает через расширение, в форме документа, добавленной из расширения.
Тк Сообщениепользователю, при процедуре на сервере, закрывается при закрытии документа, делаем через НаКлиенте и НаСервере. Саму процедуру описываем НаСервере.
Почему не на прямую на клиенте, до нее в СКД запросы по регистрам и параметрам с сервера, в сообщение результат пользователю от этих запросов, как информация пока, без Отказов и тд.

Критикуйте))


А есть ресурс, что бы не хламить здесь решениями, а просто делится для таких "спецов" как я?

[alexandr_ll]

Hobo73, Думаю, лучше привести код из модуля формы. Так будет нагляднее.

[Hobo73]

Ну текст запроса наверное не интересен, там данные документа с остатком взаиморасчетов объединяются для расчета, а без него как то так:

Код Выделить Развернуть

&НаСервере
Процедура РасшДЛ_ПриЗакрытииПослеНаСервере()


Запрос = Новый Запрос;
Запрос.Текст = "";

 
Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка);
   
    РезультатЗапроса = Запрос.Выполнить();
   
    Выборка = РезультатЗапроса.Выбрать();
   
    Пока Выборка.Следующий() Цикл
        Если Выборка.ПревышениеЛимита < 0 И Выборка.Лимит <> 0 Тогда
           
            Сообщение = Новый СообщениеПользователю;
            Сообщение.Текст = СтрШаблон("Превышен лимит долга %1 у клиента %2 на сумму %3 руб. с учетом этого заказа!",
            Выборка.Лимит,
            Выборка.КонтрагентПредставление,
            -Выборка.ПревышениеЛимита);   
            Сообщение.Сообщить();
        КонецЕсли;       
       
    КонецЦикла;
   


КонецПроцедуры

&НаКлиенте
Процедура РасшДЛ_ПриЗакрытииПосле(ЗавершениеРаботы)
    РасшДЛ_ПриЗакрытииПослеНаСервере();
КонецПроцедуры