>readonly = .t. >RecordSourceType = 1- alias >>
>SELECT C.nombrecomprador AS comprador, C.nombreyegua AS yegua,; > C.nombrecriadero AS criadero, C.hijo AS hijo, C.valorsemen AS valor,; > C.colorhijo AS color, C.municipio AS municipio; > FROM fc!ventasemen C; > WHERE C.identificación = thisform.pageframe1.page1.txtIdentificacion.Value; > into cursor datosy > > thisform.pageframe1.page3.grid1.RecordSource ="datosy" > thisform.pageframe1.page3.grid1.refresh >>