Patch level : 10.0 patch 421
Files correlati : lv2 Ricompilazione Demo : [ ] Commento : Ulteriori correzioni sulla query di selezione dei documenti di sporco Correzione della query di selezione del passaggio del planning da cui estrarre i dati del giro git-svn-id: svn://10.65.10.50/trunk@19218 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
3f3a13e22e
commit
384cf781ad
@ -801,7 +801,11 @@ bool TGenera_documenti_app::transfer()
|
|||||||
if(codcli > 0)
|
if(codcli > 0)
|
||||||
query_bolle << "(TIPOCF=\"C\")&&(CODCF=" << codcli << ")&&";
|
query_bolle << "(TIPOCF=\"C\")&&(CODCF=" << codcli << ")&&";
|
||||||
|
|
||||||
query_bolle << "(ANSI(G1:DATAPRCO)<=#ADATA)&&";
|
if(_msk->get_int(F_TPGEN) == 1)
|
||||||
|
query_bolle << "(ANSI(G1:DATAPRCO)=#ADATA)&&";
|
||||||
|
else
|
||||||
|
query_bolle << "(ANSI(G1:DATAPRCO)<=#ADATA)&&";
|
||||||
|
|
||||||
query_bolle << "(STATO=\"" << statoi << "\")\n";
|
query_bolle << "(STATO=\"" << statoi << "\")\n";
|
||||||
|
|
||||||
query_bolle << "FROM PROVV=\"D\" ANNO=" << daanno << " CODNUM=\"" << codnum << "\"\n";
|
query_bolle << "FROM PROVV=\"D\" ANNO=" << daanno << " CODNUM=\"" << codnum << "\"\n";
|
||||||
@ -809,6 +813,8 @@ bool TGenera_documenti_app::transfer()
|
|||||||
|
|
||||||
TISAM_recordset docritiri(query_bolle);
|
TISAM_recordset docritiri(query_bolle);
|
||||||
docritiri.set_var("#ADATA", adatacons);
|
docritiri.set_var("#ADATA", adatacons);
|
||||||
|
|
||||||
|
int cazzone = docritiri.items();
|
||||||
|
|
||||||
TProgind pi(docritiri.items(), TR("Generazione documenti in corso..."), true, true);
|
TProgind pi(docritiri.items(), TR("Generazione documenti in corso..."), true, true);
|
||||||
|
|
||||||
@ -818,6 +824,7 @@ bool TGenera_documenti_app::transfer()
|
|||||||
break;
|
break;
|
||||||
|
|
||||||
codcli = docritiri.get(DOC_CODCF).as_int();
|
codcli = docritiri.get(DOC_CODCF).as_int();
|
||||||
|
const TDate data = docritiri.get("G1:DATAPRCO").as_date();
|
||||||
|
|
||||||
//preparo un recordset che contiene tutti planning per cui voglio creare i documenti relativi
|
//preparo un recordset che contiene tutti planning per cui voglio creare i documenti relativi
|
||||||
TString query = "USE LVRCONSPLAN KEY 2";
|
TString query = "USE LVRCONSPLAN KEY 2";
|
||||||
@ -840,19 +847,15 @@ bool TGenera_documenti_app::transfer()
|
|||||||
query << "(CODAUT=" << codaut << ')';
|
query << "(CODAUT=" << codaut << ')';
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
query << "\n";
|
query << "\n";
|
||||||
|
|
||||||
if(_msk->get_int(F_TPGEN) == 1)
|
query << "FROM DTCONS=#DATA\n";
|
||||||
query << "FROM DTCONS=" << adatacons << "\n";
|
query << "TO DTCONS=#DATA";
|
||||||
else
|
|
||||||
query << "FROM DTCONS=" << dadatacons << "\n";
|
|
||||||
query << "TO DTCONS=" << adatacons << "\n";
|
|
||||||
|
|
||||||
TISAM_recordset plan(query);
|
TISAM_recordset plan(query);
|
||||||
|
plan.set_var("#DATA", data);
|
||||||
|
|
||||||
int indice = _msk->get_int(F_TPGEN) == 1 ? 0 : 1;
|
if (plan.move_first())
|
||||||
|
|
||||||
if (plan.move_to(indice))
|
|
||||||
{
|
{
|
||||||
_quantita.destroy();
|
_quantita.destroy();
|
||||||
_quantita_ritirata.destroy();
|
_quantita_ritirata.destroy();
|
||||||
|
Loading…
x
Reference in New Issue
Block a user