Problemas con query y parametros

[ContraVeneno]

qrfactura.Query1.Open;
Esa línea no se para que sirve,
el query1 no esta en el qrFactura, esa línea me tiene confundido.

Deberías de abrir primero el Query1 y despues hacer el preview, bueno, sí lo estas haciendo, pero el Query1 no es parte de qrFactura... solo que qrFactura sea el formulario....

no se

supongo que debería ser:

Código Delphi [-]
  try
     qrfactura:=tqrfactura.Create(self);
        Query1.Open;
        qrfactura.preview;
    finally
        qrfactura.Free;
    end;

[Petolansa]

Gracias por responder, el query1 lo tengo en el quick repor que se llama qrfactura.
Lo que me estaba fijando que en eso me falto asignarle el valor a los dos parametros,

ParamByName('NroFact').AsString := NumFac;
ParamByName('TipoFact').AsInteger := TipoFac;

Le agregue las dos lineas que me habias puesto antes, y aun asi n anda.

Sera porque el query1 lo tengo que poner en el formulario y no en un for con el reporte?

Numfac y tipo fac las tengo como variables globales que tienen guardada la ultima factura.

[ContraVeneno]

no pongas el query con el quickreport
ponlo en el formulario principal o puedes usar un módulo de datos

[Petolansa]

Buenas gente aca de nuevo, realmente no se que es lo que puede estar pasando, las sentencias sql estan bien y uso el siguiente codigo para asignarle valores a los parametros y no me da error, ni nada, asigne a todos los dbtext el query2 que es el que corresponde y al reporte le asigno el dataset que es el query2.
Que mas puede ser, porque lo unico que hace es mostrarme el form del reporte pero no aparece nada!

uso este codigo, realmente no le encuentro error, como me dijo contraveneno, y tampoco veo nada raro, cuando me fijo en las propiedades del query me aparecen lo dos parametros 0-nrofact y 1-tipofact

este es el codigo sql

Código SQL [-]
SELECT F.NumFactura, F.Fecha, F.Clicod, F.Efectivo, F.Ctacte, F.Tarjeta, F.Tipofac , F.Emplecod, F.SubTotal, F.Descuento, F.importetotal, 
C.Clinom, C.Clidom, C.Clicuit, C.Clitel,
FD.Codipro,  FD.Concepto, FD.Cantidad, FD.Precio
FROM Stock S
JOIN Facturadetalle FD ON S.Procod = FD.Codipro
JOIN Factura F ON (FD.Tipofac = F.Tipofac AND FD.Numfactura = F.Numfactura) 
JOIN Clientes C ON F.Clicod = C.Clicod
WHERE F.Numfactura= :Nrofact AND F.Tipofac= :TipoFact

este es el codigo para acceder al reporte

Código Delphi [-]
    
    try
    qrfactura:=tqrfactura.Create(self);
    Query2.Params.ParamByName('Nrofact').Value := numfa;
    Query2.Params.ParamByName('Tipofact').Value := tipofa;
    Query2.Open;
    qrfactura.preview;
    finally
    qrfactura.Free;
    end;

Lo que hice es convertir las variables numfa y tipofa y
mostrarlas en dos qrlabel para comprobar que si tiene los
valos que quiero
y si los tienen.

Que se puede estar escapando?

Gracias, disculpen la molestia.

[Petolansa]

Buenas gente, yo de nuevo, disculpen, se que me ayudaron bastante, pero estoy haciendo lo mismo una y otra vez y no logro que me muestre en un reporte los datos que le pido, nada da error, que me puede estar faltando, existe algo mas por hacer para hacer funcionar un reporte, es la primera vez que hago una factura, hasta ahora vine haciendo listados simples sin consultas.


Gracias y disculpen si actualizo el hilo...

[[duilioisola]]

Antes de seguir, asegúrate de que el select que has puesto devuelve valores.

Imagina que haces esto

Tabla facturas

Factura    campo1   campo2   campo3
     1      AAA      BBB      CCC
     2      AAA      BBB      DDD
     3      JJJ      KKK      LLL
     5      EEE      DDD      NNN

SELECT:

Código SQL [-]
select campo1,campo2,campo3 from facturas
where factura=:factura

Luego le dices que el parámetro factura = 4

Código Delphi [-]
 try
    ...
    qrfactura.Params.ParamByName('factura').Value := 4;
    qrfactura.Open;
    ...
 finally
    qrfactura.Free;
 end;

No te devuelve nada porque no hay ningún registro con factura=4

[[Lepe]]

Cambia la línea:

qrfactura.preview;

por

qrfactura.previewModal;

Preview permite seguir ejecutando las líneas de código, por lo que ejecutará qrFactura.Free destruyendo el informe que quieres visualizar, por ello no ves nada en el informe.

Con PreviewModal, el código se queda parado hasta que se cierre la ventana de previsualizar, y después, se continúa el código.

Saludos