<pre>on showAllFields  ---  if the editBkgnd then    if the number of flds = 0 then return "Nothing to show"    repeat with x = 1 to the number of flds      show fld x    end repeat  else    if the number of cd flds = 0 then return "Nothing to show"    repeat with x = 1 to the number of cd flds      show cd fld x    end repeat	  end if  ---end showAllFields</pre>