From 57f2cb47a32e71539e49fd084538c62b9e8c3805 Mon Sep 17 00:00:00 2001 From: alex Date: Mon, 21 Jan 2002 15:32:54 +0000 Subject: [PATCH] Patch level : aga 07 no patch Files correlati : si0.exe Ricompilazione Demo : [ ] Commento : Corretto errore su trasferimento comuni dei clienti git-svn-id: svn://10.65.10.50/trunk@10019 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- si/si0100.cpp | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/si/si0100.cpp b/si/si0100.cpp index 8ac334e8e..9ba3a0c5b 100755 --- a/si/si0100.cpp +++ b/si/si0100.cpp @@ -255,7 +255,7 @@ bool TImport::localita2comune(const TString & caporig, const TString & localita, if (comuni.curr() != com) break; - found = localita.left(3) == comuni.get("DENCOM").left(3); + found = localita.compare(comuni.get("DENCOM"), 3, FALSE) == 0; if (found) codice = comuni.get("COM"); } @@ -310,7 +310,11 @@ void TImport::update_cli(TCli_file & in, TRecord_text & r, TLocalisamfile & cli) if (localita2comune(cap, localita, codice) == TRUE) localita = ""; - localita.insert(loc); + if (loc.not_empty()) + { + localita.insert(" "); + localita.insert(loc); + } cli.put("COMCF", codice); cli.put("LOCALITACF", localita);