Что за ? в коде, или Секретный оператор в 1С
Инкремент, модуль и прочая магия, которая скрыта под символом "?"
ДИСКЛЕЙМЕР
ВСЁ ОПИСАННОЕ НИЖЕ - НЕДОКУМЕНТИРОВАНОЕ ПОВЕДЕНИЕ!
ИСПОЛЬЗОВАНИЕ В РЕАЛЬНОМ КОДЕ ЗАПРЕЩЕНО!
АВТОР НЕ НЕСЁТ НИКАКОЙ ОТВЕТСТВЕННОСТИ И ВООБЩЕ БАКА!
UPDATE: ИСПРАВЛЕНО В 8.3.21
Сколько же всего сложного и таинственного нас окружает.
Черные дыры и сновидения. Темная материя и подсознание. Корпускулярно-волновой дуализм и 1С…
И ведь думаешь, что знаешь эту “1Ску” как свои пять пальцев, но стоит случайно копнуть глубже… И очередная багофича. Да ешё и какая!
В этой статье рассмотрим секретный оператор ?
О нём мало кто знает, хоть он и существует как минимум с версии 8.0.
В последнее время я публикую на своём телеграм-канале разные хитрые задачки с подвохом для программистов 1С. Какие-то беру “по памяти”, а какие-то “рождаю” в результате экспериментов. Об этом скоро выйдет отдельная статья. И вот в очередном тесте адекватности платформы случайно натыкаюсь на такую конструкцию:
А = ?;
Синтаксис-проверка прошла успешно. Никаких ошибок не высветилось. И, казалось бы, ошибка тогда должна произойти в момент выполнения…
Код успешно выполнился. Удивительно, но сработало! И тут меня понесло…
Как оказалось, знак ? ведёт себя крайне странно. Давайте посмотрим ещё раз прошлый пример.
А = ?;
Мы создаём новую переменную и назначаем ей значение - ?. И в переменной находится Неопределенно. И, казалось бы, это и есть ответ на вопрос. Знак ? означает Неопределено.
Но что же тогда это:
В данном коде сначала идёт объявление переменной “А”. И в А установлено числовое значение “1”. А далее идёт наше сравнение с ?. Если бы под знаком вопроса скрывалось Неопределено, то мы бы не попали внутрь условия. А по скрину видно, что попали.
Ну ладно, значит ”?” есть что-то другое. Попробуем вывести его в сообщение:
Очень странная ошибка. “Переменная не определена (Сообщить)”. Ну допустим. Добавим тогда такую переменную:
1
2
Сообщить = "ТЕСТ";
Сообщить(?); //Сообщит "ТЕСТ"
Данный код компилируется без ошибок. И при выполнении в 1С сообщает “ТЕСТ”. То есть значение переменной Сообщить
Выходит, что символ ? указывает на предыдущее слово в коде. В данном случае, перед ? было слово Сообщить. И поэтому 1С изначально поругалась, что такая переменная не определена. А когда мы добавили переменную Сообщить, то всё стало на свои места.
То есть наш код для 1С выглядит так:
1
2
Сообщить = "ТЕСТ";
Сообщить(Сообщить);
А теперь вернемся к нашим предыдущим примерам и разберём что и как сработало.
1
2
3
4
А = 1;
Если ? = А Тогда
Сообщить(А);
КонецЕсли;
В данном коде предыдущее слово перед ? - Если. Но оно является ключевым для 1С. Как “Цикл”, “Процедура” и так далее. Поэтому, его оператор ? не учитывает и берет в качестве источника значения переменную А.
Скорректируем же этот код так, как его видит 1С:
1
2
3
4
А = 1;
Если А = А Тогда
Сообщить(А);
КонецЕсли;
Теперь всё логично. А = А и поэтому условие выполняется.
А что с нашим самым первым примером?
А = ?;
На самом деле всё так же. Просто заменяем знак вопроса на предыдущее слово.
А = А;
Да, такой код тоже странный, но в рамках 1С всё логично. Сначала объявляется переменная и в ней Неопределено. А затем происходит присвоение переменной значения из её самой. То есть опять же Неопределено. Можете проверить такой код - это хоть и выглядит странно, но работает. А почитать чуть подробнее можно в статье на ИТС: Предварительная инициализация локальных переменных
Но вернемся к нашим вопросам. И так, символ ? в коде означает обращение к предыдущему слову. Даже если это слово - название метода. Почему? Зачем? Скорее всего случайно. Какая-то лазейка в коде интерпретатора 1С. И вряд ли мы об этом узнаем. Но:
Использовать это в реальном коде нельзя!
Ведь мало ли когда это исправят. И неизвестно где это может аукнуться. Но раз уж мы эту багофичу нашли, то давайте уже и придумаем как её применить 😁🎉 Возможно, вы уже догадались…
Представляю вам инкремент на 1С!
1
2
3
4
5
6
7
МояПеременная = 0;
МояПеременная = ? + 1; //1
МояПеременная = ? + 1; //2
МояПеременная = ? * 5; //10
МояПеременная = ? / 2; //5
МояПеременная = ? - 6; //-1
Да, мы так долго ждали и вот он😅
А самое интересное, что такая возможность существовала как минимум ещё с версии 8.0 . Специально скачал старую платформу и проверил.
На самом деле такой код можно ещё упросить:
1
2
3
4
5
6
7
МояПеременная = 0;
? = ? + 1;
? = ? + 1;
? = ? * 5;
? = ? / 2;
? = ? - 6;
Но такой вариант становится менее надежным. Ведь всё работает до тех пор, пока перед ? находится МояПеременная. Если же вставить после этого какое-то другое “слово”, то всё порушится.
Но вот ещё пример:
1
2
3
4
5
6
А = 1;
Структура = Новый Структура("А", 0);
Структура.А = ? + 1;
Сообщить(Структура.А); //Будет 2
Мы же помним, что знак ? берет предыдущее слово. Так вот в нашей строке кода это слово “А”. Именно так - без “Структура”.
Поэтому 1С в таком коде вместо знака вопроса вставит “А”
1
2
3
4
5
6
7
А = 1;
Структура = Новый Структура("А", 0);
Структура.А = А + 1;
Сообщить(Структура.А); //Будет 2
Выходит, инкремент хоть и есть, но с особенностями 😁
Но зато появляется новая возможность применения:
1
2
3
4
5
6
7
8
МояПеременная1 = 1;
МояПеременная2 = 2;
МояПеременная3 = 3;
Структура = Новый Структура("МояПеременная1,МояПеременная2,МояПеременная3");
Структура.МояПеременная1 = ?; //1
Структура.МояПеременная2 = ?; //2
Структура.МояПеременная3 = ?; //3
В данном коде мы создали структуру и наполнили её объявленными ранее переменными. Тоже бывает удобно, когда нужно передать какой-то набор переменных метода в другой метод через структуру.
А вот ещё пример. Можно передать в какой-то метод или конструктор одно значение несколько раз:
1
2
ПустаяДата = '00010101';
Структура = Новый Структура("Д1,Д2,Д3,Д4,Д5",ПустаяДата,?,?,?,?)
Передавать знак ? можно даже в условный тернарный оператор. Например, этот код приводит отрицательные числа к 0:
1
2
3
4
МояПеременная = -5;
МояПеременная = ?(?>0,?,0);
Сообщить(МояПеременная); //Будет 0
А этот приводит отрицательные числа к положительным:
1
2
3
4
МояПеременная = -5;
МояПеременная = ?(?<0,-?,?);
Сообщить(МояПеременная); //Будет 5
Подобным образом можно присваивать дефолтные значения необязательным параметрам:
1
2
3
4
5
Процедура МояПроцедура(ДополнительныеПараметры = Неопределено) Экспорт
ДополнительныеПараметры = ?(? <> Неопределено, ?, Новый Структура);
КонецПроцедуры
Главное помнить, что знак ? берет именно предыдущее слово, поэтому вот так работать НЕ будет:
ДополнительныеПараметры = ?(? = Неопределено, Новый Структура, ?);
1С поругается, что Переменная не определена (Структура). Ведь перед последним знаком ? слово Структура
Но что если использовать символ ? в параметрах?
Сделаем процедуру с параметром ? :
1
2
3
4
5
6
Процедура МояПроцедура(?)
КонецПроцедуры
МояПроцедура(1); //Выполнится
МояПроцедура(); //Будет ошибка: Недостаточно фактических параметров (МояПроцедура)
Такую процедуру действительно возможно создать. И можно вызывать. Причем 1С понимает, что параметр обязательный и его необходимо передать.
Но мы можем сделать его необязательным:
1
2
3
4
5
6
Процедура МояПроцедура(? = Неопределено)
КонецПроцедуры
МояПроцедура(1);
МояПроцедура(); //Теперь и здесь ОК
И параметр не обязан быть единственным. Можно делать разными способами:
1
2
3
4
5
6
7
8
9
10
11
Процедура МояПроцедура(А, ?)
КонецПроцедуры
Процедура МояПроцедура(А, ?, Б)
КонецПроцедуры
Процедура МояПроцедура(?, А, Б)
КонецПроцедуры
А можно использовать Знач
1
2
3
Процедура МояПроцедура(А, Знач ?)
КонецПроцедуры
Но вот незадача, ? в параметре метода не использует предыдущее слово (как во всех других случаях). Как обратиться к этому параметру - неизвестно.
В стеке вызовов он отображается:
А попробуем добавить второй параметр ?
1
2
3
Процедура МояПроцедура(?, ?)
КонецПроцедуры
1С ругается так:
Формальный параметр с указанным именем уже определен (?)
Опираясь на текст ошибки, мы можем предположить, что 1С объявляет параметр с именем “?”
И когда мы пытаемся добавить ещё один такой параметр, то платформа ругается.
Как обратиться к параметру с именем “?” - неизвестно. Методы Вычислить() и Выполнить() не помогли.
Но, возможно, это всё те вопросы, которые нам ещё предстоит разгадать. Секреты и загадки этой таинственной платформы под кодовым названием 1С…
