Как найти кавычки в строке в 1С

Поиск кавычек в строке — частая задача при разработке на встроенном языке 1С: разбор CSV-файлов, обработка наименований организаций («ООО «Ромашка»»), валидация пользовательского ввода, формирование SQL-подобных запросов и текста запросов. Сложность в том, что кавычка в 1С — служебный символ: она обрамляет строковые литералы, поэтому напрямую написать " внутри строки нельзя — её нужно удвоить или получить кодом.

Для решения задачи в платформе есть три основных инструмента: функция СтрНайти() (в старых версиях — Найти()), которая возвращает позицию подстроки; функция СтрЗаменить() для замены или подсчёта; и функция Символ(34), возвращающая саму кавычку по её коду. Ниже разобраны все варианты с рабочими примерами кода.

Почему кавычка в 1С записывается необычно

Во встроенном языке 1С строковый литерал ограничен двойными кавычками. Если внутри такой строки нужна сама кавычка, её удваивают: "ООО ""Ромашка""". Четыре кавычки подряд ("""") — это литерал, содержащий ровно одну кавычку. Это первое, что сбивает новичков: попытка написать СтрНайти(Текст, """) приведёт к синтаксической ошибке, потому что строка окажется незакрытой.

Альтернатива удвоению — функция Символ(34). Число 34 — код двойной кавычки в Unicode. Запись Символ(34) читается легче, чем """", и не ломается при рефакторинге, поэтому в промышленном коде её используют чаще. Оба варианта дают один и тот же символ.

Поиск позиции кавычки через СтрНайти

Базовый сценарий — узнать, есть ли кавычка в строке и где она стоит. Функция СтрНайти(Строка, ПодстрокаПоиска) возвращает номер позиции первого вхождения (нумерация с 1) или 0, если вхождения нет.

Текст = "ООО ""Ромашка""";
Позиция = СтрНайти(Текст, Символ(34));
Если Позиция > 0 Тогда
Сообщить("Кавычка найдена на позиции " + Позиция); // позиция 5
Иначе
Сообщить("Кавычек нет");
КонецЕсли;

Тот же пример с литералом вместо Символ(34):

Позиция = СтрНайти(Текст, """");

Обратите внимание: СтрНайти доступна начиная с платформы 8.3.6. В более старых конфигурациях используется Найти() с тем же синтаксисом. Если код должен работать и в режиме совместимости со старыми версиями, проверьте, какая функция доступна в вашей конфигурации.

Позиция = СтрНайти(Наименование, Символ(34));
Если Позиция = 0 Тогда
    Сообщить("Кавычки не найдены");
КонецЕсли;

Как найти все кавычки и посчитать их количество

СтрНайти возвращает только первое вхождение. Чтобы найти все кавычки, есть два подхода: цикл со сдвигом начальной позиции поиска либо подсчёт через длину строки после замены.

Поиск позиций в цикле

У СтрНайти есть третий параметр — номер символа, с которого начинать поиск. Передавая позицию после последней найденной кавычки, можно перебрать все вхождения:

Текст = "ООО ""Ромашка"" и ИП ""Васильев""";
Позиции = Новый Массив;
НачальнаяПозиция = 1;
Позиция = СтрНайти(Текст, Символ(34), , НачальнаяПозиция);
Пока Позиция > 0 Цикл
Позиции.Добавить(Позиция);
НачальнаяПозиция = Позиция + 1;
Позиция = СтрНайти(Текст, Символ(34), , НачальнаяПозиция);
КонецЦикла;

Подсчёт количества через СтрДлина

Если нужно только количество кавычек, а не их позиции, проще сравнить длину строки до и после удаления кавычек:

КоличествоКавычек = СтрДлина(Текст)
- СтрДлина(СтрЗаменить(Текст, Символ(34), ""));

Этот приём быстрый и читаемый, но не подходит, если одновременно нужно знать, где именно стоят кавычки.

Замена и удаление кавычек в строке

Частая сопутствующая задача — убрать кавычки или заменить их на другой символ, например на одинарные для выгрузки в текстовый файл:

// Удалить все кавычки
БезКавычек = СтрЗаменить(Текст, Символ(34), "");

// Заменить двойные на одинарные
СОдинарными = СтрЗаменить(Текст, Символ(34), "'");

Будьте осторожны с удалением кавычек из наименований контрагентов: «ООО Ромашка» без кавычек может выглядеть иначе в печатных формах и официальных документах. Если строка участвует в юридически значимых документах, согласуйте формат представления, а не удаляйте символы молча.

Кавычки внутри текста запроса и многострочных строк

В тексте запроса 1С строковые литералы тоже обрамляются кавычками, и правило удвоения сохраняется. Но правильный способ передать значение с кавычками в запрос — параметры, а не склейка строк:

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   Контрагенты.Ссылка
|ИЗ
|   Справочник.Контрагенты КАК Контрагенты
|ГДЕ
|   Контрагенты.Наименование = &Наименование";
Запрос.УстановитьПараметр("Наименование", "ООО ""Ромашка""");

В многострочных строковых литералах (через символ |) действует то же правило удвоения кавычек. Если текст запроса генерируется динамически и содержит кавычки, ошибку проще всего отловить, выведя итоговый текст в сообщение перед выполнением.

Разбор CSV и строк с вложенными кавычками

При загрузке CSV-файлов значения часто обёрнуты в кавычки, а внутри могут встречаться удвоенные кавычки по стандарту RFC 4180. Простого СтрРазделить(Строка, ";") здесь недостаточно: разделитель может находиться внутри кавычек.

Рабочий подход — посимвольный разбор с флагом «внутри кавычек»:

ВнутриКавычек = Ложь;
Для Поз = 1 По СтрДлина(Строка) Цикл
ТекущийСимвол = Сред(Строка, Поз, 1);
Если ТекущийСимвол = Символ(34) Тогда
ВнутриКавычек = Не ВнутриКавычек;
ИначеЕсли ТекущийСимвол = ";" И Не ВнутриКавычек Тогда
// разделитель полей
КонецЕсли;
КонецЦикла;

Для удвоенных кавычек внутри значения добавьте проверку: если после кавычки сразу идёт ещё одна, это экранированная кавычка, а не граница поля — её нужно пропустить, сдвинув позицию на два символа.

Проверка результата и типичные ошибки

После написания кода проверьте его на граничных случаях: пустая строка, строка из одних кавычек, кавычка в начале и в конце, нечётное количество кавычек. Нечётное количество — частый признак повреждённых данных при импорте, его стоит диагностировать отдельно.

Отдельная ловушка — типографские кавычки. Пользователи часто копируют текст из Word, где «прямые» кавычки автозаменой превращаются в «ёлочки» (коды 171, 187) или «лапки». Если поиск по коду 34 ничего не находит, а кавычки визуально есть, проверьте код символа: КодСимвола(Строка, Позиция).

Частые вопросы