Error en Listbox con Report

Post Reply
User avatar
Manuel Valdenebro
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Error en Listbox con Report

Post by Manuel Valdenebro »

Desde un dialogo, donde tengo un listbox con campos de la base de datos "x", pulsando un botón imprimo un listado (con previo) pero de otra DBF que tambien está abierta.

Al volver del previo (imprima o no) el listbox se disloca, duplicando los registros. Lo he intentado de varias formas, añadiendo oLbx:Refresh(), oLbx:upstable(), DBGOTOP(), tanto en el botón del diálogo, como al final del ACTIVE REPORT POSTEND. He intentado poniendo el previo modal y no modal, pero continua el problema. Solo funciona suprimiendo el previo ó colocándole un ALERT() cuando vuelve del proceso de impresión.

¿Alguna idea magistral?

Muchas gracias por vuestras ideas y un buen fin de semana.
Un saludo

Manuel
User avatar
ADBLANCO
Posts: 299
Joined: Mon Oct 22, 2007 3:03 pm
Location: Valencia - Venezuela

Post by ADBLANCO »

Cual ListBox Utilizas?, En mi caso uso TwBrowse y SIEMPRE defino el alias;

oLbx:cAlias:='x'

Porque lo que te pasa es típico de perder el foco a la tabla.
Saludos

Angel, Valencia, Venezuela

xH .997 - FW 7.9 - BCC55 - WorkShop - MySql
User avatar
cmsoft
Posts: 653
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

Post by cmsoft »

No se si será la opcion, pero hace despues que reporte termine un select a la tabla que tiene el listbox.

Espero te sirva

Code: Select all

SELECT (tabla_listbox)
DEFINE DIALOG ....
@ 10, 10 BUTTON oBot ACTION Reporte()
ACTIVATE DIALOG ...

STATIC FUNCTION Reporte()
...
SELECT (tabla_listbox)
RETURN nil
User avatar
Manuel Aranda
Posts: 561
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Post by Manuel Aranda »

Hola Manuel:

No hace mucho me topé con el mismo problema, y es que para imprimir con REPORT tienes que estar situado en el área de trabajo correspondiente (que alguien me corrija si me equivoco). Yo lo hago así y funciona correctamente:
............
Local nAreanterior:=SELECT()
DbSelectArea("GASTOS2")
REPORT
...............
..............
END REPORT
//
DbSelectArea(nAreanterior)
//

Saludos,
Manuel
Un saludo,
Manuel

xH 1.2.3, FWH 14.09, BC++ 5.8.2, xVerce CW 1.0, PellesC
User avatar
Manuel Valdenebro
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Post by Manuel Valdenebro »

Muchas gracias a todos por responder.

Uso el listbox Twbrowse. En la definición del listbox, tengo un alias de su base y al final del report tengo un Select a dicha base, pero como dije antes, si no le pongo un ALERT de stop, la cosa se descontrola. Creo que quizas pueda ser que el preview crea un dialogo no-modal y que quizas esto produce el descontrol del listbox.
Un saludo

Manuel
Post Reply