From 3cd12d4f69f884995e7f3d6453c8d9478e7eb2c4 Mon Sep 17 00:00:00 2001 From: "tsukanov.as" Date: Sun, 26 Apr 2020 21:36:49 +0300 Subject: [PATCH] =?UTF-8?q?=D0=91=D0=B0=D0=B3=D1=84=D0=B8=D0=BA=D1=81=20(#?= =?UTF-8?q?164)?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Ext/ObjectModule.bsl" | 7 +++++++ 1 file changed, 7 insertions(+) diff --git "a/plugins/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/src/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/Ext/ObjectModule.bsl" "b/plugins/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/src/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/Ext/ObjectModule.bsl" index 5c1e113..9167a64 100644 --- "a/plugins/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/src/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/Ext/ObjectModule.bsl" +++ "b/plugins/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/src/\320\240\320\265\320\272\321\203\321\200\321\201\320\270\320\262\320\275\321\213\320\271\320\237\320\276\320\264\321\201\321\207\320\265\321\202\320\241\320\265\321\200\320\262\320\265\321\200\320\275\321\213\321\205\320\222\321\213\320\267\320\276\320\262\320\276\320\262\320\222\320\234\320\276\320\264\321\203\320\273\321\217\321\205\320\244\320\276\321\200\320\274/Ext/ObjectModule.bsl" @@ -12,6 +12,7 @@ Перем Вызывающий, ВызывающийНаКлиенте; Перем ТаблицаВызовов; Перем Методы; +Перем Стек; Процедура Инициализировать(Парсер, Параметры) Экспорт Узлы = Парсер.Узлы(); @@ -23,6 +24,7 @@ ТаблицаВызовов.Колонки.Добавить("Метод"); ТаблицаВызовов.Колонки.Добавить("ВызовСервера", Новый ОписаниеТипов("Число")); ТаблицаВызовов.Indexes.Добавить("Метод, НаКлиенте"); + Стек = Новый Соответствие; Методы = Новый Соответствие; КонецПроцедуры // Инициализировать() @@ -71,9 +73,14 @@ Процедура ПодсчитатьВызовыСервера(Метод) Перем ВызовыНаКлиенте; + Если Стек[Метод.Имя] <> Неопределено Тогда + Возврат; + КонецЕсли; + Стек[Метод.Имя] = Истина; ВызовыНаКлиенте = ТаблицаВызовов.НайтиСтроки(Новый Структура("Метод, НаКлиенте", Метод, Истина)); Для Каждого Строка Из ВызовыНаКлиенте Цикл Строка.ВызовСервера = Строка.ВызовСервера + 1; ПодсчитатьВызовыСервера(Строка.Вызывающий); КонецЦикла; + Стек[Метод.Имя] = Неопределено; КонецПроцедуры // ПодсчитатьВызовыСервера()