Patch level : 10.0 patch 529

Files correlati     : lv2
Ricompilazione Demo : [ ]
Commento            :
Aggiunti messaggi di numero documenti generati e generazione terminata alla fatturazione


git-svn-id: svn://10.65.10.50/trunk@19674 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2009-11-27 09:20:11 +00:00
parent 85094049cc
commit cf3716e293

View File

@ -767,12 +767,12 @@ class TFatturazione_lav_app: public TSkeleton_application
protected:
virtual void main_loop();
void genera_bolle_nolo(TAssoc_array& cliela, TFatturazione_lavanderie& elab);
void genera_bolle_nolo(TAssoc_array& cliela, TFatturazione_lavanderie& elab, int& numdocgen);
bool controlli_preliminari();
};
//GENERA_BOLLE_NOLO: metodo che genera le fatture di solo nolo per quei clienti a cui non è stato consegnato niente
void TFatturazione_lav_app::genera_bolle_nolo(TAssoc_array& cliela, TFatturazione_lavanderie& elab)
void TFatturazione_lav_app::genera_bolle_nolo(TAssoc_array& cliela, TFatturazione_lavanderie& elab, int& numdocgen)
{
TString4 codnum = ini_get_string(CONFIG_DITTA, "lv", "NUM_GEN");
TString4 tipodoc = ini_get_string(CONFIG_DITTA, "lv", "TIPODOC_GEN");
@ -793,8 +793,14 @@ void TFatturazione_lav_app::genera_bolle_nolo(TAssoc_array& cliela, TFatturazion
TLista_documenti doc_in;
TLista_documenti doc_out;
TProgind pi(contr.items(), "Fatturazione", true, true);
for(bool ok = contr.move_first(); ok; ok = contr.move_next())
{
pi.set_text(TR("Elaborazione Nolo"));
if (!pi.addstatus(1))
break;
//scarto i contratti scaduti
if (contr.get(LVCONDV_DATASC).as_date().ok())
if (_msk->get_date(F_DADATA) <= contr.get(LVCONDV_DATAIN).as_date() || _msk->get_date(F_ADATA) >= contr.get(LVCONDV_DATASC).as_date())
@ -867,6 +873,7 @@ void TFatturazione_lav_app::genera_bolle_nolo(TAssoc_array& cliela, TFatturazion
{
elab.elabora(doc_in, doc_out, _msk->get_date(F_DATAFAT));
doc_out.write();
numdocgen += doc_out.items();
}
doc_out.destroy(-1);
@ -1065,6 +1072,7 @@ void TFatturazione_lav_app::main_loop()
}
}
int numdocgen;
//se ho dei documenti in lista li elaboro e poi svuoto le TList_file
if (docsin.items() != 0)
{
@ -1072,13 +1080,25 @@ void TFatturazione_lav_app::main_loop()
elab.put("B15", true); //forzo la descrizione abbreviata
elab.elabora(docsin, docsout, datafat);
numdocgen = docsout.items();
docsout.write();
docsout.destroy(-1);
docsin.rewrite();
docsin.destroy(-1);
}
genera_bolle_nolo(cliela, elab);
genera_bolle_nolo(cliela, elab, numdocgen);
TString str;
if (numdocgen > 1 || numdocgen == 0)
str << "Sono state generate " << numdocgen << " fatture";
else
str << "E' stata generata " << numdocgen << " fattura";
message_box(str);
message_box(TR("Elaborazione terminata"));
}
}