Patch level : 10.0 patch 238
Files correlati : lv3, lvbollac Ricompilazione Demo : [ ] Commento : Con questa modifica colora sempre di rosso tutte le righe che hanno dot temp scaduta e scrive nel campo dotazione temporanea solo se la riga documento è una riga di dotazione temporanea git-svn-id: svn://10.65.10.50/trunk@18246 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
d13f9bb050
commit
ad120c84c3
@ -459,6 +459,7 @@ bool TGestione_bolle_msk::lv_ritirato_handler(TMask_field& f, KEY k)
|
|||||||
real ritirato = f.get();
|
real ritirato = f.get();
|
||||||
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();
|
||||||
TRiga_documento& rdoc = dmask.doc()[sheet->selected()+1];
|
TRiga_documento& rdoc = dmask.doc()[sheet->selected()+1];
|
||||||
|
|
||||||
rdoc.put(RDOC_QTAGG1,ritirato);
|
rdoc.put(RDOC_QTAGG1,ritirato);
|
||||||
@ -474,10 +475,14 @@ 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);
|
real dotod = giac.giac_att(rdoc, true);
|
||||||
real dotmp = giac.giac_att(rdoc, false);
|
|
||||||
|
|
||||||
msk.set(FR_JOLLY1, dotod);
|
msk.set(FR_JOLLY1, dotod);
|
||||||
msk.set(FR_JOLLY2, dotmp);
|
|
||||||
|
//scrivo la dotazione temporanea solo se esistono le date di dotazione temporanea e questa non è scaduta
|
||||||
|
if (rdoc.get_date("DADATATMP").ok() && rdoc.get_date("ADATATMP").ok() && rdoc.get_date("ADATATMP") <= doc.get_date(DOC_DATADOC))
|
||||||
|
{
|
||||||
|
real dotmp = giac.giac_att(rdoc, false);
|
||||||
|
msk.set(FR_JOLLY2, dotmp);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
@ -500,15 +505,19 @@ bool TGestione_bolle_msk::lv_consegnato_handler(TMask_field& f, KEY k)
|
|||||||
//gestione campi dotazione odierna e dotazione temporanea
|
//gestione campi dotazione odierna e dotazione temporanea
|
||||||
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();
|
||||||
TRiga_documento& rdoc = dmask.doc()[sheet->selected()+1];
|
TRiga_documento& rdoc = dmask.doc()[sheet->selected()+1];
|
||||||
rdoc.put(RDOC_QTA, consegnato);
|
rdoc.put(RDOC_QTA, consegnato);
|
||||||
|
|
||||||
TGiac_per_cli& giac = gbapp().giacenza();
|
TGiac_per_cli& giac = gbapp().giacenza();
|
||||||
real dotod = giac.giac_att(rdoc, true);
|
real dotod = giac.giac_att(rdoc, true);
|
||||||
real dotmp = giac.giac_att(rdoc, false);
|
|
||||||
|
|
||||||
msk.set(FR_JOLLY1, dotod);
|
msk.set(FR_JOLLY1, dotod);
|
||||||
msk.set(FR_JOLLY2, dotmp);
|
//scrivo la dotazione temporanea solo se esistono le date di dotazione temporanea e questa non è scaduta
|
||||||
|
if (rdoc.get_date("DADATATMP").ok() && rdoc.get_date("ADATATMP").ok() && rdoc.get_date("ADATATMP") <= doc.get_date(DOC_DATADOC))
|
||||||
|
{
|
||||||
|
real dotmp = giac.giac_att(rdoc, false);
|
||||||
|
msk.set(FR_JOLLY2, dotmp);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
return ok;
|
return ok;
|
||||||
@ -717,6 +726,7 @@ bool TGestione_bolle_msk::lv_causale_handler(TMask_field& f, KEY k)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -270,11 +270,11 @@ NGROUPS=22
|
|||||||
22=2900
|
22=2900
|
||||||
|
|
||||||
[Colors]
|
[Colors]
|
||||||
RuleName(1) = Dotazione scaduta
|
RuleName(1) = Riga vuota
|
||||||
Rule(1) = (DOTMP!="0")&&(ADATATMP!="")&&(ANSI(33.DATADOC)>ANSI(ADATATMP))|N
|
Rule(1) = STR(TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0)|N
|
||||||
BgCol(1) = 255,0,0
|
BgCol(1) = 255,255,128
|
||||||
FgCol(1) = 0,0,0
|
FgCol(1) = 0,0,0
|
||||||
RuleName(2) = Riga vuota
|
RuleName(2) = Dotazione scaduta
|
||||||
Rule(2) = STR(TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0)|N
|
Rule(2) = (ADATATMP!="")&&(ANSI(33.DATADOC)>ANSI(ADATATMP))|N
|
||||||
BgCol(2) = 255,255,128
|
BgCol(2) = 255,0,0
|
||||||
FgCol(2) = 0,0,0
|
FgCol(2) = 0,0,0
|
||||||
|
Loading…
x
Reference in New Issue
Block a user