IF-Abfragen

Code: Alles auswählen.

DATA: rt_afdia  TYPE RANGE OF ndia-afdia,   "Tabelle oder Tabellenrumpf oder Tabellekoerper
          rs_afdia   LIKE LINE OF rt_afdia,                   " Workarea fuer die obige Tabelle (auch Kopfzeile bei anderen Tabelle genannt)  
          rt_endia  TYPE RANGE OF ndia-endia,
          rs_endia   LIKE LINE OF rt_endia, 
          rt_fhdia  TYPE RANGE OF ndia-fhdia,
          rs_fhdia  LIKE LINE OF rt_fhdia  , 
          rt_khdia  TYPE RANGE OF ndia-khdia,
          rs_khdia  LIKE LINE OF rt_khdia  , 
          rt_opdia  TYPE RANGE OF ndia-opdia
          rs_opdia  LIKE LINE OF rt_opdia  .

UND ersetze: 
     
     CLEAR RT_AFDIA
     IF afdia IS NOT INITIAL.         " CHECKBOX ist angekreuzt
          rs_afdia-sign    = 'I'.
          rs_afdia-option  = 'EQ'.
          rs_afdia-low     = abap_true. "'X"
          CLEAR rs_afdia_high.
          append rs_afdia to rt_afdia.
    else.