内连接

来源:互联网 发布:大成律师事务所知乎 编辑:程序博客网 时间:2024/04/27 14:21

DATA:BEGIN OF ARCD,
     ID        TYPE YTCITY1-YCT_ID,
     NAME      TYPE YTCITY1-YCT_NAME,
     COUNTRY   TYPE YTCITY1-YCT_COUNTRY,
     CTID      TYPE YTSCHOOL-YCT_ID,
     SHID      TYPE YTSCHOOL-YSH_ID,
     SHNAME    TYPE YTSCHOOL-YSH_NAME,
     END OF ARCD.
DATA: ARCD1 LIKE ARCD.
SELECT YTCITY1~YCT_ID YTCITY1~YCT_NAME YTSCHOOL~YSH_NAME  YTSCHOOL~YSH_ID  INTO ARCD1 FROM YTCITY1  INNER JOIN YTSCHOOL ON YTCITY1~YCT_ID = YTSCHOOL~YCT_ID .
WRITE: / ARCD1-ID,ARCD1-NAME,ARCD1-SHNAME,ARCD1-SHID.
ENDSELECT.

原创粉丝点击