>#define HEADER_LOC "Selected items:" > >ACTIVATE SCREEN >? HEADER_LOC >? "---------------" >FOR nCnt = 1 to ThisForm.container1.list2.ListCount > ? SPACE(5) + ThisForm.container1.list2.List(nCnt) >ddd= ThisForm.container1.list2.List(nCnt) >ENDFOR > > SELECT code, descr; > FROM student; > where code = ddd ; > into cursor csrmycursor >