文章目录
- 创建程序
- 语法格式
- 程序测试
- AS SPFLI_NAME2 RENAMING WITH SUFFIX _NAME2 后缀
- 变量的结构
- 程序
- 结构类型嵌套表和结构字段
- 类型TYPES嵌套类型
-
创建程序
语法格式
程序测试
AS SPFLI_NAME2 RENAMING WITH SUFFIX _NAME2 后缀
变量的结构
程序
*&---------------------------------------------------------------------*
*& Report Z_TEST_DATA_DEFINE
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z_TEST_DATA_DEFINE.
DATA: BEGIN OF G_SPFLI, "spfli表的字段
CARRID TYPE SPFLI-CARRID,
CONNID TYPE SPFLI-CONNID,
COUNTRYFR TYPE SPFLI-COUNTRYFR,
END OF G_SPFLI.
DATA: BEGIN OF G_DATA.
INCLUDE STRUCTURE G_SPFLI.
DATA: NAME TYPE STRING,
END OF G_DATA.
DATA: BEGIN OF G_DATA_SPFLI.
INCLUDE STRUCTURE SPFLI.
DATA: NAME TYPE STRING,
END OF G_DATA_SPFLI.
DATA: BEGIN OF G_DATA_SPFLI2.
INCLUDE TYPE SPFLI AS SPFLI_NAME.
INCLUDE TYPE SPFLI AS SPFLI_NAME2 RENAMING WITH SUFFIX _NAME2.
DATA: NAME TYPE STRING,
END OF G_DATA_SPFLI2.
WRITE:''.
结构类型嵌套表和结构字段
类型TYPES嵌套类型
程序
TYPES: BEGIN OF GTY_DATA,
NAME TYPE STRING,
AGE TYPE I,
DEPT TYPE STRING,
END OF GTY_DATA.
TYPES: BEGIN OF GTY_OUT.
INCLUDE TYPE GTY_DATA.
TYPES: ID TYPE I,
END OF GTY_OUT.
DATA: GS_OUT TYPE GTY_OUT.
DATA: GT_OUT TYPE TABLE OF GTY_OUT.
DATA: BEGIN OF GS_SFLIGHT ,
PRICE TYPE SFLIGHT-PRICE,
CURRENCY TYPE SFLIGHT-CURRENCY,
END OF GS_SFLIGHT.
DATA : BEGIN OF GT_DATA_T.
INCLUDE STRUCTURE GS_SFLIGHT.
DATA: GT_OUT TYPE TABLE OF GTY_OUT,
DD TYPE I,
END OF GT_DATA_T.
WRITE:''.
发布评论