[ABAP Dictionary] Table, Structure, Type-Group

ABAP Dictionary

: 사전에 정의해놓은 Table을 활용

: SE11을 이용하여 생성, 변경 조회 가능

 

예제 - 테이블에서 데이터 조회

*기존에 생성 되어 있는 sflight라는 Data Type = table로 변수 선언
DATA gs_sflight TYPE sflight.

* carrid가 AA인 데이터를 1개 조회하여 gs_sflight에 넣음
SELECT SINGLE *
  FROM sflight INTO gs_sflight
 WHERE carrid = 'AA'.

WRITE : / gs_sflight-carrid, gs_sflight-connid  , gs_sflight-fldate,
          gs_sflight-price , gs_sflight-currency, gs_sflight-planetype.

carrid가 AA인 여러개의 데이터 중 1개만 조회

 

예제 - Table 필드 Type을 활용하여 변수 생성

DATA : GV_CARRID  TYPE SFLIGHT-CARRID,
       GV_CONNID  TYPE SFLIGHT-CONNID,
       GV_FLDATE  TYPE SFLIGHT-FLDATE.

GV_CARRID = 'AA'.
GV_CONNID = '0017'.
GV_FLDATE = SY-DATUM.

WRITE : GV_CARRID, GV_CONNID, GV_FLDATE.

 

예제 - Data Element Type을 활용하여 변수 생성

"SFLIGHT - CARRID의 Data Element를 활용하여 변수 선언
DATA gs_carrid TYPE s_carr_id.
gs_carrid = 'AA'.
WRITE : 'Carrid : ', gs_carrid.

 

Structure

예제 - col1,col2,col3 필드를 갖는 zstruct를 생성 후, 해당 필드에 값 넣어서 출력

DATA gs_str TYPE zstruct.
gs_str-coll = '1
gs_str-col2 = 'Structure'.
gs_str-col3 = 'ABAP Dictionary Test'.
WRITE : gs_str-col1 , gs_str-col2 , gs_str-Gol3 .

 

Type-Group

ztgrp라는 type group 생성 후 호출 해서 사용.

TYPE-POOL ZTGRP .

TYPES ztgrp_typl TYPE c LENGTH 20.
TYPES: BEGIN Of ztgrp_typ2,
  col1(10) TYPE c,
  col2 TYPE i,
END OF ztgrp_typ2.

CONSTANTS ztgrp_name TYPE char10 VALUE 'Enjoy ABAP'.

DATA : gv_tgrp1 TYPE ztgrp_typl,
       gv_tgrp2 TYPE ztgrp_typ2.

gv_tgrp1 = 'Type Group'.
gv_tgrp2-col1 = 'Test'.
gv_tgrp2-col2 = 7.

WRITE : gv_tgrp1, gv_tgrp2-col1, gv_tgrp2-col2, ztgrp_name.