S beaHTMLURL(BEA o) {
  ret o == null ?: beaMod().baseLink + "/beaHTML/" + o.id;
}

BEA beaGetOpt(long id) {
  ret getConceptOpt BEA(id);
}

static Cl<BEA> beaDeleteType(S type) {
  ret deleteConceptsWhereIC BEA(+type);
}

int beaCount(S type) {
  ret countConceptsWhereCI BEAObject(+type);
}
  
// first param can be type
BEA beaNew(O... _) {
  _ = prependParamIfOddCount("type", _);
  ret cnew BEA(_);
}