Crretti errori aga076 -aga082

git-svn-id: svn://10.65.10.50/trunk@4468 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-05-30 17:21:46 +00:00
parent 19a79e255a
commit d08b15a0df

View File

@ -719,7 +719,11 @@ void TGenerazioneEffetti_app::generate_bill() // bill in inglese significa anche
}
}
if (_pagamento) delete _pagamento;
if (_pagamento)
{
delete _pagamento;
_pagamento = NULL;
}
if (good() && _can_write)
change_doc_status();
}
@ -856,7 +860,11 @@ void TGenerazioneEffetti_app::group_bills()
riga.put(REFF_IMPORTOVAL,imprataval);
}
} // Ciclo sulle scadenze
if (_pagamento) delete _pagamento;
if (_pagamento)
{
delete _pagamento;
_pagamento = NULL;
}
} // Ciclo sui documenti di questo gruppo
offset=_effetti_array.items();
} // Ciclo sui gruppi
@ -946,14 +954,14 @@ void TGenerazioneEffetti_app::generate()
if (good() && _can_write)
change_doc_status();
}
else
{
// else
// {
// ATTENZIONE!: se non ha ancora cominciato a generare effetti, eventuali
// documenti con tipo o stato differenti vengono semplicemente scartati
// senza segnalare errori
if (_total_bills > 0)
_error = elaboration_error;
}
// if (_total_bills > 0)
// _error = elaboration_error;
// }
if (!good())
display_error();
}