Patch level : 10.0 patch 417

Files correlati     : lv2
Ricompilazione Demo : [ ]
Commento            :
Coretta la query di selezione dell'ultimo ndoc esistente (telefonata Paolo 20/08)

Durante la creazione delle bolle di consegna non mi segnala gli articoli fuori contratto (mail Paolo 20/08)


git-svn-id: svn://10.65.10.50/trunk@19212 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2009-08-20 10:57:34 +00:00
parent 3ac2906cf9
commit b2eed9c331

View File

@ -162,11 +162,11 @@ bool TGenera_documenti_app::crea_documento(const TISAM_recordset& plan, TLog_rep
{
TString query2;
query2 << "USE DOC\n"
<< "FROM PROVV=\"D\" ANNO=" << anno << "CODNUM=\"" << codnum << "\"\n"
<< "TO PROVV=\"D\" ANNO=" << anno << "CODNUM=\"" << codnum << "\"";
TISAM_recordset sporco(query2);
sporco.move_last();
_ndoc = sporco.get(DOC_NDOC).as_int();
<< "FROM PROVV=\"D\" ANNO=" << anno << " CODNUM=\"" << codnum << "\"\n"
<< "TO PROVV=\"D\" ANNO=" << anno << " CODNUM=\"" << codnum << "\"";
TISAM_recordset bolle(query2);
bolle.move_last();
_ndoc = bolle.get(DOC_NDOC).as_int();
}
//creo il documento corretto riempiendo i campi che già conosco
@ -310,7 +310,8 @@ void TGenera_documenti_app::crea_riga(const TString& codart, const char modpas,
rdoc.put(RDOC_CODAGG1, causale); //causale presa dalla configurazione
//aggiorno il conguaglio sulla riga del contratto
aggiorna_conguaglio((TRectype&)rcont, quantita_arr - quantita_noarr);
if (!rcont.empty())
aggiorna_conguaglio((TRectype&)rcont, quantita_arr - quantita_noarr);
//elaborazione sul prezzo da utilizzare
real prezzo;
@ -406,8 +407,8 @@ void TGenera_documenti_app::crea_riga(const TString& codart, const char modpas,
{
TString str;
str << "L'articolo " << codart << " inserito nel documento " << doc.get(DOC_CODNUM) << "-" << doc.get(DOC_TIPODOC)
<< " numero " << doc.get(DOC_NDOC) << " in quantità " << quantita_arr
<< "non è prsente sul contratto del cliente " << codcli;
<< " numero " << doc.get(DOC_NDOC) << " per la quantità di " << quantita_arr << " unità"
<< " non è prsente sul contratto del cliente " << codcli;
rep.log(1, str);
}
@ -790,7 +791,7 @@ bool TGenera_documenti_app::transfer()
// bool err;
TLog_report rep("Articoli non in contratto");
rep.kill_duplicates();
rep.kill_duplicates(true);
numerazione_drit(0, codnum, tpdoc, statoi, statof);
@ -808,7 +809,7 @@ bool TGenera_documenti_app::transfer()
TISAM_recordset docritiri(query_bolle);
docritiri.set_var("#DADATA", dadatacons);
docritiri.set_var("#ADATA", adatacons);
TProgind pi(docritiri.items(), TR("Generazione documenti in corso..."), true, true);
for (bool ok = docritiri.move_first(); ok; ok = docritiri.move_next())