>m.mival=thisform.pageframe1.page1.txtid.value >thisform.pageframe1.page1.combo1.RowSource = "SELECT cv.nombre FROM cv WHERE cv.padre = "+transform(m.mival)+" AND cv.genero = 'Caballo' into cursor padre" >thisform.pageframe1.page1.combo1.Requery >thisform.pageframe1.page1.combo2.RowSource = "SELECT cv.nombre FROM cv WHERE cv.padre = "+transform(m.mival)+" AND cv.genero = 'Yegua' into cursor madre" >thisform.pageframe1.page1.combo1.displayvalue = ALLTRIM(padre.nombre) >thisform.pageframe1.page1.combo2.displayvalue = ALLTRIM(madre.nombre) >>