Criar um range para usar em um SELECT

DATA: r_kschl          TYPE RANGE OF konv-kschl,
      w_kschl          LIKE LINE OF r_kschl.

CONSTANTS: c_sign_i     TYPE char01          VALUE 'I',
           c_option_eq  TYPE char02          VALUE 'EQ',
           c_bx10       TYPE kscha           VALUE 'BX10',
           c_bx11       TYPE kscha           VALUE 'BX11'.

    CLEAR: r_kschl[], r_kschl.
    MOVE: c_sign_i TO w_kschl-sign,
          c_option_eq TO w_kschl-option,
          c_bx10 TO w_kschl-low.
    APPEND w_kschl TO r_kschl.
    MOVE: c_sign_i TO w_kschl-sign,
          c_option_eq TO w_kschl-option,
          c_bx11 TO w_kschl-low.
    APPEND w_kschl TO r_kschl.

    SELECT * 
      FROM komv 
     WHERE kschl IN r_kschl.

 

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

This site uses Akismet to reduce spam. Learn how your comment data is processed.