diff --git a/Source/Modulos/Contabilidad/Controller/uApuntesController.pas b/Source/Modulos/Contabilidad/Controller/uApuntesController.pas
index 8712800f..bcfccf2a 100644
--- a/Source/Modulos/Contabilidad/Controller/uApuntesController.pas
+++ b/Source/Modulos/Contabilidad/Controller/uApuntesController.pas
@@ -231,7 +231,7 @@ end;
 
 function TApuntesController.ValidarApunte(AApunte: IBizApunte): Boolean;
 var
-  Descuadre : Double;
+  Descuadre : Currency;
 begin
   if not Assigned(AApunte) then
     raise Exception.Create ('Apuntes no asignados');
@@ -258,6 +258,7 @@ begin
     Descuadre := Descuadre - AApunte.HABER;
     AApunte.DataTable.Next;
   end;
+
   if (Descuadre <> 0) then
   begin
      AApunte.DataTable.EnableControls;