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

Patch level : 12.0 370

Browse Source 
Files correlati     : tc3.exe tcmenu.men tc3100a.uml tc3800a.uml tctbrca.uml
                      tctbrco.uml tctbriv.uml tctbrpg.uml tctbrre.uml tctbrvl.uml

POrgramma di ricezione da Ericsoft versione 1


git-svn-id: svn://10.65.10.50/branches/R_10_00@23721 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
bonazzi 2017-04-01 15:10:02 +00:00
parent d9083e9452
commit 8ec55f66a3
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/tc/tc3100.cpp
View File

@ -598,9 +598,10 @@ void TImportaEricsoft::upload_cli(const TFilename& file, TLog_report& log)
*/
clifo.put(CLI_COFI, cofi); //cod. fisc.
}
const TString & ricalt = clifo.get(CLI_RICALT);
if (!clifo.get(CLI_RICALT).starts_with("E"))
clifo.put(CLI_RICALT, key); //ragsoc
clifo.put(CLI_RICALT, key); //ragsoc
TString str;
str << "Il Cliente codice (" << clifo.get(CLI_CODCF) <<") " << ragsoc << " ";
@ -850,7 +851,7 @@ void TImportaEricsoft::upload_mov(const TFilename& file, TLog_report& log)
clifo.setkey(6);
clifo.zero();
clifo.put(CLI_TIPOCF, "C");
clifo.put(CLI_TIPOCF, tipocf);
clifo.put(CLI_RICALT, key);
if (clifo.read() == NOERR)
codcf = clifo.get_long(CLI_CODCF);
@ -1014,7 +1015,7 @@ void TImportaEricsoft::upload_mov(const TFilename& file, TLog_report& log)
ini->set(MOV_CAMBIO, cambio.string());
}
}
else
/* else
if (nriga == 0 && tipocf.full())
{
ini->set_paragraph(format("%d,%d",LF_RMOV, ++nriga));
@ -1029,7 +1030,7 @@ void TImportaEricsoft::upload_mov(const TFilename& file, TLog_report& log)
ini->set(RMV_CONTO, conto);
ini->set(RMV_SOTTOCONTO, sottoconto);
ini->set(RMV_ROWTYPE, "T");
}
} */
}
if (numreg > 0L)
{