In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Problema al actualizar TDBBrowse

Foro público de Xailer en español
emilio.gil
Mensajes: 9
Registrado: Vie Jun 18, 2021 5:41 pm

Problema al actualizar TDBBrowse

Mensaje por emilio.gil »

Buenas tardes:

Acabo de dar el salto desde xailer 2.5 contra BBDD Mysql via odbc, a la versión xailer 7.1 contra la misma BBDD Mysql via MariaDBDataSource.

Para que las eñes y caracteres especiales aparezcan correctamente uso oRs:oDataSource:execute( "SET NAMES 'latin1'" ) cada vez que realizo una consulta TSqlQuery y el tema funciona.

Lo que me sucede es que al dar de alta un registro (no directamente sobre el Browse), aparentemente deja el registro vacío. Solo si vuelvo a realizar la consulta TSqlQuery aparece el registro anteriormente añadido. Con la versión anterior se refrescaba bien el browse mostrando correctamente el registro recién incorporado.

Os dejo el código a continuación.

cSelect := "SELECT * FROM trabajadores"
::oSQLTrabajador := OpenQuery(::oSQLTrabajador, "oAdoRda", cSelect, "tra_nombre")


::oTra_nombre:oDataSet := ::oSQLTrabajador
::oTra_dni:oDataSet := ::oSQLTrabajador
::oTra_cod_bar:oDataSet := ::oSQLTrabajador
::oTra_activo:oDataSet := ::oSQLTrabajador
::oTra_Oficinas:oDataSet:= ::oSQLTrabajador
::oTra_Abrevia:oDataset := ::oSQLTrabajador
::oTra_puesto_trabajo:oDataSet := ::oSQLTrabajador
::oTra_Control:oDataSet := ::oSQLTrabajador
::oTra_Grupo:oDataSet := ::oSQLTrabajador

::oDBrwTrabajador:oDataSet := ::oSQLTrabajador

METHOD BtnAddClick( oSender ) CLASS TTrabajadores

::oSQLTrabajador:AddNew()
::oTra_nombre:SetFocus()
RETURN Nil

METHOD BtnOkClick( oSender ) CLASS TTrabajadores
::oSQLTrabajador:update()

RETURN Nil

Muchas gracias por vuestra ayuda.
Responder