Corretta stampa lista documenti per il tot. imponibili senza
spese. git-svn-id: svn://10.65.10.50/trunk@4212 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
b782412b34
commit
a31e8709cf
@ -174,9 +174,9 @@ END
|
|||||||
|
|
||||||
NUMBER 24 15
|
NUMBER 24 15
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "Totale imponibile"
|
KEY "Totale imponibile (senza spese)"
|
||||||
PROMPT 86 1 ""
|
PROMPT 86 1 ""
|
||||||
MESSAGE _TOTIMPONIBILI,1
|
MESSAGE _TOTIMPONIBILI,0
|
||||||
PICTURE "###.###.###.###"
|
PICTURE "###.###.###.###"
|
||||||
END
|
END
|
||||||
|
|
||||||
|
@ -890,13 +890,13 @@ bool TDocumento_form::validate(TForm_item &cf, TToken_string &s) {
|
|||||||
// sintassi: _TOTIMPONIBILI,<selettore>
|
// sintassi: _TOTIMPONIBILI,<selettore>
|
||||||
// dove: <selettore> funge da filtro per la somma degli imponibili
|
// dove: <selettore> funge da filtro per la somma degli imponibili
|
||||||
// vedi _RIEPILOGOIVA per la spiegazione dei filtri selettivi
|
// vedi _RIEPILOGOIVA per la spiegazione dei filtri selettivi
|
||||||
|
// In piu' il selettore 0 restituisce il tot imp. meno le spese.
|
||||||
byte sel = atoi(s.get());
|
byte sel = atoi(s.get());
|
||||||
valore = _doc->tot_imponibili(sel).string();
|
real r = _doc->tot_imponibili(sel);
|
||||||
|
if (sel == 0) r -= _doc->spese();
|
||||||
|
|
||||||
real x(valore);
|
if (r != 0.0)
|
||||||
TString picture(cf.picture());
|
valore = r.string(cf.picture()); // Riformatta il valore
|
||||||
if (x != 0.0)
|
|
||||||
valore = x.string(picture); // Riformatta il valore
|
|
||||||
else
|
else
|
||||||
valore = "";
|
valore = "";
|
||||||
cf.put_paragraph(valore);
|
cf.put_paragraph(valore);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user