[실전연습] Inner Join (ITAB, WHERE,구문 사용해서)

최초 작성일: 23년 1월 26일

최종 작성일:

 

목적:easy abap 2.0에 273 페이지에 있는 예제 문제를 mm모듈에서 많이 쓰는 테이블을 참고해서 코드 짜보기

 

itab name : gt_itab

sflight 에서 carrid

scarr에서 carrname

sflight에서 fldate 가지고 와서

carrid를 키값으로  carrname을 가지고와 

그리고 그걸 gt_itab에 넣어

carrid와 carrname을 가져와 ( sflight- carrid 와 scarr- carrname을 하나의 테이블로 만드는 것이 최종 목표)

DATA: BEGIN OF gs_line,

carrid TYPE sflight-carrid,
carrname TYPE scarr-carrname,
fldate TYPE sflight-fldate,

END OF gs_line.

DATA gs_itab LIKE TABLE OF gs_line.

SELECT carrid fldate INTO CORRESPONDING FIELDS OF TABLE gs_itab FROM sflight.

LOOP AT gs_itab INTO gs_line.
SELECT carrname INTO gs_line-carrname
FROM scarr WHERE carrid = gs_line-carrid.

MODIFY gs_itab FROM gs_line.

WRITE: gs_line-carrid, gs_line-carrname.

ENDLOOP.