code: def getAnalysisCategories(self):
          
          bsc = getToolByName(self, 'bika_setup_catalog')
          cats = bsc(portal_type='AnalysisCategory', is_active=True)
          items = [(o.UID, o.Title) for o in cats]
          o = self.getCategory()
          if o and o.UID() not in [i[0] for i in items]:
              items.append((o.UID(), o.Title()))
          items.sort(lambda x, y: cmp(x[1], y[1]))
          return DisplayList(list(items))
docs: A vocabulary listing available (and activated) categories.