REPORT  z02_13.

* 구조체 TYPE 선언
TYPES: BEGIN OF t_ren,
  name     TYPE c LENGTH 20,
  country  TYPE c LENGTH 15,
  city     TYPE c LENGTH 10,
END OF t_ren.

* nested 구조체 type 선언
TYPES: BEGIN OF t_info.
  INCLUDE TYPE t_ren as ren.
  TYPES : phone TYPE c LENGTH 10,
END OF t_info.

* 구조체 Object 선언
DATA gs_people TYPE t_info.

gs_people-ren-name = ’HONG GILDONG’.
gs_people-ren-country = 'KOREA'.
gs_people-ren-city = 'SEOUL'.
gs_people-phone = '123456789'.

WRITE :/ gs_people-ren-name, gs_people-ren-country,
         gs_people-ren-city, gs_people-phone.