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

Patch level : 10.0 848

Browse Source 
Files correlati     :  lv4.exe
Ricompilazione Demo : [ ]
Commento            :

Contabilizzazione fatture da COGECO


git-svn-id: svn://10.65.10.50/branches/R_10_00@21207 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2010-11-30 08:27:00 +00:00
parent eaafbe86e6
commit 3ff3edbe7b
1 changed files with 20 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
lv/lv4500.cpp
View File

@ -341,7 +341,7 @@ protected:
const TString80 riclassifica_pconti();
TConfig* genera_testata(TImporta_fat_rec& recset, TFilename& tmpdir);
void genera_righe_iva(TImporta_fat_rec& recset, TConfig& conf, int nriga, const TCausale& cau);
void genera_righe_iva(TImporta_fat_rec& recset, TConfig& conf, int nriga, const TString& codcau);
void genera_rate(TImporta_fat_rec& recset, TConfig& conf, int nriga);
void elabora_file(const TFilename& tmpdir);
@ -441,20 +441,22 @@ TConfig* TImporta_fat_app::genera_testata(TImporta_fat_rec& recset, TFilename& t
}
//GENERA_RIGHE_IVA: genero le righe IVA
void TImporta_fat_app::genera_righe_iva(TImporta_fat_rec& recset, TConfig& conf, int nriga, const TCausale& cau)
void TImporta_fat_app::genera_righe_iva(TImporta_fat_rec& recset, TConfig& conf, int nriga, const TString& codcau)
{
const TDate datadoc = recset.get("I.DATADOC").as_date();
const int segno = segno_riga(recset.get("I.SEZIONE").as_string()[0], cau);
const char sezione = recset.get("I.SEZIONE").as_string()[0];
const TCausale cau(codcau);
const int segno = segno_riga(sezione, cau);
const TBill& conto = _codici->decodifica_conto(recset.get("I.CODMASTRO").as_int(), recset.get("I.CODCONTO").as_int());
TString paragraph;
paragraph.format("%d,%d", LF_RMOVIVA, nriga++);
paragraph.format("%d,%d", LF_RMOVIVA, ++nriga);
conf.set_paragraph(paragraph);
conf.set(RMI_ANNOES, datadoc.year());
conf.set(RMI_CODIVA, _msk->get_bool(F_DECCODIVA) ? atol(_codici->decodifica_codiva(recset.get("I.CODIVA").as_int())) : recset.get("I.CODIVA").as_int());
conf.set(RMI_IMPONIBILE, genera_real(recset.get("I.IMPONIBILE"), segno));
conf.set(RMI_IMPOSTA, genera_real(recset.get("I.IMPOSTA")));
conf.set(RMI_IMPOSTA, genera_real(recset.get("I.IMPOSTA"), segno));
conf.set(RMI_GRUPPO, conto.gruppo());
conf.set(RMI_CONTO, conto.conto());
conf.set(RMI_SOTTOCONTO, conto.sottoconto());
@ -464,7 +466,7 @@ void TImporta_fat_app::genera_righe_iva(TImporta_fat_rec& recset, TConfig& conf,
void TImporta_fat_app::genera_rate(TImporta_fat_rec& recset, TConfig& conf, int nriga)
{
TString paragraph;
paragraph.format("%d,%d", LF_RMOVIVA, nriga++);
paragraph.format("%d,%d", LF_RMOVIVA, ++nriga);
conf.set_paragraph(paragraph);
const TDate datadoc = recset.get("R.DATADOC").as_date();
@ -506,14 +508,14 @@ void TImporta_fat_app::transfer(const TFilename& file)
int nrigai, nrigar;
TProgind pi(recset.items(), "Importazione in corso...", true, true);
TString16 codcau;
for(bool ok = recset.move_first(); ok; ok = recset.move_next())
{
if (!pi.addstatus(1))
break;
const char tipomov = recset.get("TIPOMOV").as_string()[0];
const TCausale cau(recset.get("CODCAU").as_string());
const char tipomov = recset.get("TIPOMOV").as_string()[0];
switch(tipomov)
{
@ -521,12 +523,18 @@ void TImporta_fat_app::transfer(const TFilename& file)
{
if(configfile != NULL)
delete configfile;
codcau = recset.get("C.CODCAU").as_string();
configfile = genera_testata(recset, tmpdir); nrigai = nrigar = 0;
}
break;
case 'I': genera_righe_iva(recset, *configfile, nrigai, cau); break;
case 'R': genera_rate(recset, *configfile, nrigar); break;
default: break;
case 'I':
genera_righe_iva(recset, *configfile, nrigai, codcau);
break;
case 'R':
genera_rate(recset, *configfile, nrigar);
break;
default:
break;
}
}
@ -551,9 +559,7 @@ bool TImporta_fat_app::destroy()
void TImporta_fat_app::main_loop()
{
KEY tasto;
tasto = _msk->run();
if (tasto == K_ENTER)
if ( _msk->run() == K_ENTER)
{
//genero il nome del file da caricare
TFilename file = _msk->get(F_NAME);