Report ZZ_##_FLUEGE_FORMAT

REPORT  ZZ_##_FLUEGE_FORMAT.
 
DATA it_fluege TYPE TABLE OF spfli.
DATA wa_flug TYPE spfli.
 
START-OF-SELECTION.
 
SELECT * FROM spfli INTO TABLE it_fluege.
 
FORMAT COLOR = 1.
WRITE: /'  Verbindung', at 16 'Abflugsort', at 37(20) 'Ankunftsort'.
FORMAT COLOR = 0.
SKIP.
WRITE /(56) sy-uline.
 
LOOP AT it_fluege INTO wa_flug.
  FORMAT COLOR = 2.
  WRITE: / sy-vline, wa_flug-carrid,
           at 14 sy-vline, wa_flug-cityfrom,
           at 35 sy-vline, wa_flug-cityto,
           at 56 sy-vline.
  HIDE wa_flug.
  WRITE: / sy-vline, wa_flug-connid UNDER wa_flug-carrid,
           at 14 sy-vline, wa_flug-countryfr UNDER wa_flug-cityfrom,
           at 35 sy-vline, wa_flug-countryto UNDER wa_flug-cityto,
           at 56 sy-vline.
  HIDE wa_flug.
  WRITE /(56) sy-uline.
  HIDE wa_flug.
ENDLOOP.
 
AT LINE-SELECTION.
  IF ( sy-lsind = 1 ) AND ( sy-lilli > 3 ).
    FORMAT COLOR = 1.
    WRITE: at  3     'Abflugszeit',
           at 18     'Ankunftszeit',
           at 33     'Flugzeit',
           at 48(20) 'Entfernung'.
    FORMAT COLOR = 0.
    SKIP.
    WRITE /(67) sy-uline.
    FORMAT COLOR = 2.
    WRITE: / sy-vline, wa_flug-deptime,
             at 16 sy-vline, wa_flug-arrtime,
             at 31 sy-vline, wa_flug-fltime,
             at 46 sy-vline, wa_flug-distance, wa_flug-distid,
             at 67 sy-vline.
    WRITE /(67) sy-uline.
  ENDIF.