91.SAP ABAP - 在程序中声明结构对象 - 笔记

目录

语法

例子

标准方式

简写方式

参照结构或表

声明3：DECLARE STRUCTURE WITH DATA

---

语法

TYPES BEGIN OF strtype.

TYPES f1 ...

TYPES f2...

TYPES END OF strtype.

例子

标准方式

TYPES BEGIN OF GTY_SCHOOL .
  TYPES ZSCHOOL TYPE ZSCHOOL_GQ_01-ZSCHOOL .
  TYPES ZSNAME  TYPE ZSCHOOL_GQ_01-ZSNAME .
  TYPES ZADDR   TYPE ZSCHOOL_GQ_01-ZADDR .
TYPES END OF GTY_SCHOOL.

简写方式

*简写方式
TYPES: BEGIN OF GTY_SCHOOL_S ,
        SID     TYPE ZSCHOOL_GQ_01 ,
        ZSCHOOL TYPE ZSCHOOL_GQ_01-ZSCHOOL ,
        ZSNAME  TYPE ZSCHOOL_GQ_01-ZSNAME ,
        ZADDR   TYPE ZSCHOOL_GQ_01-ZADDR ,
        ZREMARK TYPE C LENGTH 10 ,
       END OF GTY_SCHOOL_S.

参照结构或表

TYPES:  BEGIN OF GTY_SCHOOL_B.
          INCLUDE STRUCTURE ZSCHOOL_GQ_01 .     " TABLE OR STRUCTURE
TYPES:    FLAG TYPE C LENGTH 1 ,
       END OF GTY_SCHOOL_B .

声明3：DECLARE STRUCTURE WITH DATA

DATA: BEGIN OF GTY_SCHOOL_D1 ,
        SID     TYPE ZSCHOOL_GQ_01 ,
        ZSCHOOL TYPE ZSCHOOL_GQ_01-ZSCHOOL ,
        ZSNAME  TYPE ZSCHOOL_GQ_01-ZSNAME ,
        ZADDR   TYPE ZSCHOOL_GQ_01-ZADDR ,
        ZREMARK TYPE C LENGTH 10 ,
       END OF GTY_SCHOOL_D1.