Patch level :10.0 patch ???
Files correlati : lv3 Ricompilazione Demo : [ ] Commento : correzione invio dati a skema git-svn-id: svn://10.65.10.50/branches/R_10_00@22239 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
155e5cb13b
commit
da0637f72a
@ -77,7 +77,7 @@ void TInvia_articoli_skema::aggiungi_riga(const TString& codart)
|
|||||||
|
|
||||||
const TString80 desart = anamag.get(ANAMAG_DESCR);
|
const TString80 desart = anamag.get(ANAMAG_DESCR);
|
||||||
const TString80 tpart = anamag.get(ANAMAG_TIPOPARTE);
|
const TString80 tpart = anamag.get(ANAMAG_TIPOPARTE);
|
||||||
TString4 codlav; codlav.format("%05d", anamag.get(ANAMAG_CODLAV1));
|
TString8 codlav; codlav.format("%05d", anamag.get(ANAMAG_CODLAV1));
|
||||||
TString16 peso; peso.format("%010d", anamag.get(ANAMAG_PESO));
|
TString16 peso; peso.format("%010d", anamag.get(ANAMAG_PESO));
|
||||||
const real lunghezza = anamag.get_real(ANAMAG_USER9);
|
const real lunghezza = anamag.get_real(ANAMAG_USER9);
|
||||||
const real larghezza = anamag.get_real(ANAMAG_USER10);
|
const real larghezza = anamag.get_real(ANAMAG_USER10);
|
||||||
@ -175,11 +175,12 @@ void TInvcon_skema_msk::esporta() const
|
|||||||
TFilename file_dot = path; file_dot.add("dotazione.txt");
|
TFilename file_dot = path; file_dot.add("dotazione.txt");
|
||||||
|
|
||||||
//preparo il recodset che contiene tutti i contratti validi
|
//preparo il recodset che contiene tutti i contratti validi
|
||||||
TString query;
|
TString query;
|
||||||
query << "USE LVCONDV\n"
|
query << "USE LVCONDV\n"
|
||||||
<< "SELECT (BETWEEN(DATAIN,\"\",#DATA))&&((NUM(ANSI(DATASC))>=" << datasc.date2ansi() << ")||(DATASC=\"\"))&&(CONTSPOR>0)\n"
|
<< "SELECT (BETWEEN(DATAIN,\"\",#DATA))&&((NUM(ANSI(DATASC))>=" << datasc.date2ansi() << ")||(DATASC=\"\"))&&(CONTSPOR>0)\n"
|
||||||
<< "BY CODCF";
|
<< "BY CODCF";
|
||||||
|
|
||||||
|
|
||||||
TISAM_recordset contratti(query);
|
TISAM_recordset contratti(query);
|
||||||
contratti.set_var("#DATA", datasc);
|
contratti.set_var("#DATA", datasc);
|
||||||
|
|
||||||
@ -214,7 +215,7 @@ void TInvcon_skema_msk::esporta() const
|
|||||||
recset_dotazioni->aggiungi_riga(codcf, codcon);
|
recset_dotazioni->aggiungi_riga(codcf, codcon);
|
||||||
}
|
}
|
||||||
recset_clienti->save_as(file_cli);
|
recset_clienti->save_as(file_cli);
|
||||||
recset_articoli->save_as(file_art);
|
recset_dotazioni->save_as(file_dot);
|
||||||
|
|
||||||
TISAM_recordset anamag(TR("USE ANAMAG"));
|
TISAM_recordset anamag(TR("USE ANAMAG"));
|
||||||
|
|
||||||
@ -223,7 +224,7 @@ void TInvcon_skema_msk::esporta() const
|
|||||||
const TString80 codart = anamag.get(ANAMAG_CODART).as_string();
|
const TString80 codart = anamag.get(ANAMAG_CODART).as_string();
|
||||||
recset_articoli->aggiungi_riga(codart);
|
recset_articoli->aggiungi_riga(codart);
|
||||||
}
|
}
|
||||||
recset_dotazioni->save_as(file_dot);
|
recset_articoli->save_as(file_art);
|
||||||
message_box(TR("Esportazione terminata"));
|
message_box(TR("Esportazione terminata"));
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
|
Loading…
x
Reference in New Issue
Block a user