ABAP中的枚举对象

枚举对象只能包含类型为枚举类型的枚举值,枚举对象只能包含类型为枚举类型的枚举值

 

 

枚举对象是枚举类型的数码对象。枚举对象只好分包类型为枚举类型的枚举值。ABAP从版本柒.5一开首帮衬它们。

枚举对象是枚举类型的数量对象。枚举对象只可以分包类型为枚举类型的枚举值。ABAP从版本七.5壹起来扶助它们。

那是壹种常见的格局。在ABAP 柒.51此前,人们数见不鲜用如下格局贯彻类似的作用:

那是1种普及的格局。在ABAP 七.51事先,人们日常用如下方式完毕类似的功用:

CLASS cx_wrong_size DEFINITION INHERITING FROM cx_static_check.
 ENDCLASS.

 CLASS shirt DEFINITION.
   PUBLIC SECTION.
     TYPES tsize TYPE i.
     CONSTANTS:
       size_s  TYPE tsize VALUE 0,
       size_m  TYPE tsize VALUE 1,
       size_l  TYPE tsize VALUE 2,
       size_xl TYPE tsize VALUE 3.
     METHODS
       constructor IMPORTING size TYPE tsize
                   RAISING   cx_wrong_size.
     ...
   PRIVATE SECTION.
     DATA
       size TYPE tsize.
 ENDCLASS.

 CLASS shirt IMPLEMENTATION.
   METHOD constructor.
     IF size <> size_s AND
        size <> size_m AND
        size <> size_l AND
        size <> size_xl.
       RAISE EXCEPTION TYPE cx_wrong_size.
     ENDIF.
     me->size = COND #(
       WHEN size <> size_s AND
                    size <> size_m AND
                    size <> size_l AND
                    size <> size_xl THEN THROW cx_wrong_size( )
       ELSE size ).
   ENDMETHOD.
 ENDCLASS.
CLASS cx_wrong_size DEFINITION INHERITING FROM cx_static_check.
 ENDCLASS.

 CLASS shirt DEFINITION.
   PUBLIC SECTION.
     TYPES tsize TYPE i.
     CONSTANTS:
       size_s  TYPE tsize VALUE 0,
       size_m  TYPE tsize VALUE 1,
       size_l  TYPE tsize VALUE 2,
       size_xl TYPE tsize VALUE 3.
     METHODS
       constructor IMPORTING size TYPE tsize
                   RAISING   cx_wrong_size.
     ...
   PRIVATE SECTION.
     DATA
       size TYPE tsize.
 ENDCLASS.

 CLASS shirt IMPLEMENTATION.
   METHOD constructor.
     IF size <> size_s AND
        size <> size_m AND
        size <> size_l AND
        size <> size_xl.
       RAISE EXCEPTION TYPE cx_wrong_size.
     ENDIF.
     me->size = COND #(
       WHEN size <> size_s AND
                    size <> size_m AND
                    size <> size_l AND
                    size <> size_xl THEN THROW cx_wrong_size( )
       ELSE size ).
   ENDMETHOD.
 ENDCLASS.

此地,size属性只可以够是shirt类中定义的常量中的值。别的值会导致极度。用户成立shirt类时,供给那样做:

此间,size属性只好够是shirt类中定义的常量中的值。别的值会导致非凡。用户创造shirt类时,须求那样做:

TRY.
    DATA(shirt) = NEW shirt( shirt=>size_xl ).
  CATCH cx_wrong_size.
    ...
ENDTRY.
TRY.
    DATA(shirt) = NEW shirt( shirt=>size_xl ).
  CATCH cx_wrong_size.
    ...
ENDTRY.

来看费用了吗?为啥不让运营时环境来为您做值检查呢?有一种名称为枚举和枚举类型的概念(能够在那种气象下行使)。

见到开支了呢?为啥不让运维时环境来为您做值检查呢?有1种叫做枚举和枚举类型的定义(可以在那种景观下选择)。

在7.5一以及越来越高的版本里,ABAP也会支撑枚举概念。固然应用枚举类型来重写上面的例证的话:

在七.51以及越来越高的本子里,ABAP也会辅助枚举概念。倘若使用枚举类型来重写上面的例子的话:

CLASS shirt DEFINITION.
  PUBLIC SECTION.
    TYPES:
      BEGIN OF ENUM tsize,
        size_s,
        size_m,
        size_l,
        size_xl,
      END OF ENUM tsize.
    METHODS
      constructor IMPORTING size TYPE tsize.
    ...
  PRIVATE SECTION.
    DATA
      size TYPE tsize.
ENDCLASS.

CLASS shirt IMPLEMENTATION.
  METHOD constructor.
    me->size = size.
  ENDMETHOD.
ENDCLASS.
CLASS shirt DEFINITION.
  PUBLIC SECTION.
    TYPES:
      BEGIN OF ENUM tsize,
        size_s,
        size_m,
        size_l,
        size_xl,
      END OF ENUM tsize.
    METHODS
      constructor IMPORTING size TYPE tsize.
    ...
  PRIVATE SECTION.
    DATA
      size TYPE tsize.
ENDCLASS.

CLASS shirt IMPLEMENTATION.
  METHOD constructor.
    me->size = size.
  ENDMETHOD.
ENDCLASS.

TYPES语句的贰个新变式:BEGIN OF ENUMEND OF
ENUM
,它能够围起四个常量的集。常量的规范基本项目是i而且枚举值从0开端计数。

TYPES语句的三个新变式:BEGIN OF ENUMEND OF
ENUM
,它能够围起贰个常量的集。常量的正规基本类型是i并且枚举值从0开端计数。

像上文那样选拔的话:

像上文那样选用的话:

DATA(shirt) = NEW shirt( shirt=>size_xl ).
DATA(shirt) = NEW shirt( shirt=>size_xl ).

但是,使用了枚举对象后,你不再必要处理卓殊了。若是你传递3个违规值的话,会获得语法错误!

但是,使用了枚举对象后,你不再必要处理非常了。假使您传递贰个违规值的话,会取得语法错误!

DATA(shirt) = NEW shirt( 333 ).
DATA(shirt) = NEW shirt( 333 ).

图片 1

图片 2

 

 

枚举是连串和常量的混合体。通过BEGIN OF ENUM enum – END OF ENUM
enum

你表明了贰个得以在TYPE附加项后宣称的主导项目enum。在它们中间,你能够声雅培(Abbott)个常量集,它们叫做枚举常量。那样就定义了独具enum类型的枚举对象所允许的枚举值。在此地,TYPES骨子里就和CONSTANTS言语同样。

枚举是类别和常量的混合体。通过BEGIN OF ENUM enum – END OF ENUM
enum

你证明了二个得以在TYPE附加项后注明的为主类型enum。在它们中间,你能够声澳优(Ausnutria Hyproca)个常量集,它们叫做枚举常量。那样就定义了富有enum花色的枚举对象所允许的枚举值。在此地,TYPES骨子里就和CONSTANTS言语同样。

ABAP运维时环境会检讨唯有被允许的枚举值能够被赋给枚举对象。

ABAP运营时环境会检讨只有被允许的枚举值可以被赋给枚举对象。

TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA size TYPE tsize.
size = size_xl. "允许

DATA dobj LIKE size.
dobj = size. "允许

dobj = 333. "语法或运行时错误
TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA size TYPE tsize.
size = size_xl. "允许

DATA dobj LIKE size.
dobj = size. "允许

dobj = 333. "语法或运行时错误

枚举对象只好赋值给持有同等枚举类型的枚举对象。一样,枚举对象间的比较也只可以在平等类其他枚举对象间爆发。当然,枚举常量本人也饱含在内。

枚举对象只好赋值给全数一致枚举类型的枚举对象。同样,枚举对象间的可比也不得不在一如既往档次的枚举对象间产生。当然,枚举常量本人也蕴藏在内。

普普通通,你或多或少也不关切枚举对象的内容。枚举对象的语义由枚举常量来定义。可是,你也得以将枚举类型定义为i类型之外的其他基本类型,并且存有别样枚举值(当中多少个必须是初始值):

平时,你或多或少也不关注枚举对象的始末。枚举对象的语义由枚举常量来定义。可是,你也能够将枚举类型定义为i类型之外的此外基本类型,并且有着别样枚举值(个中1个不可能不是开首值):

TYPES:
  basetype TYPE c LENGTH 2,
  BEGIN OF ENUM tsize BASE TYPE basetype,
    size_i  VALUE IS INITIAL,
    size_s  VALUE `S`,
    size_m  VALUE `M`,
    size_l  VALUE `L`,
    size_xl VALUE `XL`,
  END OF ENUM tsize.

DATA size TYPE tsize.
size = size_xl. "允许

DATA dobj LIKE size.
dobj = size."允许
TYPES:
  basetype TYPE c LENGTH 2,
  BEGIN OF ENUM tsize BASE TYPE basetype,
    size_i  VALUE IS INITIAL,
    size_s  VALUE `S`,
    size_m  VALUE `M`,
    size_l  VALUE `L`,
    size_xl VALUE `XL`,
  END OF ENUM tsize.

DATA size TYPE tsize.
size = size_xl. "允许

DATA dobj LIKE size.
dobj = size."允许

那使您可以轻巧地把现存“枚举值”调换为新形式的枚举值。运气好的话,能够不要求调动它们的施用。

那使您能够轻便地把现成“枚举值”转变为新办法的枚举值。运气好的话,能够不供给调动它们的利用。

如果您在一个上下文中有超过2个枚举类型,你能够将依次枚举值组织到组织里:

借使您在3个上下文中有超越二个枚举类型,你能够将各种枚举值组织到协会里:

TYPES:
  BEGIN OF ENUM tsize STRUCTURE size,
    s,
    m,
    l,
    xl,
  END OF ENUM tsize STRUCTURE size.

DATA dobj TYPE tsize.
dobj = size-xl. "允许
TYPES:
  BEGIN OF ENUM tsize STRUCTURE size,
    s,
    m,
    l,
    xl,
  END OF ENUM tsize STRUCTURE size.

DATA dobj TYPE tsize.
dobj = size-xl. "允许

上述代码定义了三个枚举结构size。结构的机件是枚举类型的枚举常量。

如上代码定义了3个枚举结构size。结构的机件是枚举类型的枚举常量。

 

 

枚举对象的普遍用处是相比它和枚举常量以决定程序要求切换到哪一个职能分支:

枚举对象的广泛用处是相比它和枚举常量以调整造进程序需求切换成哪四个功能分支:

TYPES:
  BEGIN OF ENUM tsize STRUCTURE size,
    s,
    m,
    l,
    xl,
  END OF ENUM tsize STRUCTURE size.

DATA dobj TYPE tsize.

...

CASE dobj.
  WHEN size-s.
    ...
  WHEN size-m.
    ...
  WHEN size-l.
    ...
  WHEN size-xl.
    ...
ENDCASE.
TYPES:
  BEGIN OF ENUM tsize STRUCTURE size,
    s,
    m,
    l,
    xl,
  END OF ENUM tsize STRUCTURE size.

DATA dobj TYPE tsize.

...

CASE dobj.
  WHEN size-s.
    ...
  WHEN size-m.
    ...
  WHEN size-l.
    ...
  WHEN size-xl.
    ...
ENDCASE.

 除却,还有局地得以应用的图景:

 除此而外,还有一些方可运用的情况:

你能够将枚举对象赋给一个c类型或许string品种的文本。结果正是概念了枚举值的枚举常量的名字。

您能够将枚举对象赋给一个c项目或然string花色的文书。结果就是概念了枚举值的枚举常量的名字。

TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA text TYPE string.
text = size_xl.
cl_demo_output=>display( text ). "结果是SIZE_XL
TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA text TYPE string.
text = size_xl.
cl_demo_output=>display( text ). "结果是SIZE_XL

也足以创作:

也得以创作:

DATA(text) = CONV string( size_xl ).
DATA(text) = CONV string( size_xl ).

能够选取CONV操作符钦点项目来访问当前值:

能够选用CONV操作符钦命项目来访问当前值:

TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA(value) = CONV i( size_xl ) .
cl_demo_output=>display( value ). "输出结果是3
TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA(value) = CONV i( size_xl ) .
cl_demo_output=>display( value ). "输出结果是3

另壹种情势是,可以采纳CONV将3个卓有效用的枚举值调换为枚举对象(常规的赋值语句是力不从心成功的):

另一种艺术是,可以选择CONV将一个灵光的枚举值转换为枚举对象(常规的赋值语句是心有余而力不足产生的):

TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA(num) = 3.

TRY.
    DATA(dobj) = CONV tsize( num ) .
    cl_demo_output=>display( dobj ). "Output is SIZE_XL
  CATCH cx_sy_conversion_no_enum_value.
    ...
ENDTRY.
TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA(num) = 3.

TRY.
    DATA(dobj) = CONV tsize( num ) .
    cl_demo_output=>display( dobj ). "Output is SIZE_XL
  CATCH cx_sy_conversion_no_enum_value.
    ...
ENDTRY.

RTTI中也多了三个应和的类CL_ABAP_ENUMDESCR

RTTI中也多了3个一见如旧的类CL_ABAP_ENUMDESCR

TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA(size) = VALUE tsize( ).

DATA(enum_descr) = CAST cl_abap_enumdescr(
  cl_abap_typedescr=>describe_by_data( size ) ).

cl_demo_output=>new(
  )->write_data( enum_descr->kind            "E, for elementary
  )->write_data( enum_descr->type_kind       "k, new for enumerated type
  )->write_data( enum_descr->base_type_kind  "I, the base type
  )->write_data( enum_descr->members         "Table of constants and values
  )->display( ).
TYPES:
  BEGIN OF ENUM tsize,
    size_s,
    size_m,
    size_l,
    size_xl,
  END OF ENUM tsize.

DATA(size) = VALUE tsize( ).

DATA(enum_descr) = CAST cl_abap_enumdescr(
  cl_abap_typedescr=>describe_by_data( size ) ).

cl_demo_output=>new(
  )->write_data( enum_descr->kind            "E, for elementary
  )->write_data( enum_descr->type_kind       "k, new for enumerated type
  )->write_data( enum_descr->base_type_kind  "I, the base type
  )->write_data( enum_descr->members         "Table of constants and values
  )->display( ).

大约就是那个剧情了。

差不离正是那一个情节了。

躺下让ABAP启动时来为你工作吗。要留心枚举类型只辛亏1些适合的运算地点中出现,并且只可以分包预先规定的值。违法的枚举值永恒不会在枚举对象中现身。

躺下让ABAP运维时来为您办事呢。要留意枚举类型只能在好几适合的运算地方中出现,并且不得不分包预先规定的值。违法的枚举值长久不会在枚举对象中现身。

 

 

PS:原来的小说的评论和介绍中有人提到,枚举值和多少字典中的domain的固定值很像,为何双方未有并轨关系?

PS:原来的小说的评论和介绍中有人涉嫌,枚举值和数据字典中的domain的固定值很像,为何双方未有并轨关系?

小编的回答是:这几个特点实际末春经在筹划中了,很有期望出现。具体意况要视财富和先行级而定。

小编的答问是:那些特点实际故洗经在筹划中了,很有期待出现。具体景况要视能源和事先级而定。

 

 

本文链接:http://www.cnblogs.com/hhelibeb/p/7976078.html

正文链接:http://www.cnblogs.com/hhelibeb/p/7976078.html

英文原著:ABAP News for Release 7.51 –
Enumerations

英文原稿:ABAP News for Release 7.51 –
Enumerations