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

Patch level : 4.0 710

Browse Source 
Files correlati     : ca2
Ricompilazione Demo : [ ]
Commento            :
Corretto collegamento da prima nota


git-svn-id: svn://10.65.10.50/trunk@15351 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2007-05-24 08:23:36 +00:00
parent 1dc5518419
commit 9965418d3f
2 changed files with 21 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
ca/ca2100.cpp
View File

@ -173,10 +173,11 @@ void TMovanal_msk::split_cg_row(const TRectype& row, const TRecord_array& rrip)
int i; int i;
for (i = 1; i <= rrip.rows(); i++) for (i = 1; i <= rrip.rows(); i++)
{ {
const real quota = rrip[i].get_real("RIPARTO"); const real quota = rrip[i].get_real(RRIP_RIPARTO);
distrib.add(quota); distrib.add(quota);
} }
TString80 desc; // Variabile di appoggio per descrizione riga
for (i = 1; i <= rrip.rows(); i++) for (i = 1; i <= rrip.rows(); i++)
{ {
TToken_string& riga = get_rip_row(rrip[i]); // Cerca o crea la riga cui sommare la quota TToken_string& riga = get_rip_row(rrip[i]); // Cerca o crea la riga cui sommare la quota
@ -185,7 +186,7 @@ void TMovanal_msk::split_cg_row(const TRectype& row, const TRecord_array& rrip)
impriga += imp; impriga.normalize(); // Incrementa l'importo della riga e lo normalizza impriga += imp; impriga.normalize(); // Incrementa l'importo della riga e lo normalizza
imp2row(impriga, riga); // Aggiorna la riga imp2row(impriga, riga); // Aggiorna la riga
TString80 desc; riga.get(2); // Legge descrizione riga corrente riga.get(2, desc); // Legge descrizione riga corrente
if (desc.blank()) // Se e' vuota allora ... if (desc.blank()) // Se e' vuota allora ...
riga.add(row.get(RMV_DESCR), 2); // ... ci copio la descrizione della riga contabile riga.add(row.get(RMV_DESCR), 2); // ... ci copio la descrizione della riga contabile
} }
@ -199,7 +200,7 @@ bool TMovanal_msk::is_ripartible_movcg()
const TString& numregcg = get(F_NUMREGCG); const TString& numregcg = get(F_NUMREGCG);
TRecord_array cg(numregcg, LF_RMOV); TRecord_array cg(numregcg, LF_RMOV);
TString80 query; TString query;
for (int r = cg.last_row(); r > 0; r--) for (int r = cg.last_row(); r > 0; r--)
{ {
const TRectype& row = cg.row(r); const TRectype& row = cg.row(r);
@ -226,8 +227,8 @@ bool TMovanal_msk::is_ripartible_movcg()
} }
if (i <= 0) // Non trovato la ripartizione if (i <= 0) // Non trovato la ripartizione
{ {
ok = error_box("Non esiste una ripartizione del conto %d.%d.%ld\n" ok = error_box(FR("Non esiste una ripartizione del conto %d.%d.%ld\n"
"presente sulla riga %d del movimento %ld", "presente sulla riga %d del movimento %ld"),
zio.gruppo(), zio.conto(), zio.sottoconto(), zio.gruppo(), zio.conto(), zio.sottoconto(),
r, atol(numregcg)); r, atol(numregcg));
break; break;
@ -241,7 +242,7 @@ bool TMovanal_msk::is_ripartible_movcg()
void TMovanal_msk::load_cg_row(const TRectype& row) void TMovanal_msk::load_cg_row(const TRectype& row)
{ {
// Cerco la ripartizione del sottoconto, se non la trovo uso quella del conto o del gruppo // Cerco la ripartizione del sottoconto, se non la trovo uso quella del conto o del gruppo
TString80 query; TString query;
int i; int i;
for (i = 3; i > 0; i--) for (i = 3; i > 0; i--)
{ {
@ -503,13 +504,13 @@ bool TMovanal_msk::row2rec(int r, TRectype& rec) const
TSheet_field& sheet = sfield(F_RIGHE); TSheet_field& sheet = sfield(F_RIGHE);
if (r < 0 || r >= sheet.items()) if (r < 0 || r >= sheet.items())
return false; return false;
TMask& sm = sheet.sheet_mask();
TToken_string& row = sheet.row(r); rec.put(RMOVANA_ANNOES, get(F_ANNOES));
rec.put(RMOVANA_ANNOES, get(F_ANNOES));
rec.put(RMOVANA_DATACOMP, get(F_DATACOMP)); rec.put(RMOVANA_DATACOMP, get(F_DATACOMP));
const real dare = row.get(sheet.cid2index(S_DARE)), avere = row.get(); TToken_string& row = sheet.row(r);
const real dare = row.get(sheet.cid2index(S_DARE));
const real avere = row.get();
if (dare.is_zero()) if (dare.is_zero())
{ {
rec.put(RMOVANA_SEZIONE, 'A'); rec.put(RMOVANA_SEZIONE, 'A');
@ -521,17 +522,18 @@ bool TMovanal_msk::row2rec(int r, TRectype& rec) const
rec.put(RMOVANA_IMPORTO, dare); rec.put(RMOVANA_IMPORTO, dare);
} }
TMask& sm = sheet.sheet_mask();
for (int i = sm.fields()-1; i >= 2; i--) for (int i = sm.fields()-1; i >= 2; i--)
{ {
TMask_field& mf = sm.fld(i); const TMask_field& mf = sm.fld(i);
if (mf.field() != NULL) const TFieldref* fr = mf.field();
if (fr != NULL)
{ {
const int idx = sheet.cid2index(mf.dlg()); const int idx = sheet.cid2index(mf.dlg());
if (idx < 17) if (idx < 17)
{ {
const TString80 s(row.get(idx)); const char* s = row.get(idx);
fr->write(s, rec);
mf.field()->write(s, rec);
} }
} }
} }

10
ca/calib01.cpp
View File

@ -1481,16 +1481,15 @@ TObject* TCache_ripartizioni::key2obj(const char* key)
TImporto val = s._ini; TImporto val = s._ini;
val.normalize('D'); val.normalize('D');
some_value |= val.valore() != ZERO; some_value |= !val.valore().is_zero();
rec.put(RRIP_RIPARTO, val.valore()); rec.put(RRIP_RIPARTO, val.valore());
} }
if (!some_value) if (!some_value)
{ {
for (int i = 1; i <= items; i++) for (int i = 1; i <= items; i++)
{ {
TRectype & rec = (*rows)[i]; TRectype& rec = (*rows)[i];
rec.put(RRIP_RIPARTO, 1);
rec.put(RRIP_RIPARTO, "1");
} }
} }
} }
@ -1501,8 +1500,7 @@ TObject* TCache_ripartizioni::key2obj(const char* key)
void TCache_ripartizioni::set_esercizio(const TDate & d) void TCache_ripartizioni::set_esercizio(const TDate & d)
{ {
TEsercizi_contabili e; TEsercizi_contabili e;
const TEsercizio & esc = e.esercizio(d); const TEsercizio& esc = e.esercizio(d);
_dal = esc.inizio(); _dal = esc.inizio();
_al = esc.fine(); _al = esc.fine();
destroy(); destroy();