READ TABLE не ищет?!

r00xus

Здравствуйте уважаемые коллеги. Имеется такой код для поиска закупочной организации по группе закупок через пользовательскую таблицу zmm_c_001

Code:

FORM get_ekorg  USING    i_ekgrp TYPE ekgrp
                CHANGING e_ekorg TYPE ekorg.
  DATA: ls_c_001 TYPE zmm_c_001.
  IF buf_c_001 IS INITIAL.
    SELECT * FROM zmm_c_001 INTO TABLE buf_c_001
      ORDER BY ekgrp.
    IF sy-subrc IS INITIAL.
      APPEND INITIAL LINE TO buf_c_001.
    ENDIF.
  ENDIF.

  READ TABLE buf_c_001 INTO ls_c_001 WITH KEY ekgrp = i_ekgrp BINARY SEARCH.
  e_ekorg = ls_c_001-ekorg.

ENDFORM.                    " GET_EKORG

в одной системе отрабатывает правильно, но в другой не находит EKPRG по EKGRP хотя такая пара в таблице есть!
в чем может быть причина? юникод? еще что-то? первый раз с таким сталкиваюсь поэтому буду благодарен за любую помощь.

Кодер

1) Проверьте, не меняется ли у вас порядок сортировки в промежутках между вызовами подпрограммы
2) Стоит проверять после read table значение sy-subrc. Возможно, что все-таки нужной пары нет.

hoar

Мож так надо:

IF buf_c_001[] IS INITIAL....

И еще.... buf_c_001 - сортированная ? With header line в объявлении есть/нет ?
Тип у неё какой? с BINARY SEARCH надо повнимательнее.

andry_moz

Code:

  ...
  sort buf_c_001 by ekgrp.
  READ TABLE buf_c_001 INTO ls_c_001 WITH KEY ekgrp = i_ekgrp BINARY SEARCH.
...

SYS

А что Вы хотите?! Сначала сортируете по полю EKGRP,

Code:

ORDER BY ekgrp.

а затем в конец таблицы добавляете пустое значение

Code:

APPEND INITIAL LINE TO buf_c_001.

.
И после этого таблица считается отсортированной?

Соответственно возможны варианты:
1) Логическая ошибка в операторе IS INITIAL. Должно быть IS NOT INITIAL.
2) Вместо APPEND использовать INSERT.
3) Если поля ekgrp содержат не только числа, проверьте на кириллические символы.

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

READ TABLE не ищет?!

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