码迷,mamicode.com
首页 > 其他好文 > 详细

关于数据的赋值

时间:2019-04-22 12:07:40      阅读:206      评论:0      收藏:0      [点我收藏+]

标签:结构体   field   span   名称   abc   data   symbols   数据   bcd   

数据的赋值是程序经常使用的操作。

单字段的赋值

EX.

DATA COL(10) TYPE C VALUE 我是中国人.
DATA A(10) TYPE C.
DATA B(10) TYPE C.
DATA C(10) TYPE C.
A = COL+1(3). "直接赋值
MOVE COL+1(2) TO B. "赋值给数字格式时会dump
WRITE COL+1(4) TO C."不经常用,也是赋值
WRITE:/ A,/ B,/ C.
"字段字符不足时只显示本身长度
DATA: F1(10)  VALUE  ABCDEFGHIJ,
      F2(5),
      F3(3).
F2 = F1+3(5).
F3 = F1+3(5).
WRITE: / F1, / F2,/ F3.

技术图片

 结构赋值。

MOVE –CORRESPONDING,用于结构体的赋值,将结构1中的field组件的数据复制至结构2中, 仅复制相同名称的字段。

EX.

DATA:BEGIN OF WA_TEST,
       A(10) VALUE ,
       B(10) VALUE ,
       C(10) VALUE ,
       D(10) VALUE ,
       E(10) VALUE .
DATA:END OF WA_TEST.

DATA: BEGIN OF WA_TEST1,
        A1(10),
        B1(10),
        C(10),
        D(10),
        E(10).
DATA:END OF WA_TEST1.
MOVE-CORRESPONDING WA_TEST TO WA_TEST1.
WRITE:/ WA_TEST,/, 3 WA_TEST1."数字用于定位横坐标位置

技术图片

 

指针赋值。

EX.

FIELD-SYMBOLS:<F1> TYPE C. "若定义了类型,则下面赋值时必须要与定义的类型一致
ASSIGN 1 TO <F1> .
WRITE <F1>.
FIELD-SYMBOLS:<F2> TYPE D. "若定义的类型与需要赋值的字段类型不一致,可以在下面赋值时定义为类型一致
ASSIGN 18611111 TO <F2> TYPE D.
WRITE <F2>.
FIELD-SYMBOLS:<F3> . "若没有定义类型,则下面赋值时继承字段的类型,为C
ASSIGN 18611111 TO <F3> .
WRITE <F3>.

技术图片

关于数据的赋值

标签:结构体   field   span   名称   abc   data   symbols   数据   bcd   

原文地址:https://www.cnblogs.com/BruceKing/p/10748561.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!