Dif resultado en tiempo de ejecución y en entorno de d
<div>No encuentro la razon pero me esta pasando lo siguiente:</div>
<div> </div>
<div>Tengo un formulario con un grid y un textbox.</div>
<div>En el textbox pongo un fecha y se va a fijar en dos bases si en ese dia
encuentra datos, en el caso de encontrar en las dos bases llena el grid, en el
caso de no encontrar en la segunda base llena el grid con los datos de la
primera y me avisa que la segunda base esta desactualizada.</div>
<div> </div>
<div>Ahora bien, teniendo las dos bases con los mismos datos, la unica
diferencia entre ellas es que la segunda tiene indice y la primera no.</div>
<div>Si pruebo el sistema desde el entorno de desarrollo funciona bien, pero
cuando compilo y ejecuto no busca bien por la fecha en la segunda base.</div>
<div> </div>
<div>Evidentemente es algo con la fecha ya que si busco en la segunda tabla por
otro dato de ese dia como por ejemplo en la parte comentada al registro lo
encuentra.....</div>
<div> </div>
<div>Codigo:</div>
<div> </div>
<div>SELECT aldia
SET FILTER TO
LOCATE FOR
fecha=thisform.fecha.Value</div>
<div>IF FOUND()
SELECT aldiario
GO TOP
LOCATE FOR fecha=vfecha AND
nmixer=thisform.vmixer.value
&&LOCATE FOR tarde=2190.00&&
AND nformula="5"
MESSAGEBOX(fecha)
IF NOT
FOUND()
thisform.fecha.enabled=.f.
thisform.nmixer.Enabled=.f.
MESSAGEBOX("Hay
información generada para este mixer de esta fecha que no fué
guardada",64,thisform.Caption)
ENDIF
ELSE
hubo_cambios=.f.
ENDIF
</div>
<div>
</div>
<div>
</div>
<div>Tengo el mismo codigo en otro formulario de otro sistema y funciona bien con la misma base, pero si copio el formulario a este proyecto no funciona.............???
</div>
<div> </div>
<div>Gracias.
--
Diego </div>
<div> </div>
<div>Tengo un formulario con un grid y un textbox.</div>
<div>En el textbox pongo un fecha y se va a fijar en dos bases si en ese dia
encuentra datos, en el caso de encontrar en las dos bases llena el grid, en el
caso de no encontrar en la segunda base llena el grid con los datos de la
primera y me avisa que la segunda base esta desactualizada.</div>
<div> </div>
<div>Ahora bien, teniendo las dos bases con los mismos datos, la unica
diferencia entre ellas es que la segunda tiene indice y la primera no.</div>
<div>Si pruebo el sistema desde el entorno de desarrollo funciona bien, pero
cuando compilo y ejecuto no busca bien por la fecha en la segunda base.</div>
<div> </div>
<div>Evidentemente es algo con la fecha ya que si busco en la segunda tabla por
otro dato de ese dia como por ejemplo en la parte comentada al registro lo
encuentra.....</div>
<div> </div>
<div>Codigo:</div>
<div> </div>
<div>SELECT aldia
SET FILTER TO
LOCATE FOR
fecha=thisform.fecha.Value</div>
<div>IF FOUND()
SELECT aldiario
GO TOP
LOCATE FOR fecha=vfecha AND
nmixer=thisform.vmixer.value
&&LOCATE FOR tarde=2190.00&&
AND nformula="5"
MESSAGEBOX(fecha)
IF NOT
FOUND()
thisform.fecha.enabled=.f.
thisform.nmixer.Enabled=.f.
MESSAGEBOX("Hay
información generada para este mixer de esta fecha que no fué
guardada",64,thisform.Caption)
ENDIF
ELSE
hubo_cambios=.f.
ENDIF
</div>
<div>
</div>
<div>
</div>
<div>Tengo el mismo codigo en otro formulario de otro sistema y funciona bien con la misma base, pero si copio el formulario a este proyecto no funciona.............???
</div>
<div> </div>
<div>Gracias.
--
Diego </div>
1 respuesta
Respuesta de Víctor Arturo Mercado Fernández
1