From 63d48665dba19adc73d6526f832da7c8c070cb65 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Thu, 14 Jun 2007 16:51:23 +0000
Subject: [PATCH] =?UTF-8?q?-=20En=20el=20informe,=20subir=20el=20pie=20par?=
 =?UTF-8?q?a=20acercarlo=20m=C3=A1s=20al=20contenido.=20-=20En=20el=20info?=
 =?UTF-8?q?rme,=20quitar=20la=20etiqueta=20'Dto'=20en=20la=20columna=20de?=
 =?UTF-8?q?=20descuentos.=20-=20En=20el=20informe,=20poner=20m=C3=A1s=20es?=
 =?UTF-8?q?pacio=20desde=20el=20borde=20superior=20de=20la=20hoja=20y=20la?=
 =?UTF-8?q?=20cabecera=20de=20la=20factura=20(para=20que=20quepa=20mejor?=
 =?UTF-8?q?=20el=20logo=20impreso).=20-=20En=20la=20cabecera=20del=20infor?=
 =?UTF-8?q?me=20cambiar=20'Referencia'=20por=20'N=C2=BA=20factura'=20(en?=
 =?UTF-8?q?=20abonos=20tambi=C3=A9n).?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@39 c93665c3-c93d-084d-9b98-7d5f4a9c3376
---
 .../Servidor/Informes/InfFacturaCliente.fr3   | 54 +++++++++----------
 1 file changed, 27 insertions(+), 27 deletions(-)

diff --git a/Output/Debug/Servidor/Informes/InfFacturaCliente.fr3 b/Output/Debug/Servidor/Informes/InfFacturaCliente.fr3
index 1ea5fdea..5acdb85d 100644
--- a/Output/Debug/Servidor/Informes/InfFacturaCliente.fr3
+++ b/Output/Debug/Servidor/Informes/InfFacturaCliente.fr3
@@ -1,56 +1,56 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="3.23.7" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="39169,8693967014" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;  DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;CALLE&#34;&#62;);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; &#60;&#62; '')&#13;&#10;  or (&#60;frxDBCabecera.&#34;POBLACION&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; + ' ' + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure BandaDetallesOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  BandaDetalles.StartNewPage := False;&#13;&#10;  BandaDetalles.Visible := True;&#13;&#10;  MemPrecio.Style := 'Concepto normal';&#13;&#10;  MemCantidad.Style := 'Concepto normal';&#13;&#10;  MemImpTotal.Style := 'Concepto normal';&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;&#13;&#10;  case &#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; of&#13;&#10;  'Salto': begin&#13;&#10;        BandaDetalles.StartNewPage := True;&#13;&#10;        RichConcepto.Visible := False;&#13;&#10;       end;&#13;&#10;  'Titulo': begin&#13;&#10;       MemPrecio.Style := 'Concepto titulo';&#13;&#10;       MemCantidad.Style := 'Concepto titulo';&#13;&#10;       MemImpTotal.Style := 'Concepto titulo';&#13;&#10;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       MemPrecio.Style := 'Concepto normal';&#13;&#10;       MemCantidad.Style := 'Concepto normal';&#13;&#10;       MemImpTotal.Style := 'Concepto normal';&#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       MemPrecio.Style := 'Concepto subtotal';&#13;&#10;       MemCantidad.Style := 'Concepto subtotal';&#13;&#10;       MemImpTotal.Style := 'Concepto subtotal';&#13;&#10;       end;&#13;&#10;  'Descuento': begin&#13;&#10;       BandaDetalles.Visible := False;&#13;&#10;       RichConcepto.Color := clNone;&#13;&#10;       end;&#13;&#10;  end;&#13;&#10;&#13;&#10;  RichConcepto.Color := MemImpTotal.Color;&#13;&#10;  RichConcepto.Frame := MemImpTotal.Frame;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height - 1;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  Cadena: String;&#13;&#10;begin&#13;&#10;  DatosEmpresa.Lines.Clear;&#13;&#10;  DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;RAZON_SOCIAL&#34;&#62;);&#13;&#10;  DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;CALLE_EMPRESA&#34;&#62;);&#13;&#10;&#13;&#10;  Cadena := '';&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;FAX&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;&#13;&#10;  Cadena := '';&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' ' + &#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' - ' + &#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo15OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Memo15.Lines.Clear;&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;BASE_IMPONIBLE&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ABONO')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('FACTURA')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;RE&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;       Memo20.Lines.Clear;&#13;&#10;       Memo28.Lines.Clear;&#13;&#10;       Memo21.Lines.Clear;&#13;&#10;       Memo29.Lines.Clear;&#13;&#10;  end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C65730100055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="3.23.7" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="39247,7792022917" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;  DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;CALLE&#34;&#62;);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; &#60;&#62; '')&#13;&#10;  or (&#60;frxDBCabecera.&#34;POBLACION&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; + ' ' + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure BandaDetallesOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  BandaDetalles.StartNewPage := False;&#13;&#10;  BandaDetalles.Visible := True;&#13;&#10;  MemPrecio.Style := 'Concepto normal';&#13;&#10;  MemCantidad.Style := 'Concepto normal';&#13;&#10;  MemImpTotal.Style := 'Concepto normal';&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;&#13;&#10;  case &#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; of&#13;&#10;  'Salto': begin&#13;&#10;        BandaDetalles.StartNewPage := True;&#13;&#10;        RichConcepto.Visible := False;&#13;&#10;       end;&#13;&#10;  'Titulo': begin&#13;&#10;       MemPrecio.Style := 'Concepto titulo';&#13;&#10;       MemCantidad.Style := 'Concepto titulo';&#13;&#10;       MemImpTotal.Style := 'Concepto titulo';&#13;&#10;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       MemPrecio.Style := 'Concepto normal';&#13;&#10;       MemCantidad.Style := 'Concepto normal';&#13;&#10;       MemImpTotal.Style := 'Concepto normal';&#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       MemPrecio.Style := 'Concepto subtotal';&#13;&#10;       MemCantidad.Style := 'Concepto subtotal';&#13;&#10;       MemImpTotal.Style := 'Concepto subtotal';&#13;&#10;       end;&#13;&#10;  'Descuento': begin&#13;&#10;       BandaDetalles.Visible := False;&#13;&#10;       RichConcepto.Color := clNone;&#13;&#10;       end;&#13;&#10;  end;&#13;&#10;&#13;&#10;  RichConcepto.Color := MemImpTotal.Color;&#13;&#10;  RichConcepto.Frame := MemImpTotal.Frame;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height - 1;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  Cadena: String;&#13;&#10;begin&#13;&#10;  DatosEmpresa.Lines.Clear;&#13;&#10;  DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;RAZON_SOCIAL&#34;&#62;);&#13;&#10;  DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;CALLE_EMPRESA&#34;&#62;);&#13;&#10;&#13;&#10;  Cadena := '';&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;FAX&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;&#13;&#10;  Cadena := '';&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' ' + &#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' - ' + &#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo15OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Memo15.Lines.Clear;&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;BASE_IMPONIBLE&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ABONO')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('FACTURA')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;RE&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;       Memo20.Lines.Clear;&#13;&#10;       Memo28.Lines.Clear;&#13;&#10;       Memo21.Lines.Clear;&#13;&#10;       Memo29.Lines.Clear;&#13;&#10;  end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C65730100055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
-    <TfrxPageHeader Name="Band2" Height="254,92913142" Left="0" Top="18,89765" Width="718,1107">
+    <TfrxPageHeader Name="Band2" Height="254,92913142" Left="0" Top="16" Width="718,1107">
       <TfrxMemoView Name="Memo23" Left="3,77953" Top="228,5671" Width="402,14193" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Concepto"/>
       <TfrxMemoView Name="Memo24" Left="625,16574" Top="228,5671" Width="92,94496" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Importe total"/>
       <TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" Visible="False" OnBeforePrint="Picture1OnBeforePrint" DataField="LOGOTIPO" DataSet="frxDBCabecera" DataSetName="frxDBCabecera"/>
       <TfrxMemoView Name="DatosEmpresa" Left="166,92919" Top="17,35436" Width="221,41744" Height="80,69295" Visible="False" OnBeforePrint="DatosEmpresaOnBeforePrint" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
-      <TfrxShapeView Name="Shape1" Left="7,55906" Top="120,94496" Width="257,00804" Height="86,92919" Color="16250871" Shape="skRoundRectangle"/>
-      <TfrxShapeView Name="Shape2" Left="325,48052" Top="120,94496" Width="393,07112" Height="86,92919" Color="16250871" Shape="skRoundRectangle"/>
-      <TfrxMemoView Name="Memo16" Left="15,11812" Top="132,06308" Width="65,13389" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Referencia:"/>
-      <TfrxMemoView Name="Memo17" Left="15,11812" Top="158,51979" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
-      <TfrxMemoView Name="Memo18" Left="15,11812" Top="181,19697" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
-      <TfrxMemoView Name="Memo19" Left="333,26005" Top="120,94496" Width="373,73253" Height="37,7953" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="[frxDBCabecera.&#34;NOMBRE&#34;]&#13;&#10;[frxDBCabecera.&#34;NIF_CIF&#34;]"/>
-      <TfrxMemoView Name="DatosCliente" Left="333,26005" Top="158,74026" Width="373,73253" Height="48,91342" OnBeforePrint="DatosClienteOnBeforePrint" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text=""/>
+      <TfrxShapeView Name="Shape1" Left="7,55906" Top="132,94496" Width="257,00804" Height="86,92919" Color="16250871" Shape="skRoundRectangle"/>
+      <TfrxShapeView Name="Shape2" Left="325,48052" Top="132,94496" Width="393,07112" Height="86,92919" Color="16250871" Shape="skRoundRectangle"/>
+      <TfrxMemoView Name="Memo16" Left="15,11812" Top="144,06308" Width="65,13389" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº factura:"/>
+      <TfrxMemoView Name="Memo17" Left="15,11812" Top="168,630025" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
+      <TfrxMemoView Name="Memo18" Left="15,11812" Top="193,19697" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
+      <TfrxMemoView Name="Memo19" Left="333,26005" Top="132,94496" Width="373,73253" Height="37,7953" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="[frxDBCabecera.&#34;NOMBRE&#34;]&#13;&#10;[frxDBCabecera.&#34;NIF_CIF&#34;]"/>
+      <TfrxMemoView Name="DatosCliente" Left="333,26005" Top="170,74026" Width="373,73253" Height="48,91342" OnBeforePrint="DatosClienteOnBeforePrint" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text=""/>
       <TfrxMemoView Name="Memo3" Left="405,92146" Top="228,5671" Width="63,14966" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Cantidad"/>
       <TfrxMemoView Name="Memo4" Left="469,07112" Top="228,5671" Width="95,62214" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Precio unidad"/>
-      <TfrxMemoView Name="Memo5" Left="80,03154" Top="132,06308" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
-      <TfrxMemoView Name="Memo6" Left="60,25201" Top="158,51979" Width="196,75603" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;FECHA_FACTURA&#34;]"/>
-      <TfrxMemoView Name="Memo7" Left="75,37013" Top="181,19697" Width="181,63791" Height="18,89765" Text="[&#60;Page#&#62;] / [&#60;TotalPages#&#62;]"/>
+      <TfrxMemoView Name="Memo5" Left="80,03154" Top="144,06308" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
+      <TfrxMemoView Name="Memo6" Left="60,25201" Top="168,630025" Width="196,75603" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;FECHA_FACTURA&#34;]"/>
+      <TfrxMemoView Name="Memo7" Left="75,37013" Top="193,19697" Width="181,63791" Height="18,89765" Text="[&#60;Page#&#62;] / [&#60;TotalPages#&#62;]"/>
       <TfrxLineView Name="Line1" Left="718" Top="229,54" Width="0" Height="635" Frame.Typ="1"/>
       <TfrxMemoView Name="Memo15" Left="396,1577" Top="18,89765" Width="314,39394" Height="64,25201" OnBeforePrint="Memo15OnBeforePrint" Font.Charset="1" Font.Color="12632256" Font.Height="-48" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="FACTURA"/>
       <TfrxLineView Name="Line2" Left="4" Top="229,54" Width="0" Height="635" Frame.Typ="1"/>
       <TfrxLineView Name="Line5" Left="406,14193" Top="229,54" Width="0" Height="635" Frame.Typ="1"/>
       <TfrxLineView Name="Line4" Left="469,02752" Top="229,54" Width="0" Height="635" Frame.Typ="1"/>
-      <TfrxMemoView Name="Memo37" Left="564,26283333" Top="228,55133" Width="61,60637" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Dto"/>
+      <TfrxMemoView Name="Memo37" Left="564,26283333" Top="228,55133" Width="61,60637" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text=""/>
       <TfrxLineView Name="Line7" Left="625,7953" Top="228,43568333" Width="0" Height="635" Frame.Typ="1"/>
       <TfrxLineView Name="Line3" Left="564,28346457" Top="229,54" Width="0" Height="635" Frame.Typ="1"/>
     </TfrxPageHeader>
-    <TfrxPageFooter Name="Band3" Height="181,79527559" Left="0" Top="495,11843" Width="718,1107">
-      <TfrxShapeView Name="Shape4" Left="372" Top="42,45671" Width="345" Height="98,26778" Color="16250871" Shape="skRoundRectangle"/>
-      <TfrxShapeView Name="Shape3" Left="8" Top="42,45671" Width="345" Height="98,26778" Color="16250871" Shape="skRoundRectangle"/>
-      <TfrxMemoView Name="Memo26" Left="17,57483" Top="49,8268399999999" Width="113,3859" Height="14,89765" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="FORMA DE PAGO"/>
-      <TfrxMemoView Name="Memo27" Left="17,57483" Top="64,50402" Width="328,59864" Height="69,82684" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;FORMA_PAGO&#34;]"/>
-      <TfrxMemoView Name="Memo30" Left="379,7483" Top="49,8268400000001" Width="113,3859" Height="14,89765" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="OBSERVACIONES"/>
-      <TfrxMemoView Name="Memo31" Left="379,7483" Top="64,5040200000002" Width="331,24428" Height="69,83" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;OBSERVACIONES&#34;]"/>
+    <TfrxPageFooter Name="Band3" Height="181,79527559" Left="0" Top="492" Width="718,1107">
+      <TfrxShapeView Name="Shape4" Left="372" Top="26,45671" Width="345" Height="98,26778" Color="16250871" Shape="skRoundRectangle"/>
+      <TfrxShapeView Name="Shape3" Left="8" Top="26,45671" Width="345" Height="98,26778" Color="16250871" Shape="skRoundRectangle"/>
+      <TfrxMemoView Name="Memo26" Left="17,57483" Top="33,82684" Width="113,3859" Height="14,89765" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="FORMA DE PAGO"/>
+      <TfrxMemoView Name="Memo27" Left="17,57483" Top="48,50402" Width="328,59864" Height="69,82684" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;FORMA_PAGO&#34;]"/>
+      <TfrxMemoView Name="Memo30" Left="379,7483" Top="33,82684" Width="113,3859" Height="14,89765" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="OBSERVACIONES"/>
+      <TfrxMemoView Name="Memo31" Left="379,7483" Top="48,50402" Width="331,24428" Height="69,83" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;OBSERVACIONES&#34;]"/>
       <TfrxMemoView Name="Memo34" Left="3,5906" Top="151,62214" Width="712,28386" Height="18,89765" Visible="False" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="[frxDBCabecera.&#34;REGISTRO_MERCANTIL&#34;]"/>
       <TfrxLineView Name="Line6" Left="4" Top="0" Width="715" Height="0" Frame.Typ="4"/>
     </TfrxPageFooter>
-    <TfrxMasterData Name="BandaDetalles" Height="19,11812" Left="0" Top="336,37817" Width="718,1107" OnBeforePrint="BandaDetallesOnBeforePrint" AllowSplit="True" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
-      <TfrxMemoView Name="Memo39" Left="565,41732283" Top="0" Width="58,58267717" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="-16777194" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
+    <TfrxMasterData Name="BandaDetalles" Height="19,11812" Left="0" Top="332" Width="718,1107" OnBeforePrint="BandaDetallesOnBeforePrint" AllowSplit="True" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
+      <TfrxMemoView Name="Memo39" Left="565,41732283" Top="0" Width="58,58267717" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
       <TfrxMemoView Name="Memo38" Left="565,59616667" Top="0" Width="57,82674724" Height="18" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;DESCUENTO&#34;]"/>
-      <TfrxMemoView Name="Memo36" Left="627,4015748" Top="0" Width="89,95275591" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="-16777194" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
-      <TfrxMemoView Name="Memo35" Left="470,52752" Top="0" Width="92,22047244" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="-16777194" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
+      <TfrxMemoView Name="Memo36" Left="627,4015748" Top="0" Width="89,95275591" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
+      <TfrxMemoView Name="Memo35" Left="470,52752" Top="0" Width="92,22047244" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
       <TfrxMemoView Name="MemPrecio" Left="470,96059087" Top="0" Width="91,84251724" Height="18" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;IMPORTE_UNIDAD&#34;]"/>
       <TfrxMemoView Name="MemImpTotal" Left="627,05511811" Top="0" Width="89,16535189" Height="18" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;IMPORTE_TOTAL&#34;]"/>
-      <TfrxMemoView Name="Memo12" Left="5" Top="0" Width="400,52752" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="-16777194" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
+      <TfrxMemoView Name="Memo12" Left="5" Top="0" Width="400,52752" Height="19,11812" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;line#&#62; mod 2 = 0" Text=""/>
       <TfrxRichView Name="RichConcepto" ShiftMode="smWhenOverlapped" Left="11,33859" Top="0" Width="388,85065" Height="18" StretchMode="smActualHeight" DataField="CONCEPTO" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" GapX="3" GapY="3" Wysiwyg="False" PropData="0852696368456469740A6C0000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67333038327B5C666F6E7474626C7B5C66305C666E696C205461686F6D613B7D7D0D0A5C766965776B696E64345C7563315C706172645C66305C667331365C7061720D0A7D0D0A00"/>
-      <TfrxMemoView Name="Memo14" Left="407,52752" Top="0" Width="61" Height="19,11812" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="-16777194" Highlight.Condition="&#60;line#&#62; mod 2 = 0" ParentFont="False" Text=""/>
+      <TfrxMemoView Name="Memo14" Left="407,52752" Top="0" Width="61" Height="19,11812" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Highlight.Font.Charset="1" Highlight.Font.Color="255" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;line#&#62; mod 2 = 0" ParentFont="False" Text=""/>
       <TfrxMemoView Name="MemCantidad" Left="407,81098457" Top="0" Width="59,37007874" Height="18" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;CANTIDAD&#34;]"/>
       <TfrxMemoView Name="Memo2" Left="208" Top="0" Width="178,48825" Height="15,11812" Visible="False" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Text="[frxDBDetalles.&#34;TIPO_DETALLE&#34;]"/>
     </TfrxMasterData>
-    <TfrxReportSummary Name="ReportSummary1" Height="57,7953" Left="0" Top="415,7483" Width="718,1107" OnBeforePrint="ReportSummary1OnBeforePrint" Stretched="True">
+    <TfrxReportSummary Name="ReportSummary1" Height="57,7953" Left="0" Top="412" Width="718,1107" OnBeforePrint="ReportSummary1OnBeforePrint" Stretched="True">
       <TfrxShapeView Name="Shape5" Left="4" Top="13,7953" Width="714" Height="44" Color="15790320"/>
       <TfrxMemoView Name="Memo9" Left="584" Top="33,7953" Width="132,75603" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
       <TfrxMemoView Name="Memo10" Left="584" Top="17,7953" Width="132" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Total factura"/>