Как сравнить два текста запроса в 1С: от ручного анализа до автоматизации

#Использовать OneScript.Diff

Текст1 = ПолучитьТекстЗапросаИзФайла("запрос1.os");
Текст2 = ПолучитьТекстЗапросаИзФайла("запрос2.os");

Дифф = Новый ДиффСравнение(Текст1, Текст2);
Дифф.ИгнорироватьПробелы = Истина;
Дифф.ИгнорироватьРегистр = Истина;

Результат = Дифф.Сравнить();
// Выведет различия с учётом синтаксиса 1С

Для визуального анализа подойдут:

⚠️ Внимание: При использовании внешних дифф-инструментов всегда проверяйте кодировку файлов. Запросы, сохранённые в UTF-8 с BOM и Windows-1251, могут считаться полностью разными, даже если их содержимое идентично.

3. Сравнение через системы контроля версий: Git и 1С

Если вы ведёте разработку в команде или хотите отслеживать изменения запросов во времени, системы контроля версий (например, Git) становятся незаменимыми. Они позволяют:

• 📅 Видеть историю изменений каждого запроса.
• 🔄 Откатываться к предыдущим версиям при ошибках.
• 👥 Сравнивать версии разных разработчиков.

Для интеграции 1С и Git часто используют:

• 🔹 1C:EDT (встроенная поддержка Git).
• 🔹 OneScript + Git через консоль.
• 🔹 Плагины для конфигуратора (например, Gitsync).

Пример команды для сравнения двух версий запроса в Git:

git diff HEAD~1 HEAD -- путь/к/файлу.ос

⚠️ Внимание: При работе с Git в 1С учитывайте, что:

✔️ Тексты запросов лучше хранить в отдельных файлах (например, .os или .sql), а не внутри модулей — это упрощает сравнение.

❌ Не коммитьте в репозиторий временные файлы конфигуратора (например, .cf или .dt) — они содержат бинарные данные и "засоряют" историю.

4. Автоматизация сравнения: скрипты и регулярные выражения

Для регулярного сравнения большого количества запросов (например, при миграции баз или аудите конфигураций) полезно автоматизировать процесс с помощью скриптов. Это позволяет:

• 🤖 Обрабатывать сотни запросов за минуты.
• 📊 Генерировать отчёты о различиях.
• 🔍 Искать конкретные паттерны (например, устаревшие конструкции).

Пример скрипта на PowerShell для сравнения всех запросов в папке:

$folder = "C:\Запросы\"
$files = Get-ChildItem -Path $folder -Filter "*.os"

foreach ($file1 in $files) {
foreach ($file2 in $files) {
if ($file1.Name -ne $file2.Name) {
$diff = Compare-Object -ReferenceObject (Get-Content $file1.FullName) -DifferenceObject (Get-Content $file2.FullName)
if ($diff) {
Write-Host "Различия между $($file1.Name) и $($file2.Name):"
$diff | Format-Table -AutoSize
}
}
}
}

Для более сложных сценариев используйте регулярные выражения. Например, чтобы найти все запросы с ПОЛНОЕ СОЕДИНЕНИЕ:

// На OneScript
ТекстЗапроса = ПолучитьТекстИзФайла("запрос.os");
Если РегВыражение("ПОЛНОЕ\s+СОЕДИНЕНИЕ", ТекстЗапроса).Найти() Тогда
Сообщить("Найдено полное соединение!");
КонецЕсли;

⚠️ Внимание: Автоматические скрипты могут пропускать контекстные различия. Например, если в одном запросе используется ГДЕ Номенклатура.ЭтоГруппа = Истина, а в другом — ГДЕ НЕ Номенклатура.ЭтоГруппа, скрипт увидит только замену Истина на НЕ ..., хотя логика изменилась кардинально.

5. Типичные ошибки при сравнении запросов и как их избежать

Даже опытные разработчики допускают ошибки, которые искажают результаты сравнения. Вот самые распространённые:

• 🚫 Игнорирование параметров: Запросы с разными параметрами (например, &ДатаНачала и &ПериодС) будут считаться разными, хотя логически могут быть эквивалентны.
• 🚫 Неучёт синонимов: Конструкции ЛЕВОЕ СОЕДИНЕНИЕ и LEFT JOIN идентичны, но многие инструменты их не распознают.
• 🚫 Проблемы с кодировкой: Символы вроде тире (–) и дефиса (-) могут выглядеть одинаково, но быть разными в Unicode.

Чтобы избежать ложных срабатываний:

1. 🔹 Нормализуйте тексты перед сравнением: замените все варианты JOIN на СОЕДИНЕНИЕ, приведите параметры к единому виду.
2. 🔹 Используйте инструменты с поддержкой синтаксиса 1С (например, 1C:Diff).
3. 🔹 Проверяйте результаты выполнения — иногда одинаковые по тексту запросы дают разные данные из-за прав доступа или транзакций.

⚠️ Внимание: Если вы сравниваете запросы из разных версий 1С (например, 8.3.10 и 8.3.20), учитывайте, что синтаксис мог измениться. Например, в новых версиях появилась поддержка WITH (CTE), а старые запросы с этими конструкциями просто не будут работать.

6. Продвинутые техники: сравнение по планам выполнения

Иногда тексты запросов идентичны, но их производительность различается. В таких случаях полезно сравнивать не сами запросы, а их планы выполнения.

В 1С:Предприятие план выполнения можно получить так:

Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ ... …";
План = Запрос.Выполнить().ПолучитьПланВыполнения();

Для сравнения планов:

• 🔹 Экспортируйте их в XML или JSON.
• 🔹 Используйте инструменты вроде SQL Server Management Studio (для MS SQL) или pgAdmin (для PostgreSQL).
• 🔹 Анализируйте критические узлы: полные сканирования таблиц (Table Scan), отсутствие индексов.

⚠️ Внимание: Планы выполнения могут отличаться даже для идентичных запросов, если:

🔸 Изменилась статистика базы данных (например, после реиндексации).

🔸 Запрос выполняется в разных транзакциях или с разными правами.

🔸 Используются временные таблицы или переменные сеанса.

Для глубокого анализа производительности рекомендуем инструменты:

FAQ: Ответы на частые вопросы

// Исходный запрос
Текст = "ВЫБРАТЬ Документ.Дата КАК Дата
|ИЗ Документ.ЗаказПокупателя КАК Документ
|ГДЕ Документ.Дата >= &ДатаНачала";

// Нормализованный для сравнения
ТекстДляСравнения = СтрЗаменить(Текст, "&ДатаНачала", "[ПАРАМЕТР_ДАТА]");

Процедура ИзвлечьЗапросыИзМодуля(Модуль)
ТекстМодуля = Модуль.ПолучитьТекст();
РегВыр = Новый РегВыражение("Запрос\s*=\s*Новый\s+Запрос\s*;[^;]+;(\s*Запрос\.Текст\s*=\s*""([^""]+)""\s*;)", РегВыражениеМногострочный);
Результат = РегВыр.НайтиВсе(ТекстМодуля);
Для Каждого Находка Из Результат Цикл
Сообщить("Найден запрос: " + Находка.Группа(2));
КонецЦикла;
КонецПроцедуры

<rule id="AvoidFullJoinWithoutWhere">
<pattern>
<![CDATA[
ПОЛНОЕ\s+СОЕДИНЕНИЕ.*?(?!\bГДЕ\b)
]]>
</pattern>
<message>Полное соединение без условия ГДЕ может привести к картезианскому произведению!</message>
</rule>