From 8186f735c243a5565e562f1327fa175b524ba20d Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Tue, 22 Sep 2009 08:34:17 +0000
Subject: [PATCH] Se arregla columna cantidad para que no salgan los ceros

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@971 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 Source/Base/Base.res                        | Bin 4748 -> 384 bytes
 Source/Informes/1/InfPresupuestoCliente.fr3 |   2 +-
 Source/Informes/2/InfPresupuestoCliente.fr3 |   4 ++--
 Source/Servidor/FactuGES_Server.RES         | Bin 23212 -> 23212 bytes
 Source/Servidor/FactuGES_Server.rc          |   2 +-
 5 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Source/Base/Base.res b/Source/Base/Base.res
index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644
GIT binary patch
delta 11
ScmeBCZD5|Duvteife`=|>;pCc

literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

diff --git a/Source/Informes/1/InfPresupuestoCliente.fr3 b/Source/Informes/1/InfPresupuestoCliente.fr3
index 062a92e4..c2b90e55 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.7.71" 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="39947,4414264815" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  Cadena: String;&#13;&#10;begin&#13;&#10;{  DatosEmpresa.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  NombreEmpresa.Lines.Clear;&#13;&#10;  NombreEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;NOMBRE_EMPRESA&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ACadena : String;&#13;&#10;begin&#13;&#10;{  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62;;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + '  ' + &#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62;;&#13;&#10;&#13;&#10;  DireccionEnvio.Lines.Add(ACadena);&#13;&#10;  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;CALLE&#34;&#62;);&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; + ' ';&#13;&#10;  if (&#60;frxDBCabecera.&#34;POBLACION&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;&#13;&#10;  if (ACadena &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(ACadena);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;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;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 Rich3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));&#13;&#10;     if (&#60;NumCapitulos&#62; = 1) then&#13;&#10;       MasterData1.Visible := False;                                                                   &#13;&#10;  end&#13;&#10;  else&#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));               &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Page2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;MEMORIA&#34;&#62;) = 0) then&#13;&#10;       Page2.Visible := False;                                                 &#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 Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#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;end;&#13;&#10;&#13;&#10;procedure Footer2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not ((&#60;frxDBCabecera.&#34;IMPORTE_BONIFICACION&#34;&#62;) &#62; 0) then&#13;&#10;  begin&#13;&#10;    mBonificacion.Visible := False;&#13;&#10;    mImporteFinal.Visible := False;                                                                      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#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;  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;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]'&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]';  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3200000020446174615365743D226672784442526573756D656E2220446174615365744E616D653D226672784442526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F220000055374796C650100">
+<TfrxReport Version="4.7.71" 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="40078,431257581" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  Cadena: String;&#13;&#10;begin&#13;&#10;{  DatosEmpresa.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  NombreEmpresa.Lines.Clear;&#13;&#10;  NombreEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;NOMBRE_EMPRESA&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ACadena : String;&#13;&#10;begin&#13;&#10;{  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62;;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + '  ' + &#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62;;&#13;&#10;&#13;&#10;  DireccionEnvio.Lines.Add(ACadena);&#13;&#10;  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;CALLE&#34;&#62;);&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; + ' ';&#13;&#10;  if (&#60;frxDBCabecera.&#34;POBLACION&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;&#13;&#10;  if (ACadena &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(ACadena);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;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;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 Rich3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));&#13;&#10;     if (&#60;NumCapitulos&#62; = 1) then&#13;&#10;       MasterData1.Visible := False;                                                                   &#13;&#10;  end&#13;&#10;  else&#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));               &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Page2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;MEMORIA&#34;&#62;) = 0) then&#13;&#10;       Page2.Visible := False;                                                 &#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 Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#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;end;&#13;&#10;&#13;&#10;procedure Footer2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not ((&#60;frxDBCabecera.&#34;IMPORTE_BONIFICACION&#34;&#62;) &#62; 0) then&#13;&#10;  begin&#13;&#10;    mBonificacion.Visible := False;&#13;&#10;    mImporteFinal.Visible := False;                                                                      &#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#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;  if (&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62; &#60;&#62; 0) then&#13;&#10;  begin              &#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;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]'&#13;&#10;    else                     &#13;&#10;       AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]';  &#13;&#10;         &#13;&#10;    frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;  end;            &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3200000020446174615365743D226672784442526573756D656E2220446174615365744E616D653D226672784442526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="256" LeftMargin="20" RightMargin="20" TopMargin="20" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
     <TfrxMasterData Name="MasterData2" Height="370,39394" Left="0" Top="567" Width="642,5201" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" RowCount="0" Stretched="True">
diff --git a/Source/Informes/2/InfPresupuestoCliente.fr3 b/Source/Informes/2/InfPresupuestoCliente.fr3
index 7d0383ce..5639e547 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.7.71" 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="39947,4419122338" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  Cadena: String;&#13;&#10;begin&#13;&#10;{  DatosEmpresa.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  NombreEmpresa.Lines.Clear;&#13;&#10;  NombreEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;NOMBRE_EMPRESA&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ACadena : String;&#13;&#10;begin&#13;&#10;{  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62;;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + '  ' + &#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62;;&#13;&#10;&#13;&#10;  DireccionEnvio.Lines.Add(ACadena);&#13;&#10;  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;CALLE&#34;&#62;);&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; + ' ';&#13;&#10;  if (&#60;frxDBCabecera.&#34;POBLACION&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;&#13;&#10;  if (ACadena &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(ACadena);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;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;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 Rich3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));&#13;&#10;     if (&#60;NumCapitulos&#62; = 1) then&#13;&#10;       MasterData1.Visible := False;                                                                   &#13;&#10;  end&#13;&#10;  else&#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));               &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Page2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;MEMORIA&#34;&#62;) = 0) then&#13;&#10;       Page2.Visible := False;                                                 &#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 Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo59.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end                               &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Footer2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not ((&#60;frxDBCabecera.&#34;IMPORTE_BONIFICACION&#34;&#62;) &#62; 0) then&#13;&#10;  begin&#13;&#10;    mBonificacion.Visible := False;&#13;&#10;    mImporteFinal.Visible := False;                                                                      &#13;&#10;  end;            &#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;  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;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]'&#13;&#10;  else                     &#13;&#10;     AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]';  &#13;&#10;         &#13;&#10;  frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3200000020446174615365743D226672784442526573756D656E2220446174615365744E616D653D226672784442526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F220000055374796C650100">
+<TfrxReport Version="4.7.71" 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="40078,4332644213" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  Cadena: String;&#13;&#10;begin&#13;&#10;{  DatosEmpresa.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1_EMPRESA&#34;&#62;;&#13;&#10;  if (&#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10;       Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX_EMPRESA&#34;&#62;;&#13;&#10;  DatosEmpresa.Lines.Add(Cadena);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  NombreEmpresa.Lines.Clear;&#13;&#10;  NombreEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;NOMBRE_EMPRESA&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  ACadena : String;&#13;&#10;begin&#13;&#10;{  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Clear;&#13;&#10;  if (&#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;REFERENCIA_CLIENTE&#34;&#62;;&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + '  ' + &#60;frxDBCabecera.&#34;PERSONA_CONTACTO&#34;&#62;;&#13;&#10;&#13;&#10;  DireccionEnvio.Lines.Add(ACadena);&#13;&#10;  ACadena := '';&#13;&#10;  DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;CALLE&#34;&#62;);&#13;&#10;  if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62; + ' ';&#13;&#10;  if (&#60;frxDBCabecera.&#34;POBLACION&#34;&#62; &#60;&#62; '') then&#13;&#10;     ACadena := ACadena + &#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;;&#13;&#10;&#13;&#10;  if (ACadena &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(ACadena);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;);&#13;&#10;&#13;&#10;  if (&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62; &#60;&#62; '') then&#13;&#10;       DireccionEnvio.Lines.Add(&#60;frxDBCabecera.&#34;TELEFONO&#34;&#62;);&#13;&#10;}&#13;&#10;end;&#13;&#10;&#13;&#10;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;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 Rich3OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FinalPass then&#13;&#10;  begin              &#13;&#10;     Set('Capitulo', (&#60;Capitulo&#62; + 1));&#13;&#10;     if (&#60;NumCapitulos&#62; = 1) then&#13;&#10;       MasterData1.Visible := False;                                                                   &#13;&#10;  end&#13;&#10;  else&#13;&#10;     Set('NumCapitulos', (&#60;NumCapitulos&#62; + 1));               &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Page2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (Length(&#60;frxDBCabecera.&#34;MEMORIA&#34;&#62;) = 0) then&#13;&#10;       Page2.Visible := False;                                                 &#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 Memo47OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;    if (Length(&#60;frxDBCabecera.&#34;OBSERVACIONES&#34;&#62;) = 0) then&#13;&#10;    begin&#13;&#10;       Memo59.Visible := False;                                                                                      &#13;&#10;       Memo47.Visible := False;&#13;&#10;    end                               &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Footer2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not ((&#60;frxDBCabecera.&#34;IMPORTE_BONIFICACION&#34;&#62;) &#62; 0) then&#13;&#10;  begin&#13;&#10;    mBonificacion.Visible := False;&#13;&#10;    mImporteFinal.Visible := False;                                                                      &#13;&#10;  end;            &#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;  if (&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62; &#60;&#62; 0) then&#13;&#10;  begin              &#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;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]'&#13;&#10;    else                     &#13;&#10;       AText := '[FormatFloat(''#,##0.##'',&#60;frxDBDetalles.&#34;CANTIDAD&#34;&#62;)] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]';  &#13;&#10;         &#13;&#10;    frxDBDetallesCANTIDAD.Memo.Add(AText);&#13;&#10;  end;              &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3600000020446174615365743D2266727844424361706974756C6F732220446174615365744E616D653D2266727844424361706974756C6F732200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3200000020446174615365743D226672784442526573756D656E2220446174615365744E616D653D226672784442526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C10000000204E616D653D2220496E666F726D652200010C10000000204E616D653D224361706974756C6F2200010C14000000204E616D653D224E756D4361706974756C6F732200010C18000000204E616D653D22546578746F4E756D4361706974756C6F220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
   <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="256" LeftMargin="20" RightMargin="20" TopMargin="20" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
     <TfrxMasterData Name="MasterData2" Height="476,44125" Left="0" Top="548" Width="642,5201" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" RowCount="0" Stretched="True">
@@ -72,7 +72,7 @@
     </TfrxMasterData>
     <TfrxDetailData Name="DetailData1" Height="22,67718" Left="0" Top="392" Width="642,5201" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" PrintIfDetailEmpty="True" RowCount="0" Stretched="True">
       <TfrxRichView Name="Rich4" Left="0" Top="0" Width="325,79527559" Height="22,67718" ShowHint="False" StretchMode="smActualHeight" Frame.Typ="15" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" PropData="0852696368456469740AA80000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67333038327B5C666F6E7474626C7B5C66305C666E696C205461686F6D613B7D7D0D0A5C766965776B696E64345C7563315C706172645C716A5C66305C66733232205B504F4E45524A555354494649434143494F4E434F4D504C455441283C6672784442446574616C6C65732E22434F4E434550544F223E295D5C7061720D0A7D0D0A00"/>
-      <TfrxMemoView Name="frxDBDetallesCANTIDAD" Left="326,17322835" Top="0" Width="105,44880913" Height="22,67718" OnBeforePrint="frxDBDetallesCANTIDADOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBDetalles.&#34;CANTIDAD&#34;] [frxDBDetalles.&#34;UNIDAD_MEDIDA&#34;]"/>
+      <TfrxMemoView Name="frxDBDetallesCANTIDAD" Left="326,17322835" Top="0" Width="105,44880913" Height="22,67718" OnBeforePrint="frxDBDetallesCANTIDADOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" HAlign="haRight" HideZeros="True" ParentFont="False" Text=""/>
       <TfrxMemoView Name="Memo35" Left="430,99999024" Top="0" Width="96,37795276" Height="22,67718" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" Frame.RightLine.Style="fsDot" GapX="5" GapY="2" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBDetalles.&#34;IMPORTE_UNIDAD&#34;]"/>
       <TfrxMemoView Name="Memo36" Left="527,1342" Top="0" Width="115,3859" Height="22,67718" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" GapX="5" GapY="2" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBDetalles.&#34;IMPORTE_TOTAL&#34;]"/>
     </TfrxDetailData>
diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index 591beb1cd624ad80ee8a0423382fafc7793af0e4..5c7d02ac4f2e3fbb195bafecaa84f110ecc39c20 100644
GIT binary patch
delta 29
lcmZ3pm2u5h#tj-#%tj1GleMD^*$o)17z`LJCnraF0sxB+2pRwY

delta 29
lcmZ3pm2u5h#tj-#%mxgGleMD^*)15X7z`OqCnraF0sxC52pj+a

diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index a8cbaf1a..1ca473ef 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -14,7 +14,7 @@ BEGIN
          BEGIN
               VALUE "FileVersion", "1.7.8.0\0"
               VALUE "ProductVersion", "1.7.8.0\0"
-              VALUE "CompileDate", "martes, 01 de septiembre de 2009 18:15\0"
+              VALUE "CompileDate", "martes, 22 de septiembre de 2009 10:09\0"
          END
     END
     BLOCK "VarFileInfo"