Página 1 de 1
Problema con locate MySQL!!!
Publicado: Lun Dic 14, 2009 4:44 pm
por Diego Ferreira
Saludos cuando ejecuto el comando ::oMySQL:Locate( "Prd_Producto = '" +
cProducto + "'" ) aveces lo encuentra y aveces me trae otro que nada
tiene que ver ! ah alguien le ah pasado esto ?
Problema con locate MySQL!!!
Publicado: Lun Dic 14, 2009 6:56 pm
por jfgimenez
Diego,
> Saludos cuando ejecuto el comando ::oMySQL:Locate( "Prd_Producto = '" +
> cProducto + "'" ) aveces lo encuentra y aveces me trae otro que nada tiene
> que ver ! ah alguien le ah pasado esto ?
Yo he trabajado con MySQL y no me ha pasado. Habría que ver exactamente qué,
cómo y cuando ocurre. Envíanos un ejemplo que podamos reproducir.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
Problema con locate MySQL!!!
Publicado: Mar Dic 15, 2009 7:16 pm
por Gabriel Ornelas
Diego Ferreira escribió:
> Saludos cuando ejecuto el comando ::oMySQL:Locate( "Prd_Producto = '" +
> cProducto + "'" ) aveces lo encuentra y aveces me trae otro que nada
> tiene que ver ! ah alguien le ah pasado esto ?
A mi me pasa exactamente lo mismo.. y cuando los encuentra el browse no
se refresca bien y el registro encontrado queda como ultimo del browse..
SAludos
Problema con locate MySQL!!!
Publicado: Mar Dic 15, 2009 7:38 pm
por Carlos Ortiz
Yo lo hago de esta manera para devolver los datos de un registro con una
sentencia sql estandar.
//---
METHOD DevolverPorID( ID ) CLASS Articulos
//---
local ret , oDataSet:=TOdbcDataSet():New()
oDataSet:Close()
oDataSet:=AppData:oSql:QU( "select descripcion, codigo, IDTipoArticulo,
idtipoalicuota, alta, baja, idestadoregistro, idproveedor, idorigen from
articulos where IDArticulo="+str(ID) )
oDataSet:Open()
IF oDataSet:reccount()>0
// Levanto los datos de articulo y lo seteo en las propiedades de su
clase
::IDArticulo :=ID
::Descripcion :=oDataSet:Descripcion
::Codigo :=oDataSet:Codigo
::IDTipoArticulo :=oDataSet:IDTipoArticulo
::idtipoalicuota :=oDataSet:idtipoalicuota
::alta :=oDataSet:alta
::baja :=oDataSet:baja
::idestadoregistro:=oDataSet:idestadoregistro
::idproveedor :=oDataSet:idproveedor
::idorigen :=oDataSet:idorigen
ret := .T.
ENDIF
oDataSet:Close()
RETURN ret
la llamda a AppData:oSql:QU() es un query en realidad pero hemo añadido esta
capa para hacer pasar todo por una funcion nuestra que de paso atrapa los
errores y demás.
Atte. CO.