topic-44108

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

no me refresca un query
Posted: Sun Jan 14, 2024 09:41 PM

Hola.

Tengo un procedimiento almacenado, cuando lo ejecuto por primera vez me carga bien el xbrowser PERO cuando quiero refrescar el xbrowser (luego de un cambio) los datos no me los muestra, que estoy haciendo mal?

Code (fw): Select all Collapse

METHOD prClientes( oCnx ) CLASS TPr

   LOCAL PROCEDIMIENTO
   LOCAL CQUERY

   TEXT INTO PROCEDIMIENTO
   SELECT
   specific_name
   FROM information_schema.routines
   WHERE routine_schema = 'db' AND specific_name = 'pr_clientes'
   ENDTEXT

   TEXT INTO CQUERY
   CREATE PROCEDURE
   dda.pr_clientes()
   SELECT
   a.id AS c1,
   a.sucursal AS c2,
   a.codicefiscale AS c3,
   a.denominazione AS c4,
   a.cap AS c5,
   a.indirizzo AS c6
   FROM tbclientes AS a
   ORDER BY a.denominazione DESC
   ENDTEXT

   RETURN ( oQry := crearPr( oCnx, PROCEDIMIENTO, CQUERY ) )

...
::oQry:= oCnx:call( prclientes(oCnx))

xbrowser ::oQry

cuando hago esto el xbrowser no me refresca l os datos

Code (fw): Select all Collapse

::oQry:refresh()
xbrowser ::oQry

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: no me refresca un query
Posted: Mon Jan 15, 2024 02:02 AM

Code (fw): Select all Collapse

::oQry:ReQuery()

Regards

G. N. Rao.

Hyderabad, India

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: no me refresca un query
Posted: Mon Jan 15, 2024 07:15 AM

no me funciona

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: no me refresca un query
Posted: Mon Jan 15, 2024 01:49 PM

Intenta:

Code (fw): Select all Collapse

oQry:Requery( { <su query>} )
oBrw:SetMySql(oQry)

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: no me refresca un query
Posted: Mon Jan 15, 2024 04:46 PM

Depende de la versión de FWH y la lib de conexión que usas

NATIVO

Code (fw): Select all Collapse

METHOD ScRefresh() CLASS ScWhatsApp
   MSGRUN( "Espere un momento , actualizando datos ! ", "Usuario", {|| ::oWhats_App:requery() } )
   ::oGrid:Refresh()
   ::oGrid:SetFocus()

DOLPHIN

Code (fw): Select all Collapse

METHOD ScRefresh() CLASS ScEmbarq
  local cQry, oDetalle
  cQry := "SELECT no_embarque, factura, pedido, grupo, unidad, alterno, nombre, semana, "
  cQry += "fecha,bolsas,cajas,cod_postal,ruta,orden_entrega"
  cQry += " FROM embarques_detalle"
  cQry += " WHERE no_embarque=" + C_SIMPLE + cstr( oEmbarques:folio ) + C_SIMPLE
  cQry += " AND borrado <>" + C_SIMPLE + "S" + C_SIMPLE
  cQry += " ORDER by no_embarque,factura"
  oDetalle:= ::oCon:Query( cQry )
  oBrw:SetDolphin( oDetalle )
RETURN .T.

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: no me refresca un query
Posted: Tue Jan 16, 2024 07:24 AM

sigue sin funcionar. Les muestro la definicion del browser

Code (fw): Select all Collapse

METHOD setBrw( oDlg ) CLASS TCliente

   LOCAL oFont, oFont1
   LOCAL aColSizes := { 40, 210, 200, 120, 90, 120, 10 }
   LOCAL aColumns  := { "c2", "c4", "c6", "c7", "c8", "c9", "c10", "c11" }
   LOCAL aHeaders  := { "Suc.", "Denominazione", "Indirizzo", "Comune", "Provincia", "Telefono", "Hab" }
   LOCAL aJustify  := { AL_CENTER, AL_LEFT, AL_LEFT, AL_LEFT, AL_LEFT, AL_CENTER, AL_CENTER }

   DEFINE FONT oFont NAME "Ms Sans Serif" bold SIZE 0, - 8
   DEFINE FONT oFont1 NAME "Ms Sans Serif" SIZE 0, - 8

   REDEFINE XBROWSE ::oBrw ID 100 OF oDlg ;
   DATASOURCE ::oQry ;
   AUTOSORT ;
   COLSIZES aColSizes ;
   COLUMNS aColumns ;
   JUSTIFY aJustify ;
   HEADERS aHeaders

El metodo de leer los registros para cargar ese browser funciona correctamente
y lo hago llamando a un procedimiento,
pero cada vez que quiero hacer una "recarga" del browser hago esto y no me estàa funcionando:

Code (fw): Select all Collapse

method recargarBrw() class TCliente

   ::oQry:requery()
   ::oBrw:Refresh( .t. )
   ::oBrw:setfocus()

   return ( nil )

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: no me refresca un query
Posted: Tue Jan 16, 2024 05:51 PM

usas el Medhot ::oCon:RowSet ?
MariaDb

Code (fw): Select all Collapse

cQry := "SELECT " + ::cSqlWhatsApp
   cQry += " FROM " + ::cTabla
   cQry += " ORDER BY " + ::cOrder
   ::oWhats_App := ::oCon:RowSet( cQry, ::nPageRow )

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: no me refresca un query
Posted: Wed Jan 17, 2024 04:02 AM

no, no lo uso.

siempre use asi como lo puse estimado.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

FiveTech Support Forums

Continue the discussion