ABAP 7.40新关键字LET的用法

REPORT ZLET.

CLASS demo DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS main.
ENDCLASS.

CLASS demo IMPLEMENTATION.
  METHOD main.
* another example
typeS: BEGIN OF ty_data,
                 index type int4,
                 value type int4,
                 name type string,
           end of ty_Data.
data: lt_data TYPE STANDARD TABLE OF ty_data.

LOOP AT itab ASSIGNING FIELD-SYMBOL(<fs>).
  data(value) = value ty_Data( LET x = <fs> y = x + 1  r = r && x && y in index = sy-index value = x + y  name = r ).
  APPEND value TO lt_data.
ENDLOOP.  

    TYPES text TYPE STANDARD TABLE OF string WITH EMPTY KEY.
* IN后面的才是重点,能产生输出的语句。
    cl_demo_output=>new( )->write(
     VALUE text( LET it = `Jerry` IN
                   ( |To { it } is to do|          )
                   ( |To { it }, or not to { it }| )
                   ( |To do is to { it }|          )
                   ( |Do { it } do { it } do|      ) )
    )->display( ).
  ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.
  demo=>main( ).

要获取更多Jerry的原创文章,请关注公众号"汪子熙":

发布了6327 篇原创文章 · 获赞 617 · 访问量 99万+

猜你喜欢

转载自blog.csdn.net/i042416/article/details/103967054