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

Patch level : 10.0 patch 520

Browse Source 
Files correlati     : lv2
Ricompilazione Demo : [ ]
Commento            :
1)
ho creato un conteggi oda contapezzu (output.dat) di un cliente con 4 righe articolo e
il programma di ricezione mi ha detto:
4 buoni di ritiro creati, ma era 1 buono con 4 righe
Ed effettivamento mi ha fatto un solo buono con 4 righe


git-svn-id: svn://10.65.10.50/trunk@19637 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2009-11-16 16:57:29 +00:00
parent a3d2d88f19
commit 4fa67a5fc1
1 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
lv/lv2600.cpp
View File

@ -724,7 +724,7 @@ void TAcquisizione_lavanderie_app::genera_documenti(TLog_report& rep, TAssoc_arr
const TDate datadoc = keydoc.data();
TQuantita_contate* qc = (TQuantita_contate*)itm;
const long qtacon = qc->get_pezzi();;
const long qtacon = qc->get_pezzi();
const long qtarotti = qc->get_rotti();
TLaundry_contract cont(codcf, 0, datadoc);
@ -893,11 +893,21 @@ bool TAcquisizione_lavanderie_app::transfer()
genera_documenti(logrep, documenti);
//diagnostica
TAssoc_array buoni;
FOR_EACH_ASSOC_OBJECT(documenti, obj, key, itm)
{
TDocumenti_key tmp = (TDocumenti_key)key;
TDoc_key kdoc(tmp.anno(), tmp.codnum(), tmp.ndoc());
if (!buoni.is_key(kdoc))
buoni.add(kdoc, kdoc);
}
TString str;
if (documenti.items() > 1)
str << "Sono stati generati " << documenti.items() << " buoni di ritiro.";
if (buoni.items() > 1)
str << "Sono stati generati " << buoni.items() << " buoni di ritiro.";
else
str << "E' stato generato " << documenti.items() << " buono di ritiro.";
str << "E' stato generato " << buoni.items() << " buono di ritiro.";
message_box(str);