*&---------------------------------------------------------------------*
*& Report  Z_DEL_REQST_OF_DTP
*&
*&---------------------------------------------------------------------*
*& Удаление запросов для конкретного DTP 
*&
*&---------------------------------------------------------------------*
REPORT  Z_DEL_REQST_OF_DTP.
*****************************************************
*Объявление данных
*****************************************************
DATA: BEGIN LS_REQUNR,
           RNR  TYPE RSREQDONE-RNR,
          END OF LS_REQUNR,
LT_REQUNR LIKE TABLE OF LS_REQUNR.
*****************************************************
*Определение запросов для DTP
*****************************************************
SELECT RNR FROM RSREQDONE INTO TABLE LT_REQUNR
WHERE LOGDPID = <идентификатор DTP>
*****************************************************
*Удаление запросов для DTP
*****************************************************
LOOP AT LT_REQUNR INTO LS_REQUNR.
*
CALL FUNCTION 'RSSM_DELETE_REQUEST'
  EXPORTING
    REQUEST                    =  LS_REQUNR-RNR
    INFOCUBE                   = <имя ИНФОКУБА>
  EXCEPTIONS
    REQUEST_NOT_IN_CUBE        = 1
    INFOCUBE_NOT_FOUND         = 2
    REQUEST_ALREADY_AGGREGATED = 3
    REQUEST_ALREADY_COMDENSED  = 4
    NO_ENQUEUE_POSSIBLE        = 5
    CUBE_IN_PLANNING_MODE      = 6
    OTHERS                     = 7.
IF SY-SUBRC = 0.
EXIT.
ELSE.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
ENDLOOP.