亚洲必赢手机ABAP中的枚举对象

by admin on 2019年12月26日

 

枚举对象是枚举类型的数额对象。枚举对象只可以分包类型为枚举类型的枚举值。ABAP从版本7.51上马扶助它们。

那是意气风发种恒河沙数的形式。在ABAP 7.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.

此地,size属性只好够是shirt类中定义的常量中的值。此外值会招致非凡。顾客制造shirt类时,供给这么做:

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

看看费用了吗?为何不让运转时情状来为您做值检查吗?有黄金时代种叫做枚举和枚举类型的概念(能够在此种景观下采纳)。

在7.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.

TYPES语句的八个新变式:BEGIN OF ENUMEND OF
ENUM
,它能够围起多少个常量的集。常量的科班基本项目是i再者枚举值从0先河计数。

亚洲必赢手机,像上文那样接收的话:

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

而是,使用了枚举对象后,你不再要求管理非常了。假诺你传递叁个违规值的话,会拿走语法错误!

DATA(shirt) = NEW shirt( 333 ).

亚洲必赢手机 1

 

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

你申明了二个得以在TYPE附加项后声称的基本类型enum。在它们之间,你能够声美素佳儿(Aptamil卡塔尔(قطر‎个常量集,它们叫做枚举常量。那样就定义了具备enum品类的枚举对象所允许的枚举值。在那处,TYPES其实就和CONSTANTS讲话相通。

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. "语法或运行时错误

枚举对象只可以赋值给持有风流倜傥致枚举类型的枚举对象。相近,枚举对象间的可比也只辛亏平等类别的枚举对象间产生。当然,枚举常量自己也含有在内。

平日,你或多或少也不关切枚举对象的从头到尾的经过。枚举对象的语义由枚举常量来定义。然则,你也可以将枚举类型定义为i类型之外的此外基本项目,况且有着别样枚举值(个中八个亟须是最初值):

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:
  BEGIN OF ENUM tsize STRUCTURE size,
    s,
    m,
    l,
    xl,
  END OF ENUM tsize STRUCTURE size.

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

以上代码定义了一个枚举布局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.

 除此而外,还会有局地足以利用的状态:

你能够将枚举对象赋给一个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

也足以编写:

DATA(text) = CONV string( size_xl ).

能够选拔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

另后生可畏种方式是,能够运用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.

RTTI中也多了叁个八方呼应的类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( ).

大略正是这几个剧情了。

躺下让ABAP运维时来为您职业吧。要留神枚举类型只好在某个符合的演算地点中现身,而且只好分包预先规定的值。违规的枚举值永久不会在枚举对象中出现。

 

PS:原作的褒贬中有人涉嫌,枚举值和数目字典中的domain的固定值很像,为何双方未有并轨关系?

作者的答应是:那特性格实际樱笋时经在设计中了,很有相当大可能现身。具体意况要视财富和预先级而定。

 

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

意大利语原稿:ABAP News for Release 7.51 –
Enumerations

 

发表评论

电子邮件地址不会被公开。 必填项已用*标注

网站地图xml地图