(form "00655" (size 60 9)
  (heading "RANGE DEFINITION")

  (label (position  2 3) 
  (text "Do you wish to triangulate a string range or a segment range?"))
   (field "str_seg" (position 51  3) (display_length  3) (input allowed)
    (value_in "SEG" "STR")
    (default "STR") (translate upper) (null disallowed) (max_length 3)
    )
  
   (field "str_no_label" 
    (position 2  5) 
    (display_length  25) 
    (foreground (user_option "form_foreground"))
    (background (user_option "form_background"))
    (input disallowed)
    (value_in "Enter string number")
    (browser none)
    (default "Enter string number")
    (dependency (value "str_seg") == "SEG") 
  ) 
  (field "str_no" (position 25  5) (display_length 8) (input allowed)
    (low_bound 1) (high_bound 32000)
    (default "1") (translate lower) (null disallowed) (max_length 32)
    (dependency (value "str_seg") == "SEG")
  )
  (field "seg_rg_label" 
    (position 2  6) 
    (display_length  30) 
    (foreground (user_option "form_foreground"))
    (background (user_option "form_background"))
    (input disallowed)
    (value_in "Segment range")
    (browser none)
    (default "Segment range")
    (dependency (value "str_seg") == "SEG") 
  ) 
  (field "seg_rg" (position 25  6) (display_length  25) (input allowed)
   (translate upper) (null allowed) (max_length 25) (format range)
    (dependency (value "str_seg") == "SEG")
   )
  (field "seg_no_label" 
    (position 2  5) 
    (display_length  25) 
    (foreground (user_option "form_foreground"))
    (background (user_option "form_background"))
    (input disallowed)
    (value_in "Enter segment number")
    (browser none)
    (default "Enter segment number")
    (dependency (value "str_seg") == "STR") 
  ) 
  (field "seg_no" (position 25  5) (display_length 8) (input allowed)
    (low_bound 1) (high_bound 32000)
    (default "1") (translate lower) (null disallowed) (max_length 32)
    (dependency (value "str_seg") == "STR")
  )
  (field "str_rg_label" 
    (position 2  6) 
    (display_length  30) 
    (foreground (user_option "form_foreground"))
    (background (user_option "form_background"))
    (input disallowed)
    (value_in "String range")
    (browser none)
    (default "String range")
    (dependency (value "str_seg") == "STR") 
  ) 
  (field "str_rg" (position 25  6) (display_length  25) (input allowed)
   (translate upper) (null allowed) (max_length 25) (format range)
    (dependency (value "str_seg") == "STR")
   )

 (default_buttons)
)