(form "00137" (size 50 18)
  (help "00137_TIP_0")
  (heading "Read grid data from string file")
  (label (position  5  3) (text "Define the string file"))
  (label (position  5  4) (text "Location"))
  (label (position  5  5) (text "ID number"))
  (label (position  5  7) (text "Define operations to perform during load"))
  (label (position  5  8) (text "Number of operations required"))
  (label (position  5 10) (text "Operation"))
  (label (position 17 10) (text "Field"))
  (label (position 25 10) (text "Operator"))
  (label (position  8 11) (text "1"))
  (label (position  8 12) (text "2"))
  (label (position  8 13) (text "3"))
  (label (position  8 14) (text "4"))
  (label (position  8 15) (text "5"))
  (label (position  8 16) (text "6"))
  (field "iloc" (position 15  4) (display_length 26) (input allowed)
    (null allowed) (max_length 26)
    (file (link "rid") (extension "*.str"))
    (help "00137_TIP_1"))
  (field "rid" (position 15  5) (display_length 16) (input allowed)
    (translate upper) (format real_8) (null disallowed) (max_length 16)
    (help (field "iloc")))
  (field "nop" (position 35  8) (display_length  1) (input allowed)
    (low_bound 1) (high_bound 6)
    (format integer_4) (null disallowed) (max_length 1)
    (help "00137_TIP_2"))
  (field "opfield1" (position 17 11) (display_length  4) (input allowed)
    (translate upper) (format string_field) (null disallowed) (max_length 4)
    (help "00137_TIP_3"))
  (field "op1" (position 28 11) (display_length  1) (input allowed)
    (value_in "+" "=" "-" "*" "/" "L" "" "H")
    (translate upper) (null allowed) (max_length 1)
    (help "00137_TIP_4"))
  (field "opfield2" (position 17 12) (display_length  4) (input allowed)
    (translate upper) (format string_field) (null disallowed) (max_length 4)
    (help (field "opfield1")))
  (field "op2" (position 28 12) (display_length  1) (input allowed)
    (value_in "+" "=" "-" "*" "/" "L" "" "H")
    (translate upper) (null allowed) (max_length 1)
    (help (field "op1")))
  (field "opfield3" (position 17 13) (display_length  4) (input allowed)
    (translate upper) (format string_field) (null disallowed) (max_length 4)
    (help (field "opfield1")))
  (field "op3" (position 28 13) (display_length  1) (input allowed)
    (value_in "+" "=" "-" "*" "/" "L" "" "H")
    (translate upper) (null allowed) (max_length 1)
    (help (field "op1")))
  (field "opfield4" (position 17 14) (display_length  4) (input allowed)
    (translate upper) (format string_field) (null disallowed) (max_length 4)
    (help (field "opfield1")))
  (field "op4" (position 28 14) (display_length  1) (input allowed)
    (value_in "+" "=" "-" "*" "/" "L" "" "H")
    (translate upper) (null allowed) (max_length 1)
    (help (field "op1")))
  (field "opfield5" (position 17 15) (display_length  4) (input allowed)
    (translate upper) (format string_field) (null disallowed) (max_length 4)
    (help (field "opfield1")))
  (field "op5" (position 28 15) (display_length  1) (input allowed)
    (value_in "+" "=" "-" "*" "/" "L" "" "H")
    (translate upper) (null allowed) (max_length 1)
    (help (field "op1")))
  (field "opfield6" (position 17 16) (display_length  4) (input allowed)
    (translate upper) (format string_field) (null disallowed) (max_length 4)
    (help (field "opfield1")))
  (field "op6" (position 28 16) (display_length  1) (input allowed)
    (value_in "+" "=" "-" "*" "/" "L" "" "H")
    (translate upper) (null allowed) (max_length 1)
    (help (field "op1")))
  (default_buttons)
)