Patch level : 4.0 710
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:
parent
1dc5518419
commit
9965418d3f
@ -173,10 +173,11 @@ void TMovanal_msk::split_cg_row(const TRectype& row, const TRecord_array& rrip)
|
||||
int 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);
|
||||
}
|
||||
|
||||
TString80 desc; // Variabile di appoggio per descrizione riga
|
||||
for (i = 1; i <= rrip.rows(); i++)
|
||||
{
|
||||
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
|
||||
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 ...
|
||||
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);
|
||||
TRecord_array cg(numregcg, LF_RMOV);
|
||||
|
||||
TString80 query;
|
||||
TString query;
|
||||
for (int r = cg.last_row(); r > 0; r--)
|
||||
{
|
||||
const TRectype& row = cg.row(r);
|
||||
@ -226,8 +227,8 @@ bool TMovanal_msk::is_ripartible_movcg()
|
||||
}
|
||||
if (i <= 0) // Non trovato la ripartizione
|
||||
{
|
||||
ok = error_box("Non esiste una ripartizione del conto %d.%d.%ld\n"
|
||||
"presente sulla riga %d del movimento %ld",
|
||||
ok = error_box(FR("Non esiste una ripartizione del conto %d.%d.%ld\n"
|
||||
"presente sulla riga %d del movimento %ld"),
|
||||
zio.gruppo(), zio.conto(), zio.sottoconto(),
|
||||
r, atol(numregcg));
|
||||
break;
|
||||
@ -241,7 +242,7 @@ bool TMovanal_msk::is_ripartible_movcg()
|
||||
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
|
||||
TString80 query;
|
||||
TString query;
|
||||
int 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);
|
||||
if (r < 0 || r >= sheet.items())
|
||||
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));
|
||||
|
||||
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())
|
||||
{
|
||||
rec.put(RMOVANA_SEZIONE, 'A');
|
||||
@ -521,17 +522,18 @@ bool TMovanal_msk::row2rec(int r, TRectype& rec) const
|
||||
rec.put(RMOVANA_IMPORTO, dare);
|
||||
}
|
||||
|
||||
TMask& sm = sheet.sheet_mask();
|
||||
for (int i = sm.fields()-1; i >= 2; i--)
|
||||
{
|
||||
TMask_field& mf = sm.fld(i);
|
||||
if (mf.field() != NULL)
|
||||
const TMask_field& mf = sm.fld(i);
|
||||
const TFieldref* fr = mf.field();
|
||||
if (fr != NULL)
|
||||
{
|
||||
const int idx = sheet.cid2index(mf.dlg());
|
||||
if (idx < 17)
|
||||
{
|
||||
const TString80 s(row.get(idx));
|
||||
|
||||
mf.field()->write(s, rec);
|
||||
const char* s = row.get(idx);
|
||||
fr->write(s, rec);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
@ -1481,16 +1481,15 @@ TObject* TCache_ripartizioni::key2obj(const char* key)
|
||||
TImporto val = s._ini;
|
||||
|
||||
val.normalize('D');
|
||||
some_value |= val.valore() != ZERO;
|
||||
some_value |= !val.valore().is_zero();
|
||||
rec.put(RRIP_RIPARTO, val.valore());
|
||||
}
|
||||
if (!some_value)
|
||||
{
|
||||
for (int i = 1; i <= items; i++)
|
||||
{
|
||||
TRectype & rec = (*rows)[i];
|
||||
|
||||
rec.put(RRIP_RIPARTO, "1");
|
||||
TRectype& rec = (*rows)[i];
|
||||
rec.put(RRIP_RIPARTO, 1);
|
||||
}
|
||||
}
|
||||
}
|
||||
@ -1501,8 +1500,7 @@ TObject* TCache_ripartizioni::key2obj(const char* key)
|
||||
void TCache_ripartizioni::set_esercizio(const TDate & d)
|
||||
{
|
||||
TEsercizi_contabili e;
|
||||
const TEsercizio & esc = e.esercizio(d);
|
||||
|
||||
const TEsercizio& esc = e.esercizio(d);
|
||||
_dal = esc.inizio();
|
||||
_al = esc.fine();
|
||||
destroy();
|
||||
|
Loading…
x
Reference in New Issue
Block a user