Patch level : 10.0 patch 5??
Files correlati : lv2 Ricompilazione Demo : [ ] Commento : Se 5 su 5 vanno bene non mi deve proporre la domanda (SOLO DA LINEA DI COMANDO) Deve dire correttamente se la generazione è terminata o interrotta Corretta la gestione del _ndoc se parte da 0 Corretto l'avviso "Non è stato trovato alcun file da elaborare" git-svn-id: svn://10.65.10.50/trunk@19668 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
577c4772f1
commit
74c652bd52
@ -326,8 +326,8 @@ TObject* TAcquisizione_cache::key2obj(const char* key)
|
||||
<< "FROM PROVV=\"D\" ANNO=" << datadoc.year() << " CODNUM=\"" << _codnum << "\"\n"
|
||||
<< "TO PROVV=\"D\" ANNO=" << datadoc.year() << " CODNUM=\"" << _codnum << "\"";
|
||||
TISAM_recordset sporco(query2);
|
||||
sporco.move_last();
|
||||
_ndoc = sporco.get(DOC_NDOC).as_int();
|
||||
if(sporco.move_last())
|
||||
_ndoc = sporco.get(DOC_NDOC).as_int();
|
||||
}
|
||||
|
||||
TString query = "USE DOC KEY 2\n";
|
||||
@ -826,6 +826,7 @@ bool TAcquisizione_lavanderie_app::transfer()
|
||||
//preparo la lista dei file che soddisfano la maschera in quella directory e li elaboro
|
||||
//tutti, altrimenti elaboro esattamente il file che è scritto sullo sheet
|
||||
bool elaborato = false;
|
||||
bool esiste = false;
|
||||
FOR_EACH_SHEET_ROW(sheet, r1, row1)
|
||||
{
|
||||
if(row1->full())
|
||||
@ -838,8 +839,6 @@ bool TAcquisizione_lavanderie_app::transfer()
|
||||
file.add(*row1);
|
||||
}
|
||||
|
||||
bool esiste = false;
|
||||
|
||||
if (file.find('*') >= 0 || file.find('?') >= 0)
|
||||
{
|
||||
TString_array lista_file;
|
||||
@ -875,16 +874,30 @@ bool TAcquisizione_lavanderie_app::transfer()
|
||||
{
|
||||
controlla_documenti(logrep, articoli, documenti);
|
||||
|
||||
bool genera = false;
|
||||
|
||||
if (nrsalt > 0)
|
||||
bool genera = true;
|
||||
|
||||
if (_auto == "A")
|
||||
{
|
||||
if (nrsalt > 0)
|
||||
{
|
||||
TString str;
|
||||
str << "Sono stati ricevuti " << nrighe << " record, di cui " << nrighe - nrsalt
|
||||
<< " sono stati elaborati correttamente" << " e " << nrsalt
|
||||
<< " ignorati.\nSi desidera procedere con la generazione dei buoni di ritiro?";
|
||||
|
||||
if (!yesno_box(str))
|
||||
genera = false;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
TString str;
|
||||
str << "Sono stati ricevuti " << nrighe << " record, di cui " << nrighe - nrsalt << " sono stati elaborati correttamente"
|
||||
<< " e " << nrsalt << " ignorati.\nSi desidera procedere con la generazione dei buoni di ritiro?";
|
||||
str << "Sono stati ricevuti " << nrighe << " record, di cui " << nrighe - nrsalt
|
||||
<< " sono stati elaborati correttamente" << " e " << nrsalt
|
||||
<< " ignorati.\nSi desidera procedere con la generazione dei buoni di ritiro?";
|
||||
|
||||
if (yesno_box(str))
|
||||
genera = true;
|
||||
if (!yesno_box(str))
|
||||
genera = false;
|
||||
}
|
||||
|
||||
if (nrsalt == 0 || genera)
|
||||
@ -941,23 +954,20 @@ bool TAcquisizione_lavanderie_app::transfer()
|
||||
}
|
||||
}
|
||||
|
||||
if (_auto == "A")
|
||||
_msk->send_key(K_SPACE, DLG_QUIT);
|
||||
else
|
||||
if (_auto != "A")
|
||||
{
|
||||
TReport_book buc;
|
||||
buc.add(logrep);
|
||||
if (buc.pages() > 0)
|
||||
buc.preview();
|
||||
|
||||
if (genera)
|
||||
message_box(TR("Generazione terminata"));
|
||||
else
|
||||
if (genera)
|
||||
message_box(TR("Generazione terminata"));
|
||||
else
|
||||
message_box(TR("Generazione interrotta"));
|
||||
_msk->send_key(K_SPACE, DLG_QUIT);
|
||||
message_box(TR("Generazione interrotta"));
|
||||
}
|
||||
_msk->send_key(K_SPACE, DLG_QUIT);
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user