120、SAP中结构体的赋值

01.代码如下:

*&---------------------------------------------------------------------*
*& Report Z_TIANPAN_20190716_HELLO
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*

* 此条为系统自动生成,为程序名
REPORT z_tianpan_20190716_hello .

DATA:lv_date1 LIKE sy-datum.
DATA:lv_date2 LIKE sy-datum.

*当前日期,值为20200524
lv_date1 = sy-datum.

lv_date2 = lv_date1.

*20200[52]4,从第五位开始,赋值为11.结果就是20200[11]4
lv_date2+5(2) = '11'."以0开始数,5位和6位的值为11

WRITE lv_date1.
SKIP.
WRITE lv_date2.

TYPES:BEGIN OF ty_s1,
        id   TYPE char10,
        name TYPE char20,
      END OF ty_s1.


TYPES:BEGIN OF ty_s2.
    INCLUDE TYPE ty_s1.
TYPES:count TYPE int2.
TYPES:END OF ty_s2.

DATA:ls_s1 TYPE ty_s1.
DATA:ls_s2 TYPE ty_s2.

ls_s1-id = '000001'.
ls_s1-name = 'flora'.

MOVE-CORRESPONDING ls_s1 TO ls_s2."结构体赋值

WRITE: /, 'ls_s1-id' ,ls_s1-id.
WRITE: /, 'ls_s1-name' ,ls_s1-name.

WRITE: /, 'ls_s2-id' ,ls_s2-id.
WRITE: /, 'ls_s2-name' ,ls_s2-name.

WRITE: /, 'ls_s2-count' ,ls_s2-count."由于结构体中并没有count这个,所以它是空的

02.效果如下:

原创不易,如果您认为这篇文章有价值,认同作者的付出,可以微信二维码打赏任意金额给作者(微信号:382477247)哦,谢谢。

 

猜你喜欢

转载自www.cnblogs.com/tianpan2019/p/12953380.html