Modifiche al programma di lista documenti (TOTALE IMPONIBILI).

git-svn-id: svn://10.65.10.50/trunk@4334 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-05-14 10:35:52 +00:00
parent 4a5c6edfb2
commit a550efbef2
2 changed files with 4 additions and 5 deletions

View File

@ -174,10 +174,9 @@ END
NUMBER 24 15
BEGIN
KEY "Totale imponibile (al netto delle spese)"
KEY "Totale imponibile (con spese)"
PROMPT 86 1 ""
// Il selettore 0 restituisce il totale imponibili meno le spese
MESSAGE _TOTIMPONIBILI,1
MESSAGE _TOTIMPONIBILI,0
PICTURE "###.###.###.###"
END

View File

@ -889,10 +889,10 @@ bool TDocumento_form::validate(TForm_item &cf, TToken_string &s) {
{
// sintassi: _TOTIMPONIBILI,<selettore>
// dove: <selettore> funge da filtro per la somma degli imponibili
// se selettore vale 0 restituisce il tot. imponibili meno le spese
// se selettore vale 0 restituisce il tot. imponibili con le spese
// vedi _RIEPILOGOIVA per la spiegazione dei filtri selettivi
byte sel = atoi(s.get());
real x = _doc->tot_imponibili(sel);
real x = sel == 0 ? _doc->imponibile(TRUE): _doc->tot_imponibili(sel);
TString picture(cf.picture());
if (x != 0.0)