Patch level : 10.0 patch 609
Files correlati : lv2 Ricompilazione Demo : [ ] Commento : Corretto calcolo della dotod git-svn-id: svn://10.65.10.50/trunk@20033 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
8c78a38e87
commit
5c2f3b5d27
@ -564,6 +564,10 @@ bool TConta_pulito_msk::genera_documenti(const TFilename& file, TAssoc_array& do
|
||||
TString4 causale = rcont.get(LVRCONDV_CAUSLAV);
|
||||
if (causale.blank() || atoi(causale) == 0)
|
||||
causale = ini_get_string(CONFIG_DITTA, "lv", "CAUSLAV");
|
||||
const TCausale_lavanderie cau(causale);
|
||||
const TCausale_magazzino rit(cau.causale_ritiro());
|
||||
const TCausale_magazzino con(cau.causale_consegna());
|
||||
|
||||
|
||||
//leggo se devo scrivere il prezzo sulla bolla
|
||||
//const bool prinbo = cont.get_bool(LVCONDV_STPRZBOL);
|
||||
@ -613,9 +617,13 @@ bool TConta_pulito_msk::genera_documenti(const TFilename& file, TAssoc_array& do
|
||||
{
|
||||
rdoc.add(RDOC_QTA, quantita);
|
||||
rdoc.add(RDOC_QTAGG1, quantita);
|
||||
rdoc.add("DOTOD", quantita);
|
||||
if(dtmp)
|
||||
rdoc.add("DOTMP", quantita);
|
||||
|
||||
if(rit.sgn(s_dotod) != 0 || con.sgn(s_dotod) != 0)
|
||||
{
|
||||
real qta = (quantita * con.sgn(s_dotod)) - (quantita * rit.sgn(s_dotod));
|
||||
rdoc.add("DOTOD", qta);
|
||||
}
|
||||
|
||||
found = true;
|
||||
|
||||
//scrivo i riferimenti alla bolla sul pacco
|
||||
@ -645,13 +653,15 @@ bool TConta_pulito_msk::genera_documenti(const TFilename& file, TAssoc_array& do
|
||||
rdoc.put(RDOC_QTAGG1, quantita); //ritirato
|
||||
|
||||
rdoc.put("DOTOD", dotod);
|
||||
rdoc.add("DOTOD", quantita);
|
||||
|
||||
if(rit.sgn(s_dotod) != 0 || con.sgn(s_dotod) != 0)
|
||||
{
|
||||
real qta = (quantita * con.sgn(s_dotod)) - (quantita * rit.sgn(s_dotod));
|
||||
rdoc.add("DOTOD", qta);
|
||||
}
|
||||
|
||||
if(dtmp)
|
||||
{
|
||||
rdoc.put("DOTMP", dottmp);
|
||||
rdoc.add("DOTMP", quantita);
|
||||
}
|
||||
rdoc.put("DOTMP", dottmp);
|
||||
|
||||
rdoc.put(RDOC_CODAGG1, causale);
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user