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

Correzioni alla lista documenti (totale imponibili)

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4261 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-04-04 10:09:40 +00:00
parent e8ee026285
commit b8c79b62d1
2 changed files with 14 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ve/listadoc.frm
View File

@ -90,7 +90,7 @@ END
STRINGA 12 10 STRINGA 12 10
BEGIN BEGIN
KEY "Intestazione (Imponibile)" KEY "Intestazione (Imponibile)"
PROMPT 86 4 "Imponibile" PROMPT 91 4 "Imponibile"
END END
STRINGA 13 10 STRINGA 13 10
@ -174,9 +174,10 @@ END
NUMBER 24 15 NUMBER 24 15
BEGIN BEGIN
KEY "Totale imponibile (senza spese)" KEY "Totale imponibile (al netto delle spese)"
PROMPT 86 1 "" PROMPT 86 1 ""
MESSAGE _TOTIMPONIBILI,0 // Il selettore 0 restituisce il totale imponibili meno le spese
MESSAGE _TOTIMPONIBILI,1
PICTURE "###.###.###.###" PICTURE "###.###.###.###"
END END

16
ve/ve1100.cpp
View File

@ -889,14 +889,14 @@ 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
// se selettore vale 0 restituisce il tot. imponibili meno le spese
// 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());
real r = _doc->tot_imponibili(sel); real x = _doc->tot_imponibili(sel);
if (sel == 0) r -= _doc->spese();
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);
@ -1254,7 +1254,11 @@ bool TStampaDoc_application::select()
{ {
TMask m("ve1100a"); TMask m("ve1100a");
if (_is_lista) m.hide(F_NCOPIE); if (_is_lista)
{
m.hide(F_NCOPIE);
m.set_caption("Lista Documenti");
}
TString wdate; TString wdate;
m.set_handler(F_DA_DATADOC, date2num_handler); m.set_handler(F_DA_DATADOC, date2num_handler);
m.set_handler(F_A_DATADOC, date2num_handler); m.set_handler(F_A_DATADOC, date2num_handler);