(form "00040" (size 46 10)
    (help "00040_TIP_0")
  (heading "CLASSIFY STRINGS BY A SELECTED FIELD")
  (label (position  2  3) (text "Classification group number"))
  (label (position  2  4) (text "Output string"))
  (label (position  2  5) (text "String field"))
  (label (position  2  7) (text "From value"))
  (label (position  2  8) (text "To value"))
  (field "iclass" (position 28  3) (display_length  3) (input disallowed))
  (field "istring" (position 17  4) (display_length  3) (input disallowed))
  (field "strfield" (position 17  5) (display_length  3) (input disallowed))
  (field "from" (position 14  7) (display_length 16) (input allowed)
    (translate upper) (format real_8) (null disallowed) (max_length 16))
  (field "to" (position 14  8) (display_length 16) (input allowed)
    (translate upper) (format real_8) (null disallowed) (max_length 16))
  (default_buttons)
)