![]() |
Detalles en Reporte de Facturas
holas chicos espero las esten pasando bien, tengo un problemitas para mostrar los detalles en un report de fatura, resulta que si he facturado mas de dos articulos, no me presentan todos los detalles no mas que el ultimo en haber agregado hay proceso de facturacion.
Cualquier duda o sugerencia sera bienvenidad. Gracias de antemanos. |
Hola magnu9
Danos mas informacion, por que no pones el codigo que genera el reporte, por cierto es Qrepotr? Puede tener que ver con el dataset, no se. Saludos |
Velocidad De La Luz...
En Seguida Caral... Dame Unos Minutos... Y Gracias Por Tu Pronta Atencion... Dios A La Velocidad De La Luz...
|
Código
Hola caral, no veo ningun dataset en mi codigo... pero en el form del reporte tengo mi dataset... porque debiera de utilizarlo... mira el codigo de llamado de mi Reporte... algo más y me avisa... vale.
procedure TImprimirFactura.BitBtn1Click(Sender: TObject); begin UniFactura.querFactura.Close; UniFactura.querFactura.SQL.Text := 'select top 1 numfac, fecfac, tipfac, condicion,codusu,fecvenc,codcli, impuestoTot, descuento, subtotal, totalfac from factura order by numfac desc'; uniFactura.querFactura.Open; numfact := UniFactura.querFactura.Fields[0].AsInteger; If RadioGroup2.ItemIndex = 0 then begin FImprimirFactura:=TFImprimirFactura.Create(self); FImprimirFactura.querFactura.parameters[0].Value :=numfact; FImprimirFactura.querFactura.Open; try If RadioGroup1.ItemIndex = 0 then FImprimirFactura.QuickRep1.Preview else FImprimirFactura.QuickRep1.Print; finally FImprimirFactura.Free; end; end; end; |
Hola
Pregunta? Para que el top 1, este te envia solo un dato, es necesario? Saludos |
Todo resuelto... Gracias hermano...
Caral un elojio sipppp... Eres muy pero muy efectivo... GRACIAS... Coloqué el dataset, quite el top 1 y listo. ;)... y no te preocupes mi otra duda esta al cruzar la esquina....
procedure TImprimirFactura.BitBtn1Click(Sender: TObject); begin UniFactura.querFactura.Close; UniFactura.querFactura.SQL.Text := 'select numfac, fecfac, tipfac, condicion,codusu,fecvenc,codcli, impuestoTot, descuento, subtotal, totalfac from factura order by numfac desc'; uniFactura.querFactura.Open; numfact := UniFactura.querFactura.Fields[0].AsInteger; If RadioGroup2.ItemIndex = 0 then begin FImprimirFactura:=TFImprimirFactura.Create(self); FImprimirFactura.querFactura.parameters[0].Value :=numfact; FImprimirFactura.querFactura.Open; try FImprimirFactura.QuickRep1.DataSet:=FImprimirFactura.querFactura; If RadioGroup1.ItemIndex = 0 then FImprimirFactura.QuickRep1.Preview else FImprimirFactura.QuickRep1.Print; finally FImprimirFactura.Free; end; end; end; |
hola
y que hice?, solo pregunte. Saludos |
Caral por Dios
:D:D:DY preguntas que hiciste, me dijiste lo del dataset, se me había escapado, lo había utilizado en mis anteriores report, pero lo había olvidado y gracias a usted, lo recorde... no sea asi, como ¿y que hice?;) :eek:
|
La franja horaria es GMT +2. Ahora son las 06:49:27. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi