Patch level :10.0 1074
Files correlati :ca2.exe Ricompilazione Demo : [ ] Commento : movimenti analitici (dalla 5.0) controlli sullo sheet in uscita!! Servono in quanto, anche scrivendo cazzate, l'utente potrebbe registrare lo stesso il movimento cliccando su FINE e rispondendo SI alla successiva richiesta di conferma registrazione! (segnalazione di quei casinari di Dinamica) git-svn-id: svn://10.65.10.50/trunk@16809 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
d7fa3fbace
commit
ad959b630d
@ -7,7 +7,7 @@ int main(int argc, char** argv)
|
|||||||
const int r = (argc > 1) ? argv[1][1] - '0' : 0;
|
const int r = (argc > 1) ? argv[1][1] - '0' : 0;
|
||||||
switch (r)
|
switch (r)
|
||||||
{
|
{
|
||||||
case 1: ca2200(argc, argv); break; // ribaltamenti movimenti analitica
|
case 1: ca2200(argc, argv); break; // ripartizione movimenti analitica
|
||||||
case 2: ca2300(argc, argv); break; // ricalcolo saldi
|
case 2: ca2300(argc, argv); break; // ricalcolo saldi
|
||||||
default: ca2100(argc, argv); break; // gestione movimenti
|
default: ca2100(argc, argv); break; // gestione movimenti
|
||||||
}
|
}
|
||||||
|
@ -481,6 +481,24 @@ bool TMovanal_msk::on_field_event(TOperable_field& o, TField_event e, long jolly
|
|||||||
{
|
{
|
||||||
TImporto imp; row2imp(*row, imp);
|
TImporto imp; row2imp(*row, imp);
|
||||||
totrig += imp;
|
totrig += imp;
|
||||||
|
|
||||||
|
//controlli sullo sheet in uscita!! Servono in quanto, anche scrivendo cazzate, l'utente potrebbe..
|
||||||
|
//..registrare lo stesso il movimento cliccando su FINE e rispondendo SI alla successiva richiesta..
|
||||||
|
//..di conferma registrazione!
|
||||||
|
if (sf.dirty())
|
||||||
|
{
|
||||||
|
sf.check_row(i, 1);
|
||||||
|
TMask& rm = sf.sheet_mask();
|
||||||
|
FOR_EACH_MASK_FIELD(rm, j, fld)
|
||||||
|
{
|
||||||
|
if (fld->has_check() && !fld->check(FINAL_CHECK))
|
||||||
|
{
|
||||||
|
TString msg;
|
||||||
|
msg << TR("Valore errato nel campo ") << fld->prompt();
|
||||||
|
return error_box(msg);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
if (totrig != totdoc)
|
if (totrig != totdoc)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user