FiveTech Software tech support forums

... cExt_Rec1:End() Return Nil Function Ventana_Recepcion(cExt_Rec1,Mensaje,cUsuario,cEmpresa) Local oDlg2, oFon2, oBrw2, nTotal1, nTotal2, nTotal3, oDatos,cDatos, oTotal1,oTotal2,oTotal3, oCol2 Local I, oBoton1, oBoton2, oBoton3 Local oSay :=Array(20), cAlias01 Static TotVal MemVar Archi cDatos ...

ESTABA HACIENDO ESTO
oCol:=xLbx:AddCol() , oCol:cHeader:= cTitulo , oCol:bStrData := bCampo , oCol:nWidth := nAncho ) ,;

AHORA HAGO
oCol:=xLbx:AddColumn( cTitulo , bCampo , cPicture ,,,, nAncho , .F., .F.,,,,,, .F.,,,,, .F.,,, ) , oCol:oHeaderFont:=memvar->oDatos:oFont9 )

... la vuelta y nada agradesco sugerencia y de despues como lo defino en una intruccion ( "ACTION ") por ejemplo DEFINE BUTTON oBtnBar[1] OF oDatos:oBARppal NOBORDER ACTION ( ? ) o MENUITEM oQryMenu1:TEL_NUMERO FILENAME oQryMenu1:TEL_BMP ACTION ( ? ) gracias

... date() ), 4 ) + Padl( Month( date() ), 2, "0" ) + Padl( Day( date() ), 2, "0" ) + Padr( cTime, 11, "0" ) + Padr( oDatos[ ( dbGesBanco )->( fieldpos( "Codigo" ) ) ], 13, "0" ) + "</MsgId>" FWriteLn( nHandle , cadena ) cadena ...

... subTotal="506.00" hFile := FOpen(Archivo2) oXmlDoc := TXmlDocument():New( hFile ) oXmlIter := TXmlIterator():New( oXmlDoc:oRoot ) oDatos:Blank() aDatos := {} oXmlNode := oXmlDoc:FindFirst( "Header" ) DO WHILE .T. oTagActual = oXmlIter:Next() If oTagActual != nil cTagName:= ...

... leer un XML de la siguiente forma: hFile := FOpen(Archivo2) oXmlDoc := TXmlDocument():New( hFile ) oXmlIter := TXmlIterator():New( oXmlDoc:oRoot ) oDatos:Blank() aDatos := {} DO WHILE .T. oTagActual = oXmlIter:Next() If oTagActual != nil HEval( oTagActual:aAttributes, { | cKey, cValue | Guarda_XML_Valores( ...

... de lo que hago, saludos... :shock: CLASS TVarPpal   DATA oConex // MENEJADOR DEL OBJETO SRVIDORENDCLASS  y en mi funcion MAIN, hago esto PUBLIC oDatos := TVarPpal() // aca esta la asignacion de la clase... para acceder a la VAR hago esto oDatos:oConex cualquier duda, escribeme a mi correo o ...

... saludos... :shock: CLASS TVarPpal   DATA oConex // MENEJADOR DEL OBJETO SRVIDORENDCLASS  y en mi funcion MAIN, hago esto PUBLIC oDatos := TVarPpal() // aca esta la asignacion de la clase... para acceder a la VAR hago esto oDatos:oConex cualquier duda, escribeme a mi correo o ...

... Pregunta, de donde sale esta variable oConex ,ya que al declararla como estatic aun asi me marca error al igual declare la variable como Public oDatos ,ya que quiero manejarlo en todo el sistema, como en tu ejemplo: Este Error: Exported variable: OCONEX En esta parte de tu codigo. // MENSAJE ...

Hola Daniel, gracias por contestar.. creo que halle el error cQuery := "SELECT productos.* FROM productos ORDER BY producto " oDatos := oMySQL:Query(cQuery) oDatos:Refresh() <---- funciona correctamente cQuery := "SELECT productos.*, productos.precio_neto, IFNULL((SELECT ...

... algún compañero del foro también. Error description: Warning BASE/1004 Message not found: TDOLPHINSRV:REFRESH Antes del refresh() pon un msginfo( oDatos:ClassName() ) y di que nombre sale, verás que no es un objeto tabla, será un objeto de la clase TDOLPHINSRV. Estoy de acuerdo En alguna parte ...

... algún compañero del foro también. Error description: Warning BASE/1004 Message not found: TDOLPHINSRV:REFRESH Antes del refresh() pon un msginfo( oDatos:ClassName() ) y di que nombre sale, verás que no es un objeto tabla, será un objeto de la clase TDOLPHINSRV.

Hola Amigos,,,
En una lista de datos donde se encuentra la letra Ñ, ::Seek() no ubica la lentra en si.

nRow := oDatos:Seek("Ñ", "listaproductos",,,.t.) // <------- no realiza la búsqueda...

Salu2

... veo que no esta consiguiendo la tabla y por eso te dice que no puede aplicar el REFRESH(), verificate si en el camino no estas matando el query oDatos, oDatos:END(), es lo unico que se me viene a la mente por los momentos, talves con un poco mas de codigo se te pueda ayudar mas, saludos... :shock:

Hola,

¿Sabes que tipo de variable y qué contiene odatos?

Te da error diciendo que no existe el método refresh??

Deberías poner el error que te sale y los tipos de datos para poder
Ayudarte.