root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : no patch

Browse Source 
Files correlati     : si0.exe
Ricompilazione Demo : [ ]
Commento            :
vedi sopra


git-svn-id: svn://10.65.10.50/trunk@9973 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2001-12-20 20:09:33 +00:00
parent ab3d672d3b
commit 8fedbbef35
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
si/si0100.cpp
View File

@ -234,7 +234,7 @@ int si0100(int argc, char* argv[])
bool TImport::localita2comune(const TString & caporig, const TString & localita, TString & codice) bool TImport::localita2comune(const TString & caporig, const TString & localita, TString & codice)
{ {
TLocalisamfile comuni (LF_COMUNI); TLocalisamfile comuni (LF_COMUNI);
TString16 cap = caporig; TString cap(caporig);
bool found = FALSE; bool found = FALSE;
if (cap.mid(2,1) == "1") if (cap.mid(2,1) == "1")
@ -276,8 +276,8 @@ void TImport::update_cli(TCli_file & in, TRecord_text & r, TLocalisamfile & cli)
} }
cli.put("RAGSOC", in.get_field(r, 2)); cli.put("RAGSOC", in.get_field(r, 2));
TString80 ind(in.get_field(r, 3)); TString ind(in.get_field(r, 3));
TString80 loc; TString loc;
int p = ind.find('-'); int p = ind.find('-');
if (p > 0) if (p > 0)
@ -298,14 +298,14 @@ void TImport::update_cli(TCli_file & in, TRecord_text & r, TLocalisamfile & cli)
else else
cli.put("INDCF", ind.left(35)); cli.put("INDCF", ind.left(35));
TString16 cap(in.get_field(r, 4)); TString cap(in.get_field(r, 4));
cli.put("CAPCF", cap); cli.put("CAPCF", cap);
cli.put("COFI", in.get_field(r, 6)); cli.put("COFI", in.get_field(r, 6));
cli.put("PAIV", in.get_field(r, 7)); cli.put("PAIV", in.get_field(r, 7));
TString80 localita(in.get_field(r, 8)); TString localita(in.get_field(r, 8));
TString16 codice; TString codice;
if (localita2comune(cap, localita, codice) == TRUE) if (localita2comune(cap, localita, codice) == TRUE)
localita = ""; localita = "";
@ -372,7 +372,7 @@ void TImport::update_doc(TPag_file & in, TRecord_text & r, TDocumento &doc, cons
riga.put("CODART", cod); riga.put("CODART", cod);
riga.put("CODARTMAG", cod); riga.put("CODARTMAG", cod);
TString80 descr = cache().get(LF_ANAMAG, cod, "DESCR"); TString descr = cache().get(LF_ANAMAG, cod, "DESCR");
riga.put("DESCR", descr); riga.put("DESCR", descr);
riga.put("CHECKED", "X"); riga.put("CHECKED", "X");