Обратный поиск в строке

Skif

нужна позиция последнего символа-образца в строке

p.s a то что-то совсем дурацкие идеи лезут типа "строку перевернуть, найти первый, а потом обратно и вычислить

abrukhov

Code:

DATA: text TYPE string VALUE 'text',
      pos TYPE i.

pos = STRLEN( text ).

demst

Skif написал:

нужна позиция последнего символа-образца в строке

p.s a то что-то совсем дурацкие идеи лезут типа "строку перевернуть, найти первый, а потом обратно и вычислить

может недопонял, но чем не подходит

Code:

FIND ALL OCCURRENCES OF ... MATCH OFFSET

?

Кодер

Наверное, оператор FIND с регулярным выражением?

NickS

Skif написал:

нужна позиция последнего символа-образца в строке

p.s a то что-то совсем дурацкие идеи лезут типа "строку перевернуть, найти первый, а потом обратно и вычислить

А я вот так по простому ищу последний символ ( это поиск названия папки из полного имени файла)

Code:

      CLEAR foldlnam.
      flen = STRLEN( fl_name ) - 4 .
      DO flen TIMES.
        i = flen - sy-index.
        IF fl_name+i(1) = '\'.
          foldlnam = fl_name+0(i).
          EXIT.
        ENDIF.
      ENDDO.

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

Skif

NickS написал(а):

Skif написал:

нужна позиция последнего символа-образца в строке

p.s a то что-то совсем дурацкие идеи лезут типа "строку перевернуть, найти первый, а потом обратно и вычислить

А я вот так по простому ищу последний символ ( это поиск названия папки из полного имени файла)

Code:

      CLEAR foldlnam.
      flen = STRLEN( fl_name ) - 4 .
      DO flen TIMES.
        i = flen - sy-index.
        IF fl_name+i(1) = '\'.
          foldlnam = fl_name+0(i).
          EXIT.
        ENDIF.
      ENDDO.

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

да-да-да

"cd .." надо отработать

кстати действительно - выделение имени! обычная фича - встречал наверняка и даже недавно
в принципе можно split в табличку, выбросить последнюю запись и снова собрать..
погляжу FIND ещё..
========
find-ом тоже ничего...наверно самый короткий код будет

p.s. пасиб, народ

Lars

FIND в старой версии вернет "ннашел/не нашел".
А в новой версии, можно и без рег. выражений, так там просто будет offset и длина.

Code:

data: str type string value 'qwwee trytgr ertykl',
      tab type MATCH_RESULT_TAB.

find all OCCURRENCEs OF 't' in str results tab.

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

ArmAnn

Вот, если регэкспами искать (ищем букву 'b'):

Code:

REPORT  zloc_regexp.
DATA
 : str TYPE string VALUE '388b34a999aa00b1'
 , offs TYPE i
 .

START-OF-SELECTION.
  WRITE:/ str.

  FIND REGEX 'b' IN str MATCH OFFSET offs.
  WRITE:/ 'Смещение первого вхождения', offs.

  FIND REGEX 'b[^b]*$' IN str MATCH OFFSET offs.
  WRITE:/ 'Смещение последнего вхождения', offs.

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

Обратный поиск в строке

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