DEFINE lt_farb_menu_hh
   LOCAL aufloes
   LOCAL hoehe_Zeile_mac
   INQ_ENV (10)
     IF (((X_OF (INQ 102)) > 900) AND ((X_OF (INQ 102)) < 1100))
         LET aufloes 1024      
         LET hoehe_Zeile_mac 17
       ELSE_IF    
         (((X_OF (INQ 102)) > 1200) AND ((X_OF (INQ 102)) < 1350))
         LET aufloes 1280
         LET hoehe_Zeile_mac 24
       ELSE
     END_IF
 
 
 TABLE_LAYOUT 'lt_farb_menu_hh_tab'
               WHITE BLACK
               rows 10
               frame_width 2 {Rahmen}
               horizontal 
               white dotted
               vertical white dotted
               
               TITLE_LAYOUT
               hoehe_Zeile_mac  '+|  Farbe   |x'     { 1}
               hoehe_Zeile_mac  '  schwarz     '     { 2}
               hoehe_Zeile_mac  '  weiss       '     { 3}
               hoehe_Zeile_mac  '  rot         '     { 4}
               hoehe_Zeile_mac  '  gelb        '     { 5}
               hoehe_Zeile_mac  '  grün        '     { 6}
               hoehe_Zeile_mac  '  cyan        '     { 7}
               hoehe_Zeile_mac  '  magenta     '     { 8}
               hoehe_Zeile_mac  '  blau        '     { 9}
               hoehe_Zeile_mac  '  RGB-Farben  '     {10}
             END
 END
 
 
 TABLE_TITLE 'lt_farb_menu_hh_tab'
     Colo0 Bcol5 CENTER Menu_move_icon     'TABLE_STATUS "lt_farb_menu_hh_tab" MOVE'        1 1
     Colo0 Bcol5 CENTER '  FARBE       '                                                    1 2
     Colo0 Bcol5 CENTER Menu_delete_icon   'SHOW_TABLE OFF "lt_farb_menu_hh_tab"'           1 3
     white black        '   SCHWARZ    '   '"black" confirm'                                2 1
     black white        '    WEISS     '   '"white" confirm'                                3 1
     white red          '     ROT      '   '"red" confirm'                                  4 1
     black yellow       '    GELB      '   '"yellow" confirm'                               5 1
     black green        '    GRÛN      '   '"green" confirm'                                6 1
     black cyan         '    CYAN      '   '"cyan" confirm'                                 7 1
     white magenta      '   MAGENTA    '   '"magenta" confirm'                              8 1
     white blue         '    BLAU      '   '"blue" confirm'                                 9 1
     white              '  RGB-Farben  '   '"RGB" confirm'                                 10 1
     
     
   END
 
 TABLE_COLUMN 'lt_farb_menu_hh_tab'
 
 END
  
 END_DEFINE
 
 lt_farb_menu_hh SHOW_TABLE ON 'lt_farb_menu_hh_tab
 
 MOVE_TABLE 'lt_farb_menu_hh_tab'   0,0 100,0 end
 
 SHOW_TABLE OFF 'lt_farb_menu_hh_tab
  
 
{========================================================================================================}  
 
  
 DEFINE farbumstellung

   LOCAL LT_ZIELFARBE
   LOCAL LT_ZIELFARBE_RGB
   LOCAL LT_ZIELLINIENTYP
   LOCAL LT_AUSWAHL




lt_farb_menu_hh SHOW_TABLE ON 'lt_farb_menu_hh_tab'

READ STRING "Bitte stellen Sie die gewÏnschte Farbe ein!"  LT_ZIELFARBE


  IF (LT_ZIELFARBE = 'RGB')
  
  LET LT_ZIELFARBE (RGB_hh LT_ZIELFARBE)
     CHANGE_COLOR RGB_COLOR (VAL LT_ZIELFARBE) SELECT GLOBAL INFOS "TAUSCH" CONFIRM END
    ELSE
     CHANGE_COLOR (VAL LT_ZIELFARBE) SELECT GLOBAL INFOS "TAUSCH" CONFIRM END
     NEW_SCREEN
  END_IF


SHOW_TABLE OFF 'lt_farb_menu_hh_tab' 



   READ "Bitte wählen Sie den zu ändernden Linientyp aus!" LT_AUSWAHL
   INQ_SELECTED_ELEM SELECT LT_AUSWAHL CONFIRM END
         
   LET LT_AUSWAHL (INQ 308)      
      
      
   ADD_ELEM_INFO "TAUSCH" SELECT GLOBAL RGB_COLOR (INQ 201) AND (VAL LT_AUSWAHL) CONFIRM END

   
   CHANGE_ELEM_INFO "TAUSCH" "" SELECT GLOBAL INFOS "TAUSCH" CONFIRM END

   
 END_DEFINE
 
 
{========================================================================================================} 
  
  
  DEFINE RGB_hh
   
   PARAMETER LT_ZIELFARBE
   LOCAL CCC
         
   Sm_color_rgb
   
   READ QUALIFIER "Bitte stellen Sie den gewÏnschten RGB-Farbtyp ein beenden Sie mit 'BESTØT'!" CCC
    INQ_ENV 3
     LET RGB_FARBE (INQ 201)
     
     
     LET FARBE RGB_FARBE
   
   
  END_DEFINE