grid1

camilo
17 de Octubre del 2003
hola como estan todos necesito un fa como hago para:
estoy en un grid y escojo atraves del check los datos que me interesan pero a medida q avanzo necesito un filtro para ir escojiendo en un segundo formulario(otro grid)
como hago para que la informacion me salga en el grid
aqui esta el codigo pero tampoco me reconce el additem no se que estoy haciendo mal por fa una ayudita ya que estoy en parciales y necesito presentar esto.
aqui va el codigo
CRLF = CHR(13)+CHR(10)
TAB = CHR(9)
LOCAL lcData
*
select tmp_fusion
go top
locate for incluir1
if found()
uuCondip = 'programa in (select programa from tmp_fusion where incluir1)'

* select * ;
*from tmp_fusion;
*where incluir1=.T.



SELECT COUNT (programa) AS FILAS FROM ('tmp_fusion') where incluir1=.T. INTO ARRAY R
NUM=R

SELECT*FROM ('tmp_fusion')INTO ARRAY R
*THISFORMSET.Funiversidad.grid1.ROWS=0
THISFORMSET.funiversidad.grid1.column1.header.text1.additem=("apellido")
I=1

DO WHILE (I<=NUM)
THISFORMSET.Funiversidad.grid1.column1.header.text1.additem=("R[I,3]")
I=I+1
ENDDO

thisform.visible=0
thisformset.funiversidad.visible=1
*thisformset.funiversidad.grid1.recordsource="tmp_fusion" where incluir1=.T.
* thisformset.funiversidad.grid1.column1.controlsource="tmp_fusion.apellido"
* thisformset.funiversidad.grid1.column2.controlsource="tmp_fusion.incluir2"



else
uuCondip = ''
*wait wind 'NO ha definido el(los) informacion a buscar' at 15,15 time 5
* = 1
*return
endif
*
thanks