BW:实现ADSO选择性全删全抽-DTP中例程限制时间变量抽数

好久没有发过CSDN啦，好久不见~

最近之前项目的客户，有反映SAP底表的增量不准，可能的原因是有物理删除是数据，导致BW增量不准，但是数据量还很大，每天全删全抽也不符合需求，因为时间不允许。

但是sap那边只会改最近三十天的数据，想了想可以通过全删全抽最近模型三十天内的数据来实现需求，并且确保数据的准确性

那么怎么删除模型最近两个月的数据呢，之前刚好写过，处理链里写程序删除：

BW项目随手记：处理链中写程序自定义条件删除ADSO数据_锅包肉和BW的博客-CSDN博客

接下来就是在DTP中限制时间变量，限制抽最近三十天的数据，这里随便找了个DTP，实际上限制根据实际情况限制时间字段即可，创建例程

 限制三十天内代码示例如下，通过过滤RANGE TABLE来实现，这里的BUDAT就是限制的字段技术名称。

data: l_idx like sy-tabix.
DATA: LV_DATE_S LIKE SY-DATUM,
      LV_DATE_E LIKE SY-DATUM.
      LV_DATE_S = SY-DATUM - 30.
      LV_DATE_E = SY-DATUM.
          read table l_t_range with key
               fieldname = 'BUDAT'.
          l_idx = sy-tabix.
          if l_idx <> 0.
            l_t_range-iobjnm = 'BUDAT'.
            l_t_range-sign = 'I'.
            l_t_range-option = 'BT'.
            l_t_range-low = LV_DATE_S.
            l_t_range-high = LV_DATE_E.
            modify l_t_range index l_idx.
          else.
            l_t_range-iobjnm = 'BUDAT'.
            l_t_range-sign = 'I'.
            l_t_range-option = 'BT'.
            l_t_range-low = LV_DATE_S.
            l_t_range-high = LV_DATE_E.
            append l_t_range.
          endif.
          p_subrc = 0.

备注：取上月

CONCATENATE LS_DATE_F+0(6) '01' INTO LS_DATE_T.

LS_DATE_T = LS_DATE_T - 1.