![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#1
|
||||
|
||||
|
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; |
|
#2
|
||||
|
||||
|
Hola
Pregunta? Para que el top 1, este te envia solo un dato, es necesario? Saludos |
|
#3
|
||||
|
||||
|
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; |
|
#4
|
||||
|
||||
|
hola
y que hice?, solo pregunte. Saludos |
|
#5
|
||||
|
||||
|
Caral por Dios
![]() ![]() Y 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? ![]() |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| Detalles de un producto en banda de reporte | sanfer1ec | Impresión | 8 | 12-07-2013 22:29:58 |
| Tabla de Facturas vs Detalles de Facturas | magnu9 | Conexión con bases de datos | 9 | 27-07-2007 17:27:37 |
| Es posible en un reporte poner 2 detalles | carlos gonzalez | Varios | 1 | 29-06-2006 19:32:22 |
| Detalles.... | yhoho | Varios | 2 | 08-03-2005 13:58:22 |
| Campos calculados, facturas y detalles de facturas. | Letty | Conexión con bases de datos | 7 | 07-11-2003 11:19:44 |
|