(form "00683" (size 78 18)  
  (heading "EXPAND A DTM TO A NEW BOUNDARY")
  (label (position  1  2) (text "INPUT DTM:"))
  (label (position  1  3) (text "Location"))
  (label (position  1  4) (text "Id Number"))
  (label (position  40  2) (text "NEW BOUNDARY STRING:"))
  (label (position  40  3) (text "Location"))
  (label (position  40  4) (text "Id Number"))
  (label (position  40  5) (text "String No."))
  (label (position  40  6) (text "Segment No."))

  (label (position  33  8) (text "Expansion method"))

  (label (position  1  8) (text "BREAKLINES:"))

  (label (position  1  9) (text " Strings to act as break lines"))

  (field "location" (position 12  3) (display_length 26) (input allowed)
    (null allowed) (max_length 26)
    (file (link "id") (extension "*.dtm"))
    )
  (field "id" (position 12  4) (display_length 16) (input allowed)
    (translate upper) (format real_8) (null disallowed) (max_length 16)
    )
  (field "b_location" (position 50  3) (display_length 26) (input allowed)
    (null allowed) (max_length 26)
    (file (link "b_id") (extension "*.str"))
    )
  (field "b_id" (position 50  4) (display_length 16) (input allowed)
    (translate upper) (format real_8) (null disallowed) (max_length 16)
    )
  (field "string_no" (position 50  5) (display_length 16) (input allowed)
    (translate upper) (format integer_4) (null disallowed) (max_length 16)
    (default "1")
    )

  (field "seg_no" (position 50  6) (display_length 16) (input allowed)
    (translate upper) (format integer_4) (null disallowed) (max_length 16)
    (default "1")
    )

  (field "method" (position 48  8) (display_length 18) (input allowed)
     (value_in "BOUNDARY DIP" "FIXED DIP" "SLOPE STRINGS" "PLANE FIT")
    (default "BOUNDARY DIP")
    (translate upper) (null disallowed) (max_length 18)
    )

   (field "smooth factor" (position  33  9) (display_length 18)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (dependency (value "method") == "BOUNDARY DIP")
    (value_in "Smooth factor")
    (default "Smooth factor"))
  (field "smooth_f" (position 48  9) (display_length 5) (input allowed)
    (dependency (value "method") == "BOUNDARY DIP")
    (translate upper) (format integer_4) (low_bound 0) (high_bound 50)
    (null disallowed) (max_length 5)
    (default "10")
    )

   (field "fixed bearing" (position  33  9) (display_length 18)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (dependency (value "method") == "FIXED DIP")
    (value_in "Bearing")
    (default "Bearing"))
  (field "f_bearing" (position 48  9) (display_length 5) (input allowed)
    (dependency (value "method") == "FIXED DIP")
    (translate upper) (format real_8) (low_bound 0.0) (high_bound 360.0)
    (null disallowed) (max_length 5)
    (default "0.0")
    )

   (field "fixed dip" (position  33  10) (display_length 18)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (dependency (value "method") == "FIXED DIP")
    (value_in "Dip")
    (default "Dip"))
  (field "f_dip" (position 48  10) (display_length 5) (input allowed)
    (dependency (value "method") == "FIXED DIP")
    (translate upper) (format real_8) (low_bound -89.1) (high_bound 89.1)
    (null disallowed) (max_length 5)
    (default "0.0")
    )

  (field "slope location" (position  33  9) (display_length 18)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (dependency (value "method") == "SLOPE STRINGS")
    (value_in "Location")
    (default "Location"))
  (field "s_location" (position 48  9) (display_length 26) (input allowed)
    (dependency (value "method") == "SLOPE STRINGS")
    (max_length 26) (file (link "s_id") (extension "*.str"))
    )    

   (field "slope id" (position  33  10) (display_length 18)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (dependency (value "method") == "SLOPE STRINGS")
    (value_in "Id Number")
    (default "Id Number"))
  (field "s_id" (position 48  10) (display_length 16) (input allowed)
    (dependency (value "method") == "SLOPE STRINGS")
    (translate upper) (max_length 16) (format real_8)
    )


  (field "break" (position 24  9) (display_length  1) (input allowed)
	    (value_in "Y" "N")
    (default "Y")
    (translate upper) (null allowed) (max_length 1)
    )

  (field "any_spot_heights" (position  1  10) (display_length 31)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (default "Any spot height strings")
    (dependency (value "break") == "Y")
    (value_in "Any spot height strings"))
  (field "anyspots" (position 24  10) (display_length  1) (input allowed)
    (value_in "Y" "N")
    (default "N")
    (translate upper) (null allowed) (max_length 1)
    (dependency (value "break") == "Y")
    )

  (field "spot height range" (position  1  11) (display_length 28)
    (foreground (user_option "form_foreground"))
    (background) (input disallowed)
    (dependency (value "anyspots") == "Y")
    (value_in "Spot height string range")
    (default "Spot height string range"))
 (field "spotrng" (position 24  11) (display_length 15) (input allowed)
    (dependency (value "anyspots") == "Y")
    (format range) (null allowed) (max_length 32)
    )
  (label (position  1  13) (text "OUTPUT DTM:"))
  (label (position  1  14) (text "Location"))
  (label (position  1  15) (text "Id Number"))
  (field "n_location" (position 12  14) (display_length 26) (input allowed)
    (null allowed) (max_length 26)
    (file (link "n_id") (extension "*.dtm"))
    )
  (field "n_id" (position 12  15) (display_length 16) (input allowed)
    (translate upper) (format real_8) (null disallowed) (max_length 16)
    )
  (default_buttons)
)
