[[ SetWidgetValue fieldname { conferencename journal course } SELECTED set optionList { Aa-Ah Ai-Ao Ap-Ar As-Az Ba-Bo Bp-Bz Ca-Ch Ci-Cl Cm-Cz D Ea-En Eo-Ez F Ga-Ge Gf-Gz H I Ja-Jl Jm-Jz K-L Ma-Me Mf-Mz N-O Pa-Pe Pf-Pk Pl-Pz Ra-Rd Re-Re Rf-Rz Sa-Sl Sm-Sz Ta-Tl Tm-Tz U-Z } SetWidgetValue fieldvaluerange $optionList SELECTED foreach option $optionList { lappend optionList2 "