select (dbname) for tg=1 to tagcount() insert into dbftags values ; (dbname,tag(tg,dbname),; key(tg,dbname),IIF(EMPTY(ALLTRIM(sys(2021,tg,dbname))),; "",ALLTRIM(sys(2021,tg,dbname))),; descending(tg,dbname),unique(tg,dbname)) endfor