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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :Corretto errore refresh variabili TCurrency


git-svn-id: svn://10.65.10.50/trunk@20100 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
lvietri 2010-02-11 11:25:42 +00:00
parent 4e0643d066
commit 4d606778c7
1 changed files with 17 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ps/pd5317100.cpp
View File

@ -227,8 +227,6 @@ void TCarrelli_app:: elabora(const TMask& mask)const
TString ragsoc; TString ragsoc;
TString indir; TString indir;
TDate dataDoc; TDate dataDoc;
TCurrency importob;
TCurrency prezzoAcq;
TDate data_gara; TDate data_gara;
TString descr_conto; TString descr_conto;
TString conto; TString conto;
@ -237,6 +235,9 @@ void TCarrelli_app:: elabora(const TMask& mask)const
int gruppo1; int gruppo1;
int conto1; int conto1;
int sottoGruppo1; int sottoGruppo1;
TCurrency importob;
TCurrency prezzoAcq;
TString venduto_a; TString venduto_a;
TCurrency prezzoVend; TCurrency prezzoVend;
TCurrency prezzo_p1; TCurrency prezzo_p1;
@ -244,6 +245,8 @@ void TCarrelli_app:: elabora(const TMask& mask)const
TCurrency manutenzione; TCurrency manutenzione;
TCurrency prezzo_autom; TCurrency prezzo_autom;
TCurrency prezzo_recup; TCurrency prezzo_recup;
TCurrency prezzo_null;
TString commessa; TString commessa;
TString commessaOld; TString commessaOld;
@ -304,6 +307,7 @@ void TCarrelli_app:: elabora(const TMask& mask)const
modello = riep.get("COMMESSE.DESCRIZ").as_string();//T modello = riep.get("COMMESSE.DESCRIZ").as_string();//T
prezzoAcq.set_price(0);//R prezzoAcq.set_price(0);//R
conto=""; conto="";
descr_conto="";//S descr_conto="";//S
TISAM_recordset saldana(get_query(2,"")); TISAM_recordset saldana(get_query(2,""));
@ -418,6 +422,15 @@ void TCarrelli_app:: elabora(const TMask& mask)const
noleggio,manutenzione,venduto_a,prezzoVend, noleggio,manutenzione,venduto_a,prezzoVend,
prezzo_p1, prezzo_autom,prezzo_recup); prezzo_p1, prezzo_autom,prezzo_recup);
//TString pippo1 = prezzo_p1.string();
prezzo_p1 = prezzo_null;
prezzoAcq = prezzo_null;
manutenzione = prezzo_null;
prezzo_autom = prezzo_null;
prezzo_recup = prezzo_null;
noleggio = prezzo_null;
prezzoVend = prezzo_null;
} }
} }