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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/branches/R_10_00@21330 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2010-12-17 14:17:49 +00:00
parent 082db11138
commit 401a539e7a
4 changed files with 47 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ha/hacnv100a.ini
View File

@ -348,7 +348,7 @@ UM =
NSCAGL =
QLIM =
PREZZO = Prezzo
SCONTO = Sconto1
SCONTO = _SCONTO
ADDIVA =
CODIVA =
PERCPROVV =
@ -405,7 +405,7 @@ UM =
NSCAGL =
QLIM =
PREZZO = Prezzo
SCONTO = Sconto1
SCONTO = _SCONTO
ADDIVA =
CODIVA =
PERCPROVV =
@ -456,8 +456,8 @@ CODRIGA = IdProdotto
UM =
NSCAGL =
QLIM =
PREZZO = Prezzo
SCONTO = Sconto1
PREZZO = _ROUND,Prezzo
SCONTO = _SCONTO
ADDIVA =
CODIVA =
PERCPROVV =

6
ha/hacnv200.cpp
View File

@ -128,7 +128,11 @@ bool THardy_movimenti::trasferisci()
"FROM dbo.MovContabiliT "
"WHERE Esercizio=";
query << _anno;
query << " ORDER BY DataMovimento ";
query << " AND DataMovimento>= '";
query << _dadata.string();
query << "' AND DataMovimento<= '";
query << _adata.string();
query << "' ORDER BY DataMovimento ";
TRecordset& recset = create_recordset(query);
TConfig& ini = config();

39
ha/hacnvlib.cpp
View File

@ -265,6 +265,11 @@ const TString& THardy_transfer::get_real_str(const char* campo) const
return var.as_string();
}
real THardy_transfer::get_real(const char* field) const
{
return recordset().get(field).as_real();
}
long THardy_transfer::get_long(const char* field) const
{
return recordset().get(field).as_int();
@ -362,6 +367,37 @@ void THardy_transfer::aggiorna_record(TRectype& rec, const TString_array& lista_
{
if (campo_orig[0] == '_')
{
if (campo_orig.starts_with("_SCONTO")) // è uno sconto (ca..o!)
{
valore.cut(0);
real sconto;
TString8 field;
for (int i = 1; i < 6; i++)
{
field.format("Sconto%1d",i);
sconto = get_real(field);
sconto.round(2);
if (sconto != ZERO)
{
valore << sconto.string();
valore << "+";
}
}
if (valore.len()>0)
valore = valore.left(valore.len()-1);
} else
if (campo_orig.starts_with("_REAL")) // è un real
{
const TString80 campo = campo_orig.after(',');
valore = get_real_str(campo);
} else
if (campo_orig.starts_with("_ROUND")) // arrotondo a due decimali
{
const TString80 campo = campo_orig.after(',');
real contenuto = get_real(campo);
contenuto.round(2);
valore = contenuto.string();
} else
if (campo_orig.starts_with("_FISSO")) // valore fisso indicato in configurazione
{
valore = campo_orig.after(',');
@ -385,8 +421,7 @@ void THardy_transfer::aggiorna_record(TRectype& rec, const TString_array& lista_
const TString16 codtab = get_str(elabora.get());
const TString16 campotab = elabora.get();
valore = cache().get(tab, codtab, campotab);
}
else
} else
if (campo_orig.starts_with("_TRADUCI"))
{
const TString80 campo = campo_orig.after(',');

1
ha/hacnvlib.h
View File

@ -81,6 +81,7 @@ public:
TRecordset& recordset();
const TString& get_str(const char* campo) const; // Get string from current recordset
real get_real(const char* campo) const; // Get real from current recordset
const TString& get_real_str(const char* campo) const; // Get eventually empty string from numeric field
long get_long(const char* campo) const;