ABAP 取数方法

一、先确定输出布局需要哪些字段，定义输出的GT_OUTPUT

TYPES: BEGIN OF ty_ht,
         auart       TYPE  vbak-auart,          "销售订单类型
         bezei       TYPE  tvakt-bezei,         "销售订单类型描述
         vkorg       TYPE  vbak-vkorg,          "销售组织
         vtext       TYPE  tvkot-vtext,         "销售组织描述
。。。。
END OF TY_HT.
DATA:  gt_out TYPE STANDARD TABLE OF ty_ht.

二、取数

将所需要的字段从不同的内表中取出

例如：

    SELECT *
     INTO TABLE @DATA(lt_dtvtwt)
        FROM tvtwt
        WHERE spras = '1'.
    SORT lt_dtvtwt BY spras vtweg.

    SELECT *
     INTO TABLE @DATA(lt_dtvkbt)
       FROM tvkbt
        WHERE spras = '1'.
    SORT lt_dtvkbt BY spras vkbur

三、读取

使用循环将所需要的字段读取进去

    LOOP AT gt_output  ASSIGNING FIELD-SYMBOL(<fs_output>) .
*销售组织描述
      READ TABLE lt_dtvkot INTO DATA(ls_dtvkot) WITH  KEY vkorg = <fs_alv1>-vkorg BINARY SEARCH.
      IF sy-subrc EQ 0.
        <fs_alv1>-vtext = ls_dtvkot-vtext.
      ENDIF.

*销售渠道描述
      READ TABLE lt_dtvtwt INTO DATA(ls_dtvtwt) WITH  KEY vtweg = <fs_alv1>-vtweg BINARY SEARCH.
      IF sy-subrc EQ 0.
        <fs_alv1>-qvtext = ls_dtvtwt-vtext.
endloop.