Cordial saludo,
les agradezco de antemano por su colaboración sucede que
al inicializar los grid me aparecen los servicios y los vales
registrados
esto va en el init y funciona bien
fech=DATE()
SELECT iditem as Servicio,fecha as Fecha,hora as Hora,ALLTRIM(nomusuario) as Usuario,;
alltrim(origen) as Origen,celular,idcentrocosto as CentroCosto FROM items WHERE idusuario !=0 AND fecha=fech ORDER BY hora INTO CURSOR xactual2
thisformset.form1.grdservicios.RecordSourceType= 2
thisformset.form1.grdservicios.RecordSource="xactual2"
SELECT vales.idvale as Vale , ALLTRIM(conductores.nomconduc) + " "+ ALLTRIM(conductores.apeconduc) as Conductor, vales.fechavale as Fecha,vales.hora as Hora,ALLTRIM(valesusua.origendesti) as Destino, vales.idcentrocosto as CentroCosto,usuarios.nomusuario as Usuario,usuarios.celular;
FROM vales,conductores,valesusua,usuarios ;
WHERE vales.fechavale=fech and vales.idconductor=conductores.idconductor AND valesusua.idvale= vales.idvale AND valesusua.idusuario=usuarios.idusuario ORDER BY vales.hora INTO CURSOR prueba2
thisformset.form1.grdvales.RecordSourceType= 2
thisformset.form1.grdvales.RecordSource="prueba2"
pero cuando cambio valores en el txtrevision y en el command que utilizo para consultar los grids me quedan vacios
fech=thisform.txtRevision._Value
SELECT iditem as Servicio,fecha as Fecha,hora as Hora,ALLTRIM(nomusuario) as Usuario,;
alltrim(origen) as Origen,celular,idcentrocosto as CentroCosto FROM items WHERE idusuario !=0 AND fecha=fech ORDER BY hora INTO CURSOR xactual23
thisformset.form1.grdservicios.RecordSourceType= 2
thisformset.form1.grdservicios.RecordSource="xactual23"
SELECT vales.idvale as Vale , ALLTRIM(conductores.nomconduc) + " "+ ALLTRIM(conductores.apeconduc) as Conductor, ;
vales.fechavale as Fecha,vales.hora as Hora,ALLTRIM(valesusua.origendesti) as Destino, ;
vales.idcentrocosto as CentroCosto,usuarios.nomusuario as Usuario,usuarios.celular;
FROM vales,conductores,valesusua,usuarios ;
WHERE vales.idconductor=conductores.idconductor AND valesusua.idvale= vales.idvale AND vales.fechavale=fech;
AND valesusua.idusuario=usuarios.idusuario ORDER BY vales.hora INTO CURSOR prueba23
thisformset.form1.grdvales.RecordSourceType= 2
thisformset.form1.grdvales.RecordSource="prueba23"