Верхний регистр

femina_alba

Подскажите пожалуйста, как можно проверить программно в верхнем или в нижнем регистре сформировался текст?

Пономарев Артем

С помощью регулярных выражений и проверки теста на содержание \l, например.

SU53

Скопировать текст в две новые переменные: в одной перевести в верхний регистр (TRANSLATE ... TO UPPER CASE), в другой в нижний регистр (TRANSLATE..TO LOWER CASE).
Сравнить текст с каждой, сделать вывод

femina_alba

Сделала в итоге вот так

FIND <ls_p2per>-naper IN 'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ'.
if sy-subrc <> 0.
нижний регистр.
else.
верхний регистр
endif

Не знаю насколько красиво, но работает.

trop

а в тексте мб знаки пунктуации? если да можно исп оператор CA

femina_alba

спасибо, исправлю

Gustav

Пономарев Артем написал:

С помощью регулярных выражений и проверки теста на содержание \l, например.

Именно. Хороший повод познакомиться (если ранее не доводилось) с регулярными выражениями на простом примере.

Code:

  
  FIND REGEX '\u' IN 'буквы В Строке'.  "\u - placeholder for any upper-case letter

  IF sy-subrc <> 0.
    WRITE: / 'Все буквы - только в нижнем регистре.'.
  ELSE.
    WRITE: / 'Есть буквы в верхнем регистре.'.
  ENDIF.

Правила форума

Верхний регистр

Кто сейчас на конференции