【SAP】ABAP——RANGE用法

最新推荐文章于 2026-04-14 12:05:12 发布

转载最新推荐文章于 2026-04-14 12:05:12 发布 · 2.8k 阅读

2 ·

本内容遵循CC 4.0 BY-SA版权协议

原文链接：https://www.manongdao.com/article-1678575.html

标签

#数据库开发

收录于

ABAP 专栏收录该内容

6 篇文章

订阅专栏

本文介绍了一种数据筛选过程，通过指定移动类型（如ra_bwart）的特定区间（ls_bwart = '201'-'202'）和日期范围（ra_date），并使用SQL查询从mseg表中提取相关数据，涉及字段a~erfmg和a~dmbtr。

DATA ra_bwart TYPE RANGE OF mseg-bwart."移动类型
DATA ls_bwart LIKE LINE OF ra_bwart.

DATA ra_date TYPE RANGE OF sy-datum."日期期间
DATA ls_date LIKE LINE OF ra_date.

  ls_bwart-low = '201'.
  ls_bwart-sign = 'I'.
  ls_bwart-option = 'EQ'.
  APPEND ls_bwart TO ra_bwart.

  ls_bwart-low = '202'.
  ls_bwart-sign = 'I'.
  ls_bwart-option = 'EQ'.
  APPEND ls_bwart TO ra_bwart.

CONCATENATE p_lfgja p_lfmon '01' INTO ls_date-low."该月第一天
  CALL FUNCTION 'BKK_GET_MONTH_LASTDAY'
    EXPORTING
      i_date = ls_date-low
    IMPORTING
      e_date = ls_date-high."该月最后一天
  ls_date-sign = 'I'.
  ls_date-option = 'BT'.
  APPEND ls_date TO ra_date."ra_date为当月期间

SELECT SUM( a~erfmg ) AS erfmg SUM( a~dmbtr ) AS dmbtr
      INTO CORRESPONDING FIELDS OF wa_data
      FROM mseg AS a
      INNER JOIN mkpf AS b
              ON a~mblnr = b~mblnr
             AND a~mjahr = b~mjahr
      WHERE a~matnr = wa_data-matnr
        AND a~werks = wa_data-werks
        AND a~bwart IN ra_bwart
        AND a~sobkz IN ra_sobkz
        AND b~budat IN ra_date.