<pre>function countUnsharedFields  put 0 into counter  repeat with x = 1 to the number of flds    if not the sharedText of fld x then add 1 to counter  end repeat  return counterend countUnsharedFields</pre>