ABAP拼接字符串 &&

  LOOP AT lit_werks ASSIGNING FIELD-SYMBOL(<lfs_werks>).

    LOOP AT lit_lfa12 ASSIGNING FIELD-SYMBOL(<lfs_lfa12>)
      WHERE ekorg = <lfs_werks>-ekorg.
      IF <lfs_lfa12>-sortl <> ''.  "判断是否为空字符串

        CLEAR:l_sortl.
        l_sortl = <lfs_lfa12>-sortl+0(2). "获取需要的值
        IF <lfs_werks>-sortl1 = ''.  "判断是否为空字符串
          <lfs_werks>-sortl1 = l_sortl.
        ELSE.
          IF  <lfs_werks>-sortl1 CS l_sortl. "判断sortl1包含字符串l_sortl
          ELSE.
            <lfs_werks>-sortl1 = <lfs_werks>-sortl1 &&',' && l_sortl.
          ENDIF.
        ENDIF.
      ENDIF.
    ENDLOOP.
  ENDLOOP.
  UNASSIGN:<lfs_werks>,<lfs_lfa12>.