Patch level : 10.0 NO PATCH
Files correlati : pd6342 Ricompilazione Demo : [ ] Commento : Corretto la regsitra; prima salvava i movimenti doppi git-svn-id: svn://10.65.10.50/branches/R_10_00@20976 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
2bac2c1e54
commit
b9d8bc9cfb
@ -316,9 +316,8 @@ void TQuadra_movana_msk::riempi_sheets()
|
|||||||
for(bool ok = movanaquad.move_first(); ok; ok = movanaquad.move_next())
|
for(bool ok = movanaquad.move_first(); ok; ok = movanaquad.move_next())
|
||||||
{
|
{
|
||||||
TAnal_mov amov(movanaquad.cursor()->curr());
|
TAnal_mov amov(movanaquad.cursor()->curr());
|
||||||
const TRecord_array& righe = amov.body();
|
|
||||||
|
|
||||||
const int nrows = amov.body().rows();
|
const int nrows = amov.rows();
|
||||||
for (int r = 1; r <= nrows; r++)
|
for (int r = 1; r <= nrows; r++)
|
||||||
{
|
{
|
||||||
const TRectype& row = amov.body().row(r);
|
const TRectype& row = amov.body().row(r);
|
||||||
@ -484,12 +483,12 @@ void TQuadra_movana_msk::registra()
|
|||||||
|
|
||||||
const TDate oggi(TODAY);
|
const TDate oggi(TODAY);
|
||||||
|
|
||||||
movana.zero();
|
TAnal_mov movanaquad(0);
|
||||||
movana.put(MOVANA_ANNOES, oggi.year());
|
movanaquad.put(MOVANA_ANNOES, oggi.year());
|
||||||
movana.put(MOVANA_DATAREG, oggi);
|
movanaquad.put(MOVANA_DATAREG, oggi);
|
||||||
movana.put(MOVANA_DATACOMP, oggi);
|
movanaquad.put(MOVANA_DATACOMP, oggi);
|
||||||
movana.put(MOVANA_DESCR, "Movimento Quadrato");
|
movanaquad.put(MOVANA_DESCR, "Movimento Quadrato");
|
||||||
movana.put(MOVANA_NUMREGCG, get_long(F_NUMREGCG));
|
movanaquad.put(MOVANA_NUMREGCG, get_long(F_NUMREGCG));
|
||||||
|
|
||||||
TImporto totale;
|
TImporto totale;
|
||||||
|
|
||||||
@ -499,7 +498,7 @@ void TQuadra_movana_msk::registra()
|
|||||||
TImporto importo;
|
TImporto importo;
|
||||||
importo = r;
|
importo = r;
|
||||||
|
|
||||||
TRectype& rmovana = movana.new_row();
|
TRectype& rmovana = movanaquad.new_row();
|
||||||
TString80 cdc;
|
TString80 cdc;
|
||||||
TString80 cms;
|
TString80 cms;
|
||||||
TString80 fase;
|
TString80 fase;
|
||||||
@ -520,9 +519,9 @@ void TQuadra_movana_msk::registra()
|
|||||||
totale += importo;
|
totale += importo;
|
||||||
}
|
}
|
||||||
|
|
||||||
movana.put(MOVANA_SEZIONE, totale.sezione());
|
movanaquad.put(MOVANA_SEZIONE, totale.sezione());
|
||||||
movana.put(MOVANA_TOTDOC, totale.valore());
|
movanaquad.put(MOVANA_TOTDOC, totale.valore());
|
||||||
movana.write(file);
|
movanaquad.write(file);
|
||||||
}
|
}
|
||||||
|
|
||||||
bool TQuadra_movana_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
bool TQuadra_movana_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user