[SAP ABAP] LOOP ~ ENDLOOP / DO ~ ENDDO / WHILE ~ ENDWHILE 반복문 사용법 (List 활용)

반응형

반복문 종류

ABAP 프로그램에서 사용할 수 있는 순환 반복 구문은 3가지가 있습니다.

• DO ~ ENDDO 순환 구문
• WHILE ~ ENDWHILE 순환 구문
• LOOP ~ ENDLOOP 순환 구문

 

반복문 내 명령어 종류

EXIT	순환 구문 내에서 EXIT 명령을 만나면 순환 구문을 빠져나옵니다.
CONTINUE	CONTINUE 명령을 만나면 이후 크립트를 실행하지 않고 다음 순환을 실행합니다.
CHECK	CHECK 명령은 값을 비교하여 참일 경우에만 이후 구문을 수행하고 거짓이면 다음 순환을 실행합니다.

 

DO ~ ENDDO 반복문

• 순환 횟수를 지정할 수 있는 구문입니다. 횟수를 지정하지 않으면 무한 LOOP를 수행합니다.
• 현재 순환 횟수는 시스템 변수 SY-INDEX에 저장됩니다.

DO 3 TIMES.
	~~~
ENDDO.

예제

DO 4 TIMES.
  WRITE / SY-INDEX.
ENDDO.

 

WHILE ~ ENDWHILE 반복문

• WHILE 구문의 다음의 표현식이 참이면 반복순환을 지속합니다.
• 현재 순환 횟수는 시스템 변수 SY-INDEX에 저장됩니다.

WHILE gv_flag = 'X'.
	~~~
ENDWHILE.

예제

DATA: NUM TYPE I VALUE 5,
      STR(10) TYPE C VALUE 'X'.

WHILE STR = 'X'.
  WRITE: / SY-INDEX.
  IF SY-INDEX > NUM.
    WRITE: / 'SY-INDEX > num -> STOP'.
    STR = 'A'.
  ENDIF.
ENDWHILE.

 

LOOP ~ ENDLOOP 반복문

• 인터널 테이블의 라인을 차례대로 Work Area 또는 Header Line으로 이동하는 반복문입니다.
• 현재 순환 횟수는 시스템 변수 SY-TABIX에 저장됩니다. SY-TABIX는 인터널 테이블의 라인 번호입니다.

LOOP AT qt itab TO qs wa.
	~~~
ENDLOOP.

예제를 만들지 못했습니다. 좋은 예제 있는 분은 댓글 부탁드려요

 

반응형

 

반응형

LIST를 이용한 Subroutine 호출

다음 구문과 같이 LIST를 이용해 Subroutine을 차례대로 호출할 수 있습니다.

PERFORM idx OF <subroutine_1> <subroutine_2> ... <subroutine_n>

시스템은 idx의 순서에 따라 Subroutine List를 호출하게 됩니다.

오직 Internal Subroutine에서만 사용할 수 있으며, 파라미터를 사용할 수 없는 단점이 있습니다.

DO 2 TIMES.
  PERFORM SY-INDEX OF SUBROUTINE_1 SUBROUTINE_2.
ENDDO.

FORM SUBROUTINE_1.
  WRITE / '1 subroutine is called.'.
ENDFORM.

FORM SUBROUTINE_2.
  WRITE / '2 subroutine is called.'.
ENDFORM.