Глобальный контекст.ВРег

Методы · Upper

Преобразует все символы строки в верхний регистр.

Синтаксис

ВРег(<Строка>)

Примеры платформы

ГосНомер = ВРег(ОсновноеСредство.ГосНомер);
Полное описание, параметры и ограничения

Глобальный контекст.ВРег (Global context.Upper)

Глобальный контекст (Global context)

ВРег (Upper)

Доступен, начиная с версии 8.0.

Синтаксис:
ВРег(<Строка>)
Параметры:

<Строка> (обязательный)
Тип: Строка.
Исходная строка.
Возвращаемое значение:
Тип: Строка.
Строка, полученная в результате преобразования.
Описание:

Преобразует все символы строки в верхний регистр.

Доступность:

Тонкий клиент, веб-клиент, мобильный клиент, сервер, толстый клиент, внешнее соединение, мобильное приложение (клиент), мобильное приложение (сервер), мобильный автономный сервер.

Внимание: Данный метод не поддерживается при работе через COM-соединение
Пример:

ГосНомер = ВРег(ОсновноеСредство.ГосНомер);

Использование в версии:

Доступен, начиная с версии 8.0.

Методическая информация

Практические примеры

Посчитать SHA-256 и проверить последовательное добавление частей

Хеш одного блока abc должен совпадать с хешем двух последовательно добавленных блоков a и bc. Кодировка и отсутствие BOM заданы явно.

Где и как запускать

Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.

Подготовка

  1. Выполняйте на сервере. Не добавляйте перевод строки или BOM к abc.

  2. Используется SHA-256; результат ХешСумма этого алгоритма — двоичные данные.

ПолныеДанные = ПолучитьДвоичныеДанныеИзСтроки("abc", КодировкаТекста.UTF8, Ложь);
Хеш = Новый ХешированиеДанных(ХешФункция.SHA256);
Хеш.Добавить(ПолныеДанные);
ПолнаяСумма = ВРег(ПолучитьHexСтрокуИзДвоичныхДанных(Хеш.ХешСумма));
ПоЧастям = Новый ХешированиеДанных(ХешФункция.SHA256);
ПоЧастям.Добавить(ПолучитьДвоичныеДанныеИзСтроки("a", КодировкаТекста.UTF8, Ложь));
ПоЧастям.Добавить(ПолучитьДвоичныеДанныеИзСтроки("bc", КодировкаТекста.UTF8, Ложь));
СуммаЧастей = ВРег(ПолучитьHexСтрокуИзДвоичныхДанных(ПоЧастям.ХешСумма));
Сообщить(ПолнаяСумма);
Сообщить(ПолнаяСумма = СуммаЧастей);
Сообщить(Хеш.ХешФункция);
Ожидаемая = "BA7816BF8F01CFEA414140DE5DAE2223B00361A396177A9CB410FF61F20015AD";
Сообщить(ПолнаяСумма = Ожидаемая);

Разбор по шагам

  1. Явно кодируем исходный текст, чтобы хеш зависел от понятной последовательности байтов.

  2. Первый объект получает весь блок, второй — две части в исходном порядке.

  3. Преобразуем хеш в Hex и приводим регистр для сравнения представлений.

  4. Сравниваем оба результата и заранее известную контрольную сумму abc.

Как проверить результат

  1. Оба сравнения равны Истина; Hex совпадает с Ожидаемая.

  2. Замените bc на cb: сравнение хешей должно стать Ложь — порядок байтов важен.

Ожидаемый результат

SHA-256 одинаков для одинаковых байтов независимо от разбивки на части.

На что обратить внимание

  1. Хеш без доверенного эталона не доказывает подлинность отправителя; для этого нужен согласованный механизм подписи или MAC.

  2. Обычный SHA-256 не предназначен для самостоятельного хранения пользовательских паролей.

  3. ХешФункция.CRC32 возвращает другой тип результата: не переносите преобразование в Hex двоичных данных на все алгоритмы автоматически.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

ВвестиЗначениеАсинх: выбрать свою цену либо учебный код скидки

Составной тип Число/Строка демонстрирует выбор типа и две осмысленные ветви расчёта: собственная цена либо УЧЕБНЫЙ10.

Где и как запускать

Модуль новой управляемой формы учебной внешней обработки. Код содержит готовые процедуры с директивами; вставляйте на уровне модуля, не внутрь другого обработчика. Каждую задачу запускайте в отдельной копии формы.

Подготовка

  1. В отдельной учебной базе платформы 8.5.1.1343 создайте внешнюю обработку УчебнаяФорма85 с пустой управляемой основной формой. Используйте тонкий клиент Windows.

  2. В свойствах формы → События назначьте ПриСозданииНаСервере. Вставьте полный модуль урока, включая клиентские и серверные помощники, на уровне модуля.

  3. Не создавайте вручную ЗначениеПримера, ПолеПримера и кнопку: код создаёт их полностью. Каждый урок запускайте в отдельной копии своей формы.

  4. Сохраните свою EPF и откройте её в учебной базе. Собственное количество начинается с 3, цена книги задана в коде как 250; исходный расчёт равен 750.

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

  6. Команда расчёта имеет ИзменяетСохраняемыеДанные = Ложь. Уроки изменяют только свой интерфейс и значения собственной формы, не конфигурацию и не рабочие данные.

  7. Запуск и вид в 1С не проверены. Компоновку, сочетания клавиш и расположение команд осмотрите вручную в указанном клиенте; не переносите настройки на рабочие формы без отдельной проверки.

  8. В этой партии каждое окно ввода запускает собственная кнопка УчебноеДействие. Изучайте один полный модуль за раз; никакие значения ввода не исполняются как код.

Перем Занято;

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    Новые = Новый Массив;
    ТипРеквизита = Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(2, 0, ДопустимыйЗнак.Неотрицательный));
    Новые.Добавить(Новый РеквизитФормы("ЗначениеПримера", ТипРеквизита, "", "Количество книг", Истина));
    ЭтаФорма.ИзменитьРеквизиты(Новые);
    ЭтаФорма.ЗначениеПримера = 3;
    Поле = Элементы.Добавить("ПолеПримера", Тип("ПолеФормы"));
    Поле.Вид = ВидПоляФормы.ПолеВвода;
    Поле.ПутьКДанным = "ЗначениеПримера";
    Поле.Заголовок = "Количество собственных книг";


    КомандаДействия = ЭтаФорма.Команды.Добавить("УчебноеДействие");
    КомандаДействия.Действие = "УчебноеДействие";
    КомандаДействия.Заголовок = "Выполнить собственный учебный шаг";
    КомандаДействия.Подсказка = "Действие только над данными учебной формы";
    КомандаДействия.ИзменяетСохраняемыеДанные = Ложь;
    Кнопка = Элементы.Добавить("КнопкаУчебноеДействие", Тип("КнопкаФормы"));
    Кнопка.ИмяКоманды = КомандаДействия.Имя;
    Кнопка.Заголовок = КомандаДействия.Заголовок;
КонецПроцедуры

&НаКлиенте
Асинх Процедура УчебноеДействие(Команда)
    Если Занято = Истина Тогда
        Возврат;
    КонецЕсли;
    Занято = Истина;
    Элементы.КнопкаУчебноеДействие.Доступность = Ложь;
    ДоВвода = ЗначениеПримера;
    Попытка
        ТипВвода = Новый ОписаниеТипов("Число,Строка", Новый КвалификаторыЧисла(8, 2, ДопустимыйЗнак.Неотрицательный), Новый КвалификаторыСтроки(20));
        Введено = Ждать ВвестиЗначениеАсинх(Неопределено, "Введите свою цену или код УЧЕБНЫЙ10", ТипВвода);
    Исключение
        Занято = Ложь;
        Элементы.КнопкаУчебноеДействие.Доступность = Истина;
        ВызватьИсключение;
    КонецПопытки;
    Занято = Ложь;
    Элементы.КнопкаУчебноеДействие.Доступность = Истина;
    Если Введено = Неопределено Тогда
        Сообщить("Отмена: собственные данные не менялись");
        Возврат;
    КонецЕсли;
    Если ЗначениеПримера <> ДоВвода Тогда
        Сообщить("Количество изменилось за время диалога. Повторите ввод для актуальной заявки");
        Возврат;
    КонецЕсли;
    ПроверитьСобственноеКоличество();
    Если ТипЗнч(Введено) = Тип("Число") Тогда
        Если Введено <= 0 Или Введено > 1000 Тогда
            ВызватьИсключение "Собственная учебная цена должна быть больше 0 и не выше 1000";
        КонецЕсли;
        Цена = Введено;
        Скидка = 0;
    ИначеЕсли ТипЗнч(Введено) = Тип("Строка") Тогда
        Код = ВРег(СокрЛП(Введено));
        Если Код <> "УЧЕБНЫЙ10" Тогда
            ВызватьИсключение "Урок принимает только собственный код УЧЕБНЫЙ10";
        КонецЕсли;
        Цена = 250;
        Скидка = 10;
    Иначе
        ВызватьИсключение "Ожидалась собственная цена или строковый учебный код";
    КонецЕсли;
    Сумма = Окр(ЗначениеПримера * Цена * (100 - Скидка) / 100, 2);
    Сообщить(ТипЗнч(Сумма) = Тип("Число"));
    Сообщить(Сумма = Окр(ДоВвода * Цена * (100 - Скидка) / 100, 2));
    Сообщить(ЗначениеПримера = ДоВвода);
    Сообщить(СтрШаблон("Собственная цена %1; скидка %2%; количество %3; сумма %4", Цена, Скидка, ЗначениеПримера, Сумма));

КонецПроцедуры

&НаКлиенте
Процедура ПроверитьСобственноеКоличество()
    Если ТипЗнч(ЗначениеПримера) <> Тип("Число") Тогда
        ВызватьИсключение "Собственное количество должно быть числом";
    КонецЕсли;
    Если ЗначениеПримера < 1 ИЛИ ЗначениеПримера > 10 ИЛИ ЗначениеПримера <> Цел(ЗначениеПримера) Тогда
        ВызватьИсключение "Нужно собственное целое количество от 1 до 10";
    КонецЕсли;
КонецПроцедуры

Разбор по шагам

  1. Создать ОписаниеТипов со строкой Число,Строка, числовой точностью 2 и строковой длиной 20.

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

  3. Ждать возвращает само введённое значение, не Булево подтверждение. Отказ распознаётся отдельно как Неопределено.

  4. Для числа проверить собственную цену больше 0 и до 1000. Для строки нормализовать код и принять только УЧЕБНЫЙ10, означающий собственные 10% при цене 250.

  5. После проверки снимка и своего количества рассчитать сумму с округлением до двух знаков. Реквизит количества не меняется в обоих вариантах.

Как проверить результат

  1. Число 100 при количестве 3 даёт 300; строка УЧЕБНЫЙ10 — 675. В обоих вариантах три Истина.

  2. Отмена не меняет количество. Цена 0/1001 и любой другой строковый код дают исключение после восстановления своей кнопки.

Ожидаемый результат

Произвольный результат разобран по реальному составному типу, а не оставлен неизвестным объектом без прикладного смысла.

На что обратить внимание

  1. Число 100 и строка 100 — разные ветви. Строка 100 не подменяется ценой и будет отклонена.

  2. Квалификаторы описывают допустимый ввод, но свой диапазон цены и разрешённый код проверяются отдельно.

  3. Учебная скидка не читает акции и не подтверждает реальные коммерческие цены. Значения остаются в памяти собственной формы.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.