From 7409d3be977d0828693530eaec56c4e6dee43b69 Mon Sep 17 00:00:00 2001
From: villa <villa@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 29 May 1995 10:40:50 +0000
Subject: [PATCH] Errore MI3050 estrazione deleghe probabilmente corretto (se
 la traduzione italiana dal vladimirese e' giusta)

git-svn-id: svn://10.65.10.50/trunk@1406 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 cg/cg4302.cpp | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/cg/cg4302.cpp b/cg/cg4302.cpp
index 64c6f2db9..abe32df62 100755
--- a/cg/cg4302.cpp
+++ b/cg/cg4302.cpp
@@ -464,8 +464,10 @@ bool TLiquidazione_app::look_del(int month, int type, bool create)
   if (!ok && create)
   {
     _del->zero();
-    _del->put("CODTAB",ctab);
-
+    _del->put("CODTAB",ctab);  
+  }
+  if (create)
+  {
     // codici ABI e CAB da anagrafica ditte
     TString abi = _nditte->lfile().get("ABIBAN");
     TString cab = _nditte->lfile().get("CABBAN");    
@@ -505,7 +507,9 @@ bool TLiquidazione_app::look_del(int month, int type, bool create)
       ctri = _freqviva == "M" ? 6000 + month : 6030 + (month/3); 
     
     _del->put("S6", format("%d",ctri));
-    _del->write();    
+
+    if (!ok) _del->write();
+    else _del->rewrite();    
   }
   return ok;
 }