Pantalla Informativa

Pantalla Informativa

Postby Adolfo » Mon Jan 14, 2019 2:22 pm

Bs dias Fivewinners

Necesito ayuda en algo que se me solicito.

Hace años atras hice una pantalla informativa que mostraba el estado de ciertos procesos dentro de una industria, eran solo 5 procesos
Hice un xbrowse con el nombre del procesos, estado y un dato numerico, Lo refrescaba cada 2 minutos. EL ingreso del dato se hacia en otra parte y modificaba unos datos en un DBF
Hasta ahi todo bien.

Ahora me pidieron algo parecido, hay cambios, uso MYSQL (no hay problema ahi) pero no conozco el numero total de items a mostrar, quizas sean mas de los que caben en una sola pantalla de xbrowse, si ese es el caso necesito hacerle un scroll automatico. No hay ingreso de datos ni manipulacion del programa en ese Pc, solo se usa para mostrar los datos

Cualquier ayuda sera bienvenida.

Saludos desde Chile.
Adolfo
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
User avatar
Adolfo
 
Posts: 860
Joined: Tue Oct 11, 2005 11:57 am
Location: Chile

Re: Pantalla Informativa

Postby cnavarro » Mon Jan 14, 2019 2:32 pm

Después de añadir el nuevo registro, creo que un GoBottom te puede servir
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6541
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Pantalla Informativa

Postby Adolfo » Mon Jan 14, 2019 2:45 pm

Hola, gracias.
El problema que en ese equipo, no hay intervencion humana, en el tiempo transcurrido entre cada refresco de los datos, pueden desaparecer y aparecer hasta 30 datos nuevos y viejos.

La idea es que puedo refrescar el query sin problemas , pero como hago para que el xbrowse haga un scroll arriba o abajo en forma automatica, para ir mostrando TODOS los datos consultados y lo siga haciendo mientras no haya un nuevo refresco de datos.

Eso.

Saludos
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
User avatar
Adolfo
 
Posts: 860
Joined: Tue Oct 11, 2005 11:57 am
Location: Chile

Re: Pantalla Informativa

Postby horacio » Mon Jan 14, 2019 3:00 pm

Y si cuando haces una inserción refrescas el browse y ejecutas browse : gobottom() como te sugirió Cristobal. No necesitas intervención humana de esta manera.

Saludos
horacio
 
Posts: 1363
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina

Re: Pantalla Informativa

Postby cmsoft » Mon Jan 14, 2019 3:54 pm

Hola Adolfo:
Creo que podrias realizarlo con 2 timers, uno para el refresco total de datos, y otro (mucho mas corto) para que haga un movimiento de a uno.
Algo asi como
Code: Select all  Expand view

DEFINE TIMER oTimer2 INTERVAL 4000 OF oWnd ACTION MoverProximo()
....

STATIC FUNCTION MoverProximo()
IF !oQry:EOF()
    oQry:Skip()
    ELSE
    oQry:GoTop()
ENDIF
oBrw:Refresh()
 
User avatar
cmsoft
 
Posts: 1285
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

Re: Pantalla Informativa

Postby armando.lagunas » Mon Jan 14, 2019 3:59 pm

Hola Adolfo:

yo utilizo un dbf temporal el cual indexo el campo fecha + hora de forma descendente y uso el gotop() en el xbrowse, se refresca cada 30 segundos y no hay intervención del usuario.

Image
SkyPe: armando.lagunas@hotmail.com
Mail: armando.lagunas@gmail.com
User avatar
armando.lagunas
 
Posts: 346
Joined: Mon Oct 05, 2009 3:35 pm
Location: Curico-Chile

Re: Pantalla Informativa

Postby Willi Quintana » Mon Jan 14, 2019 5:43 pm

Hola a todos.....
prueba esto, a mi me funciona... pero 1ro debes averiguar cuantos registros vas a mostrar,,, en este caso siembre se visualizarán los últimos 10 registros...
tomando en cuenta que el campo "registro" es un autocorrelativo, asi que en este caso son dos consultas anidadas espero te sirva
SELECT * FROM ( SELECT * FROM productos ORDER BY registro DESC LIMIT 10) sub GROUP BY registro
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: Pantalla Informativa

Postby Marcelo Via Giglio » Tue Jan 15, 2019 1:31 am

Adolfo,

puedes paginar, ya sea cambiando toda tu estructura por una página por dato o de manera hibrida un xBrowse por página sin hacer scroll

solo una idea

saludos

Marcelo
Marcelo Via Giglio
 
Posts: 1064
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Re: Pantalla Informativa

Postby Busmatic_wpb » Tue Jan 15, 2019 3:56 am

Estimado.
Hace muchos años lo hice.
Mira Yo tengo algo parecido pero en una extension de monitor, Ahi tengo que mostrar evenos de produccion y otras cosillas, lo que hice fue muy simple ya que era mucha la informacion que tenia poner en un xbrowse, yo utilize un dlg o windows y fonts lejibles desde cierta distancia hice una plantilla que voy escribiendo y refrescando los datos de 2 maneras en el monitor .

Todo en Mysql.

1 Aquellos registros que no tengan mas cierto tiempo de haber sido acrulizados o incluidos como nuevos con un fecha / hora proceso
2 Hago un recorrido desde el 1er con skip hasta el EOF() y pongo un tiempo de espera en cada registro al final de tabla vuelvo al primero

Todo lo hice con un timer y me fue de perlas ,
Habe si te sirve la idea.
Regards.
S.I.T.U.
Sistemas Inteligentes de transporte urbano
http://www.situcr.com
oscarchacon@Situcr.com
Desarrollos BA4/B4j androide
User avatar
Busmatic_wpb
 
Posts: 162
Joined: Wed Feb 22, 2017 2:19 am

Re: Pantalla Informativa

Postby Adolfo » Wed Jan 16, 2019 8:57 pm

Gracias a todos por los tips.
He estado fuera por algunos dias, revisare apenas pueda.

Saludos y gracias nuevamente.

Adolfo
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
User avatar
Adolfo
 
Posts: 860
Joined: Tue Oct 11, 2005 11:57 am
Location: Chile


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 60 guests