Se pone todos lo modulos relacionados con contabilidad a no activo para que no les pida cuentas y nuevo año fiscal

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@642 f4e31baf-9722-1c47-927c-6f952f962d4b

Source/Modulos/Contactos/Model/uBizContactos.pas

@@ -744,9 +744,9 @@ begin
   REGIMEN_IVA := AppFactuGES.Configuracion.GetSettingAsString(teXML, 'Clientes.RegimenIVA', CLIENTE_REGIMEN_IVA);
 
   //CONTABILIDAD
-  if Assigned(AppFactuGES.EjercicioActivo) then
-    IGNORAR_CONTABILIDAD := 0
-  else
+//  if Assigned(AppFactuGES.EjercicioActivo) then
+//    IGNORAR_CONTABILIDAD := 0
+//  else
     IGNORAR_CONTABILIDAD := 1;
   TIENE_SUBCUENTA := 0;
 
@@ -829,9 +829,9 @@ begin
   REGIMEN_IVA := AppFactuGES.Configuracion.GetSettingAsString(teXML, 'Proveedores.RegimenIVA', PROVEEDOR_REGIMEN_IVA);
 
   //CONTABILIDAD
-  if Assigned(AppFactuGES.EjercicioActivo) then
-    IGNORAR_CONTABILIDAD := 0
-  else
+//  if Assigned(AppFactuGES.EjercicioActivo) then
+//    IGNORAR_CONTABILIDAD := 0
+//  else
     IGNORAR_CONTABILIDAD := 1;
   TIENE_SUBCUENTA := 0;
   ES_ACREEDOR := 0;

Source/Modulos/Facturas de cliente/Model/uBizFacturasCliente.pas

@@ -266,9 +266,9 @@ begin
   TIENDA := AppFactuGES.TiendaActiva.NOMBRE;
 
   //CONTABILIDAD
-  if Assigned(AppFactuGES.EjercicioActivo) then
-    IGNORAR_CONTABILIDAD := 0
-  else
+//  if Assigned(AppFactuGES.EjercicioActivo) then
+//    IGNORAR_CONTABILIDAD := 0
+//  else
     IGNORAR_CONTABILIDAD := 1;
 end;
 

Source/Modulos/Facturas de proveedor/Model/uBizFacturasProveedor.pas

@@ -291,9 +291,9 @@ begin
   TIENDA := AppFactuGES.TiendaActiva.NOMBRE;
 
   //CONTABILIDAD
-  if Assigned(AppFactuGES.EjercicioActivo) then
-    IGNORAR_CONTABILIDAD := 0
-  else
+//  if Assigned(AppFactuGES.EjercicioActivo) then
+//    IGNORAR_CONTABILIDAD := 0
+//  else
     IGNORAR_CONTABILIDAD := 1;
 end;
 

Source/Modulos/Recibos de cliente/Model/uBizPagosCliente.pas

@@ -67,9 +67,9 @@ end;
 procedure TBizPagosCliente.IniciarValoresIBizPagosClienteNuevo;
 begin
   //CONTABILIDAD
-  if Assigned(AppFactuGES.EjercicioActivo) then
-    IGNORAR_CONTABILIDAD := 0
-  else
+//  if Assigned(AppFactuGES.EjercicioActivo) then
+//    IGNORAR_CONTABILIDAD := 0
+//  else
     IGNORAR_CONTABILIDAD := 1;
 end;
 

Source/Modulos/Recibos de proveedor/Model/uBizPagosProveedor.pas

@@ -67,9 +67,9 @@ end;
 procedure TBizPagosProveedor.IniciarValoresPagosProveedorNuevo;
 begin
   //CONTABILIDAD
-  if Assigned(AppFactuGES.EjercicioActivo) then
-    IGNORAR_CONTABILIDAD := 0
-  else
+//  if Assigned(AppFactuGES.EjercicioActivo) then
+//    IGNORAR_CONTABILIDAD := 0
+//  else
     IGNORAR_CONTABILIDAD := 1;
 end;
 

Source/Servidor/FactuGES_Server.rc

@@ -16,7 +16,7 @@ BEGIN
               VALUE "FileVersion", "2.7.2.0\0"
               VALUE "ProductName", "FactuGES (Servidor)\0"
               VALUE "ProductVersion", "2.7.2.0\0"
-              VALUE "CompileDate", "jueves, 11 de febrero de 2016 10:52\0"
+              VALUE "CompileDate", "miércoles, 09 de marzo de 2016 18:07\0"
          END
     END
     BLOCK "VarFileInfo"