diff --git a/Build/Build.fbl6 b/Build/Build.fbl6
index 0297440..3961270 100644
Binary files a/Build/Build.fbl6 and b/Build/Build.fbl6 differ
diff --git a/Source/Cliente/FactuGES.res b/Source/Cliente/FactuGES.res
index 788e748..61acf51 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/Informes/1/InfAlbaranCliente.fr3 b/Source/Informes/1/InfAlbaranCliente.fr3
index d20fe7c..ff757da 100644
--- a/Source/Informes/1/InfAlbaranCliente.fr3
+++ b/Source/Informes/1/InfAlbaranCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="42669,7396372222" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture5.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo2.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture5.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo2.Visible := False;                                                       &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;               &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6735510648" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture5.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo2.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture5.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo2.Visible := False;                                                       &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;               &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="242" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
@@ -39,19 +39,19 @@
     </TfrxReportSummary>
     <TfrxOverlay Name="Overlay1" Height="1025" Left="0" Top="402" Width="718,101251175" OnBeforePrint="Overlay1OnBeforePrint">
       <TfrxPictureView Name="Picture6" Align="baBottom" Left="6" Top="832,73228346" Width="713" Height="192,26771654" ShowHint="False" Center="True" Picture.PropData="04446174610AC13000000A544A504547496D616765B2300000FFD8FFE000104A46494600010200006400640000FFEC00114475636B79000100040000003C0000FFEE000E41646F62650064C000000001FFDB0084000604040405040605050609060506090B080606080B0C0A0A0B0A0A0C100C0C0C0C0C0C100C0E0F100F0E0C1313141413131C1B1B1B1C1F1F1F1F1F1F1F1F1F1F010707070D0C0D181010181A1511151A1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1FFFC000110800DC030C03011100021101031101FFC4008B000100030101010100000000000000000000030405060201080101010101000000000000000000000000000102031000020102030309050606020006030000000102030411210531411251617181A1C1D1221391B1324252E16272231406F09233435315F182A2B2C26324348325161101010003010101010000000000000000000111021231214161FFDA000C03010002110311003F00FD5200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000239DC5BC3E3AB08E3B319240452D4AC23B6BC7A9E3EE264452D6AC16C9B97445F78EA092CF52A1755250A71927158B72492E4DCD89722D14000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000014F56A95A95A3A94A6E0E3258B586C796F2518B0ADA8DC4B86152A4DA59A526B2E7CD18FAAF7FEAF519E1C71E6F3493EF65E68923A1DD6F94175B7DC3912474197CD597547ED2F28F973A452A36D52AFA9294A0B14B2485D478D09BFD6C97FEDBF7A26AB5BE6D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000055D53FF00A15BA17BD12F832B446FF5725B9C1E3ED467556D9B40001575492561579D25ED6912F828E8115FA8A8F0D90DBD2CCEAB5B86D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000053D5E5C3A7D5E7C17B64897C19DA1AFCFA8F0D9159F599D56B64DA0000A1AD4B0B3C3EA9A5DFDC67611FEDF8655E7CAE31F662FBC6A35CD0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000033F5C925658638714D2C397799D856D05655A5F857BC6AAD534800032B5D9FF461F8A4FB119D859D0E1C365C5F5CDBF665DC35F0681A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000657EE09FE4D1872C9BC37E4B0EF33B06871C2DA72C3E29EDE8486A344D000030B59A9C579C3F4452F6E7DE63656CE9F4FD3B2A316B07C29B5CEF3EF351160A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000C4D7E78D6A30FA62DFB5FD863655BD221C36307BE4DB7ED353C45C2800039BAEFF00517D3C3FB953853E66F0473FD5750924925B11D100000000000000000000000000000000000000056BBD46DADB29CB19FD11CDFD84B456FF007494789DB5551FAB0C89D0B56B7F6D75FD3979966E0F2659458280195AE5DB84236F0784A7E69E1B525B3DA676A33A95D6A34A0A709D4F4F7369CA3DB8A27D559A5AF5CAF8E119F46317DE3A16E9EBD6D2CAA4250E7CA4BB332F48B34F52B1A9F0D68A6F74BCBEFC0B9162328C963169AE559947D000000000000000001B4B36056ADA95952F8AAA6F923E67D84C8A7535FA4BFA54A52E793515D9893A1567AEDDB7E58C21D4DBED64E95E15FEAD3CE329B5B3CB0587B8668F4EE75A4B17EAE1F81780FA3E4757D4693C26F8B9A71C3DD80CD17ADB5DA336A35E3E9BFA9671F12CD91A71946494A2F14F34D1A0000003692C5E496D605696A7611C71AF1787267EE26444F5AD3D6C9B7D11977A1D4113D7ED56CA751F52F12742397EE08FCB41BE9961DCC74A8E5FB82BE7C34A31E4C5B7E04E844F5CBE7B381742F16C742F68F737770EA4EB4F8A11C23158259BCDEC45951A468000002BDCEA1696F9549F9BE88E6C9919B5B5FA8F1546928ADD29BC5FB113A557FF0061AA577E494DAE4A71EF4899A1E96B12F37E767F79AECC46287A3AC27FDECBEFBF118A1FADD56867394D2FBF1CBB50CD16686BF3582AF4D35F54327EC65E86A5BDD50B8871529A92DEB7AE946B289400000000A973AAD9D07C2E5C735F2C33F6EE25A33AB6BF5DE3E9538C16E72CDF719E9507EB755ADF0CA725F723E08668FBE96B0F3FCECFEF35DE3143D1D6167F9DFCEFC46287EAF56A39CA5512FBF1C576A19A26A3AFD75FD58466B963E57DE3A1A76BA95ADCE50970CFE8964FED352A2C940001CF6B53E2BF92FA2318F7F798DBD56BD94382D28C7EE2ED589A8898A00477357D2B7A953E98B6BA770A30F49A4EA5F53C7350C66FABED31AABA436836926DBC12CDB6065DDEB94E0DC2DE3EA496D9BF87AB94CDD851FF0063AA546E50949AFB904D2EC64CD57BA3ACDED29F0D5C2A25F1464B865D83A1B56D734AE692A94DE5B1ADE9F21B44A0000000055B8D4ECE862A53E292F9639B26467D6D7EA3FE952515CB378F62C0CF4AAFFECB53ACFC9293E684578319A1C3AC4F3FCECB9DC7BD0FA1E86B1FFBDFCEFC46287FFB8A59FE772EF9788FA3ED3D66FE93C2A353FBB38E0FB3019A2FDBEB96F5308D64E94B976C4B36468C6719C54A2D4A2F6359A343E8003C57ABE950A9570C7822E58742C40C1A149CACEE2FA6F1AD17E49724B158BED31F9957D57770AD956FD73F57FC0D62F6E0321711953A56D7F4D284E7F1A8AC1712DFD628DCF597E9FD6DDC3C7875626D1EE738C20E7278462B16F9901CC49D4BDBDC7E6AB2F62FB11CFDAAE8A9D38D3A71A7058462B04BA0E88F152D6DAAFF00529464F97058FB40AD5346B297C3C50FC2F1F7E24E456A9A14FF00B7593E692C3B5139540F4AD4293C60937CB0960FB702734155D5E8ADB5525CA9C976E23E8F51D6EFA0F0970CB954A383ECC07544B1FDC15BE6A317D0DAF12F4258FEE0A7879A8B4F99A7E03A47B5AFDAEFA753D91F11D2E1EA3AED9BDB19C7A52EE63A4C3E7FBFB5FF001D4F647C47461E25FB828E7C34A4F93169788E8453FDC155FC14631E96DFBB02742BCB56D46B3C212C39A9C7FE466ABE7E8F53B978CD4DA7BEA3C17B1F80C5162968537FD5AA9734163DAFC0BC8B74F48B286D8B9BE593EE5822E11661428D3F829C63F852451EC001F27084E3C338A94791AC5019B79A3425173B6F2C97F6DEC7D1C866EA2A69DA84ED6A7A7531F45BC2517F2BE524AAE8934D62B34F633680000D62B060726A9A771E9278273E04F9B1C0E6AD68E856EBE2A936F7E182EE66B94491D1AC96D52974C9F7605C0963A658AD9453E96DFBD8C0923696B1F868C161BF8517032359947D785282494238B49619C9FD863656A6914BD3B1A7CB3F3BEBD9D86A22E14008EBDC52A14DD4AB2E18AF6BE80312F358B8ACDC29634E9BC961F13EB317657CB6D1EBD5F3557E945EE79C9F56E1351A7474DB3A5B29A94BEA9F99F69AC22C94000002A5CE996B5937C3E9CFEA8E5ED5B0960C8AB46EAC2BA6A583DB09C7635FC6E31E2B774FBD8DDD1E2D952394E3CFCC6E5459280105DDED0B5871547E67F0C16D64B461DCEA377773E08E318BF869431C5F4F299CE5535B68952583AF2E05F44737EDD859A8D2A36169470E0A6B15F33CDFB597089CA000001057B1B5ACBCF4D63F52C9FB5130326F34AAB413A949BA94D66FEA466EAAB3A5EAB272542E1E38E50A8F979196546C1A00397BC7EB5F55C3E6A9C2BDBC273BEABA44B049721D1000051D66AF059F0EFA924BA967DC67610E814B3AB55EEC20BDEC6A356BD7A5429BA9525C315DBCC8D0C0BDD46BDE4D538271A6DE11A6B6B7CF818B72AB565A3C52552E737BA96E5D3CA59AA34E318C528C52515B12C91A15B51B4857B7934BF360B183DF96EEB25833B44B8F4EEBD36FCB5561D6B3467556F9B400010DD5E50B687155966FE18ADAFA112D18775A9DD5D4BD3863084B254E18E2FA794CDB95496DA2D69E12AD2F4E3F4ACE5E084D51A3474DB3A5B29A93FAA5E67DA6B02CA492C1648A000001E6A52A55161520A6B924B1033EE745A525C56EF825F4BC5C5F7A33751428DC5DD85671D987C54E5B1FF1CA4F15BD67794AEA971C326B2945ED4CD4A89CA3C5C52F56854A58E1C7171C7A5600615BD492B4B8B19470AD27E48BCB178AC567D063F8AF72D32BAB4A3569D3C2E20DF1D3783C56393CF2180BFBA776A85B528F0D4C7CF05B14B6619720B72367D15FA7F477707076606D14B5CB874ED9524FCD55E0FF000ADA676A2B6876FF001DC497DC877B1AC1AC68000000000F928465F124FA5620452B2B496DA30FE544C08DE9760FFB5874392EF1883C3D1EC5BC5464B9949F78E60F9FE9ACB925FCC390FF004D65C92FE61C8F71D26C161F978E1CB29788C41242C6CE1B28C3AD63EF1813A8C52C124973140000000000000063EB56CA338D78AC14FCB3E9DCCC6D05DD16E1D5B4E093C6549F0F56D46A517CA001E4B10396B6FCCBEA6F0F8AA2961D789CE7AAE94E880000073777275EF6A70ED94F863D5E5473BEABA784542118AD91492EA3A23E8105E5DD2B5A4EA4F37B230DED92D1CFD4A9757F71F54DFC315B228C7AAD8B2D3A8DB2527E7ADBE6F7741B9116CA000001E3D7A3C5C3EA478BE9C56207B00043776D1B8A12A6F6BCE2F91EE64A3174BAD2A37D04F2537E9CD74FDA662BA4368A7A8EA30B5870C7095697C31E4E764B46250A1737D5DB6DB6F3A951EC5FC7218932ADDB5B3A16D1C29AF33F8A6F6B3722262800000000000060EAB691A15D4A0B0A7533496E6B698DA2B674DB97716909C9E335E59BE746A22C4E6A1094DEC8A6DF514733611756FA9639B72E2975798E73D574674400018DAE55C6BD3A6B64238BE997FC18D9566CEBD1B1D3213A99CAA6328C16D78ECEC2CB888CEAF5EEB50B8492C5FC905B22BF8DE4F55AB63A753B65C527C759ED96E5CC8D488B85000073B774E56B7D2E0CB864A74FA1E68E77E5574742AC6AD18558EC9A4FDA7447B02ADFDFC2D296394AACBE0877BE625A30A10BABFB86F1E293F8A4F64518F55B7696542DA38416337F14DED66E4458280000000000004377694EE69704F26B384F7A64B061D1AB5EC2EF3C9C5E1523CB1FE3618F15D253A90A94E3520F18C96299D11E80AD77A75B5D6734D4F629C7264B056FF4D2E1E077553D3FA7F864E459B4D3EDAD73A71C67BE72CD964164A39ED66B71DECA3BA9A515D3B5FBCC6DEAB5ECE8FA36D4E9EF8C73E979BED351131400000000000000000000000F352AD2A51E2A93505CADE0051ADAD5B432A69D57CD92F6B33D0A7575ABA97C0A34D7B5F6F813A541FECAF9BC7D67EC587B899A27B7D66E6125EAE1521BF2C25D859B236E138CE119C1E3192C53E666C7D00000A7ABC53B19B7F2B8B5ED489B782AFEDF97E6D6872C62FD8DF899D46D1B0021BC9FA7695A7BD425874E028C1D221C57D0E48272ECC3BCC6AAE80DA0000F15EA7A742A54FA62DFB10183A4D3752FE97247193EA5E2635574A6D1E2B56A74694AA5478462B1607375AAD7BFBA5963293C211DD1473F55B967674EDA970C739BF8E7BDB3722272800021BABBA56D4F8EA3CDFC315B5B25A30AE2F6EAEA7C2DBC1BF2D28ECFB4C66D579AD63734692A9569F041BC33C31C5F30C0D3D12BCE74EA5293C553C3871DC9E39761AD6A348D001CE4D25A8B4B67AD97F398FD56FDF5DC2D683A8F393CA11E566AD46050A35EFAE5E2F3979AA4DEE5FC6C312655D051A34E8D354E9AC22BF8C59D11EC00002ADEEA146D560FCF55EC82EFE425B81935754BDA92CA7C0B7460B0EDDA67354A3AA5ED29E329B9C7E684BF8C4646FC24A708CD6C924D759B47D00067EB714ED632DF19AC3AD333B0F9FB7DBF46AADDC49F60D56ADEA953D3B0AAF7C970AFFB3C0B7C4656894F8AEA53FA23974B667556D9B40001CD5ED5F56EEACF6AE269742C97B8E755F6DE85C5DD4504DB5149393D9188932376D2CE8DB43860B193F8A6F6B3722272800000646B7E8CB82719C5D48BE1945358E0F3D867616342B8E2A13A2DE74DE31E897DA35A2FDC57850A32AB3F862B1C39798D0E71BAF7D77CB39BEA8C7C11CFD56F5B5B53B7A4A9C164B6BDEDF2B3A22500000011CEE6DE0F09D5845F23924323D53AB4AA7F4E719FE169FB80F40000003375AB652A4ABC579A9E52E78BF0667681A0DCB94276F27F0F9A1D0F68D68D634000000039594BD4BCE2967C55735D3239FEABA63A200000000000000000001E2AD7A349635271874B02956D6EDA39538CAA3E5F8576E7D867A142B6AF795328C9534F74567ED64EAABCD2D3EFEE5F1704B3DB3A8F0F7E63145FA1A045675EA63F761976B2CD517A969F674B0E0A51C56F79BED2E058492D85183AE52A70B984A1149CE38CB0DEF1DA63655FD2B1FD052C7EF61D1C4CD4F116CA0000A7ABB4AC2A63BDC52FE644BE0A9FB7E3F9D5A5C914B0E97F619D46D9B0028EB55386C24BEB9463DB8F713614742A78D4AB539128AEB78F71351B06800014B57A9C16325BE6D47B71EE26DE0ABA053C6B55A9F4C54575BC7B8CEAADB368C2D6EF3D4ABFA78BF253F8F9E5F618DAAAD69367E8D1F566BF36A2DFBA3B91A9117CA0000F93946117393C23158B7CC80E72E6E2ADDDC7124DB93E1A70E45B91CEFD56E585852B5A58CB075B0C67539399731B9308CCD5B5085C4952A59D383C5CB95F37319B556F46B7953B77524B0755E297DD5B0D6B11A051E6A548D3A729CB28C536FA80E76CE3EB5F53E2CB19F1CBABCCCE715EF50BA95DDD7933827C34A2B7FF00C8B72366C6D236D41436CDE73972B37222C1400015351BD56D4BCB9D59E505C9CE4B7031EDAD6E2F2ACB85E2F6D4A92DC624CAA5B7D468DBC30A36EBD4DF526F16FB0B910C29DCDEDC36BCD39BF3CF7227A3A3841421182D91492EA3A23E80032F5DACB829D15B5BE37D0B24676136834DC6D6737F3CB2E84B0F78D447AFD5C29D2A5F53727D4B0EF1B11F743A7C36F3A8FE7965D111A8D13400457757D2B6AB537C62F0E9792ED2518763A7D5B9926F18D15B67CBCC8CC8ADEA346951828538A8C56E5DE6D1EC0000295D6AD6F4718C3F36A2DCB62E964B46556BDBCBA97062F07B29C13EECD99CDAA96968B7D38E2D469F349E7D898E45AB0D36F6D6EA351F04A0D353E16F63E948B26110EB975C759508BF253CE5F89F8226D556F49B4F4687A925F99573E88EE46A445E2800012928A726F04B36DF201857FAA54AF270A2DC28ECC564E5F618B55E68E8F7B562A4A31827B38DE1EE4C7223B8B3BAB39C6535C2FE59C5EFE925981AFA65E4AE68B53FEAD3CA4F971D8CDCA8B85000079AB4D54A73A72D934E2FAC0C0D32A3A57F4F1CB16E12EBCBDE739EABA53A20000000398BFA0EDEF271592C78E0F99E673BEAB72CEF295CD3528BC26BE386F4CDCA89CA000000000008AA5D5B53F8EAC62F91B58FB09915AA6B1651F85CA6FEEAF1C075056ABAECDFF4A925CF278F62C0CF42A4F50BFAF2E153962F6469AC3DD993355EA8E957D55E2E1C09ED94F2ECDA5C517A8E814D60EB5472E58C725ED65E51A142CAD687F4E9A4D7CDB5FB5E66B0260000001CF6B73E2BE6BE88C63DFDE636F55AF630E0B3A31FB89BE9799A8898A0000CDD72A616F4E1F54B1EA4BED33B0F5A053C28559FD52C1752FB46A350D00191FB82A65469F4C9FB919D849A2C386D1CBEB937D4B2EE1AF82F9A0000656BB3CA8D3E56E4FAB2EF33B2AC6854F86CDCFEB9B7D4B21AA2E5DD7542DAA557F2AC973BC9168E7AC2DDDCDDA53CE2B19D47CBFF002CCC57446D000000CFD6AE382DD524F3AAF3FC28CED465D95CD3B6AAEACA1C734B0A6B1C126F7B332E15EABDEDE5E4B81B6D3D94A0B2FB466D172CB4778AA973D2A96DFE6353546B1A0032759BD4D7E9A9BC77D56BB22676AAA3084A95B4AB3CA5571A74BA3E67DC6459D16DB8EBBAD25E5A7F0FE27E08BAC1B66D00001B4936F24B36C0E6EE2AD4BCBB6E39B9BE1A71E6DC73BF55D052B685AD9BA70DAA2DB972BC369B473FA7538D4BCA509478A2F1724F6649988AE8E308423C308A8C56C49608E88FA0008EE2E29D0A4EA547825B16F6F910A39E94AB5EDD72D4A8F08ADC97D873F55D35BD18D1A30A51D90587DA74473FABD6F56F67866A9A505D5B7B4C5F55B56747D1B6A74F7C62B1E979BED3711280022B9B78DC41426DF07129492DF86E0248C6318A8C56115924B601F40011D7AF4A841CEA4B863BB95F320316F754AD5F18431A74B661BDF4F818B5525968D56AA53AD8D2A7BA3F33F01351B36F6B42DE3C34A0A3CAF7BE966D1281E2B558D2A53A92D904DBEA039AB5A72BABD8A9E7C72E2A8F9B6B39CF55D21D1000000CBD6AE9C631B78BCE5E6A9D1B919DA8F9A358466BF53556293FCB4F9B78D60D9342A6AD08CEC2AE3F2E125D2992F8333439357338EE70C7D8D7899D56B68DA000001CE56F26A33C1ECAB8A7FF006C4E7FAAE9CE880000000AD7D614EEE0937C338FC335EE25991875B4FBEB69F128CBCBB2A53C5FBB34671548EA97D0F2FA98E1BA4937E24EA897FDDDE7253F63F12F460FF7779F4D3F63F11D0F8F5ABC6B05C0B9D27DEC743C3D5EF9FF00712E88AEFC475479FD56A357E1A95258BCB831FF00D24CD0FD1EA35B374EA4BF1E3FFA8628961A1DF4B6A843A5F8625E45AA7FB7D7F72B3E88AC3B5E25E516A968F634F370737F7DE3D9B0B882DC2953A6B0A71505C9149147A000000000000E5EEDBAD7D530F9EA70AF6F0A39FEABA44B058721D1000000C5D7278DCC21F4C71EB6FEC31B2B4F49A7C1614B9649CBF99E26A22D9400E7B5BA9C57CD6E84547BFBCC6CAD6B1A7E9D9D18EFE14DF4BCCD444E50000616B3538AF387E88A5EDCFBCC6CAD9D3E9FA765463860F8536B9DE66A228EBF5B0852A2BE66E4FAB25EF26C3EE89478684EABDB3960BA23F68D4689A000000CDBED3EE6EAEB8B8A30A514A316F16F95E466CC8FB4744B78E75652A8F917957667DA3917A950A3463C34A0A0B991A1EC001997FAB4629D3B77C53D8EA6E5D1CA66EC2969F6352EEAF14B15493C673E57C9D24932A975A9C7F510A1058428C124B91BFB301B0D1D3297A7654F966B8DFF00DBEC351168A0000A7AB56F4ECE496DA8F8175EDEC26C29E85414AB4EB3D94D611E997D867556C5CA93B7AAA2F09704B07CF81BA8E7B49695F53C77A697B198D55D09B47C94A3158C9A496D6F24051B9D62DA9A6A97E6CF9BE1F699BB0CA9CEEAF6BA59CE6FE18AD897719F55B9A7E9D0B58F13F35692F34B93991B91162E2B468D09D596C82C7AF7168E76C694AE2F61C59E7C737D19FBCE73D5744744000000000A57DA9D3B66E9C571D6C366E58F292DC0C851BBBEAFBEA4F97624BB8C7DAADAB1D2A8DBE139FE656E5DCBA11B91178A0000A1ADD5E0B271DF524A3D4B3EE33B7829E854BCD56ABDD8457BDF70D46B9A000000E6EE252BABE970EDA93E1874638239DFB55D353A71A74E34E2B08C524BA8E88F4054D5A4A3A7D5E7497B5A44BE0CDD0E38D7A92C36470C7A5FD86755AD93680000073776B8AFEAC71C31A9863D2CE7FAAEA0E8800000000003CCE9539AC2708C972349FBC089D8D93DB429FF002A180561649E3E853FE544C0FBFA3B3FF053FE48F81702454E9A78A8A4D73203D000000000000000000000F3526A14E537B229B7D480E6B4F8BA97D4B1DBC5C4FAB339CF55D19D1000000E73529F1DF556B3C1F0AEA581CEFAAE968D354E9429AD908A8FB1607447A00072F5DBB9BE961FDCA982E86F05D873FD5748960B05B0E880000073776DD6BEAA96D94F857B784E77D574F14A31515B12C11D1181ADCF8AF9AFA22977F798D95AB630E0B3A31FB89BE9799A889CA0000000007C94A315C526A296D6DE080A55F58B4A7941BAB2FBBB3DACCDD8665CEA17572F831E184B254E3BFA77B25AAB565A2D49B53B9F243E8F99F4F209A8DAA74E14E0A108A8C56C4B61B4733A849D4BFAD86D73E15D5E539DF55D1462A31515B12C1751D11F4000032F5D6F828ADD8C9E1D0919D858D0E095962B6CA6DBEACBB86BE0D0693583D8CD0E72EB4DBAB7AADD38CA504F184E38B6BD862C579F5754C30C6B7B25E03E8F91B1D46BB4DD39CB1F9A797FE62628BB6FA0CB1C6E2782FA61E2CD4D51AB42DA8D087052828ADFCAFA59A12018DAE5DA6E36D07B3CD53B919DA89346B674E8BAD25E6ABF0FE15E2358344D00000000015AFAC61754F746AC7E09F73E625831A857B9B0B869AC1EC9C1EC6BF8D867C57436B754AE692A94DFE28EF4F9CD4A894A0000C8FDC127C3423B9B937D2B0F133B2A4D123859B7F54DBEC4BB8BAA2F940001E2BCF828D49FD316FD8B1030B48A7C77F4B7A8E327D4BC4E7AFAAE90E880197AF55C2853A7BE72C5F4457DA6761E743A7851A953EB960BA22BED1A95A4680000039BA3F9F7F1E4A9571EA72C4E7FAAEA0E88000000000000000000000000000000000000000055D52A7058567CAB87F99E04BE0CAD1218DD4A5BA107ED6CCEAADB36800000737413AD7F07F5D5E27D1C58B39CF55D41D1002B6A370A85A4E78F99AE1874B25A31B48A1EA5DA97CB49713E9D88CEAADE3680003E4A4A31727B12C581CEE9F1F56FE9639E32E27D5E639CF55D39D11CD6ABFF00DFAFD2BFF2A39DF55BD47FA34FF0AF71D11EC000033F50D4EA5B5654E1052C62A5C4DBDEDAD9D466D1525ADDDBD9182EA6FBC9D2A196A57F53CAAA3E88249F6664CD1F2163A85C3E274E6F1F9A6F0FFCC5C517686812C9D7A987DD878BF02F28D3B7B3B6B75F95049EF93CDBEB35813000396AB95F4F1CB0AAF1FE739FEABA53A20000019DADD272B78545FDB967D12CBDE6761F341B88F04E837E64F8A2B99ED1AD1AC68000000000CFD4B548DBA74A9612AEFD91E93368CBB1B3A97759CA6DBA69E3526F6B7C9D24915D02492492C12C9236800022A9776F4AAC294E6A339EC5E24C894A0000015AF6C69DD4307E5A91F827C84B3231BFF95A7DCF2497F2C918F15B965A850BA8F97CB517C54DEDEAE546E5CA2D1400C8FDC117C3425B9392C7A70F033B2C7BD0DFFF00124B1D93797521AF88D03400008EE5395BD58ACDB8492F60A317459F0DFC17D7192ECC7B8C6AAE88DA00737A9DCFEA6F1F06718F929F3FFCB39DB9AADBB4A1E85B53A5BE2BCDD2F37DA74889400002BEA15BD1B4A92DED70C7A5E44A32F44A3C77AA5BA945BEB79233AABA03680000000000000000000000000000000000000000666BD530B68413F8E79F424676116854F0A756A7D52515D4B1EF1A8D4340000349A69EC60735465FA5BD8B9AFE94F092E659339FEABA884E138A9C1A945E69A3A23E55AB4E941CEA49460B6B6073BA8DF4AF2B2504FD38E54E3BDB7BCC5B956B69D69FA6A184BFA93CE7E1D46A445A2800022BB6D5AD66B6F04BDCC518FA2453BE4F92126BB17798D55D09B4739AC4386FEA7DE517D987718D95B5693E3B5A52E5847DC6E22500000CDD6AD653A71AF058BA794D7DDE5EA33B41574AAF67197A7714E2DC9F92A49278733C49AD56FC6108AF24525CCB0368FA000015ABEA567471E2A89C97CB1F33EC26465DD6B95A6B86847D25F53CE5E08CDD950DB69B73732E3A98C20DE2E72F89F426241BEB672F39B4000003CD4A71A94E509AC6325835D2073D5E8DC58DCA69B4D3C69D4E55FC6D39D9856C596AF42B251AAD53ABCFF0BE866E545F2800023AD71428C71AB3505CFB7D832322F75B9CD385B2708EFA8F6BE8E4317654365A5D6B87EA56C6149E78BF8A5ED1351B74E9D3A5050A71518C76246D1E80010DD5D53B6A2EA4F3DD18EF6F90968E76AD4A95AA4EACFCD279C9EE4BC0C2B474DD51452A15DE5B2151FB99A951AE680000023AF6F4ABD370A91C56E7BD73A6062DD69B716B2F529373A6B3538FC4BA703162A7B5D72A4128DC47D45F5ACA5ECD8C4D8684356D3E4B1F552C374935DC6B3119DAB6A16D734E14E96327197171E182D8D61999DAAA4D09CF86AAC1F0629A96EC7632EA8D43400006DC981CE494ECAFB6674A58C79E3FF073F2AB7A9EA36538297AD08E3F2C9A4D753379450D4B578CA0E8DB3C71CA5539B9112ECA8B48B1739AB8A8BC91FE9AE57CBD44D62364D800000636B574A7563422FCB4F39FE27E08C6D557B45B6F4AD7D47F155F37FD771A9117CA000000000000000000000000000000000000000018DFB81BE2A0B76127EE33B09F464BF44B9E52C4BAF82F140000028EA1A646E5FA94DA8D6C30CF64BA4960CE8D0D56D9F0D35522BEE66BB32338AA2B1D4AE258D452FC551ECF6E631469D8E994ED9F1C9F1D5FAB72E835222E14000003CD582A94E74DEC9A717D6B0039EA552BD8DD62E3E78629C5EC68E7E2B4A3FB82961E6A324F99A6BB8D748CDBFBC5755554E0E0C170EDC71EC466DCAB57469CDDA70CA2D2836A2DADA9E66E22F140000032EF747E293A96D845BDB4DE4BA8CDD4538FFB5B5CA3EA412DCBCD1EF44FAAF6B57D4A2926F16F6371CFB3019A3E3D43559BC14A79EE8C1780CD1E7F49AA5C7C71A925FF00B8F05DAC628B14743A8F3AB5145724737ED65E517EDF4EB5A0D384319AF9E59B2E05928000000001E6AD1A7560E1522A517B9819571A24D36EDE78AFA25B7DA66EA2B461AADB650552296E8F9A3D98A27D57B5AA6A893F3378EF705DC8668F9FA9D62B2C13AAD3DF18F0F6A487D1EA9E917B565C555A863B5C9F14BB3C472342DB4BB6A0D49AF52A2F9A5DC8D488B8500004771714A853752A3C22B62DEDF22168C0AF5EBDEDC2CB16DE14E0B72FE369CFD56E5869F4EDA838C9294E6BF31ED4F9BA0DC88CCD4B499516EAD04E54B7C76B8FD866EA3E586AB2A3C34AB3E2A3B14B6B8F8A12AB6A328CA2A5169C5E69AD86D1F400000055AFA65A566E4E1C337B650C9F812C1525A0AC7CB59A5CF1C7DCD13912D1D12DA0F1A927539B62EC1C8BF18C631518A518AD89648D0FA0000002BDE58D1BA8A53CA6BE19ADA8960CE96855B1F2D58B5BB14D19E458B7D168C1A95697A8D7CB8611EBE52CD468A492492C12C92468000002B5FDE46DA8F16DA92CA9C79F97A8968C6B1B59DE5CE126DC71E2AB2EBEF312655D32492492C12C923A2000000000000000000000000000000000000000000327F70536E146A61945B8B7D39F719D87DD0EA276F3A7BE12C7A9A1A8D1340000000000000000000003C55A346AAC2A42334B6712C40AEF4AB06F1F4B0E894BC498825A765694F38528A7CAD62FDAC604C504D358A78A7B1A00000000000000000003692C5EC032B50D5A383A56EF16F29555B17E1F133760D2B51C70B7ACF3D94E6F7F33EE1AD1AA68000000000000000000020BBBCA36D0E29BC64FE182DAC968C2AB56E6F6BACB8A4F28416C48C7AADBD3B4E85AC78A5E6AD25E67B973237261174A0064EA3A3F1375AD9252DB2A7CBD066C19F697D5ED26E38630C7CF4DE59F3723332E15BB6D7546E21C54A58E1F145ED5D28DCA894A0000000001B4962F24B6B02AD0D46DEBD795183CD7C2DEC972E04C8B4500000000000000105E5E52B5A7C53CE4FE082DAC968C272B8BEB95F3549E492D897818F55D0D95A42D68AA71CE4F39CB959B911394000000000000000000000000000000000000000000417D6DFA8B59D2F99E707CEB612C1CFD9DCCED2E389A787C3521BF0F14625C2BA1A5569D5829D392945EF47447A000000000045717542DE3C55649722DEFA112D1897DA955B9C611F251FA77BE9336AB474BBF55A0A9547F9D15937F32F12CA8BE680000000475AE28508F1559A8ADC9ED7D0864645EEAD3AC9D3A29C29BC9CBE66BB8C5D950D8EA152D5F0BF3D17B61C9CE892E06ED0B9A35E1C54A4A4B7ADEBA51D32890000000000003CCEA53A71E29C9463CADE080A371ACDBC315493AB2E5D91F699BB0CDAF7977772506DB4F65282CBD9BCCE72AB965A24A4D4EEBCB1FF1A79BE966A6A8AFA8E993B6939C139507B1EF8F33258A9AC75771C29DCE71D8AA6F5F8B94B3646BC2709C54A0D4A2F6359A343E80000000000000F92946317293518ADADE480CDBCD6611C616DE697F91FC2BA394CDD867D0B7BABDACDAC64DFC7525B119C655BD656146D63E5F3547F14DED7E08DC88B25000000A97DA6D1BA5C5F055DD35BFA4960C3AB42EECAB26F18497C338EC7FC7218C6157ED75A834A370B85FF923B3AD1A9B234E1384E2A5092945EC69E28D0FA00001157B9A1423C5564A3C8B7BE8432316FB52AB72DC238C28FD3BDF4F818B550D5B4B9B78C2A4E2E0A59C65BD3EE64C0D1B2D622D2A772F096C55373E9E4353646A292924E2F14F63468000000000F929C6117293518ADADE480CDBBD6A11C636EB8E5F5BF87AB94CDD867D1B7BABEACDAC6527F15496C4671956FD958D2B5A784739BF8E7BD9B91160A0000000000000000000000000000000000000000000000CED474A8DC375693E1AD866B74BED3360C88CAF2CAA7CD4A5BE2F63EE667C55EA3AEEEAD4BFED0F07E26A6C2D4356B19ED9B83E4926BEC2F51137EB6CFF00CF4FF990C8F92BFB24B175E1D4D3F70C882A6B3671F85CAA3FBAB05DB80E852AFAD5C4D354A2A92E5F8A5E067A54142CAF2F25C69369EDAB3797B5ED263235E868D6B4E9B8D45EA4E4B0737961D08DE119579A6DC5ACB89633A6B35523BBA790CD985494359B9A6946A25562B7BCA5ED1D0B51D72DDAF3539C5F360FBD17A47A7AE5AE19426DF260BC47421A9AEBFEDD1E8727DC8742AD5D52FAABC14F831F960B0EDCD93A528E997D5E5C4E0E29ED9D4CBDF98C0D5B4D1ADE8B52A9F9B35CBF0AEA35223EDF69346E319C3F2EAF2AD8FA50B063D6B3BDB49F134E386CAB0C70F6A318B152D1D66EA0929A8D45CAF27ED45E85A86BB45FC74A4BA1A7E05E9122D6ECDBCD4D73E0BB98E87D7ACD925B64F9B87C47507896B96CB6426FA92EF1D0867AECFE4A2973CA58FB913A556A9AADED4CB8D413DD05876E6C9D51E6165A85C4B8B82726FE79E5DB218A2FDBE83B1DC54FFA43C59A9A996950B5B7B78E14A0A3CAF7BE96691280693583CD3DA80CABDD1232C676CF865BE9BD9D4F719BA8CC52BDB2A9879A94B91EC7DCCCFD8ABD475C78255A9E3F7A1E0FC4BD22E53D52C6A7F7145F24BCBEFC8D644F0AD466B184E325CCD328F6000F32AB4E0B19CD4573B480AF5354B187F7549F247197BB22660A75B5C7B2853FFB4FC17892EC2939DEDECF87CD55AF956C5DC8CFDAAD0B4D0B64AE5FFF008E2FDECD4D51AB4E9C29C14211518AD89648D0F40000000000F93A70A91719C54A2F6A6B140655D68516DCADE5C2FE896CEA666EA33A54AF6CE78B52A4FEA5B1F5AC8CFD8A9A9EB57915E6519F3B583EC2F4257AED4C32A2B1E5E2787B874886AEB17935845C69AFBAB3F6BC474A8E8585EDD4B8945E0F6D49ECF6BCD93191B365A550B6C26FF32AFD6F62E846E445C9C2138B8CD2945ED4CA322EF4378B95ABCBFC727EE7E266EAACF53BDB39E1E6A4FE97B1FB72667EC16E96B95965529C67CF17C2FBCBD09E3AE5BBF8A9CD7460FBCBD23D7FBBB4FA6A7B1788E8C2396BB4F0F252937CED2F7623A15EAEB5772F81469AE5C317DA4E9504695F5E493C2757EF3F8575BC89F68D0B5D092C25732C7EE47675B353546AD3A70A7050845462B624687A000000000000000000000000000000000000000000000000003CD4A74EA4786A454A2F7358A02955D12CA78B8A9537F75E5EC789391567FB7E7FDBAC9ADCA4B0F73272217A15EAD8E9BEB7E04E55F63A0DE3F8A74E2B7E6DBF70E44F4FF6FC7FB959BE68AC3B5E25E517686976545A71A7C525F34FCCFB722E05A280002B56D32CAABC6549293DF1C63EE26056968368DE539C79B15DE89C8F9FE82D7FC953DB1F01C89A1A358476C1CFF137DD8171059A56D6F4BFA74E30E749265120000000AF5B4EB2AB9CE9471E55E57D981302B4F42B37F0CA71E64D3F7A64E4787A050F96ACD74E0FB90E47CFFF009FA5FE697B10E47B8E836AB0E29CE5CB9A5DC3912C347B08E0FD3726BEA6DF66C2E20B34EDE852FE9D38C3A12451200000000003CD4A74EA45C671528BDA9AC50146B68967378C38A93FBAF15EC64E454A9A0575FD3AB197E24E3EEC4CF2B9579E8D7F1FEDA9744977E039A3C4B4DD423B68CBA9A7EE64C505A76A0DE0A8CBAF05EF63147B8E8F7F2DB4D479E525DD8979A27A7A0577FD4A918FE1C65E0391768E8B674F39E355FDE797B11AE517A108423C308A8C7912C0A3E800000000000000001B4082A5859D478CA8C1B7BD2C1F613022FF0051A77F87FF0014BC46209A9D95A5378C28C13E5C163ED2E04C0000003E4A3192C249493DCF34055A9A4D854CFD2517CB16E3D8B2260412D06D1BCA734B9315DE89C8F9FE82D7FC953FF0F80E47B868764B0E2E3974BC3DD8179162969F654F38518E2B636B89FB5E2302C1400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001FFFD9" HightQuality="False"/>
-      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="965" Width="718" Height="60" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="&#13;&#10;En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="947" Width="718" Height="78" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
       <TfrxLineView Name="LineaCorta4" Left="631" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="581" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta1" Left="501" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line1" Left="718" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line2" Align="baLeft" Left="0" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta0" Left="461" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line5" Left="0" Top="1021" Width="718" Height="0" ShowHint="False" Frame.Typ="4"/>
-      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="722" Visible="False" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="705" Visible="False" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta5" Left="70" Top="242" Width="0" Height="528" Visible="False" ShowHint="False" Frame.Typ="1"/>
     </TfrxOverlay>
     <TfrxPageFooter Name="PageFooter1" Height="85" Left="0" Top="1704" Width="718,101251175"/>
diff --git a/Source/Informes/1/InfContratoCliente.fr3 b/Source/Informes/1/InfContratoCliente.fr3
index 2fd4b0b..ee79881 100644
--- a/Source/Informes/1/InfContratoCliente.fr3
+++ b/Source/Informes/1/InfContratoCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="42795,466710787" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo1.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo1.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    frxDBDetallesCANTIDAD.Visible := False;&#13;&#10;    frxDBDetallesCANTIDAD2.Visible := True;        &#13;&#10;    lConcepto.Width := 428 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 458;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;                                                      &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo34OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  RichConcepto.Visible := True;&#13;&#10;//  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D70726573612200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6882045718" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;//     Memo1.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;//     Memo1.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    frxDBDetallesCANTIDAD.Visible := False;&#13;&#10;    frxDBDetallesCANTIDAD2.Visible := True;        &#13;&#10;    lConcepto.Width := 428 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 458;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;//    Memo1.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;                                                      &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;//      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;//      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo34OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  RichConcepto.Visible := True;&#13;&#10;//  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D70726573612200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="241" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
@@ -71,8 +71,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="48" Left="0" Top="1935" Width="718,101251175">
-      <TfrxMemoView Name="Memo1" Align="baBottom" Left="1" Top="5,66141" Width="716,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1935" Width="718,101251175">
+      <TfrxMemoView Name="Memo1" Align="baBottom" Left="1" Top="1,66141" Width="716,48819386" Height="73,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
     </TfrxPageFooter>
   </TfrxReportPage>
 </TfrxReport>
diff --git a/Source/Informes/1/InfFacturaCliente.fr3 b/Source/Informes/1/InfFacturaCliente.fr3
index 250a81b..ed92c4d 100644
--- a/Source/Informes/1/InfFacturaCliente.fr3
+++ b/Source/Informes/1/InfFacturaCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="42817,7336252083" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     Picture2.Visible := True;          &#13;&#10;     Direcciones.Visible := True;&#13;&#10;     Memo5.Visible := True;&#13;&#10;     Memo28.Visible := True;                                                       &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     Picture2.Visible := False;&#13;&#10;     Direcciones.Visible := False;&#13;&#10;     Memo5.Visible := False;          &#13;&#10;     Memo28.Visible := False;                                                                 &#13;&#10;  end&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;&#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;&#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;//  begin&#13;&#10;//    Memo1.Color := clNone;&#13;&#10;//    MemCantidad.Color := clNone;          &#13;&#10;//    MemPrecio.Color := clNone;&#13;&#10;//    Memo11.Color := clNone;&#13;&#10;//    MemImpTotal.Color := clNone;        &#13;&#10;//  end&#13;&#10;//  else&#13;&#10;//  begin              &#13;&#10;//       Memo1.Color := clCream;&#13;&#10;//       MemCantidad.Color := clCream;           &#13;&#10;//       MemPrecio.Color := clCream;&#13;&#10;//       Memo11.Color := clCream;  &#13;&#10;//       MemImpTotal.Color := clCream;             &#13;&#10;//  end;                     &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3800000020446174615365743D22667278444244617461736574312220446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6742525579" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     Picture2.Visible := True;          &#13;&#10;     Direcciones.Visible := True;&#13;&#10;     Memo5.Visible := True;&#13;&#10;     Memo28.Visible := True;                                                       &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     Picture2.Visible := False;&#13;&#10;     Direcciones.Visible := False;&#13;&#10;     Memo5.Visible := False;          &#13;&#10;     Memo28.Visible := False;                                                                 &#13;&#10;  end&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;&#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;&#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;//  begin&#13;&#10;//    Memo1.Color := clNone;&#13;&#10;//    MemCantidad.Color := clNone;          &#13;&#10;//    MemPrecio.Color := clNone;&#13;&#10;//    Memo11.Color := clNone;&#13;&#10;//    MemImpTotal.Color := clNone;        &#13;&#10;//  end&#13;&#10;//  else&#13;&#10;//  begin              &#13;&#10;//       Memo1.Color := clCream;&#13;&#10;//       MemCantidad.Color := clCream;           &#13;&#10;//       MemPrecio.Color := clCream;&#13;&#10;//       Memo11.Color := clCream;  &#13;&#10;//       MemImpTotal.Color := clCream;             &#13;&#10;//  end;                     &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="250" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
@@ -30,7 +30,7 @@
       <TfrxLineView Name="LineaCorta5" Left="631" Top="250" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga4" Left="578" Top="250" Width="0" Height="718" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="488" Top="250" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
-      <TfrxMemoView Name="Memo5" Left="10" Top="985" Width="705,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+      <TfrxMemoView Name="Memo5" Left="10" Top="972" Width="705,48819386" Height="72,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
       <TfrxLineView Name="Line1" Left="805" Top="417" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta2" Left="428" Top="250" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta4" Left="578" Top="250" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
@@ -72,7 +72,7 @@
     </TfrxPageFooter>
   </TfrxReportPage>
   <TfrxReportPage Name="Page2" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
-    <TfrxMasterData Name="MasterData1" Height="13,82684" Left="0" Top="16" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDataset1" DataSetName="frxDBVencimientos" RowCount="0">
+    <TfrxMasterData Name="MasterData1" Height="13,82684" Left="0" Top="16" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBVencimientos" RowCount="0">
       <TfrxMemoView Name="Memo31" Left="0" Top="0" Width="79,90569" Height="13,82684" ShowHint="False" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBVencimientos.&#34;FECHA_VENCIMIENTO&#34;]"/>
       <TfrxMemoView Name="Memo40" Left="86,92919" Top="0" Width="98,80334" Height="13,82684" ShowHint="False" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 �" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;]"/>
     </TfrxMasterData>
diff --git a/Source/Informes/1/InfPresupuestoCliente.fr3 b/Source/Informes/1/InfPresupuestoCliente.fr3
index ee33abc..a6e3e50 100644
--- a/Source/Informes/1/InfPresupuestoCliente.fr3
+++ b/Source/Informes/1/InfPresupuestoCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="42795,4670044792" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture4.Visible := True;&#13;&#10;     Direccion.Visible := True;&#13;&#10;     LOPD.Visible := True;                             &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture4.Visible := False;&#13;&#10;     Direccion.Visible := False;&#13;&#10;     LOPD.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    frxDBDetallesCANTIDAD.Visible := False;&#13;&#10;    frxDBDetallesCANTIDAD2.Visible := True;        &#13;&#10;    lConcepto.Width := 428 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 458;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;                        &#13;&#10;    Memo4.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;                        &#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;                        &#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  RichConcepto.Visible := True;&#13;&#10;//  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6771335995" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture4.Visible := True;&#13;&#10;     Direccion.Visible := True;&#13;&#10;     LOPD.Visible := True;                             &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture4.Visible := False;&#13;&#10;     Direccion.Visible := False;&#13;&#10;     LOPD.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    frxDBDetallesCANTIDAD.Visible := False;&#13;&#10;    frxDBDetallesCANTIDAD2.Visible := True;        &#13;&#10;    lConcepto.Width := 428 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 458;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;                        &#13;&#10;    Memo4.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;                        &#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;                        &#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//  RichConcepto.Visible := True;&#13;&#10;//  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="252" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
@@ -66,8 +66,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="49" Left="0" Top="1946" Width="718,101251175">
-      <TfrxMemoView Name="LOPD" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1946" Width="718,101251175">
+      <TfrxMemoView Name="LOPD" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="72,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
     </TfrxPageFooter>
     <TfrxOverlay Name="Overlay1" Height="1016,69357" Left="0" Top="569" Width="718,101251175">
       <TfrxPictureView Name="Picture4" Align="baBottom" Left="2" Top="824,42585346" Width="714" Height="192,26771654" ShowHint="False" Center="True" Picture.PropData="04446174610AC13000000A544A504547496D616765B2300000FFD8FFE000104A46494600010200006400640000FFEC00114475636B79000100040000003C0000FFEE000E41646F62650064C000000001FFDB0084000604040405040605050609060506090B080606080B0C0A0A0B0A0A0C100C0C0C0C0C0C100C0E0F100F0E0C1313141413131C1B1B1B1C1F1F1F1F1F1F1F1F1F1F010707070D0C0D181010181A1511151A1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1FFFC000110800DC030C03011100021101031101FFC4008B000100030101010100000000000000000000030405060201080101010101000000000000000000000000000102031000020102030309050606020006030000000102030411210531411251617181A1C1D1221391B1324252E16272231406F09233435315F182A2B2C26324348325161101010003010101010000000000000000000111021231214161FFDA000C03010002110311003F00FD5200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000239DC5BC3E3AB08E3B319240452D4AC23B6BC7A9E3EE264452D6AC16C9B97445F78EA092CF52A1755250A71927158B72492E4DCD89722D14000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000014F56A95A95A3A94A6E0E3258B586C796F2518B0ADA8DC4B86152A4DA59A526B2E7CD18FAAF7FEAF519E1C71E6F3493EF65E68923A1DD6F94175B7DC3912474197CD597547ED2F28F973A452A36D52AFA9294A0B14B2485D478D09BFD6C97FEDBF7A26AB5BE6D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000055D53FF00A15BA17BD12F832B446FF5725B9C1E3ED467556D9B40001575492561579D25ED6912F828E8115FA8A8F0D90DBD2CCEAB5B86D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000053D5E5C3A7D5E7C17B64897C19DA1AFCFA8F0D9159F599D56B64DA0000A1AD4B0B3C3EA9A5DFDC67611FEDF8655E7CAE31F662FBC6A35CD0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000033F5C925658638714D2C397799D856D05655A5F857BC6AAD534800032B5D9FF461F8A4FB119D859D0E1C365C5F5CDBF665DC35F0681A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000657EE09FE4D1872C9BC37E4B0EF33B06871C2DA72C3E29EDE8486A344D000030B59A9C579C3F4452F6E7DE63656CE9F4FD3B2A316B07C29B5CEF3EF351160A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000C4D7E78D6A30FA62DFB5FD863655BD221C36307BE4DB7ED353C45C2800039BAEFF00517D3C3FB953853E66F0473FD5750924925B11D100000000000000000000000000000000000000056BBD46DADB29CB19FD11CDFD84B456FF007494789DB5551FAB0C89D0B56B7F6D75FD3979966E0F2659458280195AE5DB84236F0784A7E69E1B525B3DA676A33A95D6A34A0A709D4F4F7369CA3DB8A27D559A5AF5CAF8E119F46317DE3A16E9EBD6D2CAA4250E7CA4BB332F48B34F52B1A9F0D68A6F74BCBEFC0B9162328C963169AE559947D000000000000000001B4B36056ADA95952F8AAA6F923E67D84C8A7535FA4BFA54A52E793515D9893A1567AEDDB7E58C21D4DBED64E95E15FEAD3CE329B5B3CB0587B8668F4EE75A4B17EAE1F81780FA3E4757D4693C26F8B9A71C3DD80CD17ADB5DA336A35E3E9BFA9671F12CD91A71946494A2F14F34D1A0000003692C5E496D605696A7611C71AF1787267EE26444F5AD3D6C9B7D11977A1D4113D7ED56CA751F52F12742397EE08FCB41BE9961DCC74A8E5FB82BE7C34A31E4C5B7E04E844F5CBE7B381742F16C742F68F737770EA4EB4F8A11C23158259BCDEC45951A468000002BDCEA1696F9549F9BE88E6C9919B5B5FA8F1546928ADD29BC5FB113A557FF0061AA577E494DAE4A71EF4899A1E96B12F37E767F79AECC46287A3AC27FDECBEFBF118A1FADD56867394D2FBF1CBB50CD16686BF3582AF4D35F54327EC65E86A5BDD50B8871529A92DEB7AE946B289400000000A973AAD9D07C2E5C735F2C33F6EE25A33AB6BF5DE3E9538C16E72CDF719E9507EB755ADF0CA725F723E08668FBE96B0F3FCECFEF35DE3143D1D6167F9DFCEFC46287EAF56A39CA5512FBF1C576A19A26A3AFD75FD58466B963E57DE3A1A76BA95ADCE50970CFE8964FED352A2C940001CF6B53E2BF92FA2318F7F798DBD56BD94382D28C7EE2ED589A8898A00477357D2B7A953E98B6BA770A30F49A4EA5F53C7350C66FABED31AABA436836926DBC12CDB6065DDEB94E0DC2DE3EA496D9BF87AB94CDD851FF0063AA546E50949AFB904D2EC64CD57BA3ACDED29F0D5C2A25F1464B865D83A1B56D734AE692A94DE5B1ADE9F21B44A0000000055B8D4ECE862A53E292F9639B26467D6D7EA3FE952515CB378F62C0CF4AAFFECB53ACFC9293E684578319A1C3AC4F3FCECB9DC7BD0FA1E86B1FFBDFCEFC46287FFB8A59FE772EF9788FA3ED3D66FE93C2A353FBB38E0FB3019A2FDBEB96F5308D64E94B976C4B36468C6719C54A2D4A2F6359A343E8003C57ABE950A9570C7822E58742C40C1A149CACEE2FA6F1AD17E49724B158BED31F9957D57770AD956FD73F57FC0D62F6E0321711953A56D7F4D284E7F1A8AC1712DFD628DCF597E9FD6DDC3C7875626D1EE738C20E7278462B16F9901CC49D4BDBDC7E6AB2F62FB11CFDAAE8A9D38D3A71A7058462B04BA0E88F152D6DAAFF00529464F97058FB40AD5346B297C3C50FC2F1F7E24E456A9A14FF00B7593E692C3B5139540F4AD4293C60937CB0960FB702734155D5E8ADB5525CA9C976E23E8F51D6EFA0F0970CB954A383ECC07544B1FDC15BE6A317D0DAF12F4258FEE0A7879A8B4F99A7E03A47B5AFDAEFA753D91F11D2E1EA3AED9BDB19C7A52EE63A4C3E7FBFB5FF001D4F647C47461E25FB828E7C34A4F93169788E8453FDC155FC14631E96DFBB02742BCB56D46B3C212C39A9C7FE466ABE7E8F53B978CD4DA7BEA3C17B1F80C5162968537FD5AA9734163DAFC0BC8B74F48B286D8B9BE593EE5822E11661428D3F829C63F852451EC001F27084E3C338A94791AC5019B79A3425173B6F2C97F6DEC7D1C866EA2A69DA84ED6A7A7531F45BC2517F2BE524AAE8934D62B34F633680000D62B060726A9A771E9278273E04F9B1C0E6AD68E856EBE2A936F7E182EE66B94491D1AC96D52974C9F7605C0963A658AD9453E96DFBD8C0923696B1F868C161BF8517032359947D785282494238B49619C9FD863656A6914BD3B1A7CB3F3BEBD9D86A22E14008EBDC52A14DD4AB2E18AF6BE80312F358B8ACDC29634E9BC961F13EB317657CB6D1EBD5F3557E945EE79C9F56E1351A7474DB3A5B29A94BEA9F99F69AC22C94000002A5CE996B5937C3E9CFEA8E5ED5B0960C8AB46EAC2BA6A583DB09C7635FC6E31E2B774FBD8DDD1E2D952394E3CFCC6E5459280105DDED0B5871547E67F0C16D64B461DCEA377773E08E318BF869431C5F4F299CE5535B68952583AF2E05F44737EDD859A8D2A36169470E0A6B15F33CDFB597089CA000001057B1B5ACBCF4D63F52C9FB5130326F34AAB413A949BA94D66FEA466EAAB3A5EAB272542E1E38E50A8F979196546C1A00397BC7EB5F55C3E6A9C2BDBC273BEABA44B049721D1000051D66AF059F0EFA924BA967DC67610E814B3AB55EEC20BDEC6A356BD7A5429BA9525C315DBCC8D0C0BDD46BDE4D538271A6DE11A6B6B7CF818B72AB565A3C52552E737BA96E5D3CA59AA34E318C528C52515B12C91A15B51B4857B7934BF360B183DF96EEB25833B44B8F4EEBD36FCB5561D6B3467556F9B400010DD5E50B687155966FE18ADAFA112D18775A9DD5D4BD3863084B254E18E2FA794CDB95496DA2D69E12AD2F4E3F4ACE5E084D51A3474DB3A5B29A93FAA5E67DA6B02CA492C1648A000001E6A52A55161520A6B924B1033EE745A525C56EF825F4BC5C5F7A33751428DC5DD85671D987C54E5B1FF1CA4F15BD67794AEA971C326B2945ED4CD4A89CA3C5C52F56854A58E1C7171C7A5600615BD492B4B8B19470AD27E48BCB178AC567D063F8AF72D32BAB4A3569D3C2E20DF1D3783C56393CF2180BFBA776A85B528F0D4C7CF05B14B6619720B72367D15FA7F477707076606D14B5CB874ED9524FCD55E0FF000ADA676A2B6876FF001DC497DC877B1AC1AC68000000000F928465F124FA5620452B2B496DA30FE544C08DE9760FFB5874392EF1883C3D1EC5BC5464B9949F78E60F9FE9ACB925FCC390FF004D65C92FE61C8F71D26C161F978E1CB29788C41242C6CE1B28C3AD63EF1813A8C52C124973140000000000000063EB56CA338D78AC14FCB3E9DCCC6D05DD16E1D5B4E093C6549F0F56D46A517CA001E4B10396B6FCCBEA6F0F8AA2961D789CE7AAE94E880000073777275EF6A70ED94F863D5E5473BEABA784542118AD91492EA3A23E8105E5DD2B5A4EA4F37B230DED92D1CFD4A9757F71F54DFC315B228C7AAD8B2D3A8DB2527E7ADBE6F7741B9116CA000001E3D7A3C5C3EA478BE9C56207B00043776D1B8A12A6F6BCE2F91EE64A3174BAD2A37D04F2537E9CD74FDA662BA4368A7A8EA30B5870C7095697C31E4E764B46250A1737D5DB6DB6F3A951EC5FC7218932ADDB5B3A16D1C29AF33F8A6F6B3722262800000000000060EAB691A15D4A0B0A7533496E6B698DA2B674DB97716909C9E335E59BE746A22C4E6A1094DEC8A6DF514733611756FA9639B72E2975798E73D574674400018DAE55C6BD3A6B64238BE997FC18D9566CEBD1B1D3213A99CAA6328C16D78ECEC2CB888CEAF5EEB50B8492C5FC905B22BF8DE4F55AB63A753B65C527C759ED96E5CC8D488B85000073B774E56B7D2E0CB864A74FA1E68E77E5574742AC6AD18558EC9A4FDA7447B02ADFDFC2D296394AACBE0877BE625A30A10BABFB86F1E293F8A4F64518F55B7696542DA38416337F14DED66E4458280000000000004377694EE69704F26B384F7A64B061D1AB5EC2EF3C9C5E1523CB1FE3618F15D253A90A94E3520F18C96299D11E80AD77A75B5D6734D4F629C7264B056FF4D2E1E077553D3FA7F864E459B4D3EDAD73A71C67BE72CD964164A39ED66B71DECA3BA9A515D3B5FBCC6DEAB5ECE8FA36D4E9EF8C73E979BED351131400000000000000000000000F352AD2A51E2A93505CADE0051ADAD5B432A69D57CD92F6B33D0A7575ABA97C0A34D7B5F6F813A541FECAF9BC7D67EC587B899A27B7D66E6125EAE1521BF2C25D859B236E138CE119C1E3192C53E666C7D00000A7ABC53B19B7F2B8B5ED489B782AFEDF97E6D6872C62FD8DF899D46D1B0021BC9FA7695A7BD425874E028C1D221C57D0E48272ECC3BCC6AAE80DA0000F15EA7A742A54FA62DFB10183A4D3752FE97247193EA5E2635574A6D1E2B56A74694AA5478462B1607375AAD7BFBA5963293C211DD1473F55B967674EDA970C739BF8E7BDB3722272800021BABBA56D4F8EA3CDFC315B5B25A30AE2F6EAEA7C2DBC1BF2D28ECFB4C66D579AD63734692A9569F041BC33C31C5F30C0D3D12BCE74EA5293C553C3871DC9E39761AD6A348D001CE4D25A8B4B67AD97F398FD56FDF5DC2D683A8F393CA11E566AD46050A35EFAE5E2F3979AA4DEE5FC6C312655D051A34E8D354E9AC22BF8C59D11EC00002ADEEA146D560FCF55EC82EFE425B81935754BDA92CA7C0B7460B0EDDA67354A3AA5ED29E329B9C7E684BF8C4646FC24A708CD6C924D759B47D00067EB714ED632DF19AC3AD333B0F9FB7DBF46AADDC49F60D56ADEA953D3B0AAF7C970AFFB3C0B7C4656894F8AEA53FA23974B667556D9B40001CD5ED5F56EEACF6AE269742C97B8E755F6DE85C5DD4504DB5149393D9188932376D2CE8DB43860B193F8A6F6B3722272800000646B7E8CB82719C5D48BE1945358E0F3D867616342B8E2A13A2DE74DE31E897DA35A2FDC57850A32AB3F862B1C39798D0E71BAF7D77CB39BEA8C7C11CFD56F5B5B53B7A4A9C164B6BDEDF2B3A22500000011CEE6DE0F09D5845F23924323D53AB4AA7F4E719FE169FB80F40000003375AB652A4ABC579A9E52E78BF0667681A0DCB94276F27F0F9A1D0F68D68D634000000039594BD4BCE2967C55735D3239FEABA63A200000000000000000001E2AD7A349635271874B02956D6EDA39538CAA3E5F8576E7D867A142B6AF795328C9534F74567ED64EAABCD2D3EFEE5F1704B3DB3A8F0F7E63145FA1A045675EA63F761976B2CD517A969F674B0E0A51C56F79BED2E058492D85183AE52A70B984A1149CE38CB0DEF1DA63655FD2B1FD052C7EF61D1C4CD4F116CA0000A7ABB4AC2A63BDC52FE644BE0A9FB7E3F9D5A5C914B0E97F619D46D9B0028EB55386C24BEB9463DB8F713614742A78D4AB539128AEB78F71351B06800014B57A9C16325BE6D47B71EE26DE0ABA053C6B55A9F4C54575BC7B8CEAADB368C2D6EF3D4ABFA78BF253F8F9E5F618DAAAD69367E8D1F566BF36A2DFBA3B91A9117CA0000F93946117393C23158B7CC80E72E6E2ADDDC7124DB93E1A70E45B91CEFD56E585852B5A58CB075B0C67539399731B9308CCD5B5085C4952A59D383C5CB95F37319B556F46B7953B77524B0755E297DD5B0D6B11A051E6A548D3A729CB28C536FA80E76CE3EB5F53E2CB19F1CBABCCCE715EF50BA95DDD7933827C34A2B7FF00C8B72366C6D236D41436CDE73972B37222C1400015351BD56D4BCB9D59E505C9CE4B7031EDAD6E2F2ACB85E2F6D4A92DC624CAA5B7D468DBC30A36EBD4DF526F16FB0B910C29DCDEDC36BCD39BF3CF7227A3A3841421182D91492EA3A23E80032F5DACB829D15B5BE37D0B24676136834DC6D6737F3CB2E84B0F78D447AFD5C29D2A5F53727D4B0EF1B11F743A7C36F3A8FE7965D111A8D13400457757D2B6AB537C62F0E9792ED2518763A7D5B9926F18D15B67CBCC8CC8ADEA346951828538A8C56E5DE6D1EC0000295D6AD6F4718C3F36A2DCB62E964B46556BDBCBA97062F07B29C13EECD99CDAA96968B7D38E2D469F349E7D898E45AB0D36F6D6EA351F04A0D353E16F63E948B26110EB975C759508BF253CE5F89F8226D556F49B4F4687A925F99573E88EE46A445E2800012928A726F04B36DF201857FAA54AF270A2DC28ECC564E5F618B55E68E8F7B562A4A31827B38DE1EE4C7223B8B3BAB39C6535C2FE59C5EFE925981AFA65E4AE68B53FEAD3CA4F971D8CDCA8B85000079AB4D54A73A72D934E2FAC0C0D32A3A57F4F1CB16E12EBCBDE739EABA53A20000000398BFA0EDEF271592C78E0F99E673BEAB72CEF295CD3528BC26BE386F4CDCA89CA000000000008AA5D5B53F8EAC62F91B58FB09915AA6B1651F85CA6FEEAF1C075056ABAECDFF4A925CF278F62C0CF42A4F50BFAF2E153962F6469AC3DD993355EA8E957D55E2E1C09ED94F2ECDA5C517A8E814D60EB5472E58C725ED65E51A142CAD687F4E9A4D7CDB5FB5E66B0260000001CF6B73E2BE6BE88C63DFDE636F55AF630E0B3A31FB89BE9799A8898A0000CDD72A616F4E1F54B1EA4BED33B0F5A053C28559FD52C1752FB46A350D00191FB82A65469F4C9FB919D849A2C386D1CBEB937D4B2EE1AF82F9A0000656BB3CA8D3E56E4FAB2EF33B2AC6854F86CDCFEB9B7D4B21AA2E5DD7542DAA557F2AC973BC9168E7AC2DDDCDDA53CE2B19D47CBFF002CCC57446D000000CFD6AE382DD524F3AAF3FC28CED465D95CD3B6AAEACA1C734B0A6B1C126F7B332E15EABDEDE5E4B81B6D3D94A0B2FB466D172CB4778AA973D2A96DFE6353546B1A0032759BD4D7E9A9BC77D56BB22676AAA3084A95B4AB3CA5571A74BA3E67DC6459D16DB8EBBAD25E5A7F0FE27E08BAC1B66D00001B4936F24B36C0E6EE2AD4BCBB6E39B9BE1A71E6DC73BF55D052B685AD9BA70DAA2DB972BC369B473FA7538D4BCA509478A2F1724F6649988AE8E308423C308A8C56C49608E88FA0008EE2E29D0A4EA547825B16F6F910A39E94AB5EDD72D4A8F08ADC97D873F55D35BD18D1A30A51D90587DA74473FABD6F56F67866A9A505D5B7B4C5F55B56747D1B6A74F7C62B1E979BED3711280022B9B78DC41426DF07129492DF86E0248C6318A8C56115924B601F40011D7AF4A841CEA4B863BB95F320316F754AD5F18431A74B661BDF4F818B5525968D56AA53AD8D2A7BA3F33F01351B36F6B42DE3C34A0A3CAF7BE966D1281E2B558D2A53A92D904DBEA039AB5A72BABD8A9E7C72E2A8F9B6B39CF55D21D1000000CBD6AE9C631B78BCE5E6A9D1B919DA8F9A358466BF53556293FCB4F9B78D60D9342A6AD08CEC2AE3F2E125D2992F8333439357338EE70C7D8D7899D56B68DA000001CE56F26A33C1ECAB8A7FF006C4E7FAAE9CE880000000AD7D614EEE0937C338FC335EE25991875B4FBEB69F128CBCBB2A53C5FBB34671548EA97D0F2FA98E1BA4937E24EA897FDDDE7253F63F12F460FF7779F4D3F63F11D0F8F5ABC6B05C0B9D27DEC743C3D5EF9FF00712E88AEFC475479FD56A357E1A95258BCB831FF00D24CD0FD1EA35B374EA4BF1E3FFA8628961A1DF4B6A843A5F8625E45AA7FB7D7F72B3E88AC3B5E25E516A968F634F370737F7DE3D9B0B882DC2953A6B0A71505C9149147A000000000000E5EEDBAD7D530F9EA70AF6F0A39FEABA44B058721D1000000C5D7278DCC21F4C71EB6FEC31B2B4F49A7C1614B9649CBF99E26A22D9400E7B5BA9C57CD6E84547BFBCC6CAD6B1A7E9D9D18EFE14DF4BCCD444E50000616B3538AF387E88A5EDCFBCC6CAD9D3E9FA765463860F8536B9DE66A228EBF5B0852A2BE66E4FAB25EF26C3EE89478684EABDB3960BA23F68D4689A000000CDBED3EE6EAEB8B8A30A514A316F16F95E466CC8FB4744B78E75652A8F917957667DA3917A950A3463C34A0A0B991A1EC001997FAB4629D3B77C53D8EA6E5D1CA66EC2969F6352EEAF14B15493C673E57C9D24932A975A9C7F510A1058428C124B91BFB301B0D1D3297A7654F966B8DFF00DBEC351168A0000A7AB56F4ECE496DA8F8175EDEC26C29E85414AB4EB3D94D611E997D867556C5CA93B7AAA2F09704B07CF81BA8E7B49695F53C77A697B198D55D09B47C94A3158C9A496D6F24051B9D62DA9A6A97E6CF9BE1F699BB0CA9CEEAF6BA59CE6FE18AD897719F55B9A7E9D0B58F13F35692F34B93991B91162E2B468D09D596C82C7AF7168E76C694AE2F61C59E7C737D19FBCE73D5744744000000000A57DA9D3B66E9C571D6C366E58F292DC0C851BBBEAFBEA4F97624BB8C7DAADAB1D2A8DBE139FE656E5DCBA11B91178A0000A1ADD5E0B271DF524A3D4B3EE33B7829E854BCD56ABDD8457BDF70D46B9A000000E6EE252BABE970EDA93E1874638239DFB55D353A71A74E34E2B08C524BA8E88F4054D5A4A3A7D5E7497B5A44BE0CDD0E38D7A92C36470C7A5FD86755AD93680000073776B8AFEAC71C31A9863D2CE7FAAEA0E8800000000003CCE9539AC2708C972349FBC089D8D93DB429FF002A180561649E3E853FE544C0FBFA3B3FF053FE48F81702454E9A78A8A4D73203D000000000000000000000F3526A14E537B229B7D480E6B4F8BA97D4B1DBC5C4FAB339CF55D19D1000000E73529F1DF556B3C1F0AEA581CEFAAE968D354E9429AD908A8FB1607447A00072F5DBB9BE961FDCA982E86F05D873FD5748960B05B0E880000073776DD6BEAA96D94F857B784E77D574F14A31515B12C11D1181ADCF8AF9AFA22977F798D95AB630E0B3A31FB89BE9799A889CA0000000007C94A315C526A296D6DE080A55F58B4A7941BAB2FBBB3DACCDD8665CEA17572F831E184B254E3BFA77B25AAB565A2D49B53B9F243E8F99F4F209A8DAA74E14E0A108A8C56C4B61B4733A849D4BFAD86D73E15D5E539DF55D1462A31515B12C1751D11F4000032F5D6F828ADD8C9E1D0919D858D0E095962B6CA6DBEACBB86BE0D0693583D8CD0E72EB4DBAB7AADD38CA504F184E38B6BD862C579F5754C30C6B7B25E03E8F91B1D46BB4DD39CB1F9A797FE62628BB6FA0CB1C6E2782FA61E2CD4D51AB42DA8D087052828ADFCAFA59A12018DAE5DA6E36D07B3CD53B919DA89346B674E8BAD25E6ABF0FE15E2358344D00000000015AFAC61754F746AC7E09F73E625831A857B9B0B869AC1EC9C1EC6BF8D867C57436B754AE692A94DFE28EF4F9CD4A894A0000C8FDC127C3423B9B937D2B0F133B2A4D123859B7F54DBEC4BB8BAA2F940001E2BCF828D49FD316FD8B1030B48A7C77F4B7A8E327D4BC4E7AFAAE90E880197AF55C2853A7BE72C5F4457DA6761E743A7851A953EB960BA22BED1A95A4680000039BA3F9F7F1E4A9571EA72C4E7FAAEA0E88000000000000000000000000000000000000000055D52A7058567CAB87F99E04BE0CAD1218DD4A5BA107ED6CCEAADB36800000737413AD7F07F5D5E27D1C58B39CF55D41D1002B6A370A85A4E78F99AE1874B25A31B48A1EA5DA97CB49713E9D88CEAADE3680003E4A4A31727B12C581CEE9F1F56FE9639E32E27D5E639CF55D39D11CD6ABFF00DFAFD2BFF2A39DF55BD47FA34FF0AF71D11EC000033F50D4EA5B5654E1052C62A5C4DBDEDAD9D466D1525ADDDBD9182EA6FBC9D2A196A57F53CAAA3E88249F6664CD1F2163A85C3E274E6F1F9A6F0FFCC5C517686812C9D7A987DD878BF02F28D3B7B3B6B75F95049EF93CDBEB35813000396AB95F4F1CB0AAF1FE739FEABA53A20000019DADD272B78545FDB967D12CBDE6761F341B88F04E837E64F8A2B99ED1AD1AC68000000000CFD4B548DBA74A9612AEFD91E93368CBB1B3A97759CA6DBA69E3526F6B7C9D24915D02492492C12C9236800022A9776F4AAC294E6A339EC5E24C894A0000015AF6C69DD4307E5A91F827C84B3231BFF95A7DCF2497F2C918F15B965A850BA8F97CB517C54DEDEAE546E5CA2D1400C8FDC117C3425B9392C7A70F033B2C7BD0DFFF00124B1D93797521AF88D03400008EE5395BD58ACDB8492F60A317459F0DFC17D7192ECC7B8C6AAE88DA00737A9DCFEA6F1F06718F929F3FFCB39DB9AADBB4A1E85B53A5BE2BCDD2F37DA74889400002BEA15BD1B4A92DED70C7A5E44A32F44A3C77AA5BA945BEB79233AABA03680000000000000000000000000000000000000000666BD530B68413F8E79F424676116854F0A756A7D52515D4B1EF1A8D4340000349A69EC60735465FA5BD8B9AFE94F092E659339FEABA884E138A9C1A945E69A3A23E55AB4E941CEA49460B6B6073BA8DF4AF2B2504FD38E54E3BDB7BCC5B956B69D69FA6A184BFA93CE7E1D46A445A2800022BB6D5AD66B6F04BDCC518FA2453BE4F92126BB17798D55D09B4739AC4386FEA7DE517D987718D95B5693E3B5A52E5847DC6E22500000CDD6AD653A71AF058BA794D7DDE5EA33B41574AAF67197A7714E2DC9F92A49278733C49AD56FC6108AF24525CCB0368FA000015ABEA567471E2A89C97CB1F33EC26465DD6B95A6B86847D25F53CE5E08CDD950DB69B73732E3A98C20DE2E72F89F426241BEB672F39B4000003CD4A71A94E509AC6325835D2073D5E8DC58DCA69B4D3C69D4E55FC6D39D9856C596AF42B251AAD53ABCFF0BE866E545F2800023AD71428C71AB3505CFB7D832322F75B9CD385B2708EFA8F6BE8E4317654365A5D6B87EA56C6149E78BF8A5ED1351B74E9D3A5050A71518C76246D1E80010DD5D53B6A2EA4F3DD18EF6F90968E76AD4A95AA4EACFCD279C9EE4BC0C2B474DD51452A15DE5B2151FB99A951AE680000023AF6F4ABD370A91C56E7BD73A6062DD69B716B2F529373A6B3538FC4BA703162A7B5D72A4128DC47D45F5ACA5ECD8C4D8684356D3E4B1F552C374935DC6B3119DAB6A16D734E14E96327197171E182D8D61999DAAA4D09CF86AAC1F0629A96EC7632EA8D43400006DC981CE494ECAFB6674A58C79E3FF073F2AB7A9EA36538297AD08E3F2C9A4D753379450D4B578CA0E8DB3C71CA5539B9112ECA8B48B1739AB8A8BC91FE9AE57CBD44D62364D800000636B574A7563422FCB4F39FE27E08C6D557B45B6F4AD7D47F155F37FD771A9117CA000000000000000000000000000000000000000018DFB81BE2A0B76127EE33B09F464BF44B9E52C4BAF82F140000028EA1A646E5FA94DA8D6C30CF64BA4960CE8D0D56D9F0D35522BEE66BB32338AA2B1D4AE258D452FC551ECF6E631469D8E994ED9F1C9F1D5FAB72E835222E14000003CD582A94E74DEC9A717D6B0039EA552BD8DD62E3E78629C5EC68E7E2B4A3FB82961E6A324F99A6BB8D748CDBFBC5755554E0E0C170EDC71EC466DCAB57469CDDA70CA2D2836A2DADA9E66E22F140000032EF747E293A96D845BDB4DE4BA8CDD4538FFB5B5CA3EA412DCBCD1EF44FAAF6B57D4A2926F16F6371CFB3019A3E3D43559BC14A79EE8C1780CD1E7F49AA5C7C71A925FF00B8F05DAC628B14743A8F3AB5145724737ED65E517EDF4EB5A0D384319AF9E59B2E05928000000001E6AD1A7560E1522A517B9819571A24D36EDE78AFA25B7DA66EA2B461AADB650552296E8F9A3D98A27D57B5AA6A893F3378EF705DC8668F9FA9D62B2C13AAD3DF18F0F6A487D1EA9E917B565C555A863B5C9F14BB3C472342DB4BB6A0D49AF52A2F9A5DC8D488B8500004771714A853752A3C22B62DEDF22168C0AF5EBDEDC2CB16DE14E0B72FE369CFD56E5869F4EDA838C9294E6BF31ED4F9BA0DC88CCD4B499516EAD04E54B7C76B8FD866EA3E586AB2A3C34AB3E2A3B14B6B8F8A12AB6A328CA2A5169C5E69AD86D1F400000055AFA65A566E4E1C337B650C9F812C1525A0AC7CB59A5CF1C7DCD13912D1D12DA0F1A927539B62EC1C8BF18C631518A518AD89648D0FA0000002BDE58D1BA8A53CA6BE19ADA8960CE96855B1F2D58B5BB14D19E458B7D168C1A95697A8D7CB8611EBE52CD468A492492C12C92468000002B5FDE46DA8F16DA92CA9C79F97A8968C6B1B59DE5CE126DC71E2AB2EBEF312655D32492492C12C923A2000000000000000000000000000000000000000000327F70536E146A61945B8B7D39F719D87DD0EA276F3A7BE12C7A9A1A8D1340000000000000000000003C55A346AAC2A42334B6712C40AEF4AB06F1F4B0E894BC498825A765694F38528A7CAD62FDAC604C504D358A78A7B1A00000000000000000003692C5EC032B50D5A383A56EF16F29555B17E1F133760D2B51C70B7ACF3D94E6F7F33EE1AD1AA68000000000000000000020BBBCA36D0E29BC64FE182DAC968C2AB56E6F6BACB8A4F28416C48C7AADBD3B4E85AC78A5E6AD25E67B973237261174A0064EA3A3F1375AD9252DB2A7CBD066C19F697D5ED26E38630C7CF4DE59F3723332E15BB6D7546E21C54A58E1F145ED5D28DCA894A0000000001B4962F24B6B02AD0D46DEBD795183CD7C2DEC972E04C8B4500000000000000105E5E52B5A7C53CE4FE082DAC968C272B8BEB95F3549E492D897818F55D0D95A42D68AA71CE4F39CB959B911394000000000000000000000000000000000000000000417D6DFA8B59D2F99E707CEB612C1CFD9DCCED2E389A787C3521BF0F14625C2BA1A5569D5829D392945EF47447A000000000045717542DE3C55649722DEFA112D1897DA955B9C611F251FA77BE9336AB474BBF55A0A9547F9D15937F32F12CA8BE680000000475AE28508F1559A8ADC9ED7D0864645EEAD3AC9D3A29C29BC9CBE66BB8C5D950D8EA152D5F0BF3D17B61C9CE892E06ED0B9A35E1C54A4A4B7ADEBA51D32890000000000003CCEA53A71E29C9463CADE080A371ACDBC315493AB2E5D91F699BB0CDAF7977772506DB4F65282CBD9BCCE72AB965A24A4D4EEBCB1FF1A79BE966A6A8AFA8E993B6939C139507B1EF8F33258A9AC75771C29DCE71D8AA6F5F8B94B3646BC2709C54A0D4A2F6359A343E80000000000000F92946317293518ADADE480CDBCD6611C616DE697F91FC2BA394CDD867D0B7BABDACDAC64DFC7525B119C655BD656146D63E5F3547F14DED7E08DC88B25000000A97DA6D1BA5C5F055DD35BFA4960C3AB42EECAB26F18497C338EC7FC7218C6157ED75A834A370B85FF923B3AD1A9B234E1384E2A5092945EC69E28D0FA00001157B9A1423C5564A3C8B7BE8432316FB52AB72DC238C28FD3BDF4F818B550D5B4B9B78C2A4E2E0A59C65BD3EE64C0D1B2D622D2A772F096C55373E9E4353646A292924E2F14F63468000000000F929C6117293518ADADE480CDBBD6A11C636EB8E5F5BF87AB94CDD867D1B7BABEACDAC6527F15496C4671956FD958D2B5A784739BF8E7BD9B91160A0000000000000000000000000000000000000000000000CED474A8DC375693E1AD866B74BED3360C88CAF2CAA7CD4A5BE2F63EE667C55EA3AEEEAD4BFED0F07E26A6C2D4356B19ED9B83E4926BEC2F51137EB6CFF00CF4FF990C8F92BFB24B175E1D4D3F70C882A6B3671F85CAA3FBAB05DB80E852AFAD5C4D354A2A92E5F8A5E067A54142CAF2F25C69369EDAB3797B5ED263235E868D6B4E9B8D45EA4E4B0737961D08DE119579A6DC5ACB89633A6B35523BBA790CD985494359B9A6946A25562B7BCA5ED1D0B51D72DDAF3539C5F360FBD17A47A7AE5AE19426DF260BC47421A9AEBFEDD1E8727DC8742AD5D52FAABC14F831F960B0EDCD93A528E997D5E5C4E0E29ED9D4CBDF98C0D5B4D1ADE8B52A9F9B35CBF0AEA35223EDF69346E319C3F2EAF2AD8FA50B063D6B3BDB49F134E386CAB0C70F6A318B152D1D66EA0929A8D45CAF27ED45E85A86BB45FC74A4BA1A7E05E9122D6ECDBCD4D73E0BB98E87D7ACD925B64F9B87C47507896B96CB6426FA92EF1D0867AECFE4A2973CA58FB913A556A9AADED4CB8D413DD05876E6C9D51E6165A85C4B8B82726FE79E5DB218A2FDBE83B1DC54FFA43C59A9A996950B5B7B78E14A0A3CAF7BE96691280693583CD3DA80CABDD1232C676CF865BE9BD9D4F719BA8CC52BDB2A9879A94B91EC7DCCCFD8ABD475C78255A9E3F7A1E0FC4BD22E53D52C6A7F7145F24BCBEFC8D644F0AD466B184E325CCD328F6000F32AB4E0B19CD4573B480AF5354B187F7549F247197BB22660A75B5C7B2853FFB4FC17892EC2939DEDECF87CD55AF956C5DC8CFDAAD0B4D0B64AE5FFF008E2FDECD4D51AB4E9C29C14211518AD89648D0F40000000000F93A70A91719C54A2F6A6B140655D68516DCADE5C2FE896CEA666EA33A54AF6CE78B52A4FEA5B1F5AC8CFD8A9A9EB57915E6519F3B583EC2F4257AED4C32A2B1E5E2787B874886AEB17935845C69AFBAB3F6BC474A8E8585EDD4B8945E0F6D49ECF6BCD93191B365A550B6C26FF32AFD6F62E846E445C9C2138B8CD2945ED4CA322EF4378B95ABCBFC727EE7E266EAACF53BDB39E1E6A4FE97B1FB72667EC16E96B95965529C67CF17C2FBCBD09E3AE5BBF8A9CD7460FBCBD23D7FBBB4FA6A7B1788E8C2396BB4F0F252937CED2F7623A15EAEB5772F81469AE5C317DA4E9504695F5E493C2757EF3F8575BC89F68D0B5D092C25732C7EE47675B353546AD3A70A7050845462B624687A000000000000000000000000000000000000000000000000003CD4A74EA4786A454A2F7358A02955D12CA78B8A9537F75E5EC789391567FB7E7FDBAC9ADCA4B0F73272217A15EAD8E9BEB7E04E55F63A0DE3F8A74E2B7E6DBF70E44F4FF6FC7FB959BE68AC3B5E25E517686976545A71A7C525F34FCCFB722E05A280002B56D32CAABC6549293DF1C63EE26056968368DE539C79B15DE89C8F9FE82D7FC953DB1F01C89A1A358476C1CFF137DD8171059A56D6F4BFA74E30E749265120000000AF5B4EB2AB9CE9471E55E57D981302B4F42B37F0CA71E64D3F7A64E4787A050F96ACD74E0FB90E47CFFF009FA5FE697B10E47B8E836AB0E29CE5CB9A5DC3912C347B08E0FD3726BEA6DF66C2E20B34EDE852FE9D38C3A12451200000000003CD4A74EA45C671528BDA9AC50146B68967378C38A93FBAF15EC64E454A9A0575FD3AB197E24E3EEC4CF2B9579E8D7F1FEDA9744977E039A3C4B4DD423B68CBA9A7EE64C505A76A0DE0A8CBAF05EF63147B8E8F7F2DB4D479E525DD8979A27A7A0577FD4A918FE1C65E0391768E8B674F39E355FDE797B11AE517A108423C308A8C7912C0A3E800000000000000001B4082A5859D478CA8C1B7BD2C1F613022FF0051A77F87FF0014BC46209A9D95A5378C28C13E5C163ED2E04C0000003E4A3192C249493DCF34055A9A4D854CFD2517CB16E3D8B2260412D06D1BCA734B9315DE89C8F9FE82D7FC953FF0F80E47B868764B0E2E3974BC3DD8179162969F654F38518E2B636B89FB5E2302C1400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001FFFD9" HightQuality="False"/>
diff --git a/Source/Informes/2/InfAlbaranCliente.fr3 b/Source/Informes/2/InfAlbaranCliente.fr3
index 8085915..2991074 100644
--- a/Source/Informes/2/InfAlbaranCliente.fr3
+++ b/Source/Informes/2/InfAlbaranCliente.fr3
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7110939931" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;               &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4555313194" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;               &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="242" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
-      <TfrxMemoView Name="DireccionesSinLogotipo" Left="389" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
-      <TfrxMemoView Name="DireccionesConLogotipo" Left="457" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
+      <TfrxMemoView Name="DireccionesSinLogotipo" Left="389" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
+      <TfrxMemoView Name="DireccionesConLogotipo" Left="457" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
       <TfrxShapeView Name="Shape1" Left="1" Top="117" Width="221" Height="119" ShowHint="False" Color="-16777211"/>
       <TfrxShapeView Name="Shape2" Left="306" Top="117" Width="413" Height="119" ShowHint="False" Color="-16777211"/>
       <TfrxMemoView Name="Memo19" Left="310" Top="121" Width="400" Height="19,7953" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;NOMBRE&#34;]"/>
@@ -21,7 +21,7 @@
       <TfrxMemoView Name="MemCantidad" Align="baLeft" Left="455" Top="0" Width="40" Height="20" ShowHint="False" 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="DejaVu Sans Mono" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;CANTIDAD&#34;]"/>
       <TfrxMemoView Name="MemCantidad2" Align="baLeft" Left="0" Top="0" Width="70" Height="20" Visible="False" ShowHint="False" 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="DejaVu Sans Mono" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;CANTIDAD&#34;] "/>
     </TfrxMasterData>
-    <TfrxReportSummary Name="ReportSummary1" Height="197" Left="0" Top="1487" Width="718,101251175" OnAfterCalcHeight="ReportSummary1OnAfterCalcHeight" OnBeforePrint="ReportSummary1OnBeforePrint" Stretched="True">
+    <TfrxReportSummary Name="ReportSummary1" Height="197" Left="0" Top="1485" Width="718,101251175" OnAfterCalcHeight="ReportSummary1OnAfterCalcHeight" OnBeforePrint="ReportSummary1OnBeforePrint" Stretched="True">
       <TfrxMemoView Name="Memo8" Left="8" Top="4" Width="129,3859" Height="14,89765" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="RECIB脥 TRANSPORTISTA:"/>
       <TfrxMemoView Name="Memo30" Left="9,13389" Top="73,50402" Width="113,3859" Height="18,89765" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="RECIB脥 CLIENTE:"/>
       <TfrxLineView Name="Line4" Left="0" Top="69" Width="718" Height="0" ShowHint="False" Frame.Typ="4"/>
@@ -40,23 +40,23 @@
       <TfrxLineView Name="lImporteDescuento" Left="632" Top="24" Width="0" Height="23" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="lBaseImponible" Left="632" Top="47" Width="0" Height="23" ShowHint="False" Frame.Typ="1"/>
     </TfrxReportSummary>
-    <TfrxOverlay Name="Overlay1" Height="1025" Left="0" Top="402" Width="718,101251175" OnBeforePrint="Overlay1OnBeforePrint">
-      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="965" Width="718" Height="60" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="&#13;&#10;En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+    <TfrxOverlay Name="Overlay1" Height="1023" Left="0" Top="402" Width="718,101251175" OnBeforePrint="Overlay1OnBeforePrint">
+      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="947" Width="718" Height="76" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es"/>
       <TfrxLineView Name="LineaCorta4" Left="631" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="581" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta1" Left="501" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line1" Left="718" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line2" Align="baLeft" Left="0" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta0" Left="461" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line5" Left="0" Top="1021" Width="718" Height="0" ShowHint="False" Frame.Typ="4"/>
-      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="722" Visible="False" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="705" Visible="False" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta5" Left="70" Top="242" Width="0" Height="528" Visible="False" ShowHint="False" Frame.Typ="1"/>
     </TfrxOverlay>
-    <TfrxPageFooter Name="PageFooter1" Height="85" Left="0" Top="1704" Width="718,101251175"/>
+    <TfrxPageFooter Name="PageFooter1" Height="85" Left="0" Top="1702" Width="718,101251175"/>
     <TfrxHeader Name="Header1" Height="22" Left="0" Top="318" Width="718,101251175" ReprintOnNewPage="True">
       <TfrxMemoView Name="lCantidad" Align="baLeft" Left="455" Top="0" Width="40" Height="22" ShowHint="False" Color="14870505" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="14" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Cant."/>
       <TfrxMemoView Name="lConcepto" Align="baLeft" Left="70" Top="0" Width="385" Height="22" ShowHint="False" Color="14870505" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Concepto"/>
diff --git a/Source/Informes/2/InfContratoCliente.fr3 b/Source/Informes/2/InfContratoCliente.fr3
index 8d9fad3..0bb9287 100644
--- a/Source/Informes/2/InfContratoCliente.fr3
+++ b/Source/Informes/2/InfContratoCliente.fr3
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7107559838" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;                &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;        &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo2.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;           &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo2.Lines;                                                                &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo2.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo2.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D7072657361220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4558065625" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;                &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;        &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo2.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;           &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo2.Lines;                                                                &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo2.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo2.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D7072657361220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="238" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
-      <TfrxMemoView Name="DireccionesSinLogotipo" Left="388" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
-      <TfrxMemoView Name="DireccionesConLogotipo" Left="456" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
+      <TfrxMemoView Name="DireccionesSinLogotipo" Left="388" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
+      <TfrxMemoView Name="DireccionesConLogotipo" Left="456" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
       <TfrxShapeView Name="Shape1" Left="1" Top="118" Width="217" Height="110" ShowHint="False" Color="-16777211"/>
       <TfrxMemoView Name="Memo15" Left="2" Top="197" Width="212" Height="28" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382697" Font.Height="-24" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="CONTRATO"/>
       <TfrxShapeView Name="Shape2" Left="303" Top="118" Width="413" Height="110" ShowHint="False" Color="-16777211"/>
@@ -68,8 +68,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="42,34" Left="0" Top="1932" Width="718,101251175">
-      <TfrxMemoView Name="Memo1" Align="baBottom" Left="0" Top="0,00141" Width="718,1" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1932" Width="718,101251175">
+      <TfrxMemoView Name="Memo1" Align="baBottom" Left="0" Top="1,66141" Width="718,1" Height="73,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es"/>
     </TfrxPageFooter>
   </TfrxReportPage>
 </TfrxReport>
diff --git a/Source/Informes/2/InfFacturaCliente.fr3 b/Source/Informes/2/InfFacturaCliente.fr3
index 622a305..3954f1b 100644
--- a/Source/Informes/2/InfFacturaCliente.fr3
+++ b/Source/Informes/2/InfFacturaCliente.fr3
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7156905208" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;  &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;    &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4563329977" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;  &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;    &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="232" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
-      <TfrxMemoView Name="DireccionesSinLogotipo" Left="387" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
-      <TfrxMemoView Name="DireccionesConLogotipo" Left="455" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
+      <TfrxMemoView Name="DireccionesSinLogotipo" Left="387" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
+      <TfrxMemoView Name="DireccionesConLogotipo" Left="455" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
       <TfrxShapeView Name="Shape3" Left="3" Top="118" Width="290" Height="110" ShowHint="False" Color="-16777211"/>
       <TfrxShapeView Name="Shape5" Left="320" Top="118" Width="399" Height="110" ShowHint="False" Color="-16777211"/>
       <TfrxMemoView Name="Memo15" Left="4" Top="196" Width="257" Height="28" OnBeforePrint="Memo15OnBeforePrint" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382697" Font.Height="-24" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="FACTURA"/>
@@ -27,8 +27,8 @@
       <TfrxLineView Name="LineaCorta5" Left="631" Top="240" Width="0" Height="561" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga4" Left="578" Top="240" Width="0" Height="728" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="488" Top="240" Width="0" Height="561" ShowHint="False" Frame.Typ="1"/>
-      <TfrxMemoView Name="Memo28" Left="2" Top="1029" Width="711" Height="16" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Graden S.L. Insc. en el Reg. Merc. de Madrid, Tomo 6.765, Libro 0, Folio 11, Secci贸n 8, Hoja M-110181 CIF: B80646540"/>
-      <TfrxMemoView Name="Memo5" Left="2" Top="985" Width="712,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+      <TfrxMemoView Name="Memo28" Left="2" Top="1033" Width="711" Height="12" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Graden S.L. Insc. en el Reg. Merc. de Madrid, Tomo 6.765, Libro 0, Folio 11, Secci贸n 8, Hoja M-110181 CIF: B80646540"/>
+      <TfrxMemoView Name="Memo5" Left="2" Top="966" Width="712,48819386" Height="72,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es"/>
       <TfrxLineView Name="Line1" Left="805" Top="417" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta2" Left="428" Top="240" Width="0" Height="561" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga1" Left="3" Top="240" Width="0" Height="728" ShowHint="False" Frame.Typ="1"/>
diff --git a/Source/Informes/2/InfPresupuestoCliente.fr3 b/Source/Informes/2/InfPresupuestoCliente.fr3
index 303057e..77aa242 100644
--- a/Source/Informes/2/InfPresupuestoCliente.fr3
+++ b/Source/Informes/2/InfPresupuestoCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7103946644" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;                        &#13;&#10;    Memo4.Visible := False;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo1.Lines;                                                                    &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end.          " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4489583333" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;                        &#13;&#10;    Memo4.Visible := False;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo1.Lines;                                                                    &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end.          " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="250" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
@@ -65,8 +65,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="49" Left="0" Top="1944" Width="718,101251175">
-      <TfrxMemoView Name="Memo2" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1944" Width="718,101251175">
+      <TfrxMemoView Name="Memo2" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="73,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es"/>
     </TfrxPageFooter>
     <TfrxOverlay Name="Overlay1" Height="1016,69357" Left="0" Top="567" Width="718,101251175"/>
   </TfrxReportPage>
diff --git a/Source/Informes/3/InfAlbaranCliente.fr3 b/Source/Informes/3/InfAlbaranCliente.fr3
index aa9d55a..f7737f2 100644
--- a/Source/Informes/3/InfAlbaranCliente.fr3
+++ b/Source/Informes/3/InfAlbaranCliente.fr3
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7129150926" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;               &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4528877315" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;               &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="242" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
-      <TfrxMemoView Name="DireccionesSinLogotipo" Left="389" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
-      <TfrxMemoView Name="DireccionesConLogotipo" Left="457" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
+      <TfrxMemoView Name="DireccionesSinLogotipo" Left="389" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
+      <TfrxMemoView Name="DireccionesConLogotipo" Left="457" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
       <TfrxShapeView Name="Shape1" Left="1" Top="117" Width="221" Height="119" ShowHint="False" Color="-16777211"/>
       <TfrxShapeView Name="Shape2" Left="306" Top="117" Width="413" Height="119" ShowHint="False" Color="-16777211"/>
       <TfrxMemoView Name="Memo19" Left="310" Top="121" Width="400" Height="19,7953" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;NOMBRE&#34;]"/>
@@ -41,19 +41,19 @@
       <TfrxLineView Name="lBaseImponible" Left="632" Top="47" Width="0" Height="23" ShowHint="False" Frame.Typ="1"/>
     </TfrxReportSummary>
     <TfrxOverlay Name="Overlay1" Height="1025" Left="0" Top="402" Width="718,101251175" OnBeforePrint="Overlay1OnBeforePrint">
-      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="965" Width="718" Height="60" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="&#13;&#10;En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="947" Width="718" Height="78" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es&#13;&#10;"/>
       <TfrxLineView Name="LineaCorta4" Left="631" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="581" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta1" Left="501" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line1" Left="718" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line2" Align="baLeft" Left="0" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta0" Left="461" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line5" Left="0" Top="1021" Width="718" Height="0" ShowHint="False" Frame.Typ="4"/>
-      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="722" Visible="False" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="705" Visible="False" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta5" Left="70" Top="242" Width="0" Height="528" Visible="False" ShowHint="False" Frame.Typ="1"/>
     </TfrxOverlay>
     <TfrxPageFooter Name="PageFooter1" Height="85" Left="0" Top="1704" Width="718,101251175"/>
diff --git a/Source/Informes/3/InfContratoCliente.fr3 b/Source/Informes/3/InfContratoCliente.fr3
index 7cb2f96..fb3041f 100644
--- a/Source/Informes/3/InfContratoCliente.fr3
+++ b/Source/Informes/3/InfContratoCliente.fr3
@@ -1,10 +1,10 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7132411574" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;                &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;        &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo2.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;           &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo2.Lines;                                                                &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo2.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo2.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D7072657361220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4538196181" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;                &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;        &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo2.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;           &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo2.Lines;                                                                &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo2.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo2.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D7072657361220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="238" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
-      <TfrxMemoView Name="DireccionesSinLogotipo" Left="388" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
-      <TfrxMemoView Name="DireccionesConLogotipo" Left="456" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41&#13;&#10;"/>
+      <TfrxMemoView Name="DireccionesSinLogotipo" Left="388" Top="7" Width="330" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
+      <TfrxMemoView Name="DireccionesConLogotipo" Left="456" Top="7" Width="262" Height="92" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382696" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="C/ Padilla, 63. 28006 Madrid&#13;&#10;tienda@graden.es - www.graden.es&#13;&#10;Tel茅fonos. 91 533 18 00 / 618 27 26 12&#13;&#10;&#13;&#10;Parking para clientes (Primera hora y media gratis)&#13;&#10;C/ Montesa 41"/>
       <TfrxShapeView Name="Shape1" Left="1" Top="118" Width="217" Height="110" ShowHint="False" Color="-16777211"/>
       <TfrxMemoView Name="Memo15" Left="2" Top="197" Width="212" Height="28" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="6382697" Font.Height="-24" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="CONTRATO"/>
       <TfrxShapeView Name="Shape2" Left="303" Top="118" Width="413" Height="110" ShowHint="False" Color="-16777211"/>
@@ -68,8 +68,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="42,34" Left="0" Top="1932" Width="718,101251175">
-      <TfrxMemoView Name="Memo1" Align="baBottom" Left="0" Top="0,00141" Width="718,1" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1932" Width="718,101251175">
+      <TfrxMemoView Name="Memo1" Align="baBottom" Left="0" Top="0,66141" Width="718,1" Height="74,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es"/>
     </TfrxPageFooter>
   </TfrxReportPage>
 </TfrxReport>
diff --git a/Source/Informes/3/InfFacturaCliente.fr3 b/Source/Informes/3/InfFacturaCliente.fr3
index 8aaac70..04a331c 100644
--- a/Source/Informes/3/InfFacturaCliente.fr3
+++ b/Source/Informes/3/InfFacturaCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7185019329" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;  &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;  &#13;&#10;      &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4547113657" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;  &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;  &#13;&#10;      &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="232" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
@@ -27,8 +27,8 @@
       <TfrxLineView Name="LineaCorta5" Left="631" Top="240" Width="0" Height="561" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga4" Left="578" Top="240" Width="0" Height="728" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="488" Top="240" Width="0" Height="561" ShowHint="False" Frame.Typ="1"/>
-      <TfrxMemoView Name="Memo28" Left="2" Top="1029" Width="711" Height="16" Visible="False" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Graden S.L. Insc. en el Reg. Merc. de Madrid, Tomo 6.765, Libro 0, Folio 11, Secci贸n 8, Hoja M-110181 CIF: B80646540"/>
-      <TfrxMemoView Name="Memo5" Left="2" Top="985" Width="712,48819386" Height="42,33859" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+      <TfrxMemoView Name="Memo28" Left="2" Top="1034" Width="711" Height="13" Visible="False" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Graden S.L. Insc. en el Reg. Merc. de Madrid, Tomo 6.765, Libro 0, Folio 11, Secci贸n 8, Hoja M-110181 CIF: B80646540"/>
+      <TfrxMemoView Name="Memo5" Left="2" Top="965" Width="712,48819386" Height="74,33859" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es"/>
       <TfrxLineView Name="Line1" Left="805" Top="417" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta2" Left="428" Top="240" Width="0" Height="561" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga1" Left="3" Top="240" Width="0" Height="728" ShowHint="False" Frame.Typ="1"/>
diff --git a/Source/Informes/3/InfPresupuestoCliente.fr3 b/Source/Informes/3/InfPresupuestoCliente.fr3
index a35acc3..27cda5f 100644
--- a/Source/Informes/3/InfPresupuestoCliente.fr3
+++ b/Source/Informes/3/InfPresupuestoCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43041,7125311574" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;                        &#13;&#10;    Memo4.Visible := False;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo1.Lines;                                                                    &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end.          " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,4499909491" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     DireccionesConLogotipo.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     DireccionesConLogotipo.Visible := False;         &#13;&#10;  end;  &#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;                        &#13;&#10;    Memo4.Visible := False;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Memo21.Lines := Memo1.Lines;                                                                    &#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end.          " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="250" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
@@ -65,8 +65,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="49" Left="0" Top="1944" Width="718,101251175">
-      <TfrxMemoView Name="Memo2" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Graden S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ Padilla, 63 - 28006 Madrid "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1944" Width="718,101251175">
+      <TfrxMemoView Name="Memo2" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="72,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: GRADEN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: tienda@graden.es. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.graden.es&#13;&#10;"/>
     </TfrxPageFooter>
     <TfrxOverlay Name="Overlay1" Height="1016,69357" Left="0" Top="567" Width="718,101251175"/>
   </TfrxReportPage>
diff --git a/Source/Informes/4/InfAlbaranCliente.fr3 b/Source/Informes/4/InfAlbaranCliente.fr3
index d77ea0e..37ec620 100644
--- a/Source/Informes/4/InfAlbaranCliente.fr3
+++ b/Source/Informes/4/InfAlbaranCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="42669,7452571528" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture5.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo2.Visible := True;                                                       &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture5.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo2.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6776634838" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;//  DatosCliente.Lines.Add('&#60;b&#62;' + &#60;frxDBCabecera.&#34;NOMBRE&#34;&#62; + '&#60;/b&#62;');                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#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;  MemCantidad.Visible := True;&#13;&#10;  MemPrecio.Visible := True;&#13;&#10;  MemDto.Visible := True;      &#13;&#10;  MemImpTotal.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;&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin&#13;&#10;          MemCantidad.Visible := False;           &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemDto.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#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;         &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          MemPrecio.Visible := False;&#13;&#10;          MemImpTotal.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;&#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;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;       Memo15.Lines.Add('ORDEN DEVOLUCI覰')&#13;&#10;  else&#13;&#10;     Memo15.Lines.Add('ALBAR罭')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture5.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo2.Visible := True;                                                       &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture5.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo2.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Visible := False;&#13;&#10;    lCantidad2.Visible := True;        &#13;&#10;    MemCantidad.Visible := False;&#13;&#10;    MemCantidad2.Visible := True;&#13;&#10;    lConcepto.Width := 431 + lImporte.Width + lDto.Width + lImporteTotal.Width;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    lConcepto.Width := 461;                 &#13;&#10;  end;&#13;&#10;  RichConcepto.Width := lConcepto.Width;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;//Es peor el remedio que la enfermedad, en el caso de sobre pasar en uno el numero de conceptos para que no quepa el reportsumary,&#13;&#10;//no hay forma de ponerlo al final en la p唳﹏a siguiente hasta que el numero de conceptos rellene al menos un concepto de la siguiente hoja.                                                                                                                                                                                                                                                                                                                                    &#13;&#10;//  if Engine.FreeSpace &#62; ReportSummary1.Height then&#13;&#10;//    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineaCorta0.visible := False;&#13;&#10;       LineaLarga0.visible := True;         &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineaCorta0.visible := True;  &#13;&#10;       LineaLarga0.visible := False;         &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta3.visible := True;  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;           &#13;&#10;      end;  &#13;&#10;    &#13;&#10;     if not &#60;VerPrecios&#62; then&#13;&#10;     begin&#13;&#10;       LineaLarga0.visible := False;&#13;&#10;       LineaCorta0.visible := False;                                                                  &#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta1.visible := False;                                                                  &#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin&#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta5.visible := False;  &#13;&#10;     end;&#13;&#10;  &#13;&#10;     if not &#60;VerTotales&#62; then&#13;&#10;     begin&#13;&#10;       SImporteNeto.Visible := False;&#13;&#10;       lImporteNeto.Visible := False;&#13;&#10;       cImporteNeto.Visible := False;&#13;&#10;       ImporteNeto.Visible := False;           &#13;&#10;       SImporteDescuento.Visible := False;&#13;&#10;       lImporteDescuento.Visible := False;&#13;&#10;       cImporteDescuento.Visible := False;&#13;&#10;       ImporteDescuento.Visible := False;           &#13;&#10;       SBaseImponible.Visible := False;&#13;&#10;       lBaseImponible.Visible := False;&#13;&#10;       cBaseImponible.Visible := False;&#13;&#10;       BaseImponible.Visible := False;           &#13;&#10;    &#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin           &#13;&#10;         lImportetotal.Visible := False;&#13;&#10;         memImpTotal.Visible := False;&#13;&#10;       end;          &#13;&#10;     end&#13;&#10;     else&#13;&#10;     begin                 &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         SImporteNeto.Visible := False;&#13;&#10;         lImporteNeto.Visible := False;&#13;&#10;         cImporteNeto.Visible := False;&#13;&#10;         ImporteNeto.Visible := False;           &#13;&#10;         SImporteDescuento.Visible := False;&#13;&#10;         lImporteDescuento.Visible := False;&#13;&#10;         cImporteDescuento.Visible := False;&#13;&#10;         ImporteDescuento.Visible := False;           &#13;&#10;         SBaseImponible.Top := SImporteNeto.Top;&#13;&#10;         lBaseImponible.Top := lImporteNeto.Top;&#13;&#10;         cBaseImponible.Top := cImporteNeto.Top;&#13;&#10;         BaseImponible.Top := ImporteNeto.Top;           &#13;&#10;       end;&#13;&#10;     end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="242" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
@@ -37,19 +37,19 @@
     </TfrxReportSummary>
     <TfrxOverlay Name="Overlay1" Height="1025" Left="0" Top="402" Width="718,101251175" OnBeforePrint="Overlay1OnBeforePrint">
       <TfrxPictureView Name="Picture6" Align="baBottom" Left="6" Top="832,73228346" Width="713" Height="192,26771654" ShowHint="False" Center="True" Picture.PropData="04446174610AC13000000A544A504547496D616765B2300000FFD8FFE000104A46494600010200006400640000FFEC00114475636B79000100040000003C0000FFEE000E41646F62650064C000000001FFDB0084000604040405040605050609060506090B080606080B0C0A0A0B0A0A0C100C0C0C0C0C0C100C0E0F100F0E0C1313141413131C1B1B1B1C1F1F1F1F1F1F1F1F1F1F010707070D0C0D181010181A1511151A1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1FFFC000110800DC030C03011100021101031101FFC4008B000100030101010100000000000000000000030405060201080101010101000000000000000000000000000102031000020102030309050606020006030000000102030411210531411251617181A1C1D1221391B1324252E16272231406F09233435315F182A2B2C26324348325161101010003010101010000000000000000000111021231214161FFDA000C03010002110311003F00FD5200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000239DC5BC3E3AB08E3B319240452D4AC23B6BC7A9E3EE264452D6AC16C9B97445F78EA092CF52A1755250A71927158B72492E4DCD89722D14000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000014F56A95A95A3A94A6E0E3258B586C796F2518B0ADA8DC4B86152A4DA59A526B2E7CD18FAAF7FEAF519E1C71E6F3493EF65E68923A1DD6F94175B7DC3912474197CD597547ED2F28F973A452A36D52AFA9294A0B14B2485D478D09BFD6C97FEDBF7A26AB5BE6D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000055D53FF00A15BA17BD12F832B446FF5725B9C1E3ED467556D9B40001575492561579D25ED6912F828E8115FA8A8F0D90DBD2CCEAB5B86D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000053D5E5C3A7D5E7C17B64897C19DA1AFCFA8F0D9159F599D56B64DA0000A1AD4B0B3C3EA9A5DFDC67611FEDF8655E7CAE31F662FBC6A35CD0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000033F5C925658638714D2C397799D856D05655A5F857BC6AAD534800032B5D9FF461F8A4FB119D859D0E1C365C5F5CDBF665DC35F0681A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000657EE09FE4D1872C9BC37E4B0EF33B06871C2DA72C3E29EDE8486A344D000030B59A9C579C3F4452F6E7DE63656CE9F4FD3B2A316B07C29B5CEF3EF351160A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000C4D7E78D6A30FA62DFB5FD863655BD221C36307BE4DB7ED353C45C2800039BAEFF00517D3C3FB953853E66F0473FD5750924925B11D100000000000000000000000000000000000000056BBD46DADB29CB19FD11CDFD84B456FF007494789DB5551FAB0C89D0B56B7F6D75FD3979966E0F2659458280195AE5DB84236F0784A7E69E1B525B3DA676A33A95D6A34A0A709D4F4F7369CA3DB8A27D559A5AF5CAF8E119F46317DE3A16E9EBD6D2CAA4250E7CA4BB332F48B34F52B1A9F0D68A6F74BCBEFC0B9162328C963169AE559947D000000000000000001B4B36056ADA95952F8AAA6F923E67D84C8A7535FA4BFA54A52E793515D9893A1567AEDDB7E58C21D4DBED64E95E15FEAD3CE329B5B3CB0587B8668F4EE75A4B17EAE1F81780FA3E4757D4693C26F8B9A71C3DD80CD17ADB5DA336A35E3E9BFA9671F12CD91A71946494A2F14F34D1A0000003692C5E496D605696A7611C71AF1787267EE26444F5AD3D6C9B7D11977A1D4113D7ED56CA751F52F12742397EE08FCB41BE9961DCC74A8E5FB82BE7C34A31E4C5B7E04E844F5CBE7B381742F16C742F68F737770EA4EB4F8A11C23158259BCDEC45951A468000002BDCEA1696F9549F9BE88E6C9919B5B5FA8F1546928ADD29BC5FB113A557FF0061AA577E494DAE4A71EF4899A1E96B12F37E767F79AECC46287A3AC27FDECBEFBF118A1FADD56867394D2FBF1CBB50CD16686BF3582AF4D35F54327EC65E86A5BDD50B8871529A92DEB7AE946B289400000000A973AAD9D07C2E5C735F2C33F6EE25A33AB6BF5DE3E9538C16E72CDF719E9507EB755ADF0CA725F723E08668FBE96B0F3FCECFEF35DE3143D1D6167F9DFCEFC46287EAF56A39CA5512FBF1C576A19A26A3AFD75FD58466B963E57DE3A1A76BA95ADCE50970CFE8964FED352A2C940001CF6B53E2BF92FA2318F7F798DBD56BD94382D28C7EE2ED589A8898A00477357D2B7A953E98B6BA770A30F49A4EA5F53C7350C66FABED31AABA436836926DBC12CDB6065DDEB94E0DC2DE3EA496D9BF87AB94CDD851FF0063AA546E50949AFB904D2EC64CD57BA3ACDED29F0D5C2A25F1464B865D83A1B56D734AE692A94DE5B1ADE9F21B44A0000000055B8D4ECE862A53E292F9639B26467D6D7EA3FE952515CB378F62C0CF4AAFFECB53ACFC9293E684578319A1C3AC4F3FCECB9DC7BD0FA1E86B1FFBDFCEFC46287FFB8A59FE772EF9788FA3ED3D66FE93C2A353FBB38E0FB3019A2FDBEB96F5308D64E94B976C4B36468C6719C54A2D4A2F6359A343E8003C57ABE950A9570C7822E58742C40C1A149CACEE2FA6F1AD17E49724B158BED31F9957D57770AD956FD73F57FC0D62F6E0321711953A56D7F4D284E7F1A8AC1712DFD628DCF597E9FD6DDC3C7875626D1EE738C20E7278462B16F9901CC49D4BDBDC7E6AB2F62FB11CFDAAE8A9D38D3A71A7058462B04BA0E88F152D6DAAFF00529464F97058FB40AD5346B297C3C50FC2F1F7E24E456A9A14FF00B7593E692C3B5139540F4AD4293C60937CB0960FB702734155D5E8ADB5525CA9C976E23E8F51D6EFA0F0970CB954A383ECC07544B1FDC15BE6A317D0DAF12F4258FEE0A7879A8B4F99A7E03A47B5AFDAEFA753D91F11D2E1EA3AED9BDB19C7A52EE63A4C3E7FBFB5FF001D4F647C47461E25FB828E7C34A4F93169788E8453FDC155FC14631E96DFBB02742BCB56D46B3C212C39A9C7FE466ABE7E8F53B978CD4DA7BEA3C17B1F80C5162968537FD5AA9734163DAFC0BC8B74F48B286D8B9BE593EE5822E11661428D3F829C63F852451EC001F27084E3C338A94791AC5019B79A3425173B6F2C97F6DEC7D1C866EA2A69DA84ED6A7A7531F45BC2517F2BE524AAE8934D62B34F633680000D62B060726A9A771E9278273E04F9B1C0E6AD68E856EBE2A936F7E182EE66B94491D1AC96D52974C9F7605C0963A658AD9453E96DFBD8C0923696B1F868C161BF8517032359947D785282494238B49619C9FD863656A6914BD3B1A7CB3F3BEBD9D86A22E14008EBDC52A14DD4AB2E18AF6BE80312F358B8ACDC29634E9BC961F13EB317657CB6D1EBD5F3557E945EE79C9F56E1351A7474DB3A5B29A94BEA9F99F69AC22C94000002A5CE996B5937C3E9CFEA8E5ED5B0960C8AB46EAC2BA6A583DB09C7635FC6E31E2B774FBD8DDD1E2D952394E3CFCC6E5459280105DDED0B5871547E67F0C16D64B461DCEA377773E08E318BF869431C5F4F299CE5535B68952583AF2E05F44737EDD859A8D2A36169470E0A6B15F33CDFB597089CA000001057B1B5ACBCF4D63F52C9FB5130326F34AAB413A949BA94D66FEA466EAAB3A5EAB272542E1E38E50A8F979196546C1A00397BC7EB5F55C3E6A9C2BDBC273BEABA44B049721D1000051D66AF059F0EFA924BA967DC67610E814B3AB55EEC20BDEC6A356BD7A5429BA9525C315DBCC8D0C0BDD46BDE4D538271A6DE11A6B6B7CF818B72AB565A3C52552E737BA96E5D3CA59AA34E318C528C52515B12C91A15B51B4857B7934BF360B183DF96EEB25833B44B8F4EEBD36FCB5561D6B3467556F9B400010DD5E50B687155966FE18ADAFA112D18775A9DD5D4BD3863084B254E18E2FA794CDB95496DA2D69E12AD2F4E3F4ACE5E084D51A3474DB3A5B29A93FAA5E67DA6B02CA492C1648A000001E6A52A55161520A6B924B1033EE745A525C56EF825F4BC5C5F7A33751428DC5DD85671D987C54E5B1FF1CA4F15BD67794AEA971C326B2945ED4CD4A89CA3C5C52F56854A58E1C7171C7A5600615BD492B4B8B19470AD27E48BCB178AC567D063F8AF72D32BAB4A3569D3C2E20DF1D3783C56393CF2180BFBA776A85B528F0D4C7CF05B14B6619720B72367D15FA7F477707076606D14B5CB874ED9524FCD55E0FF000ADA676A2B6876FF001DC497DC877B1AC1AC68000000000F928465F124FA5620452B2B496DA30FE544C08DE9760FFB5874392EF1883C3D1EC5BC5464B9949F78E60F9FE9ACB925FCC390FF004D65C92FE61C8F71D26C161F978E1CB29788C41242C6CE1B28C3AD63EF1813A8C52C124973140000000000000063EB56CA338D78AC14FCB3E9DCCC6D05DD16E1D5B4E093C6549F0F56D46A517CA001E4B10396B6FCCBEA6F0F8AA2961D789CE7AAE94E880000073777275EF6A70ED94F863D5E5473BEABA784542118AD91492EA3A23E8105E5DD2B5A4EA4F37B230DED92D1CFD4A9757F71F54DFC315B228C7AAD8B2D3A8DB2527E7ADBE6F7741B9116CA000001E3D7A3C5C3EA478BE9C56207B00043776D1B8A12A6F6BCE2F91EE64A3174BAD2A37D04F2537E9CD74FDA662BA4368A7A8EA30B5870C7095697C31E4E764B46250A1737D5DB6DB6F3A951EC5FC7218932ADDB5B3A16D1C29AF33F8A6F6B3722262800000000000060EAB691A15D4A0B0A7533496E6B698DA2B674DB97716909C9E335E59BE746A22C4E6A1094DEC8A6DF514733611756FA9639B72E2975798E73D574674400018DAE55C6BD3A6B64238BE997FC18D9566CEBD1B1D3213A99CAA6328C16D78ECEC2CB888CEAF5EEB50B8492C5FC905B22BF8DE4F55AB63A753B65C527C759ED96E5CC8D488B85000073B774E56B7D2E0CB864A74FA1E68E77E5574742AC6AD18558EC9A4FDA7447B02ADFDFC2D296394AACBE0877BE625A30A10BABFB86F1E293F8A4F64518F55B7696542DA38416337F14DED66E4458280000000000004377694EE69704F26B384F7A64B061D1AB5EC2EF3C9C5E1523CB1FE3618F15D253A90A94E3520F18C96299D11E80AD77A75B5D6734D4F629C7264B056FF4D2E1E077553D3FA7F864E459B4D3EDAD73A71C67BE72CD964164A39ED66B71DECA3BA9A515D3B5FBCC6DEAB5ECE8FA36D4E9EF8C73E979BED351131400000000000000000000000F352AD2A51E2A93505CADE0051ADAD5B432A69D57CD92F6B33D0A7575ABA97C0A34D7B5F6F813A541FECAF9BC7D67EC587B899A27B7D66E6125EAE1521BF2C25D859B236E138CE119C1E3192C53E666C7D00000A7ABC53B19B7F2B8B5ED489B782AFEDF97E6D6872C62FD8DF899D46D1B0021BC9FA7695A7BD425874E028C1D221C57D0E48272ECC3BCC6AAE80DA0000F15EA7A742A54FA62DFB10183A4D3752FE97247193EA5E2635574A6D1E2B56A74694AA5478462B1607375AAD7BFBA5963293C211DD1473F55B967674EDA970C739BF8E7BDB3722272800021BABBA56D4F8EA3CDFC315B5B25A30AE2F6EAEA7C2DBC1BF2D28ECFB4C66D579AD63734692A9569F041BC33C31C5F30C0D3D12BCE74EA5293C553C3871DC9E39761AD6A348D001CE4D25A8B4B67AD97F398FD56FDF5DC2D683A8F393CA11E566AD46050A35EFAE5E2F3979AA4DEE5FC6C312655D051A34E8D354E9AC22BF8C59D11EC00002ADEEA146D560FCF55EC82EFE425B81935754BDA92CA7C0B7460B0EDDA67354A3AA5ED29E329B9C7E684BF8C4646FC24A708CD6C924D759B47D00067EB714ED632DF19AC3AD333B0F9FB7DBF46AADDC49F60D56ADEA953D3B0AAF7C970AFFB3C0B7C4656894F8AEA53FA23974B667556D9B40001CD5ED5F56EEACF6AE269742C97B8E755F6DE85C5DD4504DB5149393D9188932376D2CE8DB43860B193F8A6F6B3722272800000646B7E8CB82719C5D48BE1945358E0F3D867616342B8E2A13A2DE74DE31E897DA35A2FDC57850A32AB3F862B1C39798D0E71BAF7D77CB39BEA8C7C11CFD56F5B5B53B7A4A9C164B6BDEDF2B3A22500000011CEE6DE0F09D5845F23924323D53AB4AA7F4E719FE169FB80F40000003375AB652A4ABC579A9E52E78BF0667681A0DCB94276F27F0F9A1D0F68D68D634000000039594BD4BCE2967C55735D3239FEABA63A200000000000000000001E2AD7A349635271874B02956D6EDA39538CAA3E5F8576E7D867A142B6AF795328C9534F74567ED64EAABCD2D3EFEE5F1704B3DB3A8F0F7E63145FA1A045675EA63F761976B2CD517A969F674B0E0A51C56F79BED2E058492D85183AE52A70B984A1149CE38CB0DEF1DA63655FD2B1FD052C7EF61D1C4CD4F116CA0000A7ABB4AC2A63BDC52FE644BE0A9FB7E3F9D5A5C914B0E97F619D46D9B0028EB55386C24BEB9463DB8F713614742A78D4AB539128AEB78F71351B06800014B57A9C16325BE6D47B71EE26DE0ABA053C6B55A9F4C54575BC7B8CEAADB368C2D6EF3D4ABFA78BF253F8F9E5F618DAAAD69367E8D1F566BF36A2DFBA3B91A9117CA0000F93946117393C23158B7CC80E72E6E2ADDDC7124DB93E1A70E45B91CEFD56E585852B5A58CB075B0C67539399731B9308CCD5B5085C4952A59D383C5CB95F37319B556F46B7953B77524B0755E297DD5B0D6B11A051E6A548D3A729CB28C536FA80E76CE3EB5F53E2CB19F1CBABCCCE715EF50BA95DDD7933827C34A2B7FF00C8B72366C6D236D41436CDE73972B37222C1400015351BD56D4BCB9D59E505C9CE4B7031EDAD6E2F2ACB85E2F6D4A92DC624CAA5B7D468DBC30A36EBD4DF526F16FB0B910C29DCDEDC36BCD39BF3CF7227A3A3841421182D91492EA3A23E80032F5DACB829D15B5BE37D0B24676136834DC6D6737F3CB2E84B0F78D447AFD5C29D2A5F53727D4B0EF1B11F743A7C36F3A8FE7965D111A8D13400457757D2B6AB537C62F0E9792ED2518763A7D5B9926F18D15B67CBCC8CC8ADEA346951828538A8C56E5DE6D1EC0000295D6AD6F4718C3F36A2DCB62E964B46556BDBCBA97062F07B29C13EECD99CDAA96968B7D38E2D469F349E7D898E45AB0D36F6D6EA351F04A0D353E16F63E948B26110EB975C759508BF253CE5F89F8226D556F49B4F4687A925F99573E88EE46A445E2800012928A726F04B36DF201857FAA54AF270A2DC28ECC564E5F618B55E68E8F7B562A4A31827B38DE1EE4C7223B8B3BAB39C6535C2FE59C5EFE925981AFA65E4AE68B53FEAD3CA4F971D8CDCA8B85000079AB4D54A73A72D934E2FAC0C0D32A3A57F4F1CB16E12EBCBDE739EABA53A20000000398BFA0EDEF271592C78E0F99E673BEAB72CEF295CD3528BC26BE386F4CDCA89CA000000000008AA5D5B53F8EAC62F91B58FB09915AA6B1651F85CA6FEEAF1C075056ABAECDFF4A925CF278F62C0CF42A4F50BFAF2E153962F6469AC3DD993355EA8E957D55E2E1C09ED94F2ECDA5C517A8E814D60EB5472E58C725ED65E51A142CAD687F4E9A4D7CDB5FB5E66B0260000001CF6B73E2BE6BE88C63DFDE636F55AF630E0B3A31FB89BE9799A8898A0000CDD72A616F4E1F54B1EA4BED33B0F5A053C28559FD52C1752FB46A350D00191FB82A65469F4C9FB919D849A2C386D1CBEB937D4B2EE1AF82F9A0000656BB3CA8D3E56E4FAB2EF33B2AC6854F86CDCFEB9B7D4B21AA2E5DD7542DAA557F2AC973BC9168E7AC2DDDCDDA53CE2B19D47CBFF002CCC57446D000000CFD6AE382DD524F3AAF3FC28CED465D95CD3B6AAEACA1C734B0A6B1C126F7B332E15EABDEDE5E4B81B6D3D94A0B2FB466D172CB4778AA973D2A96DFE6353546B1A0032759BD4D7E9A9BC77D56BB22676AAA3084A95B4AB3CA5571A74BA3E67DC6459D16DB8EBBAD25E5A7F0FE27E08BAC1B66D00001B4936F24B36C0E6EE2AD4BCBB6E39B9BE1A71E6DC73BF55D052B685AD9BA70DAA2DB972BC369B473FA7538D4BCA509478A2F1724F6649988AE8E308423C308A8C56C49608E88FA0008EE2E29D0A4EA547825B16F6F910A39E94AB5EDD72D4A8F08ADC97D873F55D35BD18D1A30A51D90587DA74473FABD6F56F67866A9A505D5B7B4C5F55B56747D1B6A74F7C62B1E979BED3711280022B9B78DC41426DF07129492DF86E0248C6318A8C56115924B601F40011D7AF4A841CEA4B863BB95F320316F754AD5F18431A74B661BDF4F818B5525968D56AA53AD8D2A7BA3F33F01351B36F6B42DE3C34A0A3CAF7BE966D1281E2B558D2A53A92D904DBEA039AB5A72BABD8A9E7C72E2A8F9B6B39CF55D21D1000000CBD6AE9C631B78BCE5E6A9D1B919DA8F9A358466BF53556293FCB4F9B78D60D9342A6AD08CEC2AE3F2E125D2992F8333439357338EE70C7D8D7899D56B68DA000001CE56F26A33C1ECAB8A7FF006C4E7FAAE9CE880000000AD7D614EEE0937C338FC335EE25991875B4FBEB69F128CBCBB2A53C5FBB34671548EA97D0F2FA98E1BA4937E24EA897FDDDE7253F63F12F460FF7779F4D3F63F11D0F8F5ABC6B05C0B9D27DEC743C3D5EF9FF00712E88AEFC475479FD56A357E1A95258BCB831FF00D24CD0FD1EA35B374EA4BF1E3FFA8628961A1DF4B6A843A5F8625E45AA7FB7D7F72B3E88AC3B5E25E516A968F634F370737F7DE3D9B0B882DC2953A6B0A71505C9149147A000000000000E5EEDBAD7D530F9EA70AF6F0A39FEABA44B058721D1000000C5D7278DCC21F4C71EB6FEC31B2B4F49A7C1614B9649CBF99E26A22D9400E7B5BA9C57CD6E84547BFBCC6CAD6B1A7E9D9D18EFE14DF4BCCD444E50000616B3538AF387E88A5EDCFBCC6CAD9D3E9FA765463860F8536B9DE66A228EBF5B0852A2BE66E4FAB25EF26C3EE89478684EABDB3960BA23F68D4689A000000CDBED3EE6EAEB8B8A30A514A316F16F95E466CC8FB4744B78E75652A8F917957667DA3917A950A3463C34A0A0B991A1EC001997FAB4629D3B77C53D8EA6E5D1CA66EC2969F6352EEAF14B15493C673E57C9D24932A975A9C7F510A1058428C124B91BFB301B0D1D3297A7654F966B8DFF00DBEC351168A0000A7AB56F4ECE496DA8F8175EDEC26C29E85414AB4EB3D94D611E997D867556C5CA93B7AAA2F09704B07CF81BA8E7B49695F53C77A697B198D55D09B47C94A3158C9A496D6F24051B9D62DA9A6A97E6CF9BE1F699BB0CA9CEEAF6BA59CE6FE18AD897719F55B9A7E9D0B58F13F35692F34B93991B91162E2B468D09D596C82C7AF7168E76C694AE2F61C59E7C737D19FBCE73D5744744000000000A57DA9D3B66E9C571D6C366E58F292DC0C851BBBEAFBEA4F97624BB8C7DAADAB1D2A8DBE139FE656E5DCBA11B91178A0000A1ADD5E0B271DF524A3D4B3EE33B7829E854BCD56ABDD8457BDF70D46B9A000000E6EE252BABE970EDA93E1874638239DFB55D353A71A74E34E2B08C524BA8E88F4054D5A4A3A7D5E7497B5A44BE0CDD0E38D7A92C36470C7A5FD86755AD93680000073776B8AFEAC71C31A9863D2CE7FAAEA0E8800000000003CCE9539AC2708C972349FBC089D8D93DB429FF002A180561649E3E853FE544C0FBFA3B3FF053FE48F81702454E9A78A8A4D73203D000000000000000000000F3526A14E537B229B7D480E6B4F8BA97D4B1DBC5C4FAB339CF55D19D1000000E73529F1DF556B3C1F0AEA581CEFAAE968D354E9429AD908A8FB1607447A00072F5DBB9BE961FDCA982E86F05D873FD5748960B05B0E880000073776DD6BEAA96D94F857B784E77D574F14A31515B12C11D1181ADCF8AF9AFA22977F798D95AB630E0B3A31FB89BE9799A889CA0000000007C94A315C526A296D6DE080A55F58B4A7941BAB2FBBB3DACCDD8665CEA17572F831E184B254E3BFA77B25AAB565A2D49B53B9F243E8F99F4F209A8DAA74E14E0A108A8C56C4B61B4733A849D4BFAD86D73E15D5E539DF55D1462A31515B12C1751D11F4000032F5D6F828ADD8C9E1D0919D858D0E095962B6CA6DBEACBB86BE0D0693583D8CD0E72EB4DBAB7AADD38CA504F184E38B6BD862C579F5754C30C6B7B25E03E8F91B1D46BB4DD39CB1F9A797FE62628BB6FA0CB1C6E2782FA61E2CD4D51AB42DA8D087052828ADFCAFA59A12018DAE5DA6E36D07B3CD53B919DA89346B674E8BAD25E6ABF0FE15E2358344D00000000015AFAC61754F746AC7E09F73E625831A857B9B0B869AC1EC9C1EC6BF8D867C57436B754AE692A94DFE28EF4F9CD4A894A0000C8FDC127C3423B9B937D2B0F133B2A4D123859B7F54DBEC4BB8BAA2F940001E2BCF828D49FD316FD8B1030B48A7C77F4B7A8E327D4BC4E7AFAAE90E880197AF55C2853A7BE72C5F4457DA6761E743A7851A953EB960BA22BED1A95A4680000039BA3F9F7F1E4A9571EA72C4E7FAAEA0E88000000000000000000000000000000000000000055D52A7058567CAB87F99E04BE0CAD1218DD4A5BA107ED6CCEAADB36800000737413AD7F07F5D5E27D1C58B39CF55D41D1002B6A370A85A4E78F99AE1874B25A31B48A1EA5DA97CB49713E9D88CEAADE3680003E4A4A31727B12C581CEE9F1F56FE9639E32E27D5E639CF55D39D11CD6ABFF00DFAFD2BFF2A39DF55BD47FA34FF0AF71D11EC000033F50D4EA5B5654E1052C62A5C4DBDEDAD9D466D1525ADDDBD9182EA6FBC9D2A196A57F53CAAA3E88249F6664CD1F2163A85C3E274E6F1F9A6F0FFCC5C517686812C9D7A987DD878BF02F28D3B7B3B6B75F95049EF93CDBEB35813000396AB95F4F1CB0AAF1FE739FEABA53A20000019DADD272B78545FDB967D12CBDE6761F341B88F04E837E64F8A2B99ED1AD1AC68000000000CFD4B548DBA74A9612AEFD91E93368CBB1B3A97759CA6DBA69E3526F6B7C9D24915D02492492C12C9236800022A9776F4AAC294E6A339EC5E24C894A0000015AF6C69DD4307E5A91F827C84B3231BFF95A7DCF2497F2C918F15B965A850BA8F97CB517C54DEDEAE546E5CA2D1400C8FDC117C3425B9392C7A70F033B2C7BD0DFFF00124B1D93797521AF88D03400008EE5395BD58ACDB8492F60A317459F0DFC17D7192ECC7B8C6AAE88DA00737A9DCFEA6F1F06718F929F3FFCB39DB9AADBB4A1E85B53A5BE2BCDD2F37DA74889400002BEA15BD1B4A92DED70C7A5E44A32F44A3C77AA5BA945BEB79233AABA03680000000000000000000000000000000000000000666BD530B68413F8E79F424676116854F0A756A7D52515D4B1EF1A8D4340000349A69EC60735465FA5BD8B9AFE94F092E659339FEABA884E138A9C1A945E69A3A23E55AB4E941CEA49460B6B6073BA8DF4AF2B2504FD38E54E3BDB7BCC5B956B69D69FA6A184BFA93CE7E1D46A445A2800022BB6D5AD66B6F04BDCC518FA2453BE4F92126BB17798D55D09B4739AC4386FEA7DE517D987718D95B5693E3B5A52E5847DC6E22500000CDD6AD653A71AF058BA794D7DDE5EA33B41574AAF67197A7714E2DC9F92A49278733C49AD56FC6108AF24525CCB0368FA000015ABEA567471E2A89C97CB1F33EC26465DD6B95A6B86847D25F53CE5E08CDD950DB69B73732E3A98C20DE2E72F89F426241BEB672F39B4000003CD4A71A94E509AC6325835D2073D5E8DC58DCA69B4D3C69D4E55FC6D39D9856C596AF42B251AAD53ABCFF0BE866E545F2800023AD71428C71AB3505CFB7D832322F75B9CD385B2708EFA8F6BE8E4317654365A5D6B87EA56C6149E78BF8A5ED1351B74E9D3A5050A71518C76246D1E80010DD5D53B6A2EA4F3DD18EF6F90968E76AD4A95AA4EACFCD279C9EE4BC0C2B474DD51452A15DE5B2151FB99A951AE680000023AF6F4ABD370A91C56E7BD73A6062DD69B716B2F529373A6B3538FC4BA703162A7B5D72A4128DC47D45F5ACA5ECD8C4D8684356D3E4B1F552C374935DC6B3119DAB6A16D734E14E96327197171E182D8D61999DAAA4D09CF86AAC1F0629A96EC7632EA8D43400006DC981CE494ECAFB6674A58C79E3FF073F2AB7A9EA36538297AD08E3F2C9A4D753379450D4B578CA0E8DB3C71CA5539B9112ECA8B48B1739AB8A8BC91FE9AE57CBD44D62364D800000636B574A7563422FCB4F39FE27E08C6D557B45B6F4AD7D47F155F37FD771A9117CA000000000000000000000000000000000000000018DFB81BE2A0B76127EE33B09F464BF44B9E52C4BAF82F140000028EA1A646E5FA94DA8D6C30CF64BA4960CE8D0D56D9F0D35522BEE66BB32338AA2B1D4AE258D452FC551ECF6E631469D8E994ED9F1C9F1D5FAB72E835222E14000003CD582A94E74DEC9A717D6B0039EA552BD8DD62E3E78629C5EC68E7E2B4A3FB82961E6A324F99A6BB8D748CDBFBC5755554E0E0C170EDC71EC466DCAB57469CDDA70CA2D2836A2DADA9E66E22F140000032EF747E293A96D845BDB4DE4BA8CDD4538FFB5B5CA3EA412DCBCD1EF44FAAF6B57D4A2926F16F6371CFB3019A3E3D43559BC14A79EE8C1780CD1E7F49AA5C7C71A925FF00B8F05DAC628B14743A8F3AB5145724737ED65E517EDF4EB5A0D384319AF9E59B2E05928000000001E6AD1A7560E1522A517B9819571A24D36EDE78AFA25B7DA66EA2B461AADB650552296E8F9A3D98A27D57B5AA6A893F3378EF705DC8668F9FA9D62B2C13AAD3DF18F0F6A487D1EA9E917B565C555A863B5C9F14BB3C472342DB4BB6A0D49AF52A2F9A5DC8D488B8500004771714A853752A3C22B62DEDF22168C0AF5EBDEDC2CB16DE14E0B72FE369CFD56E5869F4EDA838C9294E6BF31ED4F9BA0DC88CCD4B499516EAD04E54B7C76B8FD866EA3E586AB2A3C34AB3E2A3B14B6B8F8A12AB6A328CA2A5169C5E69AD86D1F400000055AFA65A566E4E1C337B650C9F812C1525A0AC7CB59A5CF1C7DCD13912D1D12DA0F1A927539B62EC1C8BF18C631518A518AD89648D0FA0000002BDE58D1BA8A53CA6BE19ADA8960CE96855B1F2D58B5BB14D19E458B7D168C1A95697A8D7CB8611EBE52CD468A492492C12C92468000002B5FDE46DA8F16DA92CA9C79F97A8968C6B1B59DE5CE126DC71E2AB2EBEF312655D32492492C12C923A2000000000000000000000000000000000000000000327F70536E146A61945B8B7D39F719D87DD0EA276F3A7BE12C7A9A1A8D1340000000000000000000003C55A346AAC2A42334B6712C40AEF4AB06F1F4B0E894BC498825A765694F38528A7CAD62FDAC604C504D358A78A7B1A00000000000000000003692C5EC032B50D5A383A56EF16F29555B17E1F133760D2B51C70B7ACF3D94E6F7F33EE1AD1AA68000000000000000000020BBBCA36D0E29BC64FE182DAC968C2AB56E6F6BACB8A4F28416C48C7AADBD3B4E85AC78A5E6AD25E67B973237261174A0064EA3A3F1375AD9252DB2A7CBD066C19F697D5ED26E38630C7CF4DE59F3723332E15BB6D7546E21C54A58E1F145ED5D28DCA894A0000000001B4962F24B6B02AD0D46DEBD795183CD7C2DEC972E04C8B4500000000000000105E5E52B5A7C53CE4FE082DAC968C272B8BEB95F3549E492D897818F55D0D95A42D68AA71CE4F39CB959B911394000000000000000000000000000000000000000000417D6DFA8B59D2F99E707CEB612C1CFD9DCCED2E389A787C3521BF0F14625C2BA1A5569D5829D392945EF47447A000000000045717542DE3C55649722DEFA112D1897DA955B9C611F251FA77BE9336AB474BBF55A0A9547F9D15937F32F12CA8BE680000000475AE28508F1559A8ADC9ED7D0864645EEAD3AC9D3A29C29BC9CBE66BB8C5D950D8EA152D5F0BF3D17B61C9CE892E06ED0B9A35E1C54A4A4B7ADEBA51D32890000000000003CCEA53A71E29C9463CADE080A371ACDBC315493AB2E5D91F699BB0CDAF7977772506DB4F65282CBD9BCCE72AB965A24A4D4EEBCB1FF1A79BE966A6A8AFA8E993B6939C139507B1EF8F33258A9AC75771C29DCE71D8AA6F5F8B94B3646BC2709C54A0D4A2F6359A343E80000000000000F92946317293518ADADE480CDBCD6611C616DE697F91FC2BA394CDD867D0B7BABDACDAC64DFC7525B119C655BD656146D63E5F3547F14DED7E08DC88B25000000A97DA6D1BA5C5F055DD35BFA4960C3AB42EECAB26F18497C338EC7FC7218C6157ED75A834A370B85FF923B3AD1A9B234E1384E2A5092945EC69E28D0FA00001157B9A1423C5564A3C8B7BE8432316FB52AB72DC238C28FD3BDF4F818B550D5B4B9B78C2A4E2E0A59C65BD3EE64C0D1B2D622D2A772F096C55373E9E4353646A292924E2F14F63468000000000F929C6117293518ADADE480CDBBD6A11C636EB8E5F5BF87AB94CDD867D1B7BABEACDAC6527F15496C4671956FD958D2B5A784739BF8E7BD9B91160A0000000000000000000000000000000000000000000000CED474A8DC375693E1AD866B74BED3360C88CAF2CAA7CD4A5BE2F63EE667C55EA3AEEEAD4BFED0F07E26A6C2D4356B19ED9B83E4926BEC2F51137EB6CFF00CF4FF990C8F92BFB24B175E1D4D3F70C882A6B3671F85CAA3FBAB05DB80E852AFAD5C4D354A2A92E5F8A5E067A54142CAF2F25C69369EDAB3797B5ED263235E868D6B4E9B8D45EA4E4B0737961D08DE119579A6DC5ACB89633A6B35523BBA790CD985494359B9A6946A25562B7BCA5ED1D0B51D72DDAF3539C5F360FBD17A47A7AE5AE19426DF260BC47421A9AEBFEDD1E8727DC8742AD5D52FAABC14F831F960B0EDCD93A528E997D5E5C4E0E29ED9D4CBDF98C0D5B4D1ADE8B52A9F9B35CBF0AEA35223EDF69346E319C3F2EAF2AD8FA50B063D6B3BDB49F134E386CAB0C70F6A318B152D1D66EA0929A8D45CAF27ED45E85A86BB45FC74A4BA1A7E05E9122D6ECDBCD4D73E0BB98E87D7ACD925B64F9B87C47507896B96CB6426FA92EF1D0867AECFE4A2973CA58FB913A556A9AADED4CB8D413DD05876E6C9D51E6165A85C4B8B82726FE79E5DB218A2FDBE83B1DC54FFA43C59A9A996950B5B7B78E14A0A3CAF7BE96691280693583CD3DA80CABDD1232C676CF865BE9BD9D4F719BA8CC52BDB2A9879A94B91EC7DCCCFD8ABD475C78255A9E3F7A1E0FC4BD22E53D52C6A7F7145F24BCBEFC8D644F0AD466B184E325CCD328F6000F32AB4E0B19CD4573B480AF5354B187F7549F247197BB22660A75B5C7B2853FFB4FC17892EC2939DEDECF87CD55AF956C5DC8CFDAAD0B4D0B64AE5FFF008E2FDECD4D51AB4E9C29C14211518AD89648D0F40000000000F93A70A91719C54A2F6A6B140655D68516DCADE5C2FE896CEA666EA33A54AF6CE78B52A4FEA5B1F5AC8CFD8A9A9EB57915E6519F3B583EC2F4257AED4C32A2B1E5E2787B874886AEB17935845C69AFBAB3F6BC474A8E8585EDD4B8945E0F6D49ECF6BCD93191B365A550B6C26FF32AFD6F62E846E445C9C2138B8CD2945ED4CA322EF4378B95ABCBFC727EE7E266EAACF53BDB39E1E6A4FE97B1FB72667EC16E96B95965529C67CF17C2FBCBD09E3AE5BBF8A9CD7460FBCBD23D7FBBB4FA6A7B1788E8C2396BB4F0F252937CED2F7623A15EAEB5772F81469AE5C317DA4E9504695F5E493C2757EF3F8575BC89F68D0B5D092C25732C7EE47675B353546AD3A70A7050845462B624687A000000000000000000000000000000000000000000000000003CD4A74EA4786A454A2F7358A02955D12CA78B8A9537F75E5EC789391567FB7E7FDBAC9ADCA4B0F73272217A15EAD8E9BEB7E04E55F63A0DE3F8A74E2B7E6DBF70E44F4FF6FC7FB959BE68AC3B5E25E517686976545A71A7C525F34FCCFB722E05A280002B56D32CAABC6549293DF1C63EE26056968368DE539C79B15DE89C8F9FE82D7FC953DB1F01C89A1A358476C1CFF137DD8171059A56D6F4BFA74E30E749265120000000AF5B4EB2AB9CE9471E55E57D981302B4F42B37F0CA71E64D3F7A64E4787A050F96ACD74E0FB90E47CFFF009FA5FE697B10E47B8E836AB0E29CE5CB9A5DC3912C347B08E0FD3726BEA6DF66C2E20B34EDE852FE9D38C3A12451200000000003CD4A74EA45C671528BDA9AC50146B68967378C38A93FBAF15EC64E454A9A0575FD3AB197E24E3EEC4CF2B9579E8D7F1FEDA9744977E039A3C4B4DD423B68CBA9A7EE64C505A76A0DE0A8CBAF05EF63147B8E8F7F2DB4D479E525DD8979A27A7A0577FD4A918FE1C65E0391768E8B674F39E355FDE797B11AE517A108423C308A8C7912C0A3E800000000000000001B4082A5859D478CA8C1B7BD2C1F613022FF0051A77F87FF0014BC46209A9D95A5378C28C13E5C163ED2E04C0000003E4A3192C249493DCF34055A9A4D854CFD2517CB16E3D8B2260412D06D1BCA734B9315DE89C8F9FE82D7FC953FF0F80E47B868764B0E2E3974BC3DD8179162969F654F38518E2B636B89FB5E2302C1400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001FFFD9" HightQuality="False"/>
-      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="965" Width="718" Height="60" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="&#13;&#10;En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+      <TfrxMemoView Name="Memo2" Align="baBottom" Left="0" Top="947" Width="718" Height="78" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" GapX="5" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
       <TfrxLineView Name="LineaCorta4" Left="631" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="581" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta1" Left="501" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line1" Left="718" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line2" Align="baLeft" Left="0" Top="242" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga0" Left="461" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta0" Left="461" Top="242" Width="0" Height="528" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="Line5" Left="0" Top="1021" Width="718" Height="0" ShowHint="False" Frame.Typ="4"/>
-      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="722" ShowHint="False" Frame.Typ="1"/>
-      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="722" Visible="False" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga1" Left="501" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga3" Left="581" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga4" Left="631" Top="242" Width="0" Height="705" ShowHint="False" Frame.Typ="1"/>
+      <TfrxLineView Name="LineaLarga5" Left="70" Top="242" Width="0" Height="705" Visible="False" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta5" Left="70" Top="242" Width="0" Height="528" Visible="False" ShowHint="False" Frame.Typ="1"/>
     </TfrxOverlay>
     <TfrxPageFooter Name="PageFooter1" Height="85" Left="0" Top="1704" Width="718,101251175"/>
diff --git a/Source/Informes/4/InfContratoCliente.fr3 b/Source/Informes/4/InfContratoCliente.fr3
index 7d1410e..ee2c99b 100644
--- a/Source/Informes/4/InfContratoCliente.fr3
+++ b/Source/Informes/4/InfContratoCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="42795,4687981019" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo1.Visible := True;                                                     &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo1.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;                &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;         Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;        &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo34OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D7072657361220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6779219097" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo1.Visible := True;                                                     &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo1.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;                &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;         Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;        &#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc')&#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;    Memo2.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;      Memo2.Visible := False;          &#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;      Memo2.Visible := True;          &#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo34OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C15000000204E616D653D224E6F6D627265456D7072657361220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="241" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
@@ -63,7 +63,7 @@
     </TfrxReportSummary>
     <TfrxOverlay Name="Overlay1" Height="1016,69357" Left="0" Top="558" Width="718,101251175">
       <TfrxPictureView Name="Picture6" Align="baBottom" Left="2" Top="824,42585346" Width="714" Height="192,26771654" ShowHint="False" Center="True" Picture.PropData="04446174610AC13000000A544A504547496D616765B2300000FFD8FFE000104A46494600010200006400640000FFEC00114475636B79000100040000003C0000FFEE000E41646F62650064C000000001FFDB0084000604040405040605050609060506090B080606080B0C0A0A0B0A0A0C100C0C0C0C0C0C100C0E0F100F0E0C1313141413131C1B1B1B1C1F1F1F1F1F1F1F1F1F1F010707070D0C0D181010181A1511151A1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1FFFC000110800DC030C03011100021101031101FFC4008B000100030101010100000000000000000000030405060201080101010101000000000000000000000000000102031000020102030309050606020006030000000102030411210531411251617181A1C1D1221391B1324252E16272231406F09233435315F182A2B2C26324348325161101010003010101010000000000000000000111021231214161FFDA000C03010002110311003F00FD5200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000239DC5BC3E3AB08E3B319240452D4AC23B6BC7A9E3EE264452D6AC16C9B97445F78EA092CF52A1755250A71927158B72492E4DCD89722D14000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000014F56A95A95A3A94A6E0E3258B586C796F2518B0ADA8DC4B86152A4DA59A526B2E7CD18FAAF7FEAF519E1C71E6F3493EF65E68923A1DD6F94175B7DC3912474197CD597547ED2F28F973A452A36D52AFA9294A0B14B2485D478D09BFD6C97FEDBF7A26AB5BE6D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000055D53FF00A15BA17BD12F832B446FF5725B9C1E3ED467556D9B40001575492561579D25ED6912F828E8115FA8A8F0D90DBD2CCEAB5B86D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000053D5E5C3A7D5E7C17B64897C19DA1AFCFA8F0D9159F599D56B64DA0000A1AD4B0B3C3EA9A5DFDC67611FEDF8655E7CAE31F662FBC6A35CD0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000033F5C925658638714D2C397799D856D05655A5F857BC6AAD534800032B5D9FF461F8A4FB119D859D0E1C365C5F5CDBF665DC35F0681A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000657EE09FE4D1872C9BC37E4B0EF33B06871C2DA72C3E29EDE8486A344D000030B59A9C579C3F4452F6E7DE63656CE9F4FD3B2A316B07C29B5CEF3EF351160A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000C4D7E78D6A30FA62DFB5FD863655BD221C36307BE4DB7ED353C45C2800039BAEFF00517D3C3FB953853E66F0473FD5750924925B11D100000000000000000000000000000000000000056BBD46DADB29CB19FD11CDFD84B456FF007494789DB5551FAB0C89D0B56B7F6D75FD3979966E0F2659458280195AE5DB84236F0784A7E69E1B525B3DA676A33A95D6A34A0A709D4F4F7369CA3DB8A27D559A5AF5CAF8E119F46317DE3A16E9EBD6D2CAA4250E7CA4BB332F48B34F52B1A9F0D68A6F74BCBEFC0B9162328C963169AE559947D000000000000000001B4B36056ADA95952F8AAA6F923E67D84C8A7535FA4BFA54A52E793515D9893A1567AEDDB7E58C21D4DBED64E95E15FEAD3CE329B5B3CB0587B8668F4EE75A4B17EAE1F81780FA3E4757D4693C26F8B9A71C3DD80CD17ADB5DA336A35E3E9BFA9671F12CD91A71946494A2F14F34D1A0000003692C5E496D605696A7611C71AF1787267EE26444F5AD3D6C9B7D11977A1D4113D7ED56CA751F52F12742397EE08FCB41BE9961DCC74A8E5FB82BE7C34A31E4C5B7E04E844F5CBE7B381742F16C742F68F737770EA4EB4F8A11C23158259BCDEC45951A468000002BDCEA1696F9549F9BE88E6C9919B5B5FA8F1546928ADD29BC5FB113A557FF0061AA577E494DAE4A71EF4899A1E96B12F37E767F79AECC46287A3AC27FDECBEFBF118A1FADD56867394D2FBF1CBB50CD16686BF3582AF4D35F54327EC65E86A5BDD50B8871529A92DEB7AE946B289400000000A973AAD9D07C2E5C735F2C33F6EE25A33AB6BF5DE3E9538C16E72CDF719E9507EB755ADF0CA725F723E08668FBE96B0F3FCECFEF35DE3143D1D6167F9DFCEFC46287EAF56A39CA5512FBF1C576A19A26A3AFD75FD58466B963E57DE3A1A76BA95ADCE50970CFE8964FED352A2C940001CF6B53E2BF92FA2318F7F798DBD56BD94382D28C7EE2ED589A8898A00477357D2B7A953E98B6BA770A30F49A4EA5F53C7350C66FABED31AABA436836926DBC12CDB6065DDEB94E0DC2DE3EA496D9BF87AB94CDD851FF0063AA546E50949AFB904D2EC64CD57BA3ACDED29F0D5C2A25F1464B865D83A1B56D734AE692A94DE5B1ADE9F21B44A0000000055B8D4ECE862A53E292F9639B26467D6D7EA3FE952515CB378F62C0CF4AAFFECB53ACFC9293E684578319A1C3AC4F3FCECB9DC7BD0FA1E86B1FFBDFCEFC46287FFB8A59FE772EF9788FA3ED3D66FE93C2A353FBB38E0FB3019A2FDBEB96F5308D64E94B976C4B36468C6719C54A2D4A2F6359A343E8003C57ABE950A9570C7822E58742C40C1A149CACEE2FA6F1AD17E49724B158BED31F9957D57770AD956FD73F57FC0D62F6E0321711953A56D7F4D284E7F1A8AC1712DFD628DCF597E9FD6DDC3C7875626D1EE738C20E7278462B16F9901CC49D4BDBDC7E6AB2F62FB11CFDAAE8A9D38D3A71A7058462B04BA0E88F152D6DAAFF00529464F97058FB40AD5346B297C3C50FC2F1F7E24E456A9A14FF00B7593E692C3B5139540F4AD4293C60937CB0960FB702734155D5E8ADB5525CA9C976E23E8F51D6EFA0F0970CB954A383ECC07544B1FDC15BE6A317D0DAF12F4258FEE0A7879A8B4F99A7E03A47B5AFDAEFA753D91F11D2E1EA3AED9BDB19C7A52EE63A4C3E7FBFB5FF001D4F647C47461E25FB828E7C34A4F93169788E8453FDC155FC14631E96DFBB02742BCB56D46B3C212C39A9C7FE466ABE7E8F53B978CD4DA7BEA3C17B1F80C5162968537FD5AA9734163DAFC0BC8B74F48B286D8B9BE593EE5822E11661428D3F829C63F852451EC001F27084E3C338A94791AC5019B79A3425173B6F2C97F6DEC7D1C866EA2A69DA84ED6A7A7531F45BC2517F2BE524AAE8934D62B34F633680000D62B060726A9A771E9278273E04F9B1C0E6AD68E856EBE2A936F7E182EE66B94491D1AC96D52974C9F7605C0963A658AD9453E96DFBD8C0923696B1F868C161BF8517032359947D785282494238B49619C9FD863656A6914BD3B1A7CB3F3BEBD9D86A22E14008EBDC52A14DD4AB2E18AF6BE80312F358B8ACDC29634E9BC961F13EB317657CB6D1EBD5F3557E945EE79C9F56E1351A7474DB3A5B29A94BEA9F99F69AC22C94000002A5CE996B5937C3E9CFEA8E5ED5B0960C8AB46EAC2BA6A583DB09C7635FC6E31E2B774FBD8DDD1E2D952394E3CFCC6E5459280105DDED0B5871547E67F0C16D64B461DCEA377773E08E318BF869431C5F4F299CE5535B68952583AF2E05F44737EDD859A8D2A36169470E0A6B15F33CDFB597089CA000001057B1B5ACBCF4D63F52C9FB5130326F34AAB413A949BA94D66FEA466EAAB3A5EAB272542E1E38E50A8F979196546C1A00397BC7EB5F55C3E6A9C2BDBC273BEABA44B049721D1000051D66AF059F0EFA924BA967DC67610E814B3AB55EEC20BDEC6A356BD7A5429BA9525C315DBCC8D0C0BDD46BDE4D538271A6DE11A6B6B7CF818B72AB565A3C52552E737BA96E5D3CA59AA34E318C528C52515B12C91A15B51B4857B7934BF360B183DF96EEB25833B44B8F4EEBD36FCB5561D6B3467556F9B400010DD5E50B687155966FE18ADAFA112D18775A9DD5D4BD3863084B254E18E2FA794CDB95496DA2D69E12AD2F4E3F4ACE5E084D51A3474DB3A5B29A93FAA5E67DA6B02CA492C1648A000001E6A52A55161520A6B924B1033EE745A525C56EF825F4BC5C5F7A33751428DC5DD85671D987C54E5B1FF1CA4F15BD67794AEA971C326B2945ED4CD4A89CA3C5C52F56854A58E1C7171C7A5600615BD492B4B8B19470AD27E48BCB178AC567D063F8AF72D32BAB4A3569D3C2E20DF1D3783C56393CF2180BFBA776A85B528F0D4C7CF05B14B6619720B72367D15FA7F477707076606D14B5CB874ED9524FCD55E0FF000ADA676A2B6876FF001DC497DC877B1AC1AC68000000000F928465F124FA5620452B2B496DA30FE544C08DE9760FFB5874392EF1883C3D1EC5BC5464B9949F78E60F9FE9ACB925FCC390FF004D65C92FE61C8F71D26C161F978E1CB29788C41242C6CE1B28C3AD63EF1813A8C52C124973140000000000000063EB56CA338D78AC14FCB3E9DCCC6D05DD16E1D5B4E093C6549F0F56D46A517CA001E4B10396B6FCCBEA6F0F8AA2961D789CE7AAE94E880000073777275EF6A70ED94F863D5E5473BEABA784542118AD91492EA3A23E8105E5DD2B5A4EA4F37B230DED92D1CFD4A9757F71F54DFC315B228C7AAD8B2D3A8DB2527E7ADBE6F7741B9116CA000001E3D7A3C5C3EA478BE9C56207B00043776D1B8A12A6F6BCE2F91EE64A3174BAD2A37D04F2537E9CD74FDA662BA4368A7A8EA30B5870C7095697C31E4E764B46250A1737D5DB6DB6F3A951EC5FC7218932ADDB5B3A16D1C29AF33F8A6F6B3722262800000000000060EAB691A15D4A0B0A7533496E6B698DA2B674DB97716909C9E335E59BE746A22C4E6A1094DEC8A6DF514733611756FA9639B72E2975798E73D574674400018DAE55C6BD3A6B64238BE997FC18D9566CEBD1B1D3213A99CAA6328C16D78ECEC2CB888CEAF5EEB50B8492C5FC905B22BF8DE4F55AB63A753B65C527C759ED96E5CC8D488B85000073B774E56B7D2E0CB864A74FA1E68E77E5574742AC6AD18558EC9A4FDA7447B02ADFDFC2D296394AACBE0877BE625A30A10BABFB86F1E293F8A4F64518F55B7696542DA38416337F14DED66E4458280000000000004377694EE69704F26B384F7A64B061D1AB5EC2EF3C9C5E1523CB1FE3618F15D253A90A94E3520F18C96299D11E80AD77A75B5D6734D4F629C7264B056FF4D2E1E077553D3FA7F864E459B4D3EDAD73A71C67BE72CD964164A39ED66B71DECA3BA9A515D3B5FBCC6DEAB5ECE8FA36D4E9EF8C73E979BED351131400000000000000000000000F352AD2A51E2A93505CADE0051ADAD5B432A69D57CD92F6B33D0A7575ABA97C0A34D7B5F6F813A541FECAF9BC7D67EC587B899A27B7D66E6125EAE1521BF2C25D859B236E138CE119C1E3192C53E666C7D00000A7ABC53B19B7F2B8B5ED489B782AFEDF97E6D6872C62FD8DF899D46D1B0021BC9FA7695A7BD425874E028C1D221C57D0E48272ECC3BCC6AAE80DA0000F15EA7A742A54FA62DFB10183A4D3752FE97247193EA5E2635574A6D1E2B56A74694AA5478462B1607375AAD7BFBA5963293C211DD1473F55B967674EDA970C739BF8E7BDB3722272800021BABBA56D4F8EA3CDFC315B5B25A30AE2F6EAEA7C2DBC1BF2D28ECFB4C66D579AD63734692A9569F041BC33C31C5F30C0D3D12BCE74EA5293C553C3871DC9E39761AD6A348D001CE4D25A8B4B67AD97F398FD56FDF5DC2D683A8F393CA11E566AD46050A35EFAE5E2F3979AA4DEE5FC6C312655D051A34E8D354E9AC22BF8C59D11EC00002ADEEA146D560FCF55EC82EFE425B81935754BDA92CA7C0B7460B0EDDA67354A3AA5ED29E329B9C7E684BF8C4646FC24A708CD6C924D759B47D00067EB714ED632DF19AC3AD333B0F9FB7DBF46AADDC49F60D56ADEA953D3B0AAF7C970AFFB3C0B7C4656894F8AEA53FA23974B667556D9B40001CD5ED5F56EEACF6AE269742C97B8E755F6DE85C5DD4504DB5149393D9188932376D2CE8DB43860B193F8A6F6B3722272800000646B7E8CB82719C5D48BE1945358E0F3D867616342B8E2A13A2DE74DE31E897DA35A2FDC57850A32AB3F862B1C39798D0E71BAF7D77CB39BEA8C7C11CFD56F5B5B53B7A4A9C164B6BDEDF2B3A22500000011CEE6DE0F09D5845F23924323D53AB4AA7F4E719FE169FB80F40000003375AB652A4ABC579A9E52E78BF0667681A0DCB94276F27F0F9A1D0F68D68D634000000039594BD4BCE2967C55735D3239FEABA63A200000000000000000001E2AD7A349635271874B02956D6EDA39538CAA3E5F8576E7D867A142B6AF795328C9534F74567ED64EAABCD2D3EFEE5F1704B3DB3A8F0F7E63145FA1A045675EA63F761976B2CD517A969F674B0E0A51C56F79BED2E058492D85183AE52A70B984A1149CE38CB0DEF1DA63655FD2B1FD052C7EF61D1C4CD4F116CA0000A7ABB4AC2A63BDC52FE644BE0A9FB7E3F9D5A5C914B0E97F619D46D9B0028EB55386C24BEB9463DB8F713614742A78D4AB539128AEB78F71351B06800014B57A9C16325BE6D47B71EE26DE0ABA053C6B55A9F4C54575BC7B8CEAADB368C2D6EF3D4ABFA78BF253F8F9E5F618DAAAD69367E8D1F566BF36A2DFBA3B91A9117CA0000F93946117393C23158B7CC80E72E6E2ADDDC7124DB93E1A70E45B91CEFD56E585852B5A58CB075B0C67539399731B9308CCD5B5085C4952A59D383C5CB95F37319B556F46B7953B77524B0755E297DD5B0D6B11A051E6A548D3A729CB28C536FA80E76CE3EB5F53E2CB19F1CBABCCCE715EF50BA95DDD7933827C34A2B7FF00C8B72366C6D236D41436CDE73972B37222C1400015351BD56D4BCB9D59E505C9CE4B7031EDAD6E2F2ACB85E2F6D4A92DC624CAA5B7D468DBC30A36EBD4DF526F16FB0B910C29DCDEDC36BCD39BF3CF7227A3A3841421182D91492EA3A23E80032F5DACB829D15B5BE37D0B24676136834DC6D6737F3CB2E84B0F78D447AFD5C29D2A5F53727D4B0EF1B11F743A7C36F3A8FE7965D111A8D13400457757D2B6AB537C62F0E9792ED2518763A7D5B9926F18D15B67CBCC8CC8ADEA346951828538A8C56E5DE6D1EC0000295D6AD6F4718C3F36A2DCB62E964B46556BDBCBA97062F07B29C13EECD99CDAA96968B7D38E2D469F349E7D898E45AB0D36F6D6EA351F04A0D353E16F63E948B26110EB975C759508BF253CE5F89F8226D556F49B4F4687A925F99573E88EE46A445E2800012928A726F04B36DF201857FAA54AF270A2DC28ECC564E5F618B55E68E8F7B562A4A31827B38DE1EE4C7223B8B3BAB39C6535C2FE59C5EFE925981AFA65E4AE68B53FEAD3CA4F971D8CDCA8B85000079AB4D54A73A72D934E2FAC0C0D32A3A57F4F1CB16E12EBCBDE739EABA53A20000000398BFA0EDEF271592C78E0F99E673BEAB72CEF295CD3528BC26BE386F4CDCA89CA000000000008AA5D5B53F8EAC62F91B58FB09915AA6B1651F85CA6FEEAF1C075056ABAECDFF4A925CF278F62C0CF42A4F50BFAF2E153962F6469AC3DD993355EA8E957D55E2E1C09ED94F2ECDA5C517A8E814D60EB5472E58C725ED65E51A142CAD687F4E9A4D7CDB5FB5E66B0260000001CF6B73E2BE6BE88C63DFDE636F55AF630E0B3A31FB89BE9799A8898A0000CDD72A616F4E1F54B1EA4BED33B0F5A053C28559FD52C1752FB46A350D00191FB82A65469F4C9FB919D849A2C386D1CBEB937D4B2EE1AF82F9A0000656BB3CA8D3E56E4FAB2EF33B2AC6854F86CDCFEB9B7D4B21AA2E5DD7542DAA557F2AC973BC9168E7AC2DDDCDDA53CE2B19D47CBFF002CCC57446D000000CFD6AE382DD524F3AAF3FC28CED465D95CD3B6AAEACA1C734B0A6B1C126F7B332E15EABDEDE5E4B81B6D3D94A0B2FB466D172CB4778AA973D2A96DFE6353546B1A0032759BD4D7E9A9BC77D56BB22676AAA3084A95B4AB3CA5571A74BA3E67DC6459D16DB8EBBAD25E5A7F0FE27E08BAC1B66D00001B4936F24B36C0E6EE2AD4BCBB6E39B9BE1A71E6DC73BF55D052B685AD9BA70DAA2DB972BC369B473FA7538D4BCA509478A2F1724F6649988AE8E308423C308A8C56C49608E88FA0008EE2E29D0A4EA547825B16F6F910A39E94AB5EDD72D4A8F08ADC97D873F55D35BD18D1A30A51D90587DA74473FABD6F56F67866A9A505D5B7B4C5F55B56747D1B6A74F7C62B1E979BED3711280022B9B78DC41426DF07129492DF86E0248C6318A8C56115924B601F40011D7AF4A841CEA4B863BB95F320316F754AD5F18431A74B661BDF4F818B5525968D56AA53AD8D2A7BA3F33F01351B36F6B42DE3C34A0A3CAF7BE966D1281E2B558D2A53A92D904DBEA039AB5A72BABD8A9E7C72E2A8F9B6B39CF55D21D1000000CBD6AE9C631B78BCE5E6A9D1B919DA8F9A358466BF53556293FCB4F9B78D60D9342A6AD08CEC2AE3F2E125D2992F8333439357338EE70C7D8D7899D56B68DA000001CE56F26A33C1ECAB8A7FF006C4E7FAAE9CE880000000AD7D614EEE0937C338FC335EE25991875B4FBEB69F128CBCBB2A53C5FBB34671548EA97D0F2FA98E1BA4937E24EA897FDDDE7253F63F12F460FF7779F4D3F63F11D0F8F5ABC6B05C0B9D27DEC743C3D5EF9FF00712E88AEFC475479FD56A357E1A95258BCB831FF00D24CD0FD1EA35B374EA4BF1E3FFA8628961A1DF4B6A843A5F8625E45AA7FB7D7F72B3E88AC3B5E25E516A968F634F370737F7DE3D9B0B882DC2953A6B0A71505C9149147A000000000000E5EEDBAD7D530F9EA70AF6F0A39FEABA44B058721D1000000C5D7278DCC21F4C71EB6FEC31B2B4F49A7C1614B9649CBF99E26A22D9400E7B5BA9C57CD6E84547BFBCC6CAD6B1A7E9D9D18EFE14DF4BCCD444E50000616B3538AF387E88A5EDCFBCC6CAD9D3E9FA765463860F8536B9DE66A228EBF5B0852A2BE66E4FAB25EF26C3EE89478684EABDB3960BA23F68D4689A000000CDBED3EE6EAEB8B8A30A514A316F16F95E466CC8FB4744B78E75652A8F917957667DA3917A950A3463C34A0A0B991A1EC001997FAB4629D3B77C53D8EA6E5D1CA66EC2969F6352EEAF14B15493C673E57C9D24932A975A9C7F510A1058428C124B91BFB301B0D1D3297A7654F966B8DFF00DBEC351168A0000A7AB56F4ECE496DA8F8175EDEC26C29E85414AB4EB3D94D611E997D867556C5CA93B7AAA2F09704B07CF81BA8E7B49695F53C77A697B198D55D09B47C94A3158C9A496D6F24051B9D62DA9A6A97E6CF9BE1F699BB0CA9CEEAF6BA59CE6FE18AD897719F55B9A7E9D0B58F13F35692F34B93991B91162E2B468D09D596C82C7AF7168E76C694AE2F61C59E7C737D19FBCE73D5744744000000000A57DA9D3B66E9C571D6C366E58F292DC0C851BBBEAFBEA4F97624BB8C7DAADAB1D2A8DBE139FE656E5DCBA11B91178A0000A1ADD5E0B271DF524A3D4B3EE33B7829E854BCD56ABDD8457BDF70D46B9A000000E6EE252BABE970EDA93E1874638239DFB55D353A71A74E34E2B08C524BA8E88F4054D5A4A3A7D5E7497B5A44BE0CDD0E38D7A92C36470C7A5FD86755AD93680000073776B8AFEAC71C31A9863D2CE7FAAEA0E8800000000003CCE9539AC2708C972349FBC089D8D93DB429FF002A180561649E3E853FE544C0FBFA3B3FF053FE48F81702454E9A78A8A4D73203D000000000000000000000F3526A14E537B229B7D480E6B4F8BA97D4B1DBC5C4FAB339CF55D19D1000000E73529F1DF556B3C1F0AEA581CEFAAE968D354E9429AD908A8FB1607447A00072F5DBB9BE961FDCA982E86F05D873FD5748960B05B0E880000073776DD6BEAA96D94F857B784E77D574F14A31515B12C11D1181ADCF8AF9AFA22977F798D95AB630E0B3A31FB89BE9799A889CA0000000007C94A315C526A296D6DE080A55F58B4A7941BAB2FBBB3DACCDD8665CEA17572F831E184B254E3BFA77B25AAB565A2D49B53B9F243E8F99F4F209A8DAA74E14E0A108A8C56C4B61B4733A849D4BFAD86D73E15D5E539DF55D1462A31515B12C1751D11F4000032F5D6F828ADD8C9E1D0919D858D0E095962B6CA6DBEACBB86BE0D0693583D8CD0E72EB4DBAB7AADD38CA504F184E38B6BD862C579F5754C30C6B7B25E03E8F91B1D46BB4DD39CB1F9A797FE62628BB6FA0CB1C6E2782FA61E2CD4D51AB42DA8D087052828ADFCAFA59A12018DAE5DA6E36D07B3CD53B919DA89346B674E8BAD25E6ABF0FE15E2358344D00000000015AFAC61754F746AC7E09F73E625831A857B9B0B869AC1EC9C1EC6BF8D867C57436B754AE692A94DFE28EF4F9CD4A894A0000C8FDC127C3423B9B937D2B0F133B2A4D123859B7F54DBEC4BB8BAA2F940001E2BCF828D49FD316FD8B1030B48A7C77F4B7A8E327D4BC4E7AFAAE90E880197AF55C2853A7BE72C5F4457DA6761E743A7851A953EB960BA22BED1A95A4680000039BA3F9F7F1E4A9571EA72C4E7FAAEA0E88000000000000000000000000000000000000000055D52A7058567CAB87F99E04BE0CAD1218DD4A5BA107ED6CCEAADB36800000737413AD7F07F5D5E27D1C58B39CF55D41D1002B6A370A85A4E78F99AE1874B25A31B48A1EA5DA97CB49713E9D88CEAADE3680003E4A4A31727B12C581CEE9F1F56FE9639E32E27D5E639CF55D39D11CD6ABFF00DFAFD2BFF2A39DF55BD47FA34FF0AF71D11EC000033F50D4EA5B5654E1052C62A5C4DBDEDAD9D466D1525ADDDBD9182EA6FBC9D2A196A57F53CAAA3E88249F6664CD1F2163A85C3E274E6F1F9A6F0FFCC5C517686812C9D7A987DD878BF02F28D3B7B3B6B75F95049EF93CDBEB35813000396AB95F4F1CB0AAF1FE739FEABA53A20000019DADD272B78545FDB967D12CBDE6761F341B88F04E837E64F8A2B99ED1AD1AC68000000000CFD4B548DBA74A9612AEFD91E93368CBB1B3A97759CA6DBA69E3526F6B7C9D24915D02492492C12C9236800022A9776F4AAC294E6A339EC5E24C894A0000015AF6C69DD4307E5A91F827C84B3231BFF95A7DCF2497F2C918F15B965A850BA8F97CB517C54DEDEAE546E5CA2D1400C8FDC117C3425B9392C7A70F033B2C7BD0DFFF00124B1D93797521AF88D03400008EE5395BD58ACDB8492F60A317459F0DFC17D7192ECC7B8C6AAE88DA00737A9DCFEA6F1F06718F929F3FFCB39DB9AADBB4A1E85B53A5BE2BCDD2F37DA74889400002BEA15BD1B4A92DED70C7A5E44A32F44A3C77AA5BA945BEB79233AABA03680000000000000000000000000000000000000000666BD530B68413F8E79F424676116854F0A756A7D52515D4B1EF1A8D4340000349A69EC60735465FA5BD8B9AFE94F092E659339FEABA884E138A9C1A945E69A3A23E55AB4E941CEA49460B6B6073BA8DF4AF2B2504FD38E54E3BDB7BCC5B956B69D69FA6A184BFA93CE7E1D46A445A2800022BB6D5AD66B6F04BDCC518FA2453BE4F92126BB17798D55D09B4739AC4386FEA7DE517D987718D95B5693E3B5A52E5847DC6E22500000CDD6AD653A71AF058BA794D7DDE5EA33B41574AAF67197A7714E2DC9F92A49278733C49AD56FC6108AF24525CCB0368FA000015ABEA567471E2A89C97CB1F33EC26465DD6B95A6B86847D25F53CE5E08CDD950DB69B73732E3A98C20DE2E72F89F426241BEB672F39B4000003CD4A71A94E509AC6325835D2073D5E8DC58DCA69B4D3C69D4E55FC6D39D9856C596AF42B251AAD53ABCFF0BE866E545F2800023AD71428C71AB3505CFB7D832322F75B9CD385B2708EFA8F6BE8E4317654365A5D6B87EA56C6149E78BF8A5ED1351B74E9D3A5050A71518C76246D1E80010DD5D53B6A2EA4F3DD18EF6F90968E76AD4A95AA4EACFCD279C9EE4BC0C2B474DD51452A15DE5B2151FB99A951AE680000023AF6F4ABD370A91C56E7BD73A6062DD69B716B2F529373A6B3538FC4BA703162A7B5D72A4128DC47D45F5ACA5ECD8C4D8684356D3E4B1F552C374935DC6B3119DAB6A16D734E14E96327197171E182D8D61999DAAA4D09CF86AAC1F0629A96EC7632EA8D43400006DC981CE494ECAFB6674A58C79E3FF073F2AB7A9EA36538297AD08E3F2C9A4D753379450D4B578CA0E8DB3C71CA5539B9112ECA8B48B1739AB8A8BC91FE9AE57CBD44D62364D800000636B574A7563422FCB4F39FE27E08C6D557B45B6F4AD7D47F155F37FD771A9117CA000000000000000000000000000000000000000018DFB81BE2A0B76127EE33B09F464BF44B9E52C4BAF82F140000028EA1A646E5FA94DA8D6C30CF64BA4960CE8D0D56D9F0D35522BEE66BB32338AA2B1D4AE258D452FC551ECF6E631469D8E994ED9F1C9F1D5FAB72E835222E14000003CD582A94E74DEC9A717D6B0039EA552BD8DD62E3E78629C5EC68E7E2B4A3FB82961E6A324F99A6BB8D748CDBFBC5755554E0E0C170EDC71EC466DCAB57469CDDA70CA2D2836A2DADA9E66E22F140000032EF747E293A96D845BDB4DE4BA8CDD4538FFB5B5CA3EA412DCBCD1EF44FAAF6B57D4A2926F16F6371CFB3019A3E3D43559BC14A79EE8C1780CD1E7F49AA5C7C71A925FF00B8F05DAC628B14743A8F3AB5145724737ED65E517EDF4EB5A0D384319AF9E59B2E05928000000001E6AD1A7560E1522A517B9819571A24D36EDE78AFA25B7DA66EA2B461AADB650552296E8F9A3D98A27D57B5AA6A893F3378EF705DC8668F9FA9D62B2C13AAD3DF18F0F6A487D1EA9E917B565C555A863B5C9F14BB3C472342DB4BB6A0D49AF52A2F9A5DC8D488B8500004771714A853752A3C22B62DEDF22168C0AF5EBDEDC2CB16DE14E0B72FE369CFD56E5869F4EDA838C9294E6BF31ED4F9BA0DC88CCD4B499516EAD04E54B7C76B8FD866EA3E586AB2A3C34AB3E2A3B14B6B8F8A12AB6A328CA2A5169C5E69AD86D1F400000055AFA65A566E4E1C337B650C9F812C1525A0AC7CB59A5CF1C7DCD13912D1D12DA0F1A927539B62EC1C8BF18C631518A518AD89648D0FA0000002BDE58D1BA8A53CA6BE19ADA8960CE96855B1F2D58B5BB14D19E458B7D168C1A95697A8D7CB8611EBE52CD468A492492C12C92468000002B5FDE46DA8F16DA92CA9C79F97A8968C6B1B59DE5CE126DC71E2AB2EBEF312655D32492492C12C923A2000000000000000000000000000000000000000000327F70536E146A61945B8B7D39F719D87DD0EA276F3A7BE12C7A9A1A8D1340000000000000000000003C55A346AAC2A42334B6712C40AEF4AB06F1F4B0E894BC498825A765694F38528A7CAD62FDAC604C504D358A78A7B1A00000000000000000003692C5EC032B50D5A383A56EF16F29555B17E1F133760D2B51C70B7ACF3D94E6F7F33EE1AD1AA68000000000000000000020BBBCA36D0E29BC64FE182DAC968C2AB56E6F6BACB8A4F28416C48C7AADBD3B4E85AC78A5E6AD25E67B973237261174A0064EA3A3F1375AD9252DB2A7CBD066C19F697D5ED26E38630C7CF4DE59F3723332E15BB6D7546E21C54A58E1F145ED5D28DCA894A0000000001B4962F24B6B02AD0D46DEBD795183CD7C2DEC972E04C8B4500000000000000105E5E52B5A7C53CE4FE082DAC968C272B8BEB95F3549E492D897818F55D0D95A42D68AA71CE4F39CB959B911394000000000000000000000000000000000000000000417D6DFA8B59D2F99E707CEB612C1CFD9DCCED2E389A787C3521BF0F14625C2BA1A5569D5829D392945EF47447A000000000045717542DE3C55649722DEFA112D1897DA955B9C611F251FA77BE9336AB474BBF55A0A9547F9D15937F32F12CA8BE680000000475AE28508F1559A8ADC9ED7D0864645EEAD3AC9D3A29C29BC9CBE66BB8C5D950D8EA152D5F0BF3D17B61C9CE892E06ED0B9A35E1C54A4A4B7ADEBA51D32890000000000003CCEA53A71E29C9463CADE080A371ACDBC315493AB2E5D91F699BB0CDAF7977772506DB4F65282CBD9BCCE72AB965A24A4D4EEBCB1FF1A79BE966A6A8AFA8E993B6939C139507B1EF8F33258A9AC75771C29DCE71D8AA6F5F8B94B3646BC2709C54A0D4A2F6359A343E80000000000000F92946317293518ADADE480CDBCD6611C616DE697F91FC2BA394CDD867D0B7BABDACDAC64DFC7525B119C655BD656146D63E5F3547F14DED7E08DC88B25000000A97DA6D1BA5C5F055DD35BFA4960C3AB42EECAB26F18497C338EC7FC7218C6157ED75A834A370B85FF923B3AD1A9B234E1384E2A5092945EC69E28D0FA00001157B9A1423C5564A3C8B7BE8432316FB52AB72DC238C28FD3BDF4F818B550D5B4B9B78C2A4E2E0A59C65BD3EE64C0D1B2D622D2A772F096C55373E9E4353646A292924E2F14F63468000000000F929C6117293518ADADE480CDBBD6A11C636EB8E5F5BF87AB94CDD867D1B7BABEACDAC6527F15496C4671956FD958D2B5A784739BF8E7BD9B91160A0000000000000000000000000000000000000000000000CED474A8DC375693E1AD866B74BED3360C88CAF2CAA7CD4A5BE2F63EE667C55EA3AEEEAD4BFED0F07E26A6C2D4356B19ED9B83E4926BEC2F51137EB6CFF00CF4FF990C8F92BFB24B175E1D4D3F70C882A6B3671F85CAA3FBAB05DB80E852AFAD5C4D354A2A92E5F8A5E067A54142CAF2F25C69369EDAB3797B5ED263235E868D6B4E9B8D45EA4E4B0737961D08DE119579A6DC5ACB89633A6B35523BBA790CD985494359B9A6946A25562B7BCA5ED1D0B51D72DDAF3539C5F360FBD17A47A7AE5AE19426DF260BC47421A9AEBFEDD1E8727DC8742AD5D52FAABC14F831F960B0EDCD93A528E997D5E5C4E0E29ED9D4CBDF98C0D5B4D1ADE8B52A9F9B35CBF0AEA35223EDF69346E319C3F2EAF2AD8FA50B063D6B3BDB49F134E386CAB0C70F6A318B152D1D66EA0929A8D45CAF27ED45E85A86BB45FC74A4BA1A7E05E9122D6ECDBCD4D73E0BB98E87D7ACD925B64F9B87C47507896B96CB6426FA92EF1D0867AECFE4A2973CA58FB913A556A9AADED4CB8D413DD05876E6C9D51E6165A85C4B8B82726FE79E5DB218A2FDBE83B1DC54FFA43C59A9A996950B5B7B78E14A0A3CAF7BE96691280693583CD3DA80CABDD1232C676CF865BE9BD9D4F719BA8CC52BDB2A9879A94B91EC7DCCCFD8ABD475C78255A9E3F7A1E0FC4BD22E53D52C6A7F7145F24BCBEFC8D644F0AD466B184E325CCD328F6000F32AB4E0B19CD4573B480AF5354B187F7549F247197BB22660A75B5C7B2853FFB4FC17892EC2939DEDECF87CD55AF956C5DC8CFDAAD0B4D0B64AE5FFF008E2FDECD4D51AB4E9C29C14211518AD89648D0F40000000000F93A70A91719C54A2F6A6B140655D68516DCADE5C2FE896CEA666EA33A54AF6CE78B52A4FEA5B1F5AC8CFD8A9A9EB57915E6519F3B583EC2F4257AED4C32A2B1E5E2787B874886AEB17935845C69AFBAB3F6BC474A8E8585EDD4B8945E0F6D49ECF6BCD93191B365A550B6C26FF32AFD6F62E846E445C9C2138B8CD2945ED4CA322EF4378B95ABCBFC727EE7E266EAACF53BDB39E1E6A4FE97B1FB72667EC16E96B95965529C67CF17C2FBCBD09E3AE5BBF8A9CD7460FBCBD23D7FBBB4FA6A7B1788E8C2396BB4F0F252937CED2F7623A15EAEB5772F81469AE5C317DA4E9504695F5E493C2757EF3F8575BC89F68D0B5D092C25732C7EE47675B353546AD3A70A7050845462B624687A000000000000000000000000000000000000000000000000003CD4A74EA4786A454A2F7358A02955D12CA78B8A9537F75E5EC789391567FB7E7FDBAC9ADCA4B0F73272217A15EAD8E9BEB7E04E55F63A0DE3F8A74E2B7E6DBF70E44F4FF6FC7FB959BE68AC3B5E25E517686976545A71A7C525F34FCCFB722E05A280002B56D32CAABC6549293DF1C63EE26056968368DE539C79B15DE89C8F9FE82D7FC953DB1F01C89A1A358476C1CFF137DD8171059A56D6F4BFA74E30E749265120000000AF5B4EB2AB9CE9471E55E57D981302B4F42B37F0CA71E64D3F7A64E4787A050F96ACD74E0FB90E47CFFF009FA5FE697B10E47B8E836AB0E29CE5CB9A5DC3912C347B08E0FD3726BEA6DF66C2E20B34EDE852FE9D38C3A12451200000000003CD4A74EA45C671528BDA9AC50146B68967378C38A93FBAF15EC64E454A9A0575FD3AB197E24E3EEC4CF2B9579E8D7F1FEDA9744977E039A3C4B4DD423B68CBA9A7EE64C505A76A0DE0A8CBAF05EF63147B8E8F7F2DB4D479E525DD8979A27A7A0577FD4A918FE1C65E0391768E8B674F39E355FDE797B11AE517A108423C308A8C7912C0A3E800000000000000001B4082A5859D478CA8C1B7BD2C1F613022FF0051A77F87FF0014BC46209A9D95A5378C28C13E5C163ED2E04C0000003E4A3192C249493DCF34055A9A4D854CFD2517CB16E3D8B2260412D06D1BCA734B9315DE89C8F9FE82D7FC953FF0F80E47B868764B0E2E3974BC3DD8179162969F654F38518E2B636B89FB5E2302C1400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001FFFD9" HightQuality="False"/>
-      <TfrxMemoView Name="Memo1" Align="baBottom" Left="3" Top="974,35498" Width="712,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+      <TfrxMemoView Name="Memo1" Align="baBottom" Left="3" Top="941,69357" Width="712,48819386" Height="75" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
     </TfrxOverlay>
     <TfrxDetailData Name="DetailData2" Height="16" Left="0" Top="442" Width="718,101251175" OnBeforePrint="DetailData2OnBeforePrint" Columns="2" ColumnWidth="360" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
       <TfrxMemoView Name="Memo10" Align="baLeft" Left="0" Top="0" Width="130" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="9944516" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBDetalles.&#34;PROPIEDAD&#34;]"/>
diff --git a/Source/Informes/4/InfFacturaCliente.fr3 b/Source/Informes/4/InfFacturaCliente.fr3
index b75fe07..ee43d07 100644
--- a/Source/Informes/4/InfFacturaCliente.fr3
+++ b/Source/Informes/4/InfFacturaCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="42817,7213313773" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     Picture2.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo5.Visible := True;&#13;&#10;     Memo28.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     Picture2.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False; // No visualizar ninguna direccion para este informe (porque es en B)                                                                                                                                                                           &#13;&#10;     Memo5.Visible := False;&#13;&#10;     Memo28.Visible := False;         &#13;&#10;  end    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;  &#13;&#10;&#13;&#10;      &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6787344444" 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;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#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 Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := True;&#13;&#10;     Picture6.Visible := True;&#13;&#10;     Picture2.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo5.Visible := True;&#13;&#10;     Memo28.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture1.Visible := False;&#13;&#10;     Picture6.Visible := False;&#13;&#10;     Picture2.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False; // No visualizar ninguna direccion para este informe (porque es en B)                                                                                                                                                                           &#13;&#10;     Memo5.Visible := False;&#13;&#10;     Memo28.Visible := False;         &#13;&#10;  end    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin   &#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; &#62; 0) then&#13;&#10;  begin&#13;&#10;    eDescuento.visible := True;&#13;&#10;    Descuento.visible := True;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    eDescuento.visible := False;      &#13;&#10;    Descuento.visible := False;      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRetencion.Top := eRetencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Retencion.Top := Retencion.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         etotalfinal.Top := etotalfinal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         totalfinal.Top := totalfinal.Top - (eImporteneto.Height + eDescuento.Height);             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eRe.Top := eRe.Top - eIva.Height;                &#13;&#10;         Re.Top := Re.Top - eIva.Height;&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;         eRetencion.Top := eRetencion.Top - eIva.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eIva.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eIva.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eIva.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;         eRetencion.Top := eRetencion.Top - eRe.Height;&#13;&#10;         Retencion.Top := Retencion.Top - eRe.Height;&#13;&#10;         etotalfinal.Top := etotalfinal.Top - eRe.Height;&#13;&#10;         totalfinal.Top := totalfinal.Top - eRe.Height;             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;  &#13;&#10;       if (&#60;frxDBCabecera.&#34;RETENCION&#34;&#62; &#60;&#62; 0) then&#13;&#10;       begin&#13;&#10;         eRetencion.Visible := True;&#13;&#10;         Retencion.Visible := True;&#13;&#10;         eTotalFinal.Visible := True;&#13;&#10;         TotalFinal.Visible := True;&#13;&#10;       end;&#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;//    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;&#13;&#10; if Engine.FreeSpace &#62; ReportSummary1.Height then    &#13;&#10;    Engine.CurY := Engine.PageHeight - ReportSummary1.Height - PageFooter1.Height - 1;    &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Overlay1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Engine.FinalPass) then &#13;&#10;  begin&#13;&#10;      if (&#60;Page&#62; &#60; &#60;TotalPaginas&#62;) then   // &#60;- lo mejor para saber si es la 鷏tima p醙ina o no&#13;&#10;      begin&#13;&#10;       LineFinalLarga.visible := True;                                                      &#13;&#10;       LineaCorta1.visible := False;&#13;&#10;       LineaLarga1.visible := True;         &#13;&#10;       LineaCorta2.visible := False;&#13;&#10;       LineaLarga2.visible := True;         &#13;&#10;       LineaCorta3.visible := False;&#13;&#10;       LineaLarga3.visible := True;&#13;&#10;       LineaCorta4.visible := False;&#13;&#10;       LineaLarga4.visible := True;&#13;&#10;       LineaCorta5.visible := False;&#13;&#10;       LineaLarga5.visible := True;&#13;&#10;       LineaCorta6.visible := False;&#13;&#10;       LineaLarga6.visible := True;&#13;&#10;      end&#13;&#10;      else begin&#13;&#10;       LineFinalLarga.visible := False;          &#13;&#10;       LineaCorta1.visible := True;&#13;&#10;       LineaLarga1.visible := False;&#13;&#10;       LineaCorta2.visible := True;  &#13;&#10;       LineaLarga2.visible := False;         &#13;&#10;       LineaCorta3.visible := True;&#13;&#10;       LineaLarga3.visible := False;&#13;&#10;       LineaCorta4.visible := True;  &#13;&#10;       LineaLarga4.visible := False;&#13;&#10;       LineaCorta5.visible := True;  &#13;&#10;       LineaLarga5.visible := False;&#13;&#10;       LineaCorta6.visible := True;  &#13;&#10;       LineaLarga6.visible := False;           &#13;&#10;      end;  &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;&#62; = 0) then&#13;&#10;     Memo30.Visible := False;                                                                        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemPrecioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemPrecio.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         Memo11.Lines.Clear;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MemImpTotalOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;TIPO_DETALLE&#34;&#62; = 'Concepto') then&#13;&#10;     if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;         MemImpTotal.Lines.Clear;&#13;&#10;end;&#13;&#10;  &#13;&#10;&#13;&#10;      &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C2000000020446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C13000000204E616D653D225665724C6F676F7469706F220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <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,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="Band2" Height="232" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
@@ -26,8 +26,8 @@
       <TfrxLineView Name="LineaCorta5" Left="631" Top="240" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga4" Left="578" Top="240" Width="0" Height="728" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta3" Left="488" Top="240" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
-      <TfrxMemoView Name="Memo28" Left="2" Top="1029" Width="711" Height="16" Visible="False" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Abeto Design S.L. Insc. en el Reg. Merc. de Madrid, Tomo 23.926, Libro 0, Folio 58, Secci贸n 8, Hoja M-430952 CIF: B85033132"/>
-      <TfrxMemoView Name="Memo5" Left="2" Top="985" Width="712,48819386" Height="42,33859" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+      <TfrxMemoView Name="Memo28" Left="2" Top="1032" Width="711" Height="13" Visible="False" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Abeto Design S.L. Insc. en el Reg. Merc. de Madrid, Tomo 23.926, Libro 0, Folio 58, Secci贸n 8, Hoja M-430952 CIF: B85033132"/>
+      <TfrxMemoView Name="Memo5" Left="2" Top="969" Width="712,48819386" Height="76,33859" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-7" Font.Name="Tahoma" Font.Style="0" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
       <TfrxLineView Name="Line1" Left="805" Top="417" Width="0" Height="779" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaCorta2" Left="428" Top="240" Width="0" Height="555" ShowHint="False" Frame.Typ="1"/>
       <TfrxLineView Name="LineaLarga1" Left="3" Top="240" Width="0" Height="728" ShowHint="False" Frame.Typ="1"/>
diff --git a/Source/Informes/4/InfPresupuestoCliente.fr3 b/Source/Informes/4/InfPresupuestoCliente.fr3
index abbb40f..b620ccd 100644
--- a/Source/Informes/4/InfPresupuestoCliente.fr3
+++ b/Source/Informes/4/InfPresupuestoCliente.fr3
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="42795,4698849769" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture4.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo2.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture4.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo2.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="43248,6806850347" ScriptLanguage="PascalScript" ScriptText.Text="procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;VerLogotipo&#62; then&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := True;&#13;&#10;     Picture3.Visible := True;&#13;&#10;     Picture4.Visible := True;&#13;&#10;     DireccionesSinLogotipo.Visible := True;&#13;&#10;     Memo2.Visible := True;         &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin              &#13;&#10;     Picture2.Visible := False;&#13;&#10;     Picture3.Visible := False;&#13;&#10;     Picture4.Visible := False;&#13;&#10;     DireccionesSinLogotipo.Visible := False;&#13;&#10;     Memo2.Visible := False;                                                       &#13;&#10;  end;&#13;&#10;&#13;&#10;  if not &#60;VerPrecios&#62; then&#13;&#10;  begin&#13;&#10;    lImporte.Visible := False;&#13;&#10;    lDto.Visible := False;&#13;&#10;    lImporteTotal.Visible := False;&#13;&#10;    lCantidad.Lines.Clear;&#13;&#10;    lCantidad.Lines.Add('Cantidad');                                      &#13;&#10;    lCantidad.Width := 40 + 50;&#13;&#10;    frxDBDetallesCANTIDAD.Width := lCantidad.Width;                                     &#13;&#10;    lConcepto.Width := 408 + lImporte.Width + lDto.Width + lImporteTotal.Width;                                      &#13;&#10;    RichConcepto.Width := lConcepto.Width;                                                            &#13;&#10;  end;      &#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;  Set('Capitulo', '0');&#13;&#10;  Set('NumCapitulos', 0);&#13;&#10;  Set('TextoNumCapitulo', ''' ''');      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo45OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin&#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));                                 &#13;&#10;     Set('TextoNumCapitulo', &#60;Capitulo&#62;);&#13;&#10;&#13;&#10;     if ((&#60;NumCapitulos&#62; = 1) and (&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62; = 'General')) then&#13;&#10;       MasterData1.Visible := False&#13;&#10;     else begin                                     &#13;&#10;       if (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo opcional') then&#13;&#10;       begin&#13;&#10;         Set('TextoNumCapitulo', '''OPCIONAL''');&#13;&#10;       end&#13;&#10;     end                      &#13;&#10;  end&#13;&#10;  else             &#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));&#13;&#10;&#13;&#10;&#13;&#10;//  Memo11.lines.add(&#60;frxDBCapitulos.&#34;CONCEPTO&#34;&#62;);  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  &#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo11.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end&#13;&#10;}        &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxDBDetallesCANTIDADOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var    &#13;&#10;  ACantidad: String;  &#13;&#10;  AIndice: Integer;&#13;&#10;  AText : String;                                    &#13;&#10;begin&#13;&#10;{    &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Clear;  &#13;&#10;  ACantidad := FloatToStr(&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;);  &#13;&#10;  AIndice := Pos(',', ACantidad);&#13;&#10;  if AIndice &#62; 0 then                                           &#13;&#10;     AText := '[FormatFloat(''#,##0.00'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)]&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)];  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;}      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosClienteOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ATexto : string;                                           &#13;&#10;begin&#13;&#10;  ATexto := '';                                                       &#13;&#10;  DatosCliente.Lines.Clear;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;CALLE&#34;&#62; &#60;&#62; '') then                 &#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;  begin&#13;&#10;     ATexto := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;     if ATexto &#60;&#62; '' then&#13;&#10;        ATexto := ATexto + ' ';                                                                                               &#13;&#10;     ATexto := ATexto + &#60;frxDBCabecera.&#34;POBLACION&#34;&#62;;                                                                          &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;                   &#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;     DatosCliente.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  ATexto := '';    &#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') or&#13;&#10;     (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then                                   &#13;&#10;  begin&#13;&#10;     if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then                          &#13;&#10;        ATexto := 'Tlf: ' + &#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;;&#13;&#10;&#13;&#10;     if (&#60;frxDBCabecera.&#34;MOVIL&#34;&#62; &#60;&#62; '') then&#13;&#10;     begin                 &#13;&#10;       if ATexto &#60;&#62; '' then&#13;&#10;          ATexto := ATexto + ' / ';&#13;&#10;       ATexto := ATexto + 'M髒il: ';            &#13;&#10;       ATexto := ATexto + &#60;frxDBCabecera.&#34;MOVIL&#34;&#62;;&#13;&#10;     end;                        &#13;&#10;     DatosCliente.Lines.Add(ATexto);&#13;&#10;  end;&#13;&#10;        &#13;&#10;  ATexto := '';                                                  &#13;&#10;  if (&#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62; &#60;&#62; '') then&#13;&#10;      ATexto := 'NIF/CIF: ' + &#60;frxDBCabecera.&#34;NIF_CIF&#34;&#62;;&#13;&#10;  &#13;&#10;  if ATexto &#60;&#62; '' then&#13;&#10;       ATexto := ATexto + '  ';    &#13;&#10;  ATexto := ATexto + 'C骴. cliente: ' + &#60;frxDBCabecera.&#34;REF_CLIENTE&#34;&#62;;  &#13;&#10;  DatosCliente.Lines.Add(ATexto);&#13;&#10;      &#13;&#10;end;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AF' ) &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'AI' )&#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_ARTICULO&#34;&#62; = 'B' ) then&#13;&#10;  begin&#13;&#10;    Header1.Visible := False;                                                        &#13;&#10;    BandaDetalles.Visible := False;                                                                  &#13;&#10;    DetailData2.Visible := True;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Header1.Visible := True;                                                          &#13;&#10;    BandaDetalles.Visible := True;                                                                  &#13;&#10;    DetailData2.Visible := False;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo27.Visible := False;                                                              &#13;&#10;  end;              &#13;&#10;  &#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo37.Visible := False;                                                              &#13;&#10;  end;&#13;&#10;&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;PLAZO_ENTREGA&#34;&#62;) = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo28.Visible := False;&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;FORMA_PAGO&#34;&#62;) &#60;&#62; 0) then&#13;&#10;       Memo37.Height := Memo37.Height + (Memo39.Height + Memo28.Height);                                                                        &#13;&#10;  end;&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;    if not &#60;VerTotales&#62; then&#13;&#10;    begin&#13;&#10;       eImporteneto.Visible := False;                    &#13;&#10;       Importeneto.Visible := False;&#13;&#10;       eDescuento.Visible := False;&#13;&#10;       Descuento.Visible := False;     &#13;&#10;       eBaseimponible.Visible := False;&#13;&#10;       Baseimponible.Visible := False;&#13;&#10;       eIva.Visible := False;&#13;&#10;       Iva.Visible := False;&#13;&#10;       eRe.Visible := False;&#13;&#10;       Re.Visible := False;&#13;&#10;       eImportetotal.Visible := False;&#13;&#10;       Importetotal.Visible := False;        &#13;&#10;    end&#13;&#10;    else begin&#13;&#10;       if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eBaseimponible.Top := eBaseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Baseimponible.Top := Baseimponible.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eIva.Top := eIva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Iva.Top := Iva.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eRe.Top := eRe.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Re.Top := Re.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         eImportetotal.Top := eImportetotal.Top - (eImporteneto.Height + eDescuento.Height);&#13;&#10;         Importetotal.Top := Importetotal.Top - (eImporteneto.Height + eDescuento.Height);                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eImporteneto.Visible := True;&#13;&#10;         Importeneto.Visible := True;&#13;&#10;         eDescuento.Visible := True;&#13;&#10;         Descuento.Visible := True;     &#13;&#10;       end;&#13;&#10;                                                       &#13;&#10;       if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;       begin&#13;&#10;         eImportetotal.Top := eImportetotal.Top - eRe.Height;&#13;&#10;         Importetotal.Top := Importetotal.Top - eRe.Height;                                             &#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eRe.Visible := True;&#13;&#10;         Re.Visible := True;         &#13;&#10;       end;  &#13;&#10;         &#13;&#10;       if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;       begin                     &#13;&#10;         eImportetotal.Top := eImportetotal.Top - eIva.Height;                &#13;&#10;         Importetotal.Top := Importetotal.Top - eIva.Height;&#13;&#10;       end&#13;&#10;       else&#13;&#10;       begin&#13;&#10;         eIva.Visible := True;&#13;&#10;         Iva.Visible := True;         &#13;&#10;       end;  &#13;&#10;    &#13;&#10;       eBaseimponible.Visible := True;&#13;&#10;       Baseimponible.Visible := True;&#13;&#10;       eImportetotal.Visible := True;         &#13;&#10;       Importetotal.Visible := True;&#13;&#10;    end&#13;&#10;  end; //Engine.FinalPass      &#13;&#10;                                 &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCapitulos.&#34;IMPORTE_TOTAL&#34;&#62; = 0)  &#13;&#10;  or (&#60;frxDBCapitulos.&#34;TIPO_DETALLE&#34;&#62; = 'Titulo_opc') &#13;&#10;  or not &#60;VerTotales&#62; then&#13;&#10;  begin&#13;&#10;    Footer1.Height := 24;&#13;&#10;//    Memo13.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;    Memo21.Visible := False;  &#13;&#10;    Memo11.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo1.Visible := False;&#13;&#10;    Memo4.Visible := False;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Footer1.Height := 60;&#13;&#10;    Memo13.Visible := True;  &#13;&#10;    Memo20.Visible := True;&#13;&#10;    Memo21.Visible := True;&#13;&#10;    if (&#60;frxDBCapitulos.&#34;IMPORTE_DESCUENTO&#34;&#62; = 0) then&#13;&#10;    begin&#13;&#10;      Footer1.Height := 24;    &#13;&#10;      Memo11.Visible := False;&#13;&#10;      Memo24.Visible := False;&#13;&#10;      Memo1.Visible := False;&#13;&#10;      Memo4.Visible := False;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      Memo11.Visible := True;&#13;&#10;      Memo24.Visible := True;&#13;&#10;      Memo1.Visible := True;&#13;&#10;      Memo4.Visible := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  RichConcepto.Visible := True;&#13;&#10;  frxDBDetallesCANTIDAD.Visible := True;&#13;&#10;  Memo35.Visible := True;&#13;&#10;  Memo3.Visible := True;      &#13;&#10;  Memo36.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;       end;&#13;&#10;  'Concepto': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;&#13;&#10;          Memo36.Visible := False;                                                    &#13;&#10;       end;&#13;&#10;           &#13;&#10;       end;&#13;&#10;  'Subtotal': begin&#13;&#10;       if not &#60;VerPrecios&#62; then&#13;&#10;       begin                   &#13;&#10;          Memo35.Visible := False;&#13;&#10;          Memo3.Visible := False;              &#13;&#10;       end;&#13;&#10;                          &#13;&#10;       if not &#60;VerTotales&#62; then&#13;&#10;       begin                   &#13;&#10;         BandaDetalles.Visible := False&#13;&#10;       end;&#13;&#10;         &#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;end;&#13;&#10;&#13;&#10;procedure DetailData2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{    &#13;&#10;   if (not Header1.Visible) then&#13;&#10;   begin    &#13;&#10;       if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; &#60;&#62; 1) then&#13;&#10;               DetailData2.Visible := False&#13;&#10;       else&#13;&#10;               DetailData2.Visible := True;&#13;&#10;   end;&#13;&#10;}       &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo35OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo35.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo3.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo36OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBDetalles.&#34;VISIBLE&#34;&#62; = '0') then&#13;&#10;  begin&#13;&#10;       Memo36.Lines.Clear;                            &#13;&#10;  end;  &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end.  " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F2200010C13000000204E616D653D225665724C6F676F7469706F2200010C12000000204E616D653D2256657250726563696F732200010C12000000204E616D653D22566572546F74616C6573220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page3" Font.Charset="1" Font.Color="13056" Font.Height="-13" Font.Name="Arial" Font.Style="0" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
     <TfrxPageHeader Name="PageHeader2" Height="254" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
@@ -64,8 +64,8 @@
       <TfrxMemoView Name="Rich1" Align="baLeft" Left="130" Top="0" Width="228" Height="16" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="DejaVu Sans Mono" Font.Style="0" Frame.Typ="13" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" ParentFont="False" Text="[frxDBDetalles.&#34;CONCEPTO&#34;]"/>
       <TfrxLineView Name="Line1" Align="baRight" Left="718,101251175" Top="1" Width="0" Height="16" ShowHint="False" StretchMode="smMaxHeight" Frame.Typ="1"/>
     </TfrxDetailData>
-    <TfrxPageFooter Name="PageFooter1" Height="49" Left="0" Top="1948" Width="718,101251175">
-      <TfrxMemoView Name="Memo2" Align="baCenter" Left="2,8065286575" Top="3" Width="712,48819386" Height="42,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="En cumplimiento de lo establecido en la Ley Org谩nica 15/1999, de 13 de diciembre, de Protecci贸n de Datos de Car谩cter Personal, le informamos que los datos que nos ha facilitado para la cumplimentaci贸n del presente documento pasar谩n a formar parte de un fichero propiedad de Abeto Design S.L. y se utilizar谩n para la gesti贸n de clientes y proveedores.&#13;&#10;Gesti贸n a terceros para clientes.&#13;&#10;Asimismo le informamos que puede ejercitar sus derechos de acceso, rectificaci贸n, cancelaci贸n y oposici贸n en C/ B茅lmez, 22 (P.I. Albarreja) 28946 Fuenlabrada (Madrid) "/>
+    <TfrxPageFooter Name="PageFooter1" Height="75" Left="0" Top="1948" Width="718,101251175">
+      <TfrxMemoView Name="Memo2" Align="baCenter" Left="2,8065286575" Top="2" Width="712,48819386" Height="72,33859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 聙" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="4" HideZeros="True" ParentFont="False" Text="Informaci贸n b谩sica sobre protecci贸n de datos:&#13;&#10;&#13;&#10;Responsable: ABETO DESIGN S.L. Finalidad: Prestar los servicios solicitados y realizar la gesti贸n contable, fiscal y administrativa, as铆 como enviarle comunicaciones comerciales sobre nuestros productos y/o servicios. y enviar comunicaciones comerciales. Legitimaci贸n: Ejecuci贸n de un contrato. Inter茅s leg铆timo del Responsable. Destinatarios: No se ceder谩n datos a terceros, salvo obligaci贸n legal. Derechos: Tiene derecho a acceder, rectificar y suprimir los datos, as铆 como otros derechos, indicados en la informaci贸n adicional, que puede ejercer enviando un correo electr贸nico con copia de NIF a nuestra direcci贸n electr贸nica: administracion@uecko.com. Procedencia: El propio interesado. Informaci贸n adicional: Puede consultar informaci贸n adicional y detallada sobre Protecci贸n de Datos en nuestra p谩gina web: www.uecko.com"/>
     </TfrxPageFooter>
     <TfrxOverlay Name="Overlay1" Height="1016,69357" Left="0" Top="571" Width="718,101251175">
       <TfrxPictureView Name="Picture4" Align="baBottom" Left="2" Top="824,42585346" Width="714" Height="192,26771654" ShowHint="False" Center="True" Picture.PropData="04446174610AC13000000A544A504547496D616765B2300000FFD8FFE000104A46494600010200006400640000FFEC00114475636B79000100040000003C0000FFEE000E41646F62650064C000000001FFDB0084000604040405040605050609060506090B080606080B0C0A0A0B0A0A0C100C0C0C0C0C0C100C0E0F100F0E0C1313141413131C1B1B1B1C1F1F1F1F1F1F1F1F1F1F010707070D0C0D181010181A1511151A1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1FFFC000110800DC030C03011100021101031101FFC4008B000100030101010100000000000000000000030405060201080101010101000000000000000000000000000102031000020102030309050606020006030000000102030411210531411251617181A1C1D1221391B1324252E16272231406F09233435315F182A2B2C26324348325161101010003010101010000000000000000000111021231214161FFDA000C03010002110311003F00FD5200000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000239DC5BC3E3AB08E3B319240452D4AC23B6BC7A9E3EE264452D6AC16C9B97445F78EA092CF52A1755250A71927158B72492E4DCD89722D14000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000014F56A95A95A3A94A6E0E3258B586C796F2518B0ADA8DC4B86152A4DA59A526B2E7CD18FAAF7FEAF519E1C71E6F3493EF65E68923A1DD6F94175B7DC3912474197CD597547ED2F28F973A452A36D52AFA9294A0B14B2485D478D09BFD6C97FEDBF7A26AB5BE6D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000055D53FF00A15BA17BD12F832B446FF5725B9C1E3ED467556D9B40001575492561579D25ED6912F828E8115FA8A8F0D90DBD2CCEAB5B86D0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000053D5E5C3A7D5E7C17B64897C19DA1AFCFA8F0D9159F599D56B64DA0000A1AD4B0B3C3EA9A5DFDC67611FEDF8655E7CAE31F662FBC6A35CD0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000033F5C925658638714D2C397799D856D05655A5F857BC6AAD534800032B5D9FF461F8A4FB119D859D0E1C365C5F5CDBF665DC35F0681A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000657EE09FE4D1872C9BC37E4B0EF33B06871C2DA72C3E29EDE8486A344D000030B59A9C579C3F4452F6E7DE63656CE9F4FD3B2A316B07C29B5CEF3EF351160A00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000C4D7E78D6A30FA62DFB5FD863655BD221C36307BE4DB7ED353C45C2800039BAEFF00517D3C3FB953853E66F0473FD5750924925B11D100000000000000000000000000000000000000056BBD46DADB29CB19FD11CDFD84B456FF007494789DB5551FAB0C89D0B56B7F6D75FD3979966E0F2659458280195AE5DB84236F0784A7E69E1B525B3DA676A33A95D6A34A0A709D4F4F7369CA3DB8A27D559A5AF5CAF8E119F46317DE3A16E9EBD6D2CAA4250E7CA4BB332F48B34F52B1A9F0D68A6F74BCBEFC0B9162328C963169AE559947D000000000000000001B4B36056ADA95952F8AAA6F923E67D84C8A7535FA4BFA54A52E793515D9893A1567AEDDB7E58C21D4DBED64E95E15FEAD3CE329B5B3CB0587B8668F4EE75A4B17EAE1F81780FA3E4757D4693C26F8B9A71C3DD80CD17ADB5DA336A35E3E9BFA9671F12CD91A71946494A2F14F34D1A0000003692C5E496D605696A7611C71AF1787267EE26444F5AD3D6C9B7D11977A1D4113D7ED56CA751F52F12742397EE08FCB41BE9961DCC74A8E5FB82BE7C34A31E4C5B7E04E844F5CBE7B381742F16C742F68F737770EA4EB4F8A11C23158259BCDEC45951A468000002BDCEA1696F9549F9BE88E6C9919B5B5FA8F1546928ADD29BC5FB113A557FF0061AA577E494DAE4A71EF4899A1E96B12F37E767F79AECC46287A3AC27FDECBEFBF118A1FADD56867394D2FBF1CBB50CD16686BF3582AF4D35F54327EC65E86A5BDD50B8871529A92DEB7AE946B289400000000A973AAD9D07C2E5C735F2C33F6EE25A33AB6BF5DE3E9538C16E72CDF719E9507EB755ADF0CA725F723E08668FBE96B0F3FCECFEF35DE3143D1D6167F9DFCEFC46287EAF56A39CA5512FBF1C576A19A26A3AFD75FD58466B963E57DE3A1A76BA95ADCE50970CFE8964FED352A2C940001CF6B53E2BF92FA2318F7F798DBD56BD94382D28C7EE2ED589A8898A00477357D2B7A953E98B6BA770A30F49A4EA5F53C7350C66FABED31AABA436836926DBC12CDB6065DDEB94E0DC2DE3EA496D9BF87AB94CDD851FF0063AA546E50949AFB904D2EC64CD57BA3ACDED29F0D5C2A25F1464B865D83A1B56D734AE692A94DE5B1ADE9F21B44A0000000055B8D4ECE862A53E292F9639B26467D6D7EA3FE952515CB378F62C0CF4AAFFECB53ACFC9293E684578319A1C3AC4F3FCECB9DC7BD0FA1E86B1FFBDFCEFC46287FFB8A59FE772EF9788FA3ED3D66FE93C2A353FBB38E0FB3019A2FDBEB96F5308D64E94B976C4B36468C6719C54A2D4A2F6359A343E8003C57ABE950A9570C7822E58742C40C1A149CACEE2FA6F1AD17E49724B158BED31F9957D57770AD956FD73F57FC0D62F6E0321711953A56D7F4D284E7F1A8AC1712DFD628DCF597E9FD6DDC3C7875626D1EE738C20E7278462B16F9901CC49D4BDBDC7E6AB2F62FB11CFDAAE8A9D38D3A71A7058462B04BA0E88F152D6DAAFF00529464F97058FB40AD5346B297C3C50FC2F1F7E24E456A9A14FF00B7593E692C3B5139540F4AD4293C60937CB0960FB702734155D5E8ADB5525CA9C976E23E8F51D6EFA0F0970CB954A383ECC07544B1FDC15BE6A317D0DAF12F4258FEE0A7879A8B4F99A7E03A47B5AFDAEFA753D91F11D2E1EA3AED9BDB19C7A52EE63A4C3E7FBFB5FF001D4F647C47461E25FB828E7C34A4F93169788E8453FDC155FC14631E96DFBB02742BCB56D46B3C212C39A9C7FE466ABE7E8F53B978CD4DA7BEA3C17B1F80C5162968537FD5AA9734163DAFC0BC8B74F48B286D8B9BE593EE5822E11661428D3F829C63F852451EC001F27084E3C338A94791AC5019B79A3425173B6F2C97F6DEC7D1C866EA2A69DA84ED6A7A7531F45BC2517F2BE524AAE8934D62B34F633680000D62B060726A9A771E9278273E04F9B1C0E6AD68E856EBE2A936F7E182EE66B94491D1AC96D52974C9F7605C0963A658AD9453E96DFBD8C0923696B1F868C161BF8517032359947D785282494238B49619C9FD863656A6914BD3B1A7CB3F3BEBD9D86A22E14008EBDC52A14DD4AB2E18AF6BE80312F358B8ACDC29634E9BC961F13EB317657CB6D1EBD5F3557E945EE79C9F56E1351A7474DB3A5B29A94BEA9F99F69AC22C94000002A5CE996B5937C3E9CFEA8E5ED5B0960C8AB46EAC2BA6A583DB09C7635FC6E31E2B774FBD8DDD1E2D952394E3CFCC6E5459280105DDED0B5871547E67F0C16D64B461DCEA377773E08E318BF869431C5F4F299CE5535B68952583AF2E05F44737EDD859A8D2A36169470E0A6B15F33CDFB597089CA000001057B1B5ACBCF4D63F52C9FB5130326F34AAB413A949BA94D66FEA466EAAB3A5EAB272542E1E38E50A8F979196546C1A00397BC7EB5F55C3E6A9C2BDBC273BEABA44B049721D1000051D66AF059F0EFA924BA967DC67610E814B3AB55EEC20BDEC6A356BD7A5429BA9525C315DBCC8D0C0BDD46BDE4D538271A6DE11A6B6B7CF818B72AB565A3C52552E737BA96E5D3CA59AA34E318C528C52515B12C91A15B51B4857B7934BF360B183DF96EEB25833B44B8F4EEBD36FCB5561D6B3467556F9B400010DD5E50B687155966FE18ADAFA112D18775A9DD5D4BD3863084B254E18E2FA794CDB95496DA2D69E12AD2F4E3F4ACE5E084D51A3474DB3A5B29A93FAA5E67DA6B02CA492C1648A000001E6A52A55161520A6B924B1033EE745A525C56EF825F4BC5C5F7A33751428DC5DD85671D987C54E5B1FF1CA4F15BD67794AEA971C326B2945ED4CD4A89CA3C5C52F56854A58E1C7171C7A5600615BD492B4B8B19470AD27E48BCB178AC567D063F8AF72D32BAB4A3569D3C2E20DF1D3783C56393CF2180BFBA776A85B528F0D4C7CF05B14B6619720B72367D15FA7F477707076606D14B5CB874ED9524FCD55E0FF000ADA676A2B6876FF001DC497DC877B1AC1AC68000000000F928465F124FA5620452B2B496DA30FE544C08DE9760FFB5874392EF1883C3D1EC5BC5464B9949F78E60F9FE9ACB925FCC390FF004D65C92FE61C8F71D26C161F978E1CB29788C41242C6CE1B28C3AD63EF1813A8C52C124973140000000000000063EB56CA338D78AC14FCB3E9DCCC6D05DD16E1D5B4E093C6549F0F56D46A517CA001E4B10396B6FCCBEA6F0F8AA2961D789CE7AAE94E880000073777275EF6A70ED94F863D5E5473BEABA784542118AD91492EA3A23E8105E5DD2B5A4EA4F37B230DED92D1CFD4A9757F71F54DFC315B228C7AAD8B2D3A8DB2527E7ADBE6F7741B9116CA000001E3D7A3C5C3EA478BE9C56207B00043776D1B8A12A6F6BCE2F91EE64A3174BAD2A37D04F2537E9CD74FDA662BA4368A7A8EA30B5870C7095697C31E4E764B46250A1737D5DB6DB6F3A951EC5FC7218932ADDB5B3A16D1C29AF33F8A6F6B3722262800000000000060EAB691A15D4A0B0A7533496E6B698DA2B674DB97716909C9E335E59BE746A22C4E6A1094DEC8A6DF514733611756FA9639B72E2975798E73D574674400018DAE55C6BD3A6B64238BE997FC18D9566CEBD1B1D3213A99CAA6328C16D78ECEC2CB888CEAF5EEB50B8492C5FC905B22BF8DE4F55AB63A753B65C527C759ED96E5CC8D488B85000073B774E56B7D2E0CB864A74FA1E68E77E5574742AC6AD18558EC9A4FDA7447B02ADFDFC2D296394AACBE0877BE625A30A10BABFB86F1E293F8A4F64518F55B7696542DA38416337F14DED66E4458280000000000004377694EE69704F26B384F7A64B061D1AB5EC2EF3C9C5E1523CB1FE3618F15D253A90A94E3520F18C96299D11E80AD77A75B5D6734D4F629C7264B056FF4D2E1E077553D3FA7F864E459B4D3EDAD73A71C67BE72CD964164A39ED66B71DECA3BA9A515D3B5FBCC6DEAB5ECE8FA36D4E9EF8C73E979BED351131400000000000000000000000F352AD2A51E2A93505CADE0051ADAD5B432A69D57CD92F6B33D0A7575ABA97C0A34D7B5F6F813A541FECAF9BC7D67EC587B899A27B7D66E6125EAE1521BF2C25D859B236E138CE119C1E3192C53E666C7D00000A7ABC53B19B7F2B8B5ED489B782AFEDF97E6D6872C62FD8DF899D46D1B0021BC9FA7695A7BD425874E028C1D221C57D0E48272ECC3BCC6AAE80DA0000F15EA7A742A54FA62DFB10183A4D3752FE97247193EA5E2635574A6D1E2B56A74694AA5478462B1607375AAD7BFBA5963293C211DD1473F55B967674EDA970C739BF8E7BDB3722272800021BABBA56D4F8EA3CDFC315B5B25A30AE2F6EAEA7C2DBC1BF2D28ECFB4C66D579AD63734692A9569F041BC33C31C5F30C0D3D12BCE74EA5293C553C3871DC9E39761AD6A348D001CE4D25A8B4B67AD97F398FD56FDF5DC2D683A8F393CA11E566AD46050A35EFAE5E2F3979AA4DEE5FC6C312655D051A34E8D354E9AC22BF8C59D11EC00002ADEEA146D560FCF55EC82EFE425B81935754BDA92CA7C0B7460B0EDDA67354A3AA5ED29E329B9C7E684BF8C4646FC24A708CD6C924D759B47D00067EB714ED632DF19AC3AD333B0F9FB7DBF46AADDC49F60D56ADEA953D3B0AAF7C970AFFB3C0B7C4656894F8AEA53FA23974B667556D9B40001CD5ED5F56EEACF6AE269742C97B8E755F6DE85C5DD4504DB5149393D9188932376D2CE8DB43860B193F8A6F6B3722272800000646B7E8CB82719C5D48BE1945358E0F3D867616342B8E2A13A2DE74DE31E897DA35A2FDC57850A32AB3F862B1C39798D0E71BAF7D77CB39BEA8C7C11CFD56F5B5B53B7A4A9C164B6BDEDF2B3A22500000011CEE6DE0F09D5845F23924323D53AB4AA7F4E719FE169FB80F40000003375AB652A4ABC579A9E52E78BF0667681A0DCB94276F27F0F9A1D0F68D68D634000000039594BD4BCE2967C55735D3239FEABA63A200000000000000000001E2AD7A349635271874B02956D6EDA39538CAA3E5F8576E7D867A142B6AF795328C9534F74567ED64EAABCD2D3EFEE5F1704B3DB3A8F0F7E63145FA1A045675EA63F761976B2CD517A969F674B0E0A51C56F79BED2E058492D85183AE52A70B984A1149CE38CB0DEF1DA63655FD2B1FD052C7EF61D1C4CD4F116CA0000A7ABB4AC2A63BDC52FE644BE0A9FB7E3F9D5A5C914B0E97F619D46D9B0028EB55386C24BEB9463DB8F713614742A78D4AB539128AEB78F71351B06800014B57A9C16325BE6D47B71EE26DE0ABA053C6B55A9F4C54575BC7B8CEAADB368C2D6EF3D4ABFA78BF253F8F9E5F618DAAAD69367E8D1F566BF36A2DFBA3B91A9117CA0000F93946117393C23158B7CC80E72E6E2ADDDC7124DB93E1A70E45B91CEFD56E585852B5A58CB075B0C67539399731B9308CCD5B5085C4952A59D383C5CB95F37319B556F46B7953B77524B0755E297DD5B0D6B11A051E6A548D3A729CB28C536FA80E76CE3EB5F53E2CB19F1CBABCCCE715EF50BA95DDD7933827C34A2B7FF00C8B72366C6D236D41436CDE73972B37222C1400015351BD56D4BCB9D59E505C9CE4B7031EDAD6E2F2ACB85E2F6D4A92DC624CAA5B7D468DBC30A36EBD4DF526F16FB0B910C29DCDEDC36BCD39BF3CF7227A3A3841421182D91492EA3A23E80032F5DACB829D15B5BE37D0B24676136834DC6D6737F3CB2E84B0F78D447AFD5C29D2A5F53727D4B0EF1B11F743A7C36F3A8FE7965D111A8D13400457757D2B6AB537C62F0E9792ED2518763A7D5B9926F18D15B67CBCC8CC8ADEA346951828538A8C56E5DE6D1EC0000295D6AD6F4718C3F36A2DCB62E964B46556BDBCBA97062F07B29C13EECD99CDAA96968B7D38E2D469F349E7D898E45AB0D36F6D6EA351F04A0D353E16F63E948B26110EB975C759508BF253CE5F89F8226D556F49B4F4687A925F99573E88EE46A445E2800012928A726F04B36DF201857FAA54AF270A2DC28ECC564E5F618B55E68E8F7B562A4A31827B38DE1EE4C7223B8B3BAB39C6535C2FE59C5EFE925981AFA65E4AE68B53FEAD3CA4F971D8CDCA8B85000079AB4D54A73A72D934E2FAC0C0D32A3A57F4F1CB16E12EBCBDE739EABA53A20000000398BFA0EDEF271592C78E0F99E673BEAB72CEF295CD3528BC26BE386F4CDCA89CA000000000008AA5D5B53F8EAC62F91B58FB09915AA6B1651F85CA6FEEAF1C075056ABAECDFF4A925CF278F62C0CF42A4F50BFAF2E153962F6469AC3DD993355EA8E957D55E2E1C09ED94F2ECDA5C517A8E814D60EB5472E58C725ED65E51A142CAD687F4E9A4D7CDB5FB5E66B0260000001CF6B73E2BE6BE88C63DFDE636F55AF630E0B3A31FB89BE9799A8898A0000CDD72A616F4E1F54B1EA4BED33B0F5A053C28559FD52C1752FB46A350D00191FB82A65469F4C9FB919D849A2C386D1CBEB937D4B2EE1AF82F9A0000656BB3CA8D3E56E4FAB2EF33B2AC6854F86CDCFEB9B7D4B21AA2E5DD7542DAA557F2AC973BC9168E7AC2DDDCDDA53CE2B19D47CBFF002CCC57446D000000CFD6AE382DD524F3AAF3FC28CED465D95CD3B6AAEACA1C734B0A6B1C126F7B332E15EABDEDE5E4B81B6D3D94A0B2FB466D172CB4778AA973D2A96DFE6353546B1A0032759BD4D7E9A9BC77D56BB22676AAA3084A95B4AB3CA5571A74BA3E67DC6459D16DB8EBBAD25E5A7F0FE27E08BAC1B66D00001B4936F24B36C0E6EE2AD4BCBB6E39B9BE1A71E6DC73BF55D052B685AD9BA70DAA2DB972BC369B473FA7538D4BCA509478A2F1724F6649988AE8E308423C308A8C56C49608E88FA0008EE2E29D0A4EA547825B16F6F910A39E94AB5EDD72D4A8F08ADC97D873F55D35BD18D1A30A51D90587DA74473FABD6F56F67866A9A505D5B7B4C5F55B56747D1B6A74F7C62B1E979BED3711280022B9B78DC41426DF07129492DF86E0248C6318A8C56115924B601F40011D7AF4A841CEA4B863BB95F320316F754AD5F18431A74B661BDF4F818B5525968D56AA53AD8D2A7BA3F33F01351B36F6B42DE3C34A0A3CAF7BE966D1281E2B558D2A53A92D904DBEA039AB5A72BABD8A9E7C72E2A8F9B6B39CF55D21D1000000CBD6AE9C631B78BCE5E6A9D1B919DA8F9A358466BF53556293FCB4F9B78D60D9342A6AD08CEC2AE3F2E125D2992F8333439357338EE70C7D8D7899D56B68DA000001CE56F26A33C1ECAB8A7FF006C4E7FAAE9CE880000000AD7D614EEE0937C338FC335EE25991875B4FBEB69F128CBCBB2A53C5FBB34671548EA97D0F2FA98E1BA4937E24EA897FDDDE7253F63F12F460FF7779F4D3F63F11D0F8F5ABC6B05C0B9D27DEC743C3D5EF9FF00712E88AEFC475479FD56A357E1A95258BCB831FF00D24CD0FD1EA35B374EA4BF1E3FFA8628961A1DF4B6A843A5F8625E45AA7FB7D7F72B3E88AC3B5E25E516A968F634F370737F7DE3D9B0B882DC2953A6B0A71505C9149147A000000000000E5EEDBAD7D530F9EA70AF6F0A39FEABA44B058721D1000000C5D7278DCC21F4C71EB6FEC31B2B4F49A7C1614B9649CBF99E26A22D9400E7B5BA9C57CD6E84547BFBCC6CAD6B1A7E9D9D18EFE14DF4BCCD444E50000616B3538AF387E88A5EDCFBCC6CAD9D3E9FA765463860F8536B9DE66A228EBF5B0852A2BE66E4FAB25EF26C3EE89478684EABDB3960BA23F68D4689A000000CDBED3EE6EAEB8B8A30A514A316F16F95E466CC8FB4744B78E75652A8F917957667DA3917A950A3463C34A0A0B991A1EC001997FAB4629D3B77C53D8EA6E5D1CA66EC2969F6352EEAF14B15493C673E57C9D24932A975A9C7F510A1058428C124B91BFB301B0D1D3297A7654F966B8DFF00DBEC351168A0000A7AB56F4ECE496DA8F8175EDEC26C29E85414AB4EB3D94D611E997D867556C5CA93B7AAA2F09704B07CF81BA8E7B49695F53C77A697B198D55D09B47C94A3158C9A496D6F24051B9D62DA9A6A97E6CF9BE1F699BB0CA9CEEAF6BA59CE6FE18AD897719F55B9A7E9D0B58F13F35692F34B93991B91162E2B468D09D596C82C7AF7168E76C694AE2F61C59E7C737D19FBCE73D5744744000000000A57DA9D3B66E9C571D6C366E58F292DC0C851BBBEAFBEA4F97624BB8C7DAADAB1D2A8DBE139FE656E5DCBA11B91178A0000A1ADD5E0B271DF524A3D4B3EE33B7829E854BCD56ABDD8457BDF70D46B9A000000E6EE252BABE970EDA93E1874638239DFB55D353A71A74E34E2B08C524BA8E88F4054D5A4A3A7D5E7497B5A44BE0CDD0E38D7A92C36470C7A5FD86755AD93680000073776B8AFEAC71C31A9863D2CE7FAAEA0E8800000000003CCE9539AC2708C972349FBC089D8D93DB429FF002A180561649E3E853FE544C0FBFA3B3FF053FE48F81702454E9A78A8A4D73203D000000000000000000000F3526A14E537B229B7D480E6B4F8BA97D4B1DBC5C4FAB339CF55D19D1000000E73529F1DF556B3C1F0AEA581CEFAAE968D354E9429AD908A8FB1607447A00072F5DBB9BE961FDCA982E86F05D873FD5748960B05B0E880000073776DD6BEAA96D94F857B784E77D574F14A31515B12C11D1181ADCF8AF9AFA22977F798D95AB630E0B3A31FB89BE9799A889CA0000000007C94A315C526A296D6DE080A55F58B4A7941BAB2FBBB3DACCDD8665CEA17572F831E184B254E3BFA77B25AAB565A2D49B53B9F243E8F99F4F209A8DAA74E14E0A108A8C56C4B61B4733A849D4BFAD86D73E15D5E539DF55D1462A31515B12C1751D11F4000032F5D6F828ADD8C9E1D0919D858D0E095962B6CA6DBEACBB86BE0D0693583D8CD0E72EB4DBAB7AADD38CA504F184E38B6BD862C579F5754C30C6B7B25E03E8F91B1D46BB4DD39CB1F9A797FE62628BB6FA0CB1C6E2782FA61E2CD4D51AB42DA8D087052828ADFCAFA59A12018DAE5DA6E36D07B3CD53B919DA89346B674E8BAD25E6ABF0FE15E2358344D00000000015AFAC61754F746AC7E09F73E625831A857B9B0B869AC1EC9C1EC6BF8D867C57436B754AE692A94DFE28EF4F9CD4A894A0000C8FDC127C3423B9B937D2B0F133B2A4D123859B7F54DBEC4BB8BAA2F940001E2BCF828D49FD316FD8B1030B48A7C77F4B7A8E327D4BC4E7AFAAE90E880197AF55C2853A7BE72C5F4457DA6761E743A7851A953EB960BA22BED1A95A4680000039BA3F9F7F1E4A9571EA72C4E7FAAEA0E88000000000000000000000000000000000000000055D52A7058567CAB87F99E04BE0CAD1218DD4A5BA107ED6CCEAADB36800000737413AD7F07F5D5E27D1C58B39CF55D41D1002B6A370A85A4E78F99AE1874B25A31B48A1EA5DA97CB49713E9D88CEAADE3680003E4A4A31727B12C581CEE9F1F56FE9639E32E27D5E639CF55D39D11CD6ABFF00DFAFD2BFF2A39DF55BD47FA34FF0AF71D11EC000033F50D4EA5B5654E1052C62A5C4DBDEDAD9D466D1525ADDDBD9182EA6FBC9D2A196A57F53CAAA3E88249F6664CD1F2163A85C3E274E6F1F9A6F0FFCC5C517686812C9D7A987DD878BF02F28D3B7B3B6B75F95049EF93CDBEB35813000396AB95F4F1CB0AAF1FE739FEABA53A20000019DADD272B78545FDB967D12CBDE6761F341B88F04E837E64F8A2B99ED1AD1AC68000000000CFD4B548DBA74A9612AEFD91E93368CBB1B3A97759CA6DBA69E3526F6B7C9D24915D02492492C12C9236800022A9776F4AAC294E6A339EC5E24C894A0000015AF6C69DD4307E5A91F827C84B3231BFF95A7DCF2497F2C918F15B965A850BA8F97CB517C54DEDEAE546E5CA2D1400C8FDC117C3425B9392C7A70F033B2C7BD0DFFF00124B1D93797521AF88D03400008EE5395BD58ACDB8492F60A317459F0DFC17D7192ECC7B8C6AAE88DA00737A9DCFEA6F1F06718F929F3FFCB39DB9AADBB4A1E85B53A5BE2BCDD2F37DA74889400002BEA15BD1B4A92DED70C7A5E44A32F44A3C77AA5BA945BEB79233AABA03680000000000000000000000000000000000000000666BD530B68413F8E79F424676116854F0A756A7D52515D4B1EF1A8D4340000349A69EC60735465FA5BD8B9AFE94F092E659339FEABA884E138A9C1A945E69A3A23E55AB4E941CEA49460B6B6073BA8DF4AF2B2504FD38E54E3BDB7BCC5B956B69D69FA6A184BFA93CE7E1D46A445A2800022BB6D5AD66B6F04BDCC518FA2453BE4F92126BB17798D55D09B4739AC4386FEA7DE517D987718D95B5693E3B5A52E5847DC6E22500000CDD6AD653A71AF058BA794D7DDE5EA33B41574AAF67197A7714E2DC9F92A49278733C49AD56FC6108AF24525CCB0368FA000015ABEA567471E2A89C97CB1F33EC26465DD6B95A6B86847D25F53CE5E08CDD950DB69B73732E3A98C20DE2E72F89F426241BEB672F39B4000003CD4A71A94E509AC6325835D2073D5E8DC58DCA69B4D3C69D4E55FC6D39D9856C596AF42B251AAD53ABCFF0BE866E545F2800023AD71428C71AB3505CFB7D832322F75B9CD385B2708EFA8F6BE8E4317654365A5D6B87EA56C6149E78BF8A5ED1351B74E9D3A5050A71518C76246D1E80010DD5D53B6A2EA4F3DD18EF6F90968E76AD4A95AA4EACFCD279C9EE4BC0C2B474DD51452A15DE5B2151FB99A951AE680000023AF6F4ABD370A91C56E7BD73A6062DD69B716B2F529373A6B3538FC4BA703162A7B5D72A4128DC47D45F5ACA5ECD8C4D8684356D3E4B1F552C374935DC6B3119DAB6A16D734E14E96327197171E182D8D61999DAAA4D09CF86AAC1F0629A96EC7632EA8D43400006DC981CE494ECAFB6674A58C79E3FF073F2AB7A9EA36538297AD08E3F2C9A4D753379450D4B578CA0E8DB3C71CA5539B9112ECA8B48B1739AB8A8BC91FE9AE57CBD44D62364D800000636B574A7563422FCB4F39FE27E08C6D557B45B6F4AD7D47F155F37FD771A9117CA000000000000000000000000000000000000000018DFB81BE2A0B76127EE33B09F464BF44B9E52C4BAF82F140000028EA1A646E5FA94DA8D6C30CF64BA4960CE8D0D56D9F0D35522BEE66BB32338AA2B1D4AE258D452FC551ECF6E631469D8E994ED9F1C9F1D5FAB72E835222E14000003CD582A94E74DEC9A717D6B0039EA552BD8DD62E3E78629C5EC68E7E2B4A3FB82961E6A324F99A6BB8D748CDBFBC5755554E0E0C170EDC71EC466DCAB57469CDDA70CA2D2836A2DADA9E66E22F140000032EF747E293A96D845BDB4DE4BA8CDD4538FFB5B5CA3EA412DCBCD1EF44FAAF6B57D4A2926F16F6371CFB3019A3E3D43559BC14A79EE8C1780CD1E7F49AA5C7C71A925FF00B8F05DAC628B14743A8F3AB5145724737ED65E517EDF4EB5A0D384319AF9E59B2E05928000000001E6AD1A7560E1522A517B9819571A24D36EDE78AFA25B7DA66EA2B461AADB650552296E8F9A3D98A27D57B5AA6A893F3378EF705DC8668F9FA9D62B2C13AAD3DF18F0F6A487D1EA9E917B565C555A863B5C9F14BB3C472342DB4BB6A0D49AF52A2F9A5DC8D488B8500004771714A853752A3C22B62DEDF22168C0AF5EBDEDC2CB16DE14E0B72FE369CFD56E5869F4EDA838C9294E6BF31ED4F9BA0DC88CCD4B499516EAD04E54B7C76B8FD866EA3E586AB2A3C34AB3E2A3B14B6B8F8A12AB6A328CA2A5169C5E69AD86D1F400000055AFA65A566E4E1C337B650C9F812C1525A0AC7CB59A5CF1C7DCD13912D1D12DA0F1A927539B62EC1C8BF18C631518A518AD89648D0FA0000002BDE58D1BA8A53CA6BE19ADA8960CE96855B1F2D58B5BB14D19E458B7D168C1A95697A8D7CB8611EBE52CD468A492492C12C92468000002B5FDE46DA8F16DA92CA9C79F97A8968C6B1B59DE5CE126DC71E2AB2EBEF312655D32492492C12C923A2000000000000000000000000000000000000000000327F70536E146A61945B8B7D39F719D87DD0EA276F3A7BE12C7A9A1A8D1340000000000000000000003C55A346AAC2A42334B6712C40AEF4AB06F1F4B0E894BC498825A765694F38528A7CAD62FDAC604C504D358A78A7B1A00000000000000000003692C5EC032B50D5A383A56EF16F29555B17E1F133760D2B51C70B7ACF3D94E6F7F33EE1AD1AA68000000000000000000020BBBCA36D0E29BC64FE182DAC968C2AB56E6F6BACB8A4F28416C48C7AADBD3B4E85AC78A5E6AD25E67B973237261174A0064EA3A3F1375AD9252DB2A7CBD066C19F697D5ED26E38630C7CF4DE59F3723332E15BB6D7546E21C54A58E1F145ED5D28DCA894A0000000001B4962F24B6B02AD0D46DEBD795183CD7C2DEC972E04C8B4500000000000000105E5E52B5A7C53CE4FE082DAC968C272B8BEB95F3549E492D897818F55D0D95A42D68AA71CE4F39CB959B911394000000000000000000000000000000000000000000417D6DFA8B59D2F99E707CEB612C1CFD9DCCED2E389A787C3521BF0F14625C2BA1A5569D5829D392945EF47447A000000000045717542DE3C55649722DEFA112D1897DA955B9C611F251FA77BE9336AB474BBF55A0A9547F9D15937F32F12CA8BE680000000475AE28508F1559A8ADC9ED7D0864645EEAD3AC9D3A29C29BC9CBE66BB8C5D950D8EA152D5F0BF3D17B61C9CE892E06ED0B9A35E1C54A4A4B7ADEBA51D32890000000000003CCEA53A71E29C9463CADE080A371ACDBC315493AB2E5D91F699BB0CDAF7977772506DB4F65282CBD9BCCE72AB965A24A4D4EEBCB1FF1A79BE966A6A8AFA8E993B6939C139507B1EF8F33258A9AC75771C29DCE71D8AA6F5F8B94B3646BC2709C54A0D4A2F6359A343E80000000000000F92946317293518ADADE480CDBCD6611C616DE697F91FC2BA394CDD867D0B7BABDACDAC64DFC7525B119C655BD656146D63E5F3547F14DED7E08DC88B25000000A97DA6D1BA5C5F055DD35BFA4960C3AB42EECAB26F18497C338EC7FC7218C6157ED75A834A370B85FF923B3AD1A9B234E1384E2A5092945EC69E28D0FA00001157B9A1423C5564A3C8B7BE8432316FB52AB72DC238C28FD3BDF4F818B550D5B4B9B78C2A4E2E0A59C65BD3EE64C0D1B2D622D2A772F096C55373E9E4353646A292924E2F14F63468000000000F929C6117293518ADADE480CDBBD6A11C636EB8E5F5BF87AB94CDD867D1B7BABEACDAC6527F15496C4671956FD958D2B5A784739BF8E7BD9B91160A0000000000000000000000000000000000000000000000CED474A8DC375693E1AD866B74BED3360C88CAF2CAA7CD4A5BE2F63EE667C55EA3AEEEAD4BFED0F07E26A6C2D4356B19ED9B83E4926BEC2F51137EB6CFF00CF4FF990C8F92BFB24B175E1D4D3F70C882A6B3671F85CAA3FBAB05DB80E852AFAD5C4D354A2A92E5F8A5E067A54142CAF2F25C69369EDAB3797B5ED263235E868D6B4E9B8D45EA4E4B0737961D08DE119579A6DC5ACB89633A6B35523BBA790CD985494359B9A6946A25562B7BCA5ED1D0B51D72DDAF3539C5F360FBD17A47A7AE5AE19426DF260BC47421A9AEBFEDD1E8727DC8742AD5D52FAABC14F831F960B0EDCD93A528E997D5E5C4E0E29ED9D4CBDF98C0D5B4D1ADE8B52A9F9B35CBF0AEA35223EDF69346E319C3F2EAF2AD8FA50B063D6B3BDB49F134E386CAB0C70F6A318B152D1D66EA0929A8D45CAF27ED45E85A86BB45FC74A4BA1A7E05E9122D6ECDBCD4D73E0BB98E87D7ACD925B64F9B87C47507896B96CB6426FA92EF1D0867AECFE4A2973CA58FB913A556A9AADED4CB8D413DD05876E6C9D51E6165A85C4B8B82726FE79E5DB218A2FDBE83B1DC54FFA43C59A9A996950B5B7B78E14A0A3CAF7BE96691280693583CD3DA80CABDD1232C676CF865BE9BD9D4F719BA8CC52BDB2A9879A94B91EC7DCCCFD8ABD475C78255A9E3F7A1E0FC4BD22E53D52C6A7F7145F24BCBEFC8D644F0AD466B184E325CCD328F6000F32AB4E0B19CD4573B480AF5354B187F7549F247197BB22660A75B5C7B2853FFB4FC17892EC2939DEDECF87CD55AF956C5DC8CFDAAD0B4D0B64AE5FFF008E2FDECD4D51AB4E9C29C14211518AD89648D0F40000000000F93A70A91719C54A2F6A6B140655D68516DCADE5C2FE896CEA666EA33A54AF6CE78B52A4FEA5B1F5AC8CFD8A9A9EB57915E6519F3B583EC2F4257AED4C32A2B1E5E2787B874886AEB17935845C69AFBAB3F6BC474A8E8585EDD4B8945E0F6D49ECF6BCD93191B365A550B6C26FF32AFD6F62E846E445C9C2138B8CD2945ED4CA322EF4378B95ABCBFC727EE7E266EAACF53BDB39E1E6A4FE97B1FB72667EC16E96B95965529C67CF17C2FBCBD09E3AE5BBF8A9CD7460FBCBD23D7FBBB4FA6A7B1788E8C2396BB4F0F252937CED2F7623A15EAEB5772F81469AE5C317DA4E9504695F5E493C2757EF3F8575BC89F68D0B5D092C25732C7EE47675B353546AD3A70A7050845462B624687A000000000000000000000000000000000000000000000000003CD4A74EA4786A454A2F7358A02955D12CA78B8A9537F75E5EC789391567FB7E7FDBAC9ADCA4B0F73272217A15EAD8E9BEB7E04E55F63A0DE3F8A74E2B7E6DBF70E44F4FF6FC7FB959BE68AC3B5E25E517686976545A71A7C525F34FCCFB722E05A280002B56D32CAABC6549293DF1C63EE26056968368DE539C79B15DE89C8F9FE82D7FC953DB1F01C89A1A358476C1CFF137DD8171059A56D6F4BFA74E30E749265120000000AF5B4EB2AB9CE9471E55E57D981302B4F42B37F0CA71E64D3F7A64E4787A050F96ACD74E0FB90E47CFFF009FA5FE697B10E47B8E836AB0E29CE5CB9A5DC3912C347B08E0FD3726BEA6DF66C2E20B34EDE852FE9D38C3A12451200000000003CD4A74EA45C671528BDA9AC50146B68967378C38A93FBAF15EC64E454A9A0575FD3AB197E24E3EEC4CF2B9579E8D7F1FEDA9744977E039A3C4B4DD423B68CBA9A7EE64C505A76A0DE0A8CBAF05EF63147B8E8F7F2DB4D479E525DD8979A27A7A0577FD4A918FE1C65E0391768E8B674F39E355FDE797B11AE517A108423C308A8C7912C0A3E800000000000000001B4082A5859D478CA8C1B7BD2C1F613022FF0051A77F87FF0014BC46209A9D95A5378C28C13E5C163ED2E04C0000003E4A3192C249493DCF34055A9A4D854CFD2517CB16E3D8B2260412D06D1BCA734B9315DE89C8F9FE82D7FC953FF0F80E47B868764B0E2E3974BC3DD8179162969F654F38518E2B636B89FB5E2302C1400000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001FFFD9" HightQuality="False"/>
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm
index 06571d1..12590eb 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm	
@@ -569,47 +569,59 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente
       LookAndFeel = dxLayoutOfficeLookAndFeel1
       ExplicitWidth = 1003
       inherited Bevel3: TBevel
-        Left = 379
+        Left = 469
         Top = 57
-        ExplicitLeft = 379
+        Height = 122
+        ExplicitLeft = 469
         ExplicitTop = 57
+        ExplicitHeight = 122
       end
       inherited Bevel4: TBevel
-        Left = 491
+        Left = 581
         Top = 88
         Width = 342
-        ExplicitLeft = 491
+        ExplicitLeft = 581
         ExplicitTop = 88
         ExplicitWidth = 342
       end
       inherited Bevel2: TBevel
-        Top = 242
-        ExplicitTop = 242
+        Top = 216
+        Width = 333
+        ExplicitTop = 216
+        ExplicitWidth = 333
       end
       inherited Bevel1: TBevel
-        Left = 398
+        Left = 488
         Top = 216
-        ExplicitLeft = 398
+        Width = 332
+        ExplicitLeft = 488
         ExplicitTop = 216
+        ExplicitWidth = 332
       end
       inherited ImporteDto: TcxDBCurrencyEdit
         Top = 84
         Style.IsFontAssigned = True
         ExplicitTop = 84
+        ExplicitWidth = 93
+        Width = 93
       end
       inherited ImporteIVA: TcxDBCurrencyEdit
-        Left = 562
+        Left = 652
         Top = 108
         Style.IsFontAssigned = True
-        ExplicitLeft = 562
+        ExplicitLeft = 652
         ExplicitTop = 108
+        ExplicitWidth = 137
+        Width = 137
       end
       inherited ImporteTotal: TcxDBCurrencyEdit
-        Left = 492
+        Left = 582
         Top = 189
         Style.IsFontAssigned = True
-        ExplicitLeft = 492
+        ExplicitLeft = 582
         ExplicitTop = 189
+        ExplicitWidth = 137
+        Width = 137
       end
       inherited edtDescuento: TcxDBSpinEdit
         Top = 84
@@ -617,51 +629,59 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente
         ExplicitTop = 84
       end
       inherited edtIVA: TcxDBSpinEdit
-        Left = 491
+        Left = 581
         Top = 108
         Style.IsFontAssigned = True
-        ExplicitLeft = 491
+        ExplicitLeft = 581
         ExplicitTop = 108
       end
       inherited ImporteBase: TcxDBCurrencyEdit
-        Left = 491
+        Left = 581
         Top = 57
         Style.IsFontAssigned = True
-        ExplicitLeft = 491
+        ExplicitLeft = 581
         ExplicitTop = 57
+        ExplicitWidth = 92
+        Width = 92
       end
       inherited edtRE: TcxDBSpinEdit
-        Left = 491
+        Left = 581
         Top = 162
         Style.IsFontAssigned = True
-        ExplicitLeft = 491
+        ExplicitLeft = 581
         ExplicitTop = 162
       end
       inherited edtIRPF: TcxDBSpinEdit
-        Left = 491
+        Left = 581
         Top = 135
         Style.IsFontAssigned = True
-        ExplicitLeft = 491
+        ExplicitLeft = 581
         ExplicitTop = 135
       end
       inherited ImporteRE: TcxDBCurrencyEdit
-        Left = 562
+        Left = 652
         Top = 162
         Style.IsFontAssigned = True
-        ExplicitLeft = 562
+        ExplicitLeft = 652
         ExplicitTop = 162
+        ExplicitWidth = 56
+        Width = 56
       end
       inherited ImporteIRPF: TcxDBCurrencyEdit
-        Left = 562
+        Left = 652
         Top = 135
         Style.IsFontAssigned = True
-        ExplicitLeft = 562
+        ExplicitLeft = 652
         ExplicitTop = 135
+        ExplicitWidth = 56
+        Width = 56
       end
       inherited eImporteNeto: TcxDBCurrencyEdit
         Top = 57
         Style.IsFontAssigned = True
         ExplicitTop = 57
+        ExplicitWidth = 147
+        Width = 147
       end
       inherited cbValorado: TcxDBCheckBox
         Left = 11
@@ -676,43 +696,53 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente
         Top = 111
         Style.IsFontAssigned = True
         ExplicitTop = 111
+        ExplicitWidth = 147
+        Width = 147
       end
       inherited eIVA: TcxDBLookupComboBox
         Top = 138
         ExplicitTop = 138
+        ExplicitWidth = 81
+        Width = 81
       end
       inherited bTiposIVA: TButton
-        Left = 231
+        Left = 321
         Top = 138
         OnClick = frViewTotales1bTiposIVAClick
-        ExplicitLeft = 231
+        ExplicitLeft = 321
         ExplicitTop = 138
       end
       inherited cbRecargoEquivalencia: TcxDBCheckBox
         Top = 165
         ExplicitTop = 165
+        ExplicitWidth = 219
+        Width = 219
       end
       inherited edtRetencion: TcxDBSpinEdit
-        Left = 491
+        Left = 581
         Top = 231
         Style.IsFontAssigned = True
-        ExplicitLeft = 491
+        ExplicitLeft = 581
         ExplicitTop = 231
       end
       inherited edtImporteRetencion: TcxDBCurrencyEdit
-        Left = 562
+        Left = 652
         Top = 231
         Style.IsFontAssigned = True
-        ExplicitLeft = 562
+        ExplicitLeft = 652
         ExplicitTop = 231
+        ExplicitWidth = 342
+        Width = 342
       end
       inherited edtFechaRetencion: TcxDBDateEdit
-        Top = 257
+        Top = 231
         Style.LookAndFeel.SkinName = ''
         StyleDisabled.LookAndFeel.SkinName = ''
         StyleFocused.LookAndFeel.SkinName = ''
         StyleHot.LookAndFeel.SkinName = ''
-        ExplicitTop = 257
+        ExplicitTop = 231
+        ExplicitWidth = 333
+        Width = 333
       end
       inherited dxLayoutControl1Group_Root: TdxLayoutGroup
         inherited cxValorado: TdxLayoutItem
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas
index 86834b2..578bc22 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas	
@@ -86,6 +86,7 @@ type
     procedure ImprimirInterno; override;
     procedure GuardarInterno; override;
     procedure EliminarInterno; override;
+    procedure RefrescarInterno; override;
 
     property ViewPresupuesto: IViewPresupuestoCliente read GetViewPresupuesto write SetViewPresupuesto;
 
@@ -468,6 +469,20 @@ begin
       Controller.DetallesController.DesglosarPorteDetalles(FPresupuesto.IMPORTE_PORTE, FPresupuesto.Detalles)
 end;
 
+procedure TfEditorPresupuestoCliente.RefrescarInterno;
+begin
+  //PRECIO_PUNTO EVENTOS
+  frViewDetallesPresupuestoCliente1.edtPrecioPunto.Properties.OnValidate := Nil;
+  frViewDetallesPresupuestoCliente1.edtPrecioPunto.Properties.OnEditValueChanged := Nil;
+
+  inherited;
+
+  //PRECIO_PUNTO EVENTOS
+  frViewDetallesPresupuestoCliente1.edtPrecioPunto.Properties.OnValidate := onPrecioPuntoPropertiesValidate;
+  frViewDetallesPresupuestoCliente1.edtPrecioPunto.Properties.OnEditValueChanged := OnPrecioPuntoPropertiesEditValueChanged;
+  
+end;
+
 procedure TfEditorPresupuestoCliente.SetController(const Value: IPresupuestosClienteController);
 begin
   FController := Value;
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestosCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestosCliente.pas
index 2bd4c8d..e4c5bd3 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestosCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestosCliente.pas	
@@ -402,7 +402,8 @@ begin
     inherited;
     APresupuesto := FController.Duplicar(Presupuestos);
     //Recalculamos el presupuesto copiado con el precio punto actual
-//    FController.DetallesController.RecalcularPrecioPuntoDetalles(APresupuesto.PRECIO_PUNTO, APresupuesto.Detalles);
+    if (ShowConfirmMessage('Desea cambiar el precio punto por el actual, esto ocasionar� el recalculo de todos los art韈ulos del presupuesto que est閚 en el cat醠ogo, los conceptos libres no se ver醤 afectados', '緿esea actualizar los importes de todos los articulos del presupuesto, que est閚 en el cat醠ogo?') = IDYES) then
+       FController.DetallesController.RecalcularPrecioPuntoDetalles(APresupuesto.PRECIO_PUNTO, APresupuesto.Detalles);
     FController.Ver(APresupuesto);
   finally
     HideHourglassCursor;  
diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index 70e9fd9..54b2401 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -1,311 +1,310 @@
-锘�<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
-  <PropertyGroup>
-    <ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
-    <MainSource>FactuGES_Server.dpr</MainSource>
-    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
-    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
-    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
-    <DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
-    <Version>7.0</Version>
-    <DCC_DebugInformation>False</DCC_DebugInformation>
-    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
-    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
-    <DCC_MapFile>3</DCC_MapFile>
-    <DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
-    <DCC_Define>RELEASE</DCC_Define>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
-    <Version>7.0</Version>
-    <DCC_MapFile>3</DCC_MapFile>
-    <DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
-    <DCC_Define>DEBUG;</DCC_Define>
-    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
-  </PropertyGroup>
-  <ProjectExtensions>
-    <Borland.Personality>Delphi.Personality</Borland.Personality>
-    <Borland.ProjectType />
-    <BorlandProject>
-<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">7</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.7.3.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.7.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 03 de abril de 2018 17:53</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
-      
-      <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
-    </Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
-  </ProjectExtensions>
-  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
-  <ItemGroup>
-    <DelphiCompile Include="FactuGES_Server.dpr">
-      <MainSource>MainSource</MainSource>
-    </DelphiCompile>
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosClient_Intf.pas" />
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosServer_Intf.pas" />
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Model\uBizEjerciciosServer.pas" />
-    <DCCReference Include="..\ApplicationBase\Ejercicios\Servidor\srvEjercicios_Impl.pas">
-      <Form>srvEjercicios</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
-    <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
-    <DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
-      <Form>srvEmpresas</Form>
-      <DesignClass>TDARemoteService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
-      <Form>srvProvinciasPoblaciones</Form>
-      <DesignClass>TRORemoteDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
-    <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
-    <DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas" />
-    <DCCReference Include="..\Base\schBase_Intf.pas" />
-    <DCCReference Include="..\Base\Utiles\uNumUtils.pas" />
-    <DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" />
-    <DCCReference Include="..\Base\Utiles\uStringsUtils.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
-      <Form>srvAlbaranesCliente</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" />
-    <DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
-      <Form>srvAlbaranesProveedor</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
-      <Form>srvAlmacenes</Form>
-      <DesignClass>TDARemoteService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas" />
-    <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas" />
-    <DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
-      <Form>RptComisiones</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
-      <Form>srvComisiones</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Contabilidad\Model\uBizAsientosServer.pas" />
-    <DCCReference Include="..\Modulos\Contabilidad\Servidor\srvContabilidad_Impl.pas">
-      <Form>srvContabilidad</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
-    <DCCReference Include="..\Modulos\Contactos\Model\uBizVendedoresServer.pas" />
-    <DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
-      <Form>RptEtiquetasContacto</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
-      <Form>srvContactos</Form>
-      <DesignClass>TDARemoteService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Contratos de cliente\Model\uBizContratosClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Contratos de cliente\Reports\uRptContratosCliente_Server.pas">
-      <Form>RptContratosCliente</Form>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Contratos de cliente\Servidor\srvContratosCliente_Impl.pas">
-      <Form>srvContratosCliente</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
-      <Form>RptFacturasCliente</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
-      <Form>srvFacturasCliente</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" />
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
-      <Form>RptFacturasProveedor</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
-      <Form>srvFacturasProveedor</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas" />
-    <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas" />
-    <DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
-      <Form>srvGestorDocumentos</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
-      <Form>srvGestorInformes</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
-      <Form>srvHistoricoMovimientos</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
-      <Form>srvInventario</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" />
-    <DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
-      <Form>srvPedidosProveedor</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
-      <Form>RptPresupuestosCliente</Form>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
-      <Form>srvPresupuestosCliente</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizPagosClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizRecibosClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
-      <Form>RptRecibosCliente</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
-      <Form>srvRecibosCliente</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizPagosProveedorServer.pas" />
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizRecibosProveedorServer.pas" />
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
-      <Form>RptRecibosProveedor</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
-      <Form>srvRecibosProveedor</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Referencias\Model\uBizReferenciasServer.pas" />
-    <DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
-      <Form>srvReferencias</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" />
-    <DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
-      <Form>RptRemesasCliente</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
-      <Form>srvRemesasCliente</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" />
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
-      <Form>RptRemesasProveedor</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
-      <Form>srvRemesasProveedor</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Subfamilias\Servidor\srvSubfamilias_Impl.pas">
-      <Form>srvSubfamilias</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas" />
-    <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" />
-    <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" />
-    <DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
-      <Form>srvUnidadesMedida</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
-    <DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
-    <DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
-      <Form>srvConfiguracion</Form>
-      <DesignClass>TDataAbstractService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="Configuracion\uConexionBD.pas">
-      <Form>frConexionBD</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="Configuracion\uConfGeneral.pas">
-      <Form>frConfGeneral</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="Configuracion\uConfiguracion.pas">
-      <Form>fConfiguracion</Form>
-      <DesignClass>TForm</DesignClass>
-    </DCCReference>
-    <DCCReference Include="Configuracion\uFrameConfiguracion.pas">
-      <Form>FrameConfiguracion</Form>
-      <DesignClass>TFrame</DesignClass>
-    </DCCReference>
-    <DCCReference Include="srvLogin_Impl.pas">
-      <Form>srvLogin</Form>
-      <DesignClass>TDARemoteService</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uAcercaDe.pas">
-      <Form>fAcercaDe</Form>
-    </DCCReference>
-    <DCCReference Include="uDataModuleServer.pas">
-      <Form>dmServer</Form>
-      <DesignClass>TDataModule</DesignClass>
-    </DCCReference>
-    <DCCReference Include="uServerMainForm.pas">
-      <Form>fServerForm</Form>
-    </DCCReference>
-    <DCCReference Include="Utiles\RegExpr.pas" />
-    <DCCReference Include="Utiles\uBusinessUtils.pas" />
-    <DCCReference Include="Utiles\uDatabaseUtils.pas" />
-    <DCCReference Include="Utiles\uReferenciasUtils.pas" />
-    <DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
-    <DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
-    <DCCReference Include="Utiles\uServerAppUtils.pas" />
-    <DCCReference Include="Utiles\uSesionesUtils.pas" />
-  </ItemGroup>
+	<PropertyGroup>
+		<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
+		<MainSource>FactuGES_Server.dpr</MainSource>
+		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+		<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
+	</PropertyGroup>
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+		<Version>7.0</Version>
+		<DCC_DebugInformation>False</DCC_DebugInformation>
+		<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+		<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+		<DCC_MapFile>3</DCC_MapFile>
+		<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
+		<DCC_Define>RELEASE</DCC_Define>
+	</PropertyGroup>
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+		<Version>7.0</Version>
+		<DCC_MapFile>3</DCC_MapFile>
+		<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
+		<DCC_Define>DEBUG;</DCC_Define>
+		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+	</PropertyGroup>
+	<ProjectExtensions>
+		<Borland.Personality>Delphi.Personality</Borland.Personality>
+		<Borland.ProjectType/>
+		<BorlandProject>
+			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">7</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">2.7.3.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.7.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 03 de abril de 2018 17:53</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+						<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
+					</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+	</ProjectExtensions>
+	<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
+	<ItemGroup>
+		<DelphiCompile Include="FactuGES_Server.dpr">
+			<MainSource>MainSource</MainSource>
+		</DelphiCompile>
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosClient_Intf.pas"/>
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\schEjerciciosServer_Intf.pas"/>
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Model\uBizEjerciciosServer.pas"/>
+		<DCCReference Include="..\ApplicationBase\Ejercicios\Servidor\srvEjercicios_Impl.pas">
+			<Form>srvEjercicios</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/>
+		<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/>
+		<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
+			<Form>srvEmpresas</Form>
+			<DesignClass>TDARemoteService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
+			<Form>srvProvinciasPoblaciones</Form>
+			<DesignClass>TRORemoteDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/>
+		<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/>
+		<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas"/>
+		<DCCReference Include="..\Base\schBase_Intf.pas"/>
+		<DCCReference Include="..\Base\Utiles\uNumUtils.pas"/>
+		<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/>
+		<DCCReference Include="..\Base\Utiles\uStringsUtils.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
+			<Form>srvAlbaranesCliente</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/>
+		<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
+			<Form>srvAlbaranesProveedor</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
+			<Form>srvAlmacenes</Form>
+			<DesignClass>TDARemoteService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas"/>
+		<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas"/>
+		<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
+			<Form>RptComisiones</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
+			<Form>srvComisiones</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Contabilidad\Model\schContabilidadServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Contabilidad\Model\uBizAsientosServer.pas"/>
+		<DCCReference Include="..\Modulos\Contabilidad\Servidor\srvContabilidad_Impl.pas">
+			<Form>srvContabilidad</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/>
+		<DCCReference Include="..\Modulos\Contactos\Model\uBizVendedoresServer.pas"/>
+		<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
+			<Form>RptEtiquetasContacto</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
+			<Form>srvContactos</Form>
+			<DesignClass>TDARemoteService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Contratos de cliente\Model\uBizContratosClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Contratos de cliente\Reports\uRptContratosCliente_Server.pas">
+			<Form>RptContratosCliente</Form>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Contratos de cliente\Servidor\srvContratosCliente_Impl.pas">
+			<Form>srvContratosCliente</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
+			<Form>RptFacturasCliente</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
+			<Form>srvFacturasCliente</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
+			<Form>RptFacturasProveedor</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
+			<Form>srvFacturasProveedor</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas"/>
+		<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas"/>
+		<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
+			<Form>srvGestorDocumentos</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
+			<Form>srvGestorInformes</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
+			<Form>srvHistoricoMovimientos</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
+			<Form>srvInventario</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/>
+		<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
+			<Form>srvPedidosProveedor</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
+			<Form>RptPresupuestosCliente</Form>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
+			<Form>srvPresupuestosCliente</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizPagosClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Model\uBizRecibosClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
+			<Form>RptRecibosCliente</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
+			<Form>srvRecibosCliente</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizPagosProveedorServer.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Model\uBizRecibosProveedorServer.pas"/>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
+			<Form>RptRecibosProveedor</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
+			<Form>srvRecibosProveedor</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Referencias\Model\uBizReferenciasServer.pas"/>
+		<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
+			<Form>srvReferencias</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
+			<Form>RptRemesasCliente</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
+			<Form>srvRemesasCliente</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
+			<Form>RptRemesasProveedor</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
+			<Form>srvRemesasProveedor</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Subfamilias\Model\schSubfamiliasServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Subfamilias\Servidor\srvSubfamilias_Impl.pas">
+			<Form>srvSubfamilias</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas"/>
+		<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/>
+		<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
+			<Form>srvUnidadesMedida</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/>
+		<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/>
+		<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
+			<Form>srvConfiguracion</Form>
+			<DesignClass>TDataAbstractService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="Configuracion\uConexionBD.pas">
+			<Form>frConexionBD</Form>
+			<DesignClass>TFrame</DesignClass>
+		</DCCReference>
+		<DCCReference Include="Configuracion\uConfGeneral.pas">
+			<Form>frConfGeneral</Form>
+			<DesignClass>TFrame</DesignClass>
+		</DCCReference>
+		<DCCReference Include="Configuracion\uConfiguracion.pas">
+			<Form>fConfiguracion</Form>
+			<DesignClass>TForm</DesignClass>
+		</DCCReference>
+		<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
+			<Form>FrameConfiguracion</Form>
+			<DesignClass>TFrame</DesignClass>
+		</DCCReference>
+		<DCCReference Include="srvLogin_Impl.pas">
+			<Form>srvLogin</Form>
+			<DesignClass>TDARemoteService</DesignClass>
+		</DCCReference>
+		<DCCReference Include="uAcercaDe.pas">
+			<Form>fAcercaDe</Form>
+		</DCCReference>
+		<DCCReference Include="uDataModuleServer.pas">
+			<Form>dmServer</Form>
+			<DesignClass>TDataModule</DesignClass>
+		</DCCReference>
+		<DCCReference Include="uServerMainForm.pas">
+			<Form>fServerForm</Form>
+		</DCCReference>
+		<DCCReference Include="Utiles\RegExpr.pas"/>
+		<DCCReference Include="Utiles\uBusinessUtils.pas"/>
+		<DCCReference Include="Utiles\uDatabaseUtils.pas"/>
+		<DCCReference Include="Utiles\uReferenciasUtils.pas"/>
+		<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/>
+		<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/>
+		<DCCReference Include="Utiles\uServerAppUtils.pas"/>
+		<DCCReference Include="Utiles\uSesionesUtils.pas"/>
+	</ItemGroup>
 </Project>
 <!-- EurekaLog First Line
 [Exception Log]
diff --git a/Source/Servidor/FactuGES_Server.res b/Source/Servidor/FactuGES_Server.res
index c79c76b..c9ea558 100644
Binary files a/Source/Servidor/FactuGES_Server.res and b/Source/Servidor/FactuGES_Server.res differ