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

Patch level :10.0 patch 258

Browse Source 
Files correlati     : lv3
Ricompilazione Demo : [ ]
Commento            :
Aggiunto warning se ritiro > dotazione temporanea


git-svn-id: svn://10.65.10.50/trunk@18502 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2009-03-12 12:10:59 +00:00
parent ced5bcadbc
commit 337040d543
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lv/lv3100.cpp
View File

@ -557,6 +557,12 @@ bool TGestione_bolle_msk::lv_ritirato_handler(TMask_field& f, KEY k)
{ {
TMask& msk = f.mask(); TMask& msk = f.mask();
real ritirato = f.get(); real ritirato = f.get();
real dotod = msk.get_real(FR_JOLLY1);
if (ritirato > dotod)
warning_box(TR("ATTENZIONE: stai ritirando un quantitativo maggiore della dotazione!"));
TSheet_field* sheet = msk.get_sheet(); TSheet_field* sheet = msk.get_sheet();
TDocumento_mask& dmask = (TDocumento_mask&)sheet->mask(); TDocumento_mask& dmask = (TDocumento_mask&)sheet->mask();
TDocumento& doc = dmask.doc(); TDocumento& doc = dmask.doc();
@ -564,6 +570,7 @@ bool TGestione_bolle_msk::lv_ritirato_handler(TMask_field& f, KEY k)
rdoc.put(RDOC_QTAGG1,ritirato); rdoc.put(RDOC_QTAGG1,ritirato);
if (msk.field(FR_QTA).enabled() && rdoc.get(RDOC_QTA).empty()) if (msk.field(FR_QTA).enabled() && rdoc.get(RDOC_QTA).empty())
{ {
real consegnato = ritirato; real consegnato = ritirato;
@ -574,7 +581,7 @@ bool TGestione_bolle_msk::lv_ritirato_handler(TMask_field& f, KEY k)
//gestione campi dotazione odierna e dotazione temporanea //gestione campi dotazione odierna e dotazione temporanea
TGiac_per_cli& giac = gbapp().giacenza(); TGiac_per_cli& giac = gbapp().giacenza();
real dotod = giac.giac_att(rdoc, true); dotod = giac.giac_att(rdoc, true);
msk.set(FR_JOLLY1, dotod); msk.set(FR_JOLLY1, dotod);
rdoc.put("DOTOD", dotod); rdoc.put("DOTOD", dotod);