From c7ec8445a10b1669db31616a1a36199ebe4be4ff Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Tue, 2 Dec 2008 17:23:33 +0000
Subject: [PATCH] arreglo de duplicar presupuestos para que no copie la factura
 relacionada del presupuesto si la tuviera

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@791 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 .../uPresupuestosClienteController.pas        |   5 ++++-
 Source/Servidor/FactuGES_Server.RES           | Bin 23208 -> 23208 bytes
 Source/Servidor/FactuGES_Server.rc            |   2 +-
 3 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas b/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas
index 5d605092..455dc6c8 100644
--- a/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteController.pas	
@@ -432,9 +432,12 @@ begin
       USUARIO := AppFactuGES.UsuarioActivo.UserName;
       FECHA_PRESUPUESTO := DateOf(Now);
       INCIDENCIAS_ACTIVAS := 0;
-      DataTable.FieldByName('INCIDENCIAS').AsVariant := Null;
+      INCIDENCIASIsNull := True;
+      ID_FACTURAIsNull := True;
+      FECHA_DECISIONIsNull := True;
       REFERENCIA := '';
       SITUACION := SITUACION_PRESUPUESTO_PENDIENTE;
+
     end;
     Result.Post;
   finally
diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index 7e7c906b2914d1d1e4167ffb362ce9215a22f4a6..4e25af80bb85440c4094e64269f6f14bb1623e95 100644
GIT binary patch
delta 65
zcmZ3nm2t&Z#tjjXj69PgBb6CnOs<WrX3k+yoBTUcRyda-k)ep8gdvrom_dg@fx&>m
UXtHLMKDz~j6_9N>IWfu|0I>NH`Tzg`

delta 65
zcmZ3nm2t&Z#tjjXj9il=Bb6DSO|FfsX3k<zo%}meRxpR5lp&8Hm7$nHhe3hCfWdIG
Uc9cG+5rY+wZN|VbIWfu|0IPiwjsO4v

diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index 69d0094e..11bb107f 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -14,7 +14,7 @@ BEGIN
          BEGIN
               VALUE "FileVersion", "1.4.7.0\0"
               VALUE "ProductVersion", "1.4.7.0\0"
-              VALUE "CompileDate", "lunes, 01 de diciembre de 2008 12:06\0"
+              VALUE "CompileDate", "martes, 02 de diciembre de 2008 18:01\0"
          END
     END
     BLOCK "VarFileInfo"