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@23719 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
bonazzi 2017-03-31 22:28:02 +00:00
parent c90cbbd16c
commit 79e2220486
1 changed files with 17 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/tc/tc3100.cpp
View File

@ -867,7 +867,7 @@ void TImportaEricsoft::upload_mov(const TFilename& file, TLog_report& log)
const TString4 sezione = s.get(2).as_int() == 0 ? "D" : "A";
_ricl->decode(TAB_RICCONTI, s.get(3).as_string(), gruppo, conto, sottoconto);
long codcf = s.get(5).as_int();
TString4 tipocf = " ";
TString4 tipocf;
switch (s.get(4).as_int())
{
@ -1041,6 +1041,22 @@ void TImportaEricsoft::upload_mov(const TFilename& file, TLog_report& log)
ini->set(MOV_CAMBIO, cambio.string());
}
}
else
if (nriga == 0 && tipocf.full())
{
ini->set_paragraph(format("%d,%d",LF_RMOV, ++nriga));
ini->set(RMV_ANNOES, _esc.esercizio(datacomp).codice());
ini->set(RMV_DATAREG, datareg);
ini->set(RMV_NUMRIG, nriga);
// ini->set(RMV_SEZIONE, sezione);
ini->set(RMV_DESCR, descr);
// ini->set(RMV_IMPORTO, importo.string());
ini->set(RMV_TIPOC, tipocf);
ini->set(RMV_GRUPPO, gruppo);
ini->set(RMV_CONTO, conto);
ini->set(RMV_SOTTOCONTO, sottoconto);
ini->set(RMV_ROWTYPE, "T");
}
}
if (numreg > 0L)
{