Оператор IN

Long

Ув. знатоки, известно ли вам, записывает или нет ABAP в структуру SYST индекс строчки с условием в budat, которое сработало wa_smth-budat:

if wa_smth-budat in budat.
....
endif.
P.S. Прошу не справшивать зачем, мне это. :roll:

Tetty

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

Ув. знатоки, известно ли вам, записывает или нет ABAP в структуру SYST индекс строчки с условием в budat, которое сработало wa_smth-budat:

if wa_smth-budat in budat.
....
endif.
P.S. Прошу не справшивать зачем, мне это. :roll:

а что говорит опытный эксперимент?

РМщик

нет, но можно вот так:

Code:

TABLES: BKPF.
DATA: I TYPE I.
SELECT-OPTIONS: BUDAT FOR BKPF-BUDAT.
PARAMETERS:     BLDAT LIKE BKPF-BUDAT.

RANGES: BD FOR BKPF-BUDAT.
LOOP AT BUDAT.
  I = SY-TABIX.
  CLEAR: BD, BD[].
  MOVE-CORRESPONDING BUDAT TO BD.
  APPEND BD.
  IF BLDAT IN BD.
    WRITE:/ I.
  ENDIF.
ENDLOOP.

Tetty

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

нет, но можно вот так:

Code:

TABLES: BKPF.
DATA: I TYPE I.
SELECT-OPTIONS: BUDAT FOR BKPF-BUDAT.
PARAMETERS:     BLDAT LIKE BKPF-BUDAT.

RANGES: BD FOR BKPF-BUDAT.
LOOP AT BUDAT.
  I = SY-TABIX.
  CLEAR: BD, BD[].
  MOVE-CORRESPONDING BUDAT TO BD.
  APPEND BD.
  IF BLDAT IN BD.
    WRITE:/ I.
  ENDIF.
ENDLOOP.

Хорошо, но есть пару неточностей:
1. Если budat[] is initial, то bldat in budat[] будет верно, хотя (а) нет ни одной строки, и (б) предложенный пример не выдаст ни одного варианта.
2. Обратный пример, если budat[] состоит из двух строк 'IEQ******' и 'EEQ********' (даты должны быть одинаковыми), то bldat in budat[] для даты ******** будет ложь, а приведенный цикл выдаст первую строку.

Поэтому, Long, лучше решать конкретную задачу, а не пытаться оптимизировать среду. Вспоминается I=I-(I/2*2)+1; ("Я могла бы придумать и более запутанный способ, как это сделать, - с гордостью сказала белая королева".)

Исходный вопрос тоже не вполне корректен, так как действие IN более комплексно, чем просто найти подходящую строчку.

Long

Tetty, РМщик спасибо за то что ответили.
Как найти этот идекс вручную мне известно. Но вопрос был о другом...
Опытный эксперимент показал, что в SYST не записывается никакой индекс.

Удав

Какое поле в SYST имелось в виду: SYST-INDEX, SYST-TABIX, SYST-DBCNT, SYST-LOOPC или что-то другое?

Если рассматривать BUDAT как внутреннюю таблицу, то можно предположить, что искалось значение в поле SY-TABIX.
Это поле заполняется только при операциях над внутренними таблицами

Оператора IN среди них нет

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

Оператор IN

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