ABAP/4 ОКМ ДМ экономическая информатика 4GL Теория и практика обработки информации

Компьютерный язык ABAP/4 - ключевые слова

WHILE

Basic form

WHILE logexp.

Addition

... VARY f FROM f1 NEXT f2.

Effect

Repeats the processing enclosed between the WHILE and ENDWHILE statements as long as the logical expression logexp is true.

Checks the condition before each loop pass. If it is no longer true, processing resumes after ENDWHILE .

You can use the CONTINUE statement to leave the current loop pass prematurely and skip to the next loop pass.

Example


DATA: SEARCH_ME TYPE I,
      MIN       TYPE I VALUE 0,
      MAX       TYPE I VALUE 1000,
      TRIES     TYPE I,
      NUMBER    TYPE I.
SEARCH_ME = 23.
WHILE NUMBER <> SEARCH_ME.
  ADD 1 TO TRIES.
  NUMBER = ( MIN + MAX ) / 2.
  IF NUMBER > SEARCH_ME.
    MAX = NUMBER - 1.
  ELSE.
    MIN = NUMBER + 1.
  ENDIF.
ENDWHILE.

The above code performs a (binary) search for the "unknown" number SEARCH_ME which lies between MIN and MAX . TRIES contains the number of attempts needed to find it.

Notes

WHILE loops can be nested any number of times within themselves and other loops.
The termination condition and the processing you want to perform in the loop should be well thought out beforehand, so as to avoid the occurrence of endless loops.

Addition

... VARY f FROM f1 NEXT f2.

Effect

Varies the value of the field f during loop processing.

At the start of each loop pass, f receives a new value. During the first loop pass, f has the value of the field f1 ; on the second loop pass, it has the value of the field f2 , and so on.

The difference between the fields f1 and f2 determines the size of the step varying the value of the variable f in all subsequent loop passes, i.e. it is important that the fields you want to process within the loop have the same distance between each other in memory (see also DO VARYING ).

If the value of f changes when processing passes through the loop, the new value is placed in the field fn just assigned (transfer type: by value and result) at the end of the relevant loop pass. If the loop pass is terminated by a dialog message, any changed value of f is not transported back for this loop pass.

VARY can declare any number of variables.

Example


DATA: BEGIN OF WORD,
        ONE   VALUE 'E',
        TWO   VALUE 'x',
        THREE VALUE 'a',
        FOUR  VALUE 'm',
        FIVE  VALUE 'p',
        SIX   VALUE 'l',
        SEVEN VALUE 'e',
        EIGHT VALUE '!',
      END   OF WORD,
      LETTER1, LETTER2.
WHILE LETTER2 <> '!'
  VARY LETTER1 FROM WORD-ONE NEXT WORD-THREE
  VARY LETTER2 FROM WORD-TWO NEXT WORD-FOUR.
  WRITE: LETTER1, LETTER2.
ENDWHILE.

This code outputs the character string

" E x a m p l e !" .

Note

If VARY fields (i.e. fields which are filled with a new value on every loop pass) also occur in the WHILE condition, you must ensure that the WHILE condition is evaluated first. Then, if the WHILE condition is (still) true, the VARY fields can be reset.
Related DO , LOOP .

Index
© SAP AG 1996

ABAP/4 ОКМ ДМ экономическая информатика 4GL Теория и практика обработки информации

НОВОСТИ ФОРУМА

Рыцари теории эфира