select substring in ABAP

slike

Добрый день.

Не подскажете как можно решить такую задачу: есть поле примерно на 15 символов . Мне надо вытащить 6 символов из середины поля в поле selection screen и самое главное сделать выборку из поля таблицы БД и вытащить только эти 6 символов и сопоставить их с переменной назначенной для selection screen. В обычном SQL есть запрос select substring а есть ли что-то подобное в ABAP? И если нет, то что можно сделать в данной ситуации?

Заранее спасибо.
Дмитрий.

T

Если SELECT ... WHERE SOMEFIELD LIKE '%substr%' не годится, то можешь поиграться с NATIVE SQL.

slike

Дело то как раз в том, что с native SQL ничего не выходит. Нет такой команды в ABAP как select substring. И это очень странно.

Ich Will

C полями ничего делать в OPEN SQL низя

кроме MAX, SUM...

T

2 Slike
Ощущение, что вы путаете OPEN SQL и NATIVE SQL

OPEN:

Code:

SELECT .. FROM ...

ENDSELECT.

NATIVE:

Code:

EXEC SQL.
  select ... 
ENDEXEC.

помнится как-то давно пробовал substring в NATIVE - всё было в порядке

111

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

Дело то как раз в том, что с native SQL ничего не выходит. Нет такой команды в ABAP как select substring. И это очень странно.

Native SQL на то и Native, что к АВАРу никакого отношения не имеет.
Попробуй, к примеру, написать и сгенерировать

Code:

EXEC SQL. 
  ХАЧУ ВЫБРАТЬ КУЧУ ПОЛЕЙ ИЗ КАКОЙ-НИБУДЬ ТАБЛИЦЫ. 
ENDEXEC.

И оно сгенерится. При выполнении, правда, в дамп свалится.

Гость

Спасибо. Буду пытаться.

V®

С Open SQL простой вариант на ум не приходит.
Можно так (если я правильно понял условие):

Code:

PARAMETER a TYPE char255.

DATA: std(6),
      ch6(6),
      ch255(255),
      itab TYPE TABLE OF char255.

START-OF-SELECTION.

  std = a+1(6).

  SELECT changeuser
    FROM t000
    INTO ch255.

    ch6 = ch255+1(6).

    IF ch6 = std.
      APPEND ch255 TO itab.
    ENDIF.

  ENDSELECT.

111

V® написал:

С Open SQL простой вариант на ум не приходит.
Можно так (если я правильно понял условие):

Тогда уж так:

Code:

PARAMETER a TYPE char255. 

DATA: std(8), 
          itab TYPE TABLE OF char255. 

START-OF-SELECTION. 

CONCATENATE '_' a+1(6) '%' INTO std.
SELECT changeuser INTO TABLE itab
  FROM t000
 WHERE changeuser LIKE std.

V®

Code:

PARAMETER a TYPE char255. 

DATA: std(8), 
          itab TYPE TABLE OF char255. 

START-OF-SELECTION. 

CONCATENATE '_' a+1(6) '%' INTO std. 
SELECT changeuser INTO TABLE itab 
  FROM t000 
 WHERE changeuser LIKE std. 

Согласен, лаконичнее.
Только если брать, скажем с 16го символа, то менее удобно.
А еще в моем случае в имени пользователя (changeuser) часто встречается знак _ и из-за этого like может отрабатывать некорректно.

111

V® написал:

Согласен, лаконичнее.

Не только лаконичнее, но быстрее - порядков так на... N.
Конкретное значение N зависит от размеров таблицы :-)

.

V®

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

Не только лаконичнее, но быстрее - порядков так на... N.
Конкретное значение N зависит от размеров таблицы :-)

.

Согласен, тоже уважаю SQL

и select отличный, но есть исключения...

Исходная строка => a = "i_ivanov",
Выбираем подстроку со 2-го по 3й символ => std = '_i'

После выполнения

Code:

CONCATENATE '_' a+1(2) '%' INTO std. "std = '__i%'
SELECT changeuser INTO TABLE itab 
  FROM t000 
 WHERE changeuser LIKE std. 

Получаем набор правильных значений
i_ivanov
d_ignatov
...и неправильных
dmitriev
и т.д.

111

V® написал:

Исходная строка => a = "i_ivanov",
Выбираем подстроку со 2-го по 3й символ => std = '_i'

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

Code:

DELETE ITAB WHERE ...

ИМХО.

V®

Code:

DELETE ITAB WHERE ...

а можно полный вариант, без троеточия? :wink:

111

V® написал:

Code:

DELETE ITAB WHERE ...

а можно полный вариант, без троеточия? :wink:

Да за ради Бога.

Code:

CONCATENATE '_' a+1(2) '%' INTO std. "std = '__i%' 
SELECT changeuser INTO TABLE itab 
  FROM t000 
 WHERE changeuser LIKE std.  

DELETE itab WHERE field+1(2) NE a+1(2).

Ну, поле field нужно добавить в itab - да. А что, сложно? :-)

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

select substring in ABAP

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