Advertisement
Guest User

Untitled

a guest
Jul 3rd, 2015
157
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.16 KB | None | 0 0
  1. Процедура Анализировать83()
  2. Схема = новый СхемаЗапроса;
  3. Схема.УстановитьТекстЗапроса(ТекстЗапроса);
  4.  
  5. Для каждого ТекЗапрос из Схема.ПакетЗапросов Цикл
  6. Для каждого ТекОператор из ТекЗапрос.Операторы Цикл
  7. Источники = ТекОператор.Источники;
  8.  
  9. Для каждого ТекИсточник из Источники Цикл
  10. Если ТекИсточник.Соединения.Количество() = 0 Тогда
  11. Продолжить;
  12. КонецЕсли;
  13.  
  14. ТекущаяТаблица = ТекИсточник.Источник.ИмяТаблицы;
  15. Если Не ЭтоВиртуальнаяТаблица(ТекИсточник.Источник.ИмяТаблицы) Тогда
  16. Продолжить; //Очевидно что тут мы пропускаем ситуации когда виртуальная таблица в соединении находится справа, но для примера достаточно
  17. КонецЕсли;
  18.  
  19. //Это виртуальная таблица у которой есть соединения, печаль
  20. Для каждого ТекСоединение из ТекИсточник.Соединения Цикл
  21. Текст = "W0542 Обнаружено соединение виртуальной таблицы """
  22. + ТекущаяТаблица
  23. + """ с таблицей """
  24. + ТекСоединение.Источник.Источник.ИмяТаблицы
  25. + """. Соединения с виртуальными таблицами могут быть причиной снижения производительности. "
  26. + "Используйте временные таблицы";
  27.  
  28. Сообщить(Текст, СтатусСообщения.Информация);
  29. КонецЦикла;
  30. КонецЦикла;
  31. КонецЦикла;
  32. КонецЦикла;
  33. КонецПроцедуры
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement