(collect-umlisp-query (mrconso (cui lat ts lui stt sui ispref aui saui scui sdui sab tty code str
srl suppress cvf kpfeng kcuisui kcuilui kcuilrl
kluilrl ksuilrl) srl sui sui
+ :distinct t
:filter (if sab (concatenate 'string "SAB='" sab "'") nil))
(make-instance 'uconso :cui cui :lat lat :ts ts :lui lui :stt stt :sui sui :ispref ispref
:aui aui :saui saui :scui scui :sdui sdui :sab sab :tty tty :code code