abap 间接寻址 给动态变量赋值

需求： 有时写程序的时候，需要给某个动态变量 赋值操作，当字段比较多时，如果用常规方法赋值 就会显得代码很冗余，其实可以用变量的间接寻址赋值。

 

 

ex1： 

 

data    c1    type    char10.

data    c2     type    char10.

 

field-symbols  <fs>  type  any.

 

c1  = 'C2'.             "注意：此时的这个要赋值的变量“C2”一定要是大写的，因为在abap内部    变量名都是以大写格式保存的。

 

c2 = 'test1'.

assign  (c1)  to  <fs>.

<fs>  = 'test2'.

 

这时变量c2的内容由 'test1'  ->   'test2'.

 

 

该种方法适用于 多个变量要进行动态赋值时使用。

 

下面例子说明：点下那个按钮就将那个按钮文本设为'test'.

data  ok_code      type   sy-ucomm.

data  l_but           type    char10.

 

field-symbols  <fs> type any.

 

 

parameters:

    pushbutton  2(10)    pb1   user-command pb1,

    pushbutton  1