【SAP ABAP系列】ABAP 动态指针

正文部分

有收有放，转在说明，后面举例，给初学者（因为有很多人问到我这个）

    关于abap指针的一些资料。     1.什么是abap指针：     在abap里面，fieldsymbol就相当于c语言的指针。如果你定义并且分配了相应的结构或者变量给它，其实它就指向这个结构或者变量的地址，如果修改了fieldsymbol的值，则相应结构或者变量的值也随之更改。     2.如何定义指针：     基本形式：field-symbols.     附加信息：     1....type:定义一个数据类型，然后定义指针     2....typerefto：指针指向类或者接口     3....typerefto：指针指向数据结构     4....typelineof：指针内表的行项目     5....like：指针为数据库表类型     6....likelineof：指针类型为数据库表的行项目     7....type<>：指针为内表     3.如何分配指针：     （1）.assignfto.：分配一个指针，包括以下几种类型     1....casting...：主要对unicode系统地操作     1a....casting     1b....castingtypetype     1c....casting...decimalsdec     1d....castinglikef1     2....typetype：直接指定类型     3....decimalsdec：指定小数点位数     4....rangerange：指定范围     （2）.分配结构中的某个字段给指针     assigncomponentidxofstructurestructo.     assigncomponentnameofstructurestructo.     （3）.分配类的方法给指针     assigndref->*to.     （4）.从f开始，是f的n倍长之后的内容分配给指针     assignfincrementnto.     （5）.分配局部变量给指针     assignlocalcopy     3a.assignlocalcopyoffto.     3b.assignlocalcopyofinitialfto.     3c.assignlocalcopyofinitiallineofitabto.     4c.assignlocalcopyofmaintablefield(f)to.     （6）.assigndynamicj：动态分配指针     4a.assign(f)to.     4b.assignoref->(f)to.     4c.assign(f1)=>(f2)to.     4d.assigntablefield(f)to.     4e.assignlocalcopyofmaintablefield(f)to.     4f.assignlocalcopyof...(f)to.     4.如何取消分配：     unassign.

例1：

field-SYMBOLS: <wa> TYPE any,
               <wa2> TYPE any.
ASSIGN WA_MARA to <wa>.
select single *
  from MARA into WA_MARA.
WHILE sy-subrc = 0.
  ASSIGN COMPONENT sy-index of STRUCTURE <wa> to <wa2>.
  IF sy-index = 5.
    itab-ZXXX1 = <wa2>.
  ENDIF.
  IF sy-index > 9 and sy-index < 25.
    itab-ZXXX2 = <wa2>.
  ENDIF.
  APPEND itab.
ENDWHILE.

例2：

LOOP AT ITAB.
  CONCATENATE T_A ITAB-A INTO T_B.
  ASSIGN (XXX) TO <A>.
  ITAB2-A1 = <A>.
  APPEND ITAB2.
ENDLOOP.