Dev ›
Фишечки-рюшечки ›
#58
11.11.19 11:39
А как вам такое:
В начале критически важных или отлаживаемых процедур пишем такое:
Код |
---|
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
//************************************************
ТекстПроцедуры = ОбщийМодульСерверныеПроцедуры.ПолучитьТекстПроцедуры("имяДокумента.ФормаДокумента.ПриСозданииНаСервере");
Если не ТекстПроцедуры="" Тогда
Выполнить(ТекстПроцедуры);
Возврат;
//Для функций использовать конструкцию Возврат Вычислить(ТекстПроцедуры);
КонецЕсли;
//************************************************
.... основной код ПриСоздании ....
КонецПроцедуры
|
В общем модуле такая функция:
Код |
---|
Функция ПолучитьТекстПроцедуры(ИмяПроцедуры) Экспорт
УстановитьПривилегированныйРежим(Истина);
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ ПЕРВЫЕ 1
| ТекстыМодулейЗапросов.Текст КАК Текст
|ИЗ
| Справочник.ТекстыМодулейЗапросов КАК ТекстыМодулейЗапросов
|ГДЕ
| НЕ ТекстыМодулейЗапросов.ПометкаУдаления
| И ТекстыМодулейЗапросов.Наименование = &Наименование
| И НЕ ТекстыМодулейЗапросов .ЭтоГруппа";
Запрос.УстановитьПараметр("Наименование", ИмяПроцедуры);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Возврат ВыборкаДетальныеЗаписи.Текст;
КонецЦикла;
УстановитьПривилегированныйРежим(Ложь);
Возврат "";
КонецФункции
|
В справочнике ТекстыМодулейЗапросов в наименование кладем любую строку, по которой будем получать реквизит Текст.
Написали кусок текста, скопировали весь текст процедуры в наш справочник, и не перезапуская 1С - выполним тело процедуры из справочника.
Можно править прям в справочнике, но в управляемых формах это как в блокноте работать.
Для разработки и тестирования нового функционала - самое то, в продакшене можно повыключать эти вызовы для ускорения.