@verb #210:"count_entries" this none this rxdo #60
@program #210:"count_entries" this none this
count = 0
for p in (properties(this))
  if (p[1] == " " && p != " ")
    count = count + 1
  endif
  $command_utils:suspend_if_needed()
endfor
return count
"Last modified by Dax (#789) on Sat May 21 02:07:44 2005 MDT."
.