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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
sistemato arrotondamento


git-svn-id: svn://10.65.10.50/trunk@19473 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2009-10-20 08:35:21 +00:00
parent d9e37bf8ce
commit a6822cc87f
2 changed files with 26 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
ve/ve2700.cpp
View File

@ -46,7 +46,7 @@ protected:
real get_price(TSheet_field& sf, const int row, const short dlg_id) const;
void set_price(TSheet_field& sf, const int row, const short dlg_id, real& price);
void set_price(const short fld_id, real& price);
void set_price(TMask_field& fld, real& price);
bool arrotonda(const short dlg_id, real& price);
void get_correct_grmerc(TString& grmerc, const bool asterisk) const;
@ -263,13 +263,13 @@ void TAggiorna_listini_edit_mask::set_price(TSheet_field& sf, const int row, con
}
void TAggiorna_listini_edit_mask::set_price(const short fld_id, real& price)
void TAggiorna_listini_edit_mask::set_price(TMask_field& fld, real& price)
{
const bool is_father_list = arrotonda(fld_id, price);
const bool is_father_list = arrotonda(fld.dlg(), price);
if (is_father_list)
set(fld_id, price.stringa());
fld.set(price.stringa());
else
set(fld_id, price.string());
fld.set(price.string());
}
@ -738,7 +738,7 @@ bool TAggiorna_listini_edit_mask::on_field_event(TOperable_field& o, TField_even
break;
case S2_PREZZO:
if (e == fe_modify)
if (e == fe_modify && jolly == 2)
{
//se il prezzo viene messo a 0 nel listino padre, si prepara ad eliminare l'articolo..
//..come se fosse premuto DLG_USER (vedi DLG_USER qui sotto)
@ -752,7 +752,7 @@ bool TAggiorna_listini_edit_mask::on_field_event(TOperable_field& o, TField_even
{
//per prima cosa sistema se stesso (è un padre ignobile!)
real father_price = o.get();
set_price(o.dlg(), father_price);
set_price(o, father_price);
//poi i figli
TMask& rowmask = o.mask(); //serve la maschera di riga! (sennò funziona solo sullo sheet)
@ -773,7 +773,7 @@ bool TAggiorna_listini_edit_mask::on_field_event(TOperable_field& o, TField_even
{
const real ricarico = sf_listini.cell(i - S2_LIST1, col_ricarichi);
real prezzo_figlio = father_price * (CENTO + ricarico) / CENTO;
set_price(i, prezzo_figlio);
set_price(rowmask.efield(i), prezzo_figlio);
}
}
}
@ -791,10 +791,10 @@ bool TAggiorna_listini_edit_mask::on_field_event(TOperable_field& o, TField_even
case S2_LIST8:
case S2_LIST9:
case S2_LIST10:
if (e == fe_modify)
if (e == fe_modify && jolly == 2)
{
real price = o.get();
set_price(o.dlg(), price);
set_price(o, price);
_ask_save = true;
}
break;

22
ve/ve2700a.uml
View File

@ -66,22 +66,22 @@ END
TEXT DLG_NULL
BEGIN
PROMPT 0 5 "1) In fase di ricerca listino padre saranno visualizzati solo quelli che hanno figli"
PROMPT 0 5 "1) In fase di ricerca listino padre saranno visualizzati solo quelli che hanno figli."
END
TEXT DLG_NULL
BEGIN
PROMPT 0 6 "2) Selezionare un gr/sotgr merceologico per avere i ricarichi collegati ai figli"
PROMPT 0 6 "2) Selezionare un gr/sotgr merceologico per avere i ricarichi collegati ai figli."
END
TEXT DLG_NULL
BEGIN
PROMPT 0 7 "3) Modificare ricarichi e/o prezzi degli articoli"
PROMPT 0 7 "3) Modificare ricarichi e/o prezzi degli articoli."
END
TEXT DLG_NULL
BEGIN
PROMPT 0 8 "4) Premere Applica per applicare i ricarichi alle righe selezionate"
PROMPT 0 8 "4) Premere Applica per applicare i ricarichi alle righe selezionate."
END
TEXT DLG_NULL
@ -101,7 +101,7 @@ END
TEXT DLG_NULL
BEGIN
PROMPT 0 12 " con il gr. merc. corrente in anagrafica)"
PROMPT 0 12 " con il gr. merc. corrente in anagrafica)."
END
TEXT DLG_NULL
@ -111,7 +111,17 @@ END
TEXT DLG_NULL
BEGIN
PROMPT 0 14 " questo nel listino padre l'articolo viene eliminato da tutti i listini"
PROMPT 0 14 " questo nel listino padre l'articolo viene eliminato da tutti i listini."
END
TEXT DLG_NULL
BEGIN
PROMPT 0 15 "7) Le variazioni di ricarico e arrotondamento sui figli sono memorizzate in fase "
END
TEXT DLG_NULL
BEGIN
PROMPT 0 16 " di salvataggio."
END
ENDPAGE