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

Corretta la chiamata alla warning_message() per nuove librerie XI.

Browse Source 
Corretto errore MI1089.


git-svn-id: svn://10.65.10.50/trunk@2876 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-05-20 14:44:33 +00:00
parent 25ee276bea
commit 8eeadc669e
1 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
sc/sc2401.cpp
View File

@ -24,7 +24,13 @@ bool TESSL_mask::codprof_handler(TMask_field& f, KEY k)
e.check_type(CHECK_NONE);
if (k == K_ENTER && !ok)
return f.error_box(f.warning());
{
if (f.is_editable())
{
TEditable_field& ef = (TEditable_field&) f;
return f.error_box(ef.get_warning());
}
}
}
return TRUE;
}
@ -548,17 +554,11 @@ void TESSL_array::add_row(const TRiga_partite& row)
}
TImporto diffcam(row.importo(FALSE, 0x4));
if (!diffcam.is_zero())
if (!diffcam.is_zero() && !in_valuta)
{
TESSL_row& r = new_row(row, data_pag, TImporto('D', ZERO), 3);
r.descrizione(form().describe(PEC_DIFFCAM));
if (in_valuta)
{
diffcam.normalize(sezione);
r.importo_in_lire(diffcam.valore());
}
else
r.importo(diffcam);
r.importo(diffcam);
}
}
}
@ -908,6 +908,8 @@ void TESSL_form::print_total(int riga, const THash_object& o)
TForm_item& bimplire = body.find_field(PEC_IMPLIRE);
implire.set_x(bimplire.x());
implire.width() = bimplire.width();
if (bimplire.shown()) implire.show();
else implire.hide();
}
modify_picture(implire,old_pictures,FALSE);
implire.set(t.importo_lire().string());