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

git-svn-id: svn://10.65.10.50/branches/R_10_00@23033 c028cbd2-c16b-5b4b-a496-9718f37d4682

Browse Source
This commit is contained in:
guy 2015-02-04 10:32:42 +00:00
parent ff829d22f6
commit d689b2fdf0
1 changed files with 16 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
lv/lv2500.cpp
View File

@ -1339,7 +1339,7 @@ void TFatturazione_lavanderie::post_process(TLista_documenti& doc_out, TLista_do
for(int h = doc.physical_rows(); h > 0; h--)
{
TRiga_documento& rdoc = doc[h];
if (rdoc.get(RDOC_DESCR).empty() || ((rdoc.imponibile() == ZERO && rdoc.get_real(RDOC_QTA) == ZERO)))
if (rdoc.get(RDOC_DESCR).empty() || ((rdoc.imponibile().is_zero() && rdoc.get_real(RDOC_QTA).is_zero())))
doc.destroy_row(h, true);
}
}
@ -1676,7 +1676,7 @@ void TFatturazione_lavanderie::create_row(TDocumento& doc_out, const TRiga_docum
//ELABORA: metodo che esegue alcune operazioni prliminari, quali settare la data elaborazione e trovare i campi
//in base ai quali è possibile raggruppare le righe documetno, e poi chiama l'elaborazione standard per la fatturazione
bool TFatturazione_lavanderie::elabora(TLista_documenti& doc_in, TLista_documenti& doc_out,
const TDate& data_elab, bool interattivo)
const TDate& data_elab, bool interattivo)
{
_data_elab = data_elab;
campi_raggruppamento_righe(_campi_raggruppamento);
@ -1747,17 +1747,16 @@ 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);
TProgress_indicator pi(contr.items(), TR("Elaborazione Nolo", true);
for(bool ok = contr.move_first(); ok; ok = contr.move_next())
{
pi.set_text(TR("Elaborazione Nolo"));
if (!pi.addstatus(1))
if (!pi.add_status())
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())
const TDate data_scad_contr = contr.get(LVCONDV_DATASC).as_date();
if (data_scad_contr.ok())
if (_msk->get_date(F_DADATA) < contr.get(LVCONDV_DATAIN).as_date() || _msk->get_date(F_ADATA) > data_scad_contr)
continue;
//scarto tutti quelli che non sono in periodo di fatturazione corretto
@ -1768,7 +1767,7 @@ void TFatturazione_lav_app::genera_bolle_nolo(TAssoc_array& cliela, TFatturazion
if (contr.get(LVCONDV_FATTSOSP).as_bool())
continue;
if(cliela.is_key(contr.get(LVCONDV_CODCF).as_string()))
if (cliela.is_key(contr.get(LVCONDV_CODCF).as_string()))
continue;
TDocumento *pdoc= new TDocumento('D', _msk->get_date(F_DATAFAT).year(), codnum, 0);
@ -1904,7 +1903,7 @@ void TFatturazione_lav_app::genera_bolle_nolo(TAssoc_array& cliela, TFatturazion
rdoc.put(RDOC_CODART, riga.get(LVRCONDV_CODART));
rdoc.put(RDOC_CODARTMAG, riga.get(LVRCONDV_CODART));
real r = UNO;
if(tipoforf == 3 || tipoforf == 4)
if (tipoforf == 3 || tipoforf == 4)
r = ZERO;
rdoc.put(RDOC_QTA, r);
rdoc.put(RDOC_QTAGG1, r);
@ -2191,7 +2190,7 @@ void TFatturazione_lav_app::main_loop()
TISAM_recordset recset(query);
recset.set_var("#DAL", dal);
recset.set_var("#AL", al);
TProgind pi(recset.items(), TR("Fatturazione"), true, true);
TProgress_monitor pi(recset.items(), TR("Fatturazione"), true);
long last_clifo = 0;
int numdocgen = 0;
int numdocscart = 0;
@ -2218,14 +2217,14 @@ void TFatturazione_lav_app::main_loop()
last_clifo=clifo;
}
if (!pi.addstatus(1))
if (!pi.add_status())
break;
//se non è l'ultimo cliente, allora:
if (clifo != lastcli)
{
//se effettivamente devo elaborare delle bolle per questo cliente, allora:
if (docsin.items()!= 0)
if (docsin.items() > 0)
{
//elaboro tutti i documenti, li salvo nei file di Campo e svuoto le TList_file
elab.put("B15", 'X');
@ -2240,11 +2239,11 @@ void TFatturazione_lav_app::main_loop()
tmp << lastcli;
cliela.add(tmp, tmp);
}
else if (!_solototali && docsout.items() == 0) //il messaggio deve comparire solo se non ho generato fatture
else if (!_solototali) //il messaggio deve comparire solo se non ho generato fatture
{
key.format("C|%ld", lastcli);
TString str;
str << "Cli. " << lastcli << ' ' << cache().get(LF_CLIFO, key, CLI_RICALT) << " non ha generato la fattura pur avendo bolle";
str << "Cli. " << lastcli << ' ' << cache().get(LF_CLIFO, key, CLI_RICALT) << TR(" non ha generato la fattura pur avendo bolle");
_log->log(0, str);
numdocscart++;
}
@ -2421,7 +2420,8 @@ void TFatturazione_lav_app::main_loop()
space = false;
TString msg(" Cli.");
msg << clifo << " " << clirec.get(CLI_RICALT) << "Bolla " << docrec.get(DOC_CODNUM) << ' ' << docrec.get(DOC_TIPODOC) << ' ' << docrec.get(DOC_NDOC) << " del " << docrec.get(DOC_DATADOC) << " aggiornata la testata ";
msg << clifo << " " << clirec.get(CLI_RICALT) << "Bolla " << docrec.get(DOC_CODNUM) << ' ' << docrec.get(DOC_TIPODOC)
<< ' ' << docrec.get(DOC_NDOC) << " del " << docrec.get(DOC_DATADOC) << " aggiornata la testata ";
_log->log(0, msg);
}
}