(form "00604" (position 10 2) (size 60 23)
  (help "00604_TIP_0")
  (heading "DEFINE THE TYPE CODES")
  (label (position  3  3) (text "Database"))
  (label (position  3  5) (text "Range of Type Strings"))
  (label (position  3 18) (text "Date from"))
  (label (position  34 18) (text "Date to"))
  (field "database_name" (position 20 3) (display_length 18)
    (background) (input disallowed))
  (field "string_range" (position 20 5) (display_length 35) (input allowed)
    (max_length 40)
    (help "00604_TIP_1"))
  (scroll_block "types" (position  3  8) (size 52  10)
     (extra  0  1)
     (scroll_size 52 200)
     (repeat interactive (grow  0  1) (instances  1 (min  1) (max 200)))
    (main)
    (top
      (label (position  1  0) (text "TYPE"))
      (label (position  11 0) (text "STRING"))
      (label (position  21 0) (text "CLASS"))
      (label (position  31 0) (text "T_DESCR")))
    (main
      (field "type" (position  1  0) (display_length 7) (input allowed)
        (translate none) (null allowed) (max_length 9)
        (help "00604_TIP_2"))
      (field "string" (position  11  0) (display_length 7) (input allowed)
        (translate none) (null allowed) (max_length 9))
      (field "class" (position  21  0) (display_length 7) (input allowed)
        (translate none) (null allowed) (max_length 9))
      (field "desc" (position  31  0) (display_length 20) (input allowed)
        (translate none) (null allowed) (max_length 60)))
  )

  (field "date_from" (position 14 18) (display_length 15) (input allowed)
    (max_length 15)
    (help "00604_TIP_3"))

  (field "date_to" (position 44 18) (display_length 15) (input allowed)
    (max_length 15)
    (help "00604_TIP_4"))

  (label (position  3 20) (text "Minimum Y"))
  (field "minimum_y" (position 14 20) (display_length 15) (input allowed)
    (max_length 15) (format real_8) (null allowed)
    (help "00604_TIP_5"))
  
  (label (position  3 21) (text "Maximum Y"))
  (field "maximum_y" (position 14 21) (display_length 15) (input allowed)
    (max_length 15) (format real_8) (null allowed)
    (help (field "minimum_y")))
  
  (label (position  34 20) (text "Minimum X"))
  (field "minimum_x" (position 44 20) (display_length 15) (input allowed)
    (max_length 15) (format real_8) (null allowed)
    (help (field "minimum_y")))
  
  (label (position  34 21) (text "Maximum X"))
  (field "maximum_x" (position 44 21) (display_length 15) (input allowed)
    (max_length 15) (format real_8) (null allowed)
    (help (field "minimum_y")))
  
  (default_buttons)
)