\ Finding the index of a MemoPad category:

needs newmemo 
needs zstrings 
 
: test 
  OpenMemoDB 
  z" Business" drop >abs MemoDBR CategoryFind . 
  CloseMemoDB 
;