SELECT-OPTINOS, RANGE....

РМщик

вот такая конструкция:

*********
data: t_mara like mara occurs 0 with header line.
select-options matnr for t_mara-matnr.

start-of-selection.

select * from mara appending table t_mara where matnr in matnr.
*********

работала хорошо, пока одному умному пользователю
не потребовалось ввести 6700 (!!!) отдельных значений matnr

после этого... пошли дампы

ну не может селект принять столько

пришлось сделать так:

*********
data: t_mara like mara occurs 0 with header line.
select-options matnr for t_mara-matnr.

start-of-selection.

select * from mara appending table t_mara.
delete t_mara where not matnr in matnr.
*********

а есть какие-нибудь другие идеи?

Eugene

устроить пользователю тёмную

РМщик

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

устроить пользователю тёмную

ага, тем более разбудили в 1 час ночи из-за этого

Uukrul

Нету отдельных идей, туда можно засунуть ну максимум/около 1500 значений и все потому как эта конструкция раскладывается на ( matnr = значение1 OR matnr = значение3 OR ...... matnr = значение1400) и как следствие попадаешь на ограничение длинны SQL запроса...

Сергей Королев

Н-да, творческие у вас юзера...
Может порезать в цикле записей по 100? Типа такого:

Code:

DATA: r_matnr TYPE RANGE OF mara-matnr,
          ind_beg TYPE i,
          ind_end TYPE i.

ind_beg = 1.
ind_end = 100.
DO.
  IF ind_beg > LINES( matnr ).
    EXIT.
  ENDIF.

  IF ind_end > LINES( matnr ).
    ind_end = LINES( matnr ).
  ENDIF.

  REFRESH r_matnr.
  APPEND LINES OF matnr FROM ind_beg TO ind_end TO r_matnr.

  select * from mara appending table t_mara where matnr in r_matnr. 

  ADD 100 TO:  ind_beg, ind_end.
ENDDO.

РМщик

Сергей Королев написал:

Н-да, творческие у вас юзера...

пожалуй, это самый верный подход....

токо отчетов уже наклепано.... и все править.....

коллеги предложили делать describe table matnr lines....
и если больше, скажем, 1000,
то посылать пользователя к собственной маме :oops:

zaba

Неспортивно подрубать трудолюбивых юзверей:)

Mike1

Число 1000 прям магическое

Сам наваял:

Code:

at selection-screen on s_belnr.
  describe table s_belnr lines sy-tfill.
  if sy-tfill > 1000.
    message e398(00) with 'Не вводите больше'
    '1000' 'строк' space.
*   & & & &
  endif.

Сергей Королев

Вообще, может это исклчение поймать можно? Думаю, это было бы лучче, чем на константу проверять...

Mike1

Сергей Королев написал:

Вообще, может это исклчение поймать можно? Думаю, это было бы лучче, чем на константу проверять...

Моя схожая проблемка
http://sapboard.ru/forum/viewtopic.php?t=15183
была перенаправлена в базис.
Отлавливать дампы программно не получилось.
А например запрос к базе oracle не может превышать 32K,
можно вычислить размер запроса и соответсвенно максимальную константу.

OlegDm

На самом деле такой результат - это скорее всего использование юзером кнопки "Многократный выбор". Набрал он скажем критерий поиска для текста материала *труба* и вывалило у него все трубы.
Ограничивать количество записей - неспортивно как-то, больше вариант Сергея Королева подходит: нарезать на части и делать селект + аппенд. Но это скажем так техническое решение. Другой вариант, более трудоемкий, классифицировать материалы так как нужно юзеру - и пусть себе на здоровье выбирает (используя классификацию).

slash

РМщик написал(а):

Сергей Королев написал:

Н-да, творческие у вас юзера...

пожалуй, это самый верный подход....

токо отчетов уже наклепано.... и все править.....

коллеги предложили делать describe table matnr lines....
и если больше, скажем, 1000,
то посылать пользователя к собственной маме :oops:

тока 1000 для каждого отдельного селекта придётся экспирементально устанавливать

Сергей Королев

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

тока 1000 для каждого отдельного селекта придётся экспирементально устанавливать

Вот-вот, плюс еще макс.длина запроса зависит от настроек сервера...

РМщик

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

На самом деле такой результат - это скорее всего использование юзером кнопки "Многократный выбор".

абсолютно справедливо

РМщик

вообщем пока я поставил временное решение:

Code:

   DESCRIBE TABLE MATNR LINES KSPIS.

   IF KSPIS > 200.
     LSPIS = 'X'.
   ENDIF.
   IF LSPIS NE 'X'.
         SELECT * FROM ZMM_KAT INTO CORRESPONDING FIELDS OF TABLE T_KAT WHERE  MATNR IN MATNR.
      ELSE.
         SELECT * FROM ZMM_KAT INTO CORRESPONDING FIELDS OF TABLE T_KAT .
           DELETE T_KAT WHERE NOT MATNR IN MATNR.
    ENDIF.

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

SELECT-OPTINOS, RANGE....

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