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

Correzione MI3481.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4015 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-12-17 16:04:20 +00:00
parent ce12ec144d
commit 52f005ea2a
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
cg/cg4400.cpp
View File

@ -3455,6 +3455,7 @@ bool CG4400_application::stampa_registri_IVA(const TMask& m)
TString16 codtab, cod_lib_un; TString16 codtab, cod_lib_un;
int anno; int anno;
TDate sca_vid; TDate sca_vid;
bool one_printed = FALSE; // Flag per vedere se ha stampato almeno un registro (solo per rif. al libro giornale)
for (_tabreg->first(); !_tabreg->eof(); _tabreg->next()) for (_tabreg->first(); !_tabreg->eof(); _tabreg->next())
{ {
_tipo_reg = _tabreg->get_int("I0"); _tipo_reg = _tabreg->get_int("I0");
@ -3496,6 +3497,7 @@ bool CG4400_application::stampa_registri_IVA(const TMask& m)
_tabreg->readat(rec); _tabreg->readat(rec);
if (!trovato) if (!trovato)
continue; continue;
else one_printed = TRUE;
} }
if (_tipo_stampa == 3) //stampa su libro unico if (_tipo_stampa == 3) //stampa su libro unico
{ {
@ -3590,6 +3592,10 @@ bool CG4400_application::stampa_registri_IVA(const TMask& m)
} }
} }
} //for } //for
if (_tipo_stampa == 4 && !one_printed) // stampa con rif libro giornale
message_box("Ditta %ld: nessun registro soddisfa i parametri indicati", _ditta);
if (msg) if (msg)
//if ( (_tipo_stampa != 3) || (_tipo_stampa == 3 && _fino_a_mese == 1 && _selected.ones() == 1L) ) //il messaggio seguente, nel caso di stampa su libro unico, //if ( (_tipo_stampa != 3) || (_tipo_stampa == 3 && _fino_a_mese == 1 && _selected.ones() == 1L) ) //il messaggio seguente, nel caso di stampa su libro unico,
if(_tipo_stampa == 3 && _fino_a_mese == 1 && _selected.ones() == 1L) if(_tipo_stampa == 3 && _fino_a_mese == 1 && _selected.ones() == 1L)