(form "70021" (size 48 7)

  (help "70021_TIP_0")

  (heading "SAVE DESIGN TO A STRING FILE" )

  (label (position  2  3) (text "Location"))
  (label (position  2  4) (text "Id Number"))

  (field "location" (position 12  3) (display_length 26)
    (input allowed)
    (null allowed)
    (max_length 26)
    (file output (link "rid" "ftype") (extension "*.str"))
    (help "70021_TIP_1")
  )

  (field "rid" (position 12  4) (display_length 16)
    (input allowed)
    (translate upper)
    (format real_8)
    (null disallowed)
    (max_length 16)
    (help "70021_TIP_2")
  )

  (field "ftype" (position 30  4) (display_length 4)
    (foreground (user_option "form_background"))
    (background (user_option "form_background"))
    (max_length 16)
  )

  (default_buttons)
)