ABAP 7.4新特性(二)：NEW 操作符详解编程语言

NEW实例操作符
了解JAVA的知道，我们可以new一个对象实例出来,现在ABAP也可以这样了。NEW可以创建匿名的数据对象或者类的实例。匿名就是new出来的对象没有名字。。。因为后面不需要这个对象了，只是为了new出来赋值给左边的对象（赋值也不太对，就指向。。。），一次使用，简化代码。具体参考java匿名类
    一般用到的3种形式 后面例子详细解释
1…. NEW dtype（ value ) …
创建一个类型为dtype的匿名数据对象，然后传值给创建的对象（左操作符）。
2…. NEW class（ p1 = a 1 p2 = a2 … ) …
创建一个名为class类的实例，并且传参到实例的构造函数。
3…. NEW #（ … ) …
根据操作数类型创建一个匿名数据对象或者一个类的实例。 如 a = new #（ … ), new #( … )这里创建的匿名类是参考a的类型来的，即和a的类型一致。
举例说明一下：
   1.new 数据对象
     before 7.4
FIELD-SYMBOLS <fS> TYPE data.
DATA dref TYPE REF TO data.
CREATE DATA dref TYPE i.
ASSIGN dref->* TO <fs>.
<fs> = 555.
    with 7.4
DATA dref TYPE REF TO data.
dref = NEW i( 555 ).
    2.new 类实例
     before 7.4
DATA oref TYPE REF TO class. “这里class是一个类名
CREATE OBJECT oref EXPORTING …
with 7.4
DATA oref TYPE REF TO class.
oref = NEW #( … ).
或者：
DATA oref TYPE REF TO class.
oref = NEW #( … ).

最后举一个综合的例子：
TYPES: BEGIN OF t_struct1,
col1 TYPE i,
col2 TYPE i,
END OF t_struct1,
BEGIN OF t_struct2,
col1 TYPE i,
col2 TYPE t_struct1,
col3 TYPE TABLE OF t_struct1 WITH EMPTY KEY,
END OF t_struct2,
t_itab TYPE TABLE OF t_struct2 WITH EMPTY KEY.
DATA(dref) =
NEW t_itab( ( col1 = 1
col2-col1 = 1
col2-col2 = 2
col3 = VALUE #( ( col1 = 1 col2 = 2 ) “VALUE 下篇会讲
( col1 = 3 col2 = 4 ) ) )
( col1 = 2
col2-col1 = 2
col2-col2 = 4
col3 = VALUE #( ( col1 = 2 col2 = 4 )
( col1 = 6 col2 = 8 ) ) ) ).
<span class=”L0S52″>WRITE</span><span class=”L0S55″>: </span>dref<span class=”L0S70″>-></span>*[ <span class=”L0S32″>1 </span>]<span class=”L0S70″>-</span>col1<span class=”L0S55″>, </span>dref<span class=”L0S70″>-></span>*[ <span class=”L0S32″>2 </span>]<span class=”L0S70″>-</span>col1<span class=”L0S55″>. “</span>

这个程序定义了两个结构t_struct1 和 t_struct2,其中t_struct2为deep struct，因为它的col3是参考t_struct1的表类型。那么后面那段代码，就是定义了一个dref引用类型变量，该变量指向的
对象类型和t_itab类型相同。然后利用new和value来为匿名对象初始化数据，然后把这个匿名对象赋值给dref。这时候dref就有2行数据了。可以拷贝这段代码 然后断点看dref指向的内容。