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

*** empty log message ***

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@11857 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2004-03-13 09:12:24 +00:00
parent 83dbe7df6e
commit 5a4e83275c
18 changed files with 114 additions and 115 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ce/ce0100.cpp
View File

@ -180,8 +180,8 @@ bool TCCE_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
case F_DURATA: case F_DURATA:
if (e == fe_init && !field(F_CODESER).empty()) if (e == fe_init && !field(F_CODESER).empty())
{ {
const TDate ies = get(F_DATAINI); const TDate ies = get_date(F_DATAINI);
const TDate fes = get(F_DATAFINE); const TDate fes = get_date(F_DATAFINE);
set(F_DURATA, fes-ies+1); set(F_DURATA, fes-ies+1);
set(F_COEFF_DURATA, calc_coeff(ies, fes)); set(F_COEFF_DURATA, calc_coeff(ies, fes));
} }
@ -271,7 +271,6 @@ bool TCEtables::protected_record(TRectype& rec)
if (get_tabname() == "%CGR") if (get_tabname() == "%CGR")
{ {
TTable cat("%CAT"); TTable cat("%CAT");
const bool prot = FALSE;
const TString16 key(rec.get("CODTAB")); const TString16 key(rec.get("CODTAB"));
cat.put("CODTAB", key); cat.put("CODTAB", key);
@ -282,7 +281,6 @@ bool TCEtables::protected_record(TRectype& rec)
if (get_tabname() == "%CAT") if (get_tabname() == "%CAT")
{ {
TTable cac("%CAC"); TTable cac("%CAC");
const bool prot = FALSE;
const TString16 key(rec.get("CODTAB")); const TString16 key(rec.get("CODTAB"));
cac.put("CODTAB", key); cac.put("CODTAB", key);

48
ce/ce0500.cpp
View File

@ -253,7 +253,9 @@ public:
bool TEdit_mask::one_compiled(const short* f) const bool TEdit_mask::one_compiled(const short* f) const
{ {
for (int i = 0; f[i]; i++) int i;
for (i = 0; f[i]; i++)
{ {
if (!field(f[i]).empty()) if (!field(f[i]).empty())
break; break;
@ -299,10 +301,10 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
if (e == fe_modify || e == fe_close) if (e == fe_modify || e == fe_close)
{ {
const TDate dtcomp = o.get(); const TDate dtcomp(o.get());
TDitta_cespiti& dc = ditta_cespiti(); TDitta_cespiti& dc = ditta_cespiti();
TDate iniz, fine; TDate iniz, fine;
const int ese = dc.esercizio_corrente(iniz, fine); dc.esercizio_corrente(iniz, fine);
if (stato_attivita() == 2) if (stato_attivita() == 2)
{ {
@ -329,17 +331,17 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
case F_DTFUNZ: case F_DTFUNZ:
if (e == fe_modify || e == fe_close) if (e == fe_modify || e == fe_close)
{ {
const TDate dtfunz = o.get(); const TDate dtfunz(o.get());
if (dtfunz.ok()) if (dtfunz.ok())
{ {
const TDate dtcomp = field(F_DTCOMP).get(); const TDate dtcomp(field(F_DTCOMP).get());
if (dtfunz < dtcomp) if (dtfunz < dtcomp)
return error_box(FR("La data di entrata in funzione deve essere successiva a quella di aquisizione")); return error_box(FR("La data di entrata in funzione deve essere successiva a quella di aquisizione"));
if (!dtcomp.ok()) if (!dtcomp.ok())
return error_box(TR("La data di entrata in funzione non puo' essere inserita senza specificare quella di aquisizione")); return error_box(TR("La data di entrata in funzione non puo' essere inserita senza specificare quella di aquisizione"));
if (stato_attivita() == 2) if (stato_attivita() == 2)
{ {
const TDate iniz = get(F_INIZIO_ES); const TDate iniz(get(F_INIZIO_ES));
if (dtfunz < iniz) if (dtfunz < iniz)
return error_box(TR("La data di entrata in funzione deve essere successiva a quella di inizio esercizio")); return error_box(TR("La data di entrata in funzione deve essere successiva a quella di inizio esercizio"));
} }
@ -351,10 +353,10 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
return error_box(TR("In base alla normativa del TUIR, le date di acquisizione e di entrata in funzione devono coincidere")); return error_box(TR("In base alla normativa del TUIR, le date di acquisizione e di entrata in funzione devono coincidere"));
} }
const TRectype& cac = dc.categoria(0, NULL, get_int(F_CATEGORIA)); const TRectype& cac = dc.categoria(0, NULL, get_int(F_CATEGORIA));
const TDate iniz = cac.get("D0"); const TDate iniz = cac.get_date("D0");
if (iniz.ok() && dtfunz < iniz) if (iniz.ok() && dtfunz < iniz)
return error_box(TR("La data è precedente all'inizio validità della categoria")); return error_box(TR("La data è precedente all'inizio validità della categoria"));
const TDate fine = cac.get("D1"); const TDate fine = cac.get_date("D1");
if (fine.ok() && dtfunz > fine) if (fine.ok() && dtfunz > fine)
return error_box(TR("La data è successiva alla fine validità della categoria")); return error_box(TR("La data è successiva alla fine validità della categoria"));
if (dtfunz.year() >= dc.anno_tuir()) if (dtfunz.year() >= dc.anno_tuir())
@ -399,8 +401,8 @@ bool TEdit_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
case F_ELEMENTI: case F_ELEMENTI:
if ((e == fe_modify || e == fe_close) && o.empty()) if ((e == fe_modify || e == fe_close) && o.empty())
{ {
const TDate dtcomp = field(F_DTCOMP).get(); const TDate dtcomp(field(F_DTCOMP).get());
const TDate dtiniz = field(F_INIZIO_ES).get(); const TDate dtiniz(field(F_INIZIO_ES).get());
if (dtcomp.ok() && dtcomp < dtiniz) if (dtcomp.ok() && dtcomp < dtiniz)
return error_box(TR("E' necessario specificare il numero di elementi per cespiti acquisiti negli esercizi precedenti")); return error_box(TR("E' necessario specificare il numero di elementi per cespiti acquisiti negli esercizi precedenti"));
const short fields[] = { F_COSTO, F_VNONAMM, F_RIV75, F_RIV83, F_RIV90, F_RIV91, F_RIVGF, F_RIVGC, 0 }; const short fields[] = { F_COSTO, F_VNONAMM, F_RIV75, F_RIV83, F_RIV90, F_RIV91, F_RIVGF, F_RIVGC, 0 };
@ -521,9 +523,9 @@ bool TEdit_mask::test_ammissibilita_saldi()
case 1: case 1:
case 2: case 2:
{ {
const TDate iniz = get(F_INIZIO_ES); const TDate iniz(get(F_INIZIO_ES));
const TDate dtacq = get(F_DTCOMP); const TDate dtacq(get(F_DTCOMP));
const TDate dtfunz = get(F_DTFUNZ); const TDate dtfunz(get(F_DTFUNZ));
if (!dtacq.ok() || !dtfunz.ok()) if (!dtacq.ok() || !dtfunz.ok())
protez = TRUE; protez = TRUE;
else else
@ -563,13 +565,13 @@ bool TEdit_mask::test_ammissibilita_fondi()
case 1: case 1:
case 2: case 2:
{ {
const TDate dtacq = get(F_DTCOMP); const TDate dtacq(get(F_DTCOMP));
const TDate dtfunz = get(F_DTFUNZ); const TDate dtfunz(get(F_DTFUNZ));
if (!dtacq.ok() || !dtfunz.ok()) if (!dtacq.ok() || !dtfunz.ok())
protez = TRUE; protez = TRUE;
else else
{ {
const TDate iniz = get(F_INIZIO_ES); const TDate iniz(get(F_INIZIO_ES));
protez = dtacq >= iniz; protez = dtacq >= iniz;
} }
if (protez) if (protez)
@ -590,8 +592,8 @@ bool TEdit_mask::test_ammissibilita_fondi()
if (!protez) if (!protez)
{ {
const TDate dtfunz = get(F_DTFUNZ); const TDate dtfunz(get(F_DTFUNZ));
const TDate iniz = get(F_INIZIO_ES); const TDate iniz(get(F_INIZIO_ES));
bool prot9 = FALSE; bool prot9 = FALSE;
if (!dtfunz.ok() || dtfunz >= iniz) if (!dtfunz.ok() || dtfunz >= iniz)
{ {
@ -735,7 +737,7 @@ void TAnacespi::init_query_mode(TMask& m)
bool TAnacespi::protected_record(TRectype& rec) bool TAnacespi::protected_record(TRectype& rec)
{ {
const TDate dtalien = rec.get(CESPI_DTALIEN); const TDate dtalien = rec.get_date(CESPI_DTALIEN);
return dtalien.ok(); return dtalien.ok();
} }
@ -784,9 +786,9 @@ void TAnacespi::init_modify_mode(TMask& m)
TDitta_cespiti& dc = ditta_cespiti(); TDitta_cespiti& dc = ditta_cespiti();
TDate iniz, fine; TDate iniz, fine;
const int ese = dc.esercizio_corrente(iniz, fine); dc.esercizio_corrente(iniz, fine);
const TDate dtacq = m.get(F_DTCOMP); const TDate dtacq(m.get(F_DTCOMP));
const TDate dtfunz = m.get(F_DTFUNZ); const TDate dtfunz(m.get(F_DTFUNZ));
const int staat = _qmask->stato_attivita(); const int staat = _qmask->stato_attivita();
TToken_string enabling; TToken_string enabling;
@ -877,7 +879,7 @@ int TAnacespi::write(const TMask& m)
break; break;
default: default:
{ {
TDate dt = m.get(F_DTFUNZ); TDate dt(m.get(F_DTFUNZ));
if (!dt.ok()) if (!dt.ok())
dt = m.get_date(F_INIZIO_ES); dt = m.get_date(F_INIZIO_ES);
// % beni mat D.M. 29/10/74 oppure D.M. 31/12/88 // % beni mat D.M. 29/10/74 oppure D.M. 31/12/88

4
ce/ce0900.cpp
View File

@ -657,7 +657,7 @@ int TConversione_cespiti::conv_tab(const TFilename& ofname, const char* tab)
} }
} }
// scrivo il record sul nuovo file // scrivo il record sul nuovo file
int errore = newrec.write(*newfile); newrec.write(*newfile);
} }
if (newfile) if (newfile)
delete newfile; delete newfile;
@ -739,7 +739,7 @@ int TConversione_cespiti::conv_inifile(const TFilename& ofname, const char* ofpa
} }
} }
// scrivo il record sul nuovo file // scrivo il record sul nuovo file
int errore = newrec.write(*newfile); newrec.write(*newfile);
} }
delete newfile; delete newfile;
} }

2
ce/ce1100.cpp
View File

@ -120,7 +120,7 @@ void TQuery_mask::calc_res(bool prec)
{ {
TCespite ces (get(F_IDCESPITE)); TCespite ces (get(F_IDCESPITE));
// calcolo ammortamento sul cespite (per sit. fiscale(1) e civilistica(2)) // calcolo ammortamento sul cespite (per sit. fiscale(1) e civilistica(2))
TDate fine_es = get(F_FINE_ES); TDate fine_es(get(F_FINE_ES));
ces.calc_amm(1, fine_es); ces.calc_amm(1, fine_es);
const TRectype& salce2=ces.sal_pro(); //rectype giá di "tipo fiscale" const TRectype& salce2=ces.sal_pro(); //rectype giá di "tipo fiscale"
const TRectype& ammce2=ces.amm_pro(); const TRectype& ammce2=ces.amm_pro();

1
ce/ce1101a.h
View File

@ -18,4 +18,3 @@
#define F_IDCESPITE 120 #define F_IDCESPITE 120
#define F_DESC 121 #define F_DESC 121

4
ce/ce1200.cpp
View File

@ -183,8 +183,8 @@ bool TForce_mov_qmask::on_field_event(TOperable_field& o, TField_event e, long j
return error_box(TR("Non sono ammessi ammortamenti sulle rettifiche")); return error_box(TR("Non sono ammessi ammortamenti sulle rettifiche"));
const TDate dtmov = curr_movce.get_date(MOVCE_DTMOV); // controlla che datamovimento sia inclusa nell'esercizio selezionato const TDate dtmov = curr_movce.get_date(MOVCE_DTMOV); // controlla che datamovimento sia inclusa nell'esercizio selezionato
const TDate dataini = get(F_INIZIO_ES); const TDate dataini(get(F_INIZIO_ES));
const TDate datafine = get(F_FINE_ES); const TDate datafine(get(F_FINE_ES));
if ( dtmov < dataini || dtmov > datafine) if ( dtmov < dataini || dtmov > datafine)
return error_box(TR("Il movimento selezionato non é di competenza dell'esercizio selezionato")); return error_box(TR("Il movimento selezionato non é di competenza dell'esercizio selezionato"));
} }

12
ce/ce1300.cpp
View File

@ -144,7 +144,7 @@ void TSelam_qmask::calc_res(bool prec)
{ {
TCespite ces (get(F_IDCESPITE)); TCespite ces (get(F_IDCESPITE));
// calcolo ammortamento sul cespite (per sit. fiscale(1) e civilistica(2)) // calcolo ammortamento sul cespite (per sit. fiscale(1) e civilistica(2))
TDate fine_es = get(F_FINE_ES); TDate fine_es(get(F_FINE_ES));
ces.calc_amm(1, fine_es); ces.calc_amm(1, fine_es);
const TRectype& salce2=ces.sal_pro(); //rectype giá di "tipo fiscale" const TRectype& salce2=ces.sal_pro(); //rectype giá di "tipo fiscale"
const TRectype& ammce2=ces.amm_pro(); const TRectype& ammce2=ces.amm_pro();
@ -307,8 +307,8 @@ bool TSelam_mmask::test_min(short quota, short minimo) const
const bool ammrit = get_bool(F_AMMRIT_CE); const bool ammrit = get_bool(F_AMMRIT_CE);
if (!ammrit) if (!ammrit)
{ {
const real perq = get(quota); const real perq(get(quota));
const real minq = get(minimo); const real minq(get(minimo));
warning = perq < minq; warning = perq < minq;
} }
return warning; return warning;
@ -456,7 +456,7 @@ bool TSelam_imask::on_field_event(TOperable_field& o, TField_event e, long jolly
case F_AMMCIV_CE: case F_AMMCIV_CE:
if (e == fe_modify || e == fe_close) if (e == fe_modify || e == fe_close)
{ {
TCespite ces = get(F_IDCESPITE); TCespite ces(get(F_IDCESPITE));
if ( (ces.get_int(CESPI_VINCOLO) != 2) && ( (get(F_AMMFISC_CE) > get(F_ALIQMAX)) || (get(F_AMMCIV_CE) > get(F_ALIQMAX)) ) ) if ( (ces.get_int(CESPI_VINCOLO) != 2) && ( (get(F_AMMFISC_CE) > get(F_ALIQMAX)) || (get(F_AMMCIV_CE) > get(F_ALIQMAX)) ) )
return error_box(TR("L' ammortamento richiesto supera il limite della categoria")); return error_box(TR("L' ammortamento richiesto supera il limite della categoria"));
} }
@ -498,12 +498,12 @@ bool TSelam_pmask::on_field_event(TOperable_field& o, TField_event e, long jolly
case F_AMMCIV_CE: case F_AMMCIV_CE:
if (e == fe_modify || e == fe_close) if (e == fe_modify || e == fe_close)
{ {
TCespite ces = get(F_IDCESPITE); TCespite ces(get(F_IDCESPITE));
if (ces.get_int(CESPI_VINCOLO) == 1) if (ces.get_int(CESPI_VINCOLO) == 1)
{ {
if (ces.get_int(CESPI_ANNIRIC) == 0) if (ces.get_int(CESPI_ANNIRIC) == 0)
{ {
real amm_fisc = o.get(); real amm_fisc(o.get());
if (amm_fisc == ZERO) //controlla l'obbligatorietá e la validitá dei campi (fiscale) if (amm_fisc == ZERO) //controlla l'obbligatorietá e la validitá dei campi (fiscale)
return error_box(TR("Compilare l'ammortamento scelto")); return error_box(TR("Compilare l'ammortamento scelto"));
else else

16
ce/ce1400.cpp
View File

@ -158,8 +158,8 @@ bool TMat_mask::test_min(short quota, short minimo) const
const bool ammrit = get_bool(F_AMMRIT); const bool ammrit = get_bool(F_AMMRIT);
if (!ammrit) if (!ammrit)
{ {
const real perq = get(quota); const real perq(get(quota));
const real minq = get(minimo); const real minq(get(minimo));
warning = perq < minq; warning = perq < minq;
} }
return warning; return warning;
@ -171,8 +171,8 @@ bool TMat_mask::test_rit(short quota, short minimo) const
const bool ammrit = get_bool(F_AMMRIT); const bool ammrit = get_bool(F_AMMRIT);
if (ammrit) if (ammrit)
{ {
const real perq = get(quota); const real perq(get(quota));
const real minq = get(minimo); const real minq(get(minimo));
warning = perq >= minq; warning = perq >= minq;
} }
return warning; return warning;
@ -190,8 +190,8 @@ bool TMat_mask::test_max(short nor, short ant, short acc) const
bool TMat_mask::is_max(short quota, short massima) const bool TMat_mask::is_max(short quota, short massima) const
{ {
const real perq = get(quota); const real perq(get(quota));
const real maxq = get(massima); const real maxq(get(massima));
return perq >= maxq; return perq >= maxq;
} }
@ -439,8 +439,8 @@ void TScelta_amm_cat::init_mask(TMask& m)
break; break;
default: default:
{ {
const real r11 = cac.get("R11"); const real r11 = cac.get_real("R11");
const real r12 = cac.get("R12"); const real r12 = cac.get_real("R12");
m.set(F_MIN_87, real(r12/2.0)); m.set(F_MIN_87, real(r12/2.0));
m.set(F_MIN_88, real(r12/2.0)); m.set(F_MIN_88, real(r12/2.0));
m.set(F_MIN_89, real(r11/2.0)); m.set(F_MIN_89, real(r11/2.0));

30
ce/ce1500.cpp
View File

@ -231,8 +231,8 @@ public:
// Determina se siamo in presenza di un cespite nuovo // Determina se siamo in presenza di un cespite nuovo
bool TMov_emask::cespite_nuovo() const bool TMov_emask::cespite_nuovo() const
{ {
const TDate dtacq = _cespite.get(CESPI_DTCOMP); const TDate dtacq = _cespite.get_date(CESPI_DTCOMP);
const TDate dtmov = get(F_DTMOV); const TDate dtmov(get(F_DTMOV));
return !dtacq.ok() || dtacq >= dtmov; return !dtacq.ok() || dtacq >= dtmov;
} }
@ -399,10 +399,10 @@ bool TMov_emask::on_field_event(TOperable_field& o, TField_event e, long jolly)
reset(F_CATEGORIA); reset(F_CATEGORIA);
reset(F_DESC_CAT); reset(F_DESC_CAT);
} }
const TDate dtcomp = _cespite.get(CESPI_DTCOMP); const TDate dtcomp = _cespite.get_date(CESPI_DTCOMP);
if (dtcomp.ok()) if (dtcomp.ok())
{ {
const TDate dtmov = get(F_DTMOV); const TDate dtmov(get(F_DTMOV));
if (dtcomp > dtmov) if (dtcomp > dtmov)
return error_box(TR("La data di acquisizione del cespite non può precedere quella del movimento")); return error_box(TR("La data di acquisizione del cespite non può precedere quella del movimento"));
} }
@ -431,10 +431,10 @@ bool TMov_emask::on_field_event(TOperable_field& o, TField_event e, long jolly)
ini.set("DataMovimento", ""); ini.set("DataMovimento", "");
} }
const TDate dtret = get(F_DTMOV_RET); const TDate dtret(get(F_DTMOV_RET));
if (dtret.ok()) if (dtret.ok())
{ {
const TDate dtmov = o.get(); const TDate dtmov(o.get());
if (dtmov < dtret) if (dtmov < dtret)
return error_box(TR("La data del movimento di rettifica deve seguire la data del movimento rettificato")); return error_box(TR("La data del movimento di rettifica deve seguire la data del movimento rettificato"));
} }
@ -553,8 +553,8 @@ void TMov_emask::calc_plus_minus(int tipo, real& plus, real& minus) const
{ {
TDitta_cespiti& cce = ditta_cespiti(); TDitta_cespiti& cce = ditta_cespiti();
TDate inies, fines; TDate inies, fines;
const int esercizio = cce.esercizio_corrente(inies, fines); cce.esercizio_corrente(inies, fines);
const TDate dtlim = get(F_DTMOV); const TDate dtlim(get(F_DTMOV));
TRelation rel(LF_MOVCE); TRelation rel(LF_MOVCE);
TString expr; expr << "IDCESPITE==IDCESPITE|IDMOV==IDMOV|TPAMM==\"" << tipo << '"'; TString expr; expr << "IDCESPITE==IDCESPITE|IDMOV==IDMOV|TPAMM==\"" << tipo << '"';
@ -587,7 +587,7 @@ bool TMov_emask::calc_amm(int tipo)
if (idcespite.empty()) if (idcespite.empty())
return FALSE; return FALSE;
const TDate dtlim = get(F_DTMOV); const TDate dtlim(get(F_DTMOV));
_cespite.calc_amm(tipo, dtlim); _cespite.calc_amm(tipo, dtlim);
set(S_DATAMOV, dtlim); set(S_DATAMOV, dtlim);
@ -640,7 +640,7 @@ void TMov_emask::set_fondi_inputability()
void TMov_emask::recalc_amm() void TMov_emask::recalc_amm()
{ {
const TDate dtlim = get(F_FINE_ES); const TDate dtlim(get(F_FINE_ES));
for (int tipo = 1; tipo <= 3; tipo++) for (int tipo = 1; tipo <= 3; tipo++)
_cespite.calc_amm(tipo, dtlim); _cespite.calc_amm(tipo, dtlim);
} }
@ -786,7 +786,7 @@ void TMovicespi::calc_residuo(long numreg)
for (cur = 0L; cur.pos() < items; ++cur) for (cur = 0L; cur.pos() < items; ++cur)
{ {
const char segno = movce.get_char(MOVCE_SEGNO); const char segno = movce.get_char(MOVCE_SEGNO);
real imp = movce.get(segno == '-' ? MOVCE_IMPVEN : MOVCE_CSTO); real imp = movce.get_real(segno == '-' ? MOVCE_IMPVEN : MOVCE_CSTO);
if (imp > ZERO) // Cerca una riga con lo stesso importo if (imp > ZERO) // Cerca una riga con lo stesso importo
{ {
for (int r = 0; r < s.items(); r++) for (int r = 0; r < s.items(); r++)
@ -810,7 +810,7 @@ void TMovicespi::calc_residuo(long numreg)
if (ignore.is_key(movce.get(MOVCE_IDMOV))) if (ignore.is_key(movce.get(MOVCE_IDMOV)))
continue; continue;
const char segno = movce.get_char(MOVCE_SEGNO); const char segno = movce.get_char(MOVCE_SEGNO);
real imp = movce.get(segno == '-' ? MOVCE_IMPVEN : MOVCE_CSTO); real imp = movce.get_real(segno == '-' ? MOVCE_IMPVEN : MOVCE_CSTO);
for (int r = 0; r < s.items() && imp > ZERO; r++) for (int r = 0; r < s.items() && imp > ZERO; r++)
{ {
TToken_string& row = s.row(r); TToken_string& row = s.row(r);
@ -864,8 +864,8 @@ void TMovicespi::show_plus_minus(TMask& m)
key.add(m.get(F_IDMOV)); key.add(m.get(F_IDMOV));
key.add(tipo); key.add(tipo);
const TRectype& ammmv = cache().get(LF_AMMMV, key); const TRectype& ammmv = cache().get(LF_AMMMV, key);
const real plus = ammmv.get(AMMMV_PLUS); const real plus = ammmv.get_real(AMMMV_PLUS);
const real minus = ammmv.get(AMMMV_MINUS); const real minus = ammmv.get_real(AMMMV_MINUS);
const bool on = !plus.is_zero() || !minus.is_zero(); const bool on = !plus.is_zero() || !minus.is_zero();
if (on) if (on)
{ {
@ -1015,7 +1015,7 @@ void TMovicespi::init_modify_mode(TMask& m)
m.disable(F_DESC_CES); m.disable(F_DESC_CES);
const TRectype& rec = get_relation()->curr(); const TRectype& rec = get_relation()->curr();
const TDate dtmov = rec.get(MOVCE_DTMOV); const TDate dtmov = rec.get_date(MOVCE_DTMOV);
bool bollato = rec.get_bool(MOVCE_STAMPATO); bool bollato = rec.get_bool(MOVCE_STAMPATO);
if (!bollato) // Se proprio non ci fidiamo del flag if (!bollato) // Se proprio non ci fidiamo del flag
{ {

2
ce/ce2100.cpp
View File

@ -81,7 +81,7 @@ bool TCalcamm::calcola_ammortamenti()
const TString& esercizio = _mask->get(F_ESERCIZIO); const TString& esercizio = _mask->get(F_ESERCIZIO);
const TString& gruppo = _mask->get(F_GRUPPO); const TString& gruppo = _mask->get(F_GRUPPO);
const TString& specie = _mask->get(F_SPECIE); const TString& specie = _mask->get(F_SPECIE);
const TDate data_limite = _mask->get(F_FINE_ES); const TDate data_limite(_mask->get(F_FINE_ES));
TRectype filter(LF_CESPI); TRectype filter(LF_CESPI);
filter.put(CESPI_CODCGRA, gruppo); filter.put(CESPI_CODCGRA, gruppo);

74
ce/ce2101.cpp
View File

@ -68,7 +68,7 @@ HIDDEN real sum_fields(const TRectype& rec, const char* fld0, const char* fld1,
const char* fld6 = NULL, const char* fld7 = NULL, const char* fld8 = NULL, const char* fld6 = NULL, const char* fld7 = NULL, const char* fld8 = NULL,
const char* fld9 = NULL, const char* fld10 = NULL, const char* fld11 = NULL) const char* fld9 = NULL, const char* fld10 = NULL, const char* fld11 = NULL)
{ {
real sum = rec.get(fld0); real sum = rec.get_real(fld0);
sum += rec.get_real(fld1); sum += rec.get_real(fld1);
if (fld2 && *fld2) sum += rec.get_real(fld2); if (fld2 && *fld2) sum += rec.get_real(fld2);
if (fld3 && *fld3) sum += rec.get_real(fld3); if (fld3 && *fld3) sum += rec.get_real(fld3);
@ -252,7 +252,7 @@ bool TCespite::valido()
read_amm(esercizio); read_amm(esercizio);
// Cespite alienato // Cespite alienato
const TDate alienazione = get(CESPI_DTALIEN); const TDate alienazione = get_date(CESPI_DTALIEN);
if (alienazione.ok() && alienazione < ini_es) if (alienazione.ok() && alienazione < ini_es)
{ {
set_msg05(TR("cespite completamente eliminato.")); set_msg05(TR("cespite completamente eliminato."));
@ -268,7 +268,7 @@ bool TCespite::valido()
} }
// Cespite non ancora completato // Cespite non ancora completato
const TDate completamento = get(CESPI_DTCOMP); const TDate completamento = get_date(CESPI_DTCOMP);
if (!completamento.ok() || completamento > fin_es) if (!completamento.ok() || completamento > fin_es)
{ {
set_msg05(TR("cespite non completato.")); set_msg05(TR("cespite non completato."));
@ -280,7 +280,7 @@ bool TCespite::valido()
const TTipo_cespite tc = tipo(); const TTipo_cespite tc = tipo();
if (tc == tc_materiale || (tc == tc_immateriale && !get_bool(CESPI_TUIR))) if (tc == tc_materiale || (tc == tc_immateriale && !get_bool(CESPI_TUIR)))
{ {
const TDate funzione = get(CESPI_DTFUNZ); const TDate funzione = get_date(CESPI_DTFUNZ);
if (!funzione.ok() || funzione > fin_es) if (!funzione.ok() || funzione > fin_es)
{ {
set_msg05(TR("cespite non ancora entrato in funzione.")); set_msg05(TR("cespite non ancora entrato in funzione."));
@ -328,8 +328,8 @@ real TCespite::val_amm() const
if (_tipo_sit == 2 && !get_bool(CESPI_LEASING)) if (_tipo_sit == 2 && !get_bool(CESPI_LEASING))
val += _salpro.get_real(SALCE_RIVGC); val += _salpro.get_real(SALCE_RIVGC);
const real riv90 = _salpro.get(SALCE_RIV90); const real riv90 = _salpro.get_real(SALCE_RIV90);
const real riv91 = _salpro.get(SALCE_RIV91); const real riv91 = _salpro.get_real(SALCE_RIV91);
if (riv90 != ZERO || riv91 != ZERO) if (riv90 != ZERO || riv91 != ZERO)
{ {
const int annipost90 = _salpro.get_int(SALCE_ANNIPOST90); const int annipost90 = _salpro.get_int(SALCE_ANNIPOST90);
@ -371,7 +371,7 @@ TRectype& date2limit(const TDate& d)
bool ok = clm.last() == NOERR; bool ok = clm.last() == NOERR;
if (ok) if (ok)
{ {
TDate datalim = clm.get("CODTAB"); TDate datalim = clm.get_date("CODTAB");
ok = d >= datalim; ok = d >= datalim;
while (!ok) while (!ok)
{ {
@ -480,10 +480,10 @@ void TCespite::prepara_saldi(bool is_valid)
// Certified 100% // Certified 100%
void TCespite::incr_field(TRectype& dst, const char* fdst, const TRectype& src, const char* fsrc, char segno) const void TCespite::incr_field(TRectype& dst, const char* fdst, const TRectype& src, const char* fsrc, char segno) const
{ {
const real num = src.get(fsrc); const real num = src.get_real(fsrc);
if (!num.is_zero()) if (!num.is_zero())
{ {
real val = dst.get(fdst); real val = dst.get_real(fdst);
if (segno == '-') if (segno == '-')
val -= num; val -= num;
else else
@ -663,8 +663,8 @@ void TCespite::rip_jolly(TRelation& rel, const real& num, const real& den, int m
void TCespite::rip_elem(TRelation& rel, int mode) void TCespite::rip_elem(TRelation& rel, int mode)
{ {
log(TR("# Ripartizionamento importi in base agli elementi")); log(TR("# Ripartizionamento importi in base agli elementi"));
const real num = rel.curr(LF_MOVCE).get(MOVCE_NUMELE); const real num = rel.curr(LF_MOVCE).get_real(MOVCE_NUMELE);
const real den = _salpro.get(SALCE_NUMELE); const real den = _salpro.get_real(SALCE_NUMELE);
if (den > ZERO) if (den > ZERO)
rip_jolly(rel, num, den, mode); rip_jolly(rel, num, den, mode);
else else
@ -676,8 +676,8 @@ void TCespite::rip_elem(TRelation& rel, int mode)
void TCespite::rip_costo(TRelation& rel, int mode) void TCespite::rip_costo(TRelation& rel, int mode)
{ {
log(TR("# Ripartizionamento importi in base al costo storico")); log(TR("# Ripartizionamento importi in base al costo storico"));
const real num = rel.curr(LF_MOVCE).get(MOVCE_CSTO); const real num = rel.curr(LF_MOVCE).get_real(MOVCE_CSTO);
const real den = _salpro.get(SALCE_CSTO); const real den = _salpro.get_real(SALCE_CSTO);
if (den > ZERO) if (den > ZERO)
rip_jolly(rel, num, den, mode); rip_jolly(rel, num, den, mode);
else else
@ -759,8 +759,8 @@ real TCespite::calc_quota(const real& valamm, const real& perric,
{ {
TDate inies, fines; TDate inies, fines;
cce.esercizio_corrente(inies, fines); cce.esercizio_corrente(inies, fines);
const TDate dtmov = mov->curr(LF_MOVCE).get(MOVCE_DTMOV); const TDate dtmov = mov->curr(LF_MOVCE).get_date(MOVCE_DTMOV);
const TDate dtcomp = get(CESPI_DTCOMP); const TDate dtcomp = get_date(CESPI_DTCOMP);
const long giorni_possesso = dtmov - fnc_max(inies, dtcomp) + 1; const long giorni_possesso = dtmov - fnc_max(inies, dtcomp) + 1;
const long giorni_esercizio = fines - inies + 1; const long giorni_esercizio = fines - inies + 1;
quota = quota * giorni_possesso / giorni_esercizio; quota = quota * giorni_possesso / giorni_esercizio;
@ -799,7 +799,7 @@ real TCespite::calc_quote_perse(const real& valamm, const real& peric, const rea
{ {
TDate inies, fines; TDate inies, fines;
cce.esercizio_corrente(inies, fines); cce.esercizio_corrente(inies, fines);
const TDate dtcomp = get(CESPI_DTCOMP); const TDate dtcomp = get_date(CESPI_DTCOMP);
const real giorni_possesso = dtmov - fnc_max(inies, dtcomp) + 1; const real giorni_possesso = dtmov - fnc_max(inies, dtcomp) + 1;
const real giorni_esercizio = fines - inies + 1; const real giorni_esercizio = fines - inies + 1;
quota = quota * giorni_possesso / giorni_esercizio; quota = quota * giorni_possesso / giorni_esercizio;
@ -850,7 +850,7 @@ void TCespite::agg_quota(const real& movvalamm, TRectype& rec, const char* field
clim = mva; clim = mva;
const TDitta_cespiti& cce = ditta_cespiti(); const TDitta_cespiti& cce = ditta_cespiti();
const real quotat = rec.get(field); const real quotat = rec.get_real(field);
const real limcsto = clim / mva; const real limcsto = clim / mva;
real campo = quotat * limcsto * perc; real campo = quotat * limcsto * perc;
cce.arrotonda(campo); cce.arrotonda(campo);
@ -861,7 +861,7 @@ void TCespite::agg_quota(const real& movvalamm, TRectype& rec, const char* field
rec.put("FPRIVATO", rec.get_real("FPRIVATO") + quotat - campo); rec.put("FPRIVATO", rec.get_real("FPRIVATO") + quotat - campo);
if (calcq) if (calcq)
{ {
const real quotap = rec.get("QPERSE"); const real quotap = rec.get_real("QPERSE");
real qp = quotap * limcsto * perc; real qp = quotap * limcsto * perc;
cce.arrotonda(qp); cce.arrotonda(qp);
rec.put("QPERSE", qp); rec.put("QPERSE", qp);
@ -936,7 +936,7 @@ TString& TCespite::ammini_get(const char* pstar) const
{ {
case tc_materiale: case tc_materiale:
{ {
TDate dtfunz = get(CESPI_DTFUNZ); TDate dtfunz = get_date(CESPI_DTFUNZ);
if (!dtfunz.ok()) if (!dtfunz.ok())
{ {
TDate dtdummy; TDate dtdummy;
@ -977,7 +977,7 @@ TString& TCespite::ammini_get(const char* pstar) const
case 4: // PANT case 4: // PANT
if (tc == tc_materiale && scelte == 2) if (tc == tc_materiale && scelte == 2)
{ {
TDate dtfunz = get(CESPI_DTFUNZ); TDate dtfunz = get_date(CESPI_DTFUNZ);
if (!dtfunz.ok()) if (!dtfunz.ok())
{ {
TDate dtdummy; TDate dtdummy;
@ -1006,7 +1006,7 @@ bool TCespite::ammini_get_bool(const char* pstar) const
real TCespite::ammini_get_real(const char* pstar) const real TCespite::ammini_get_real(const char* pstar) const
{ {
const real val = ammini_get(pstar); const real val = ammini_get_real(pstar);
return val; return val;
} }
@ -1102,14 +1102,14 @@ void TCespite::calc_perc(TRelation& rel, const TRectype& tmv, const TRectype& tm
real resamm = mov_res_amm(tmv, tmvam) - ammmv.get_real(AMMMV_FPRIVATO); real resamm = mov_res_amm(tmv, tmvam) - ammmv.get_real(AMMMV_FPRIVATO);
if (resamm > ZERO) if (resamm > ZERO)
{ {
const real penor = ammmv.get(AMMMV_PENOR); const real penor = ammmv.get_real(AMMMV_PENOR);
real per_eff; real per_eff;
const real qnor = calc_quota(mov_val_amm(tmv), penor, resamm, per_eff, &rel); const real qnor = calc_quota(mov_val_amm(tmv), penor, resamm, per_eff, &rel);
ammmv.put(AMMMV_QNOR, qnor); ammmv.put(AMMMV_QNOR, qnor);
ammmv.put(AMMMV_PENOR, per_eff); ammmv.put(AMMMV_PENOR, per_eff);
resamm -= qnor; resamm -= qnor;
const real peacc = ammmv.get(AMMMV_PEACC); const real peacc = ammmv.get_real(AMMMV_PEACC);
if (resamm > ZERO && peacc > ZERO) if (resamm > ZERO && peacc > ZERO)
{ {
const real qacc = calc_quota(mov_val_amm(tmv), peacc, resamm, per_eff, &rel); const real qacc = calc_quota(mov_val_amm(tmv), peacc, resamm, per_eff, &rel);
@ -1118,7 +1118,7 @@ void TCespite::calc_perc(TRelation& rel, const TRectype& tmv, const TRectype& tm
resamm -= qacc; resamm -= qacc;
} }
const real peant = ammmv.get(AMMMV_PEANT); const real peant = ammmv.get_real(AMMMV_PEANT);
if (resamm > ZERO && peant > ZERO) if (resamm > ZERO && peant > ZERO)
{ {
const real qant = calc_quota(mov_val_amm(tmv), peant, resamm, per_eff, &rel); const real qant = calc_quota(mov_val_amm(tmv), peant, resamm, per_eff, &rel);
@ -1171,7 +1171,7 @@ void TCespite::calc_perc(TRelation& rel, const TRectype& tmv, const TRectype& tm
ammmv.put(AMMMV_PENOR, per_eff); ammmv.put(AMMMV_PENOR, per_eff);
// Calcolare quote perse // Calcolare quote perse
const TDate dtmov = tmv.get(MOVCE_DTMOV); const TDate dtmov = tmv.get_date(MOVCE_DTMOV);
const real quote_perse = calc_quote_perse(valamm, per_eff, resamm, qnor, TRUE, dtmov); const real quote_perse = calc_quote_perse(valamm, per_eff, resamm, qnor, TRUE, dtmov);
ammmv.put(AMMMV_QPERSE, quote_perse); ammmv.put(AMMMV_QPERSE, quote_perse);
@ -1208,7 +1208,7 @@ void TCespite::calc_perc(TRelation& rel, const TRectype& tmv, const TRectype& tm
resamm -= ammmv.get_real(AMMMV_QACC); resamm -= ammmv.get_real(AMMMV_QACC);
if (tipo() == tc_materiale && _salini.get_int(SALCE_ANNIAMM) <= 2) if (tipo() == tc_materiale && _salini.get_int(SALCE_ANNIAMM) <= 2)
{ {
const real peant = ammmv.get(AMMMV_PEANT); const real peant = ammmv.get_real(AMMMV_PEANT);
if (resamm > ZERO && peant > ZERO && ammmv.get_real(AMMMV_QPERSE) == ZERO) if (resamm > ZERO && peant > ZERO && ammmv.get_real(AMMMV_QPERSE) == ZERO)
{ {
const real qant = calc_quota(valamm, peant, resamm, per_eff, &rel); const real qant = calc_quota(valamm, peant, resamm, per_eff, &rel);
@ -1262,7 +1262,7 @@ void TCespite::calc_anni(TRectype& ammmv, const TRectype& tmv, const TRectype& t
} }
const real resamm = mov_res_amm(tmv, tmvam); const real resamm = mov_res_amm(tmv, tmvam);
real qnor = ammmv.get(AMMMV_QNOR); real qnor = ammmv.get_real(AMMMV_QNOR);
if (resamm < qnor) if (resamm < qnor)
{ {
qnor = resamm; qnor = resamm;
@ -1389,7 +1389,7 @@ void TCespite::scansione_movimenti(const TDate& data_limite, bool is_valid)
log(TR("- Scansione movimenti")); log(TR("- Scansione movimenti"));
TDitta_cespiti& cce = ditta_cespiti(); TDitta_cespiti& cce = ditta_cespiti();
TDate inies, fines; TDate inies, fines;
const int esercizio = cce.esercizio_corrente(inies, fines); cce.esercizio_corrente(inies, fines);
TRelation rel(LF_MOVCE); TRelation rel(LF_MOVCE);
@ -1510,7 +1510,7 @@ void TCespite::calc_amm_residui(bool is_valid)
real resamm = res_amm() - _ammpro.get_real(AMMCE_FPRIVATO); real resamm = res_amm() - _ammpro.get_real(AMMCE_FPRIVATO);
if (resamm > ZERO) if (resamm > ZERO)
{ {
real qnor = _ammpro.get(AMMCE_QNOR); real qnor = _ammpro.get_real(AMMCE_QNOR);
if (resamm < qnor) if (resamm < qnor)
_ammpro.put(AMMCE_QNOR, qnor = resamm); // Forzo la quota uguale al residuo _ammpro.put(AMMCE_QNOR, qnor = resamm); // Forzo la quota uguale al residuo
@ -1520,7 +1520,7 @@ void TCespite::calc_amm_residui(bool is_valid)
resamm -= qnor; resamm -= qnor;
if (resamm > ZERO) if (resamm > ZERO)
{ {
real qacc = _ammpro.get(AMMCE_QACC); real qacc = _ammpro.get_real(AMMCE_QACC);
if (resamm < qacc) if (resamm < qacc)
_ammpro.put(AMMCE_QACC, qacc = resamm); // Forzo la quota uguale al residuo _ammpro.put(AMMCE_QACC, qacc = resamm); // Forzo la quota uguale al residuo
const real pacc = qacc / coeff_durata * 100.0 / val_amm(); const real pacc = qacc / coeff_durata * 100.0 / val_amm();
@ -1533,7 +1533,7 @@ void TCespite::calc_amm_residui(bool is_valid)
} }
if (resamm > ZERO) if (resamm > ZERO)
{ {
real qant = _ammpro.get(AMMCE_QANT); real qant = _ammpro.get_real(AMMCE_QANT);
if (resamm < qant) if (resamm < qant)
_ammpro.put(AMMCE_QANT, qant = resamm); // Forzo la quota uguale al residuo _ammpro.put(AMMCE_QANT, qant = resamm); // Forzo la quota uguale al residuo
const real pant = qant / coeff_durata * 100.0 / val_amm(); const real pant = qant / coeff_durata * 100.0 / val_amm();
@ -1570,7 +1570,7 @@ void TCespite::calc_amm_residui(bool is_valid)
AMMCE_QPERSE, AMMCE_FPRIVATO, AMMCE_QPPRIVATE, NULL); AMMCE_QPERSE, AMMCE_FPRIVATO, AMMCE_QPPRIVATE, NULL);
} }
const real pacc = _ammpro.get(AMMCE_PACC); const real pacc = _ammpro.get_real(AMMCE_PACC);
if (resamm > ZERO && pacc > ZERO) if (resamm > ZERO && pacc > ZERO)
{ {
const real valamm = val_amm(); const real valamm = val_amm();
@ -1583,7 +1583,7 @@ void TCespite::calc_amm_residui(bool is_valid)
else else
zero_fields(_ammpro, AMMCE_QACC, AMMCE_PACC, NULL); zero_fields(_ammpro, AMMCE_QACC, AMMCE_PACC, NULL);
const real pant = _ammpro.get(AMMCE_PANT); const real pant = _ammpro.get_real(AMMCE_PANT);
if (resamm > ZERO && pant > ZERO) if (resamm > ZERO && pant > ZERO)
{ {
const real valamm = val_amm(); const real valamm = val_amm();
@ -1605,7 +1605,7 @@ void TCespite::calc_amm_residui(bool is_valid)
// Percentuale minima quote perse // Percentuale minima quote perse
real pmat = get_real(CESPI_PMAT) / 2.0; real pmat = get_real(CESPI_PMAT) / 2.0;
const TDate dtfunz = get(CESPI_DTFUNZ); const TDate dtfunz = get_date(CESPI_DTFUNZ);
if (tc == tc_materiale && _salini.get_int(SALCE_ANNIAMM) == 0 && if (tc == tc_materiale && _salini.get_int(SALCE_ANNIAMM) == 0 &&
!cce.professionista() && dtfunz >= inies) !cce.professionista() && dtfunz >= inies)
{ {
@ -1613,7 +1613,7 @@ void TCespite::calc_amm_residui(bool is_valid)
real vam = val_amm(); real vam = val_amm();
if (vam > ZERO) if (vam > ZERO)
{ {
const real numele = _salpro.get(SALCE_NUMELE); const real numele = _salpro.get_real(SALCE_NUMELE);
if (numele > ZERO) if (numele > ZERO)
vam /= numele; vam /= numele;
} }
@ -1651,7 +1651,7 @@ void TCespite::calc_amm_residui(bool is_valid)
if (resamm > ZERO) if (resamm > ZERO)
{ {
const real valamm = val_amm(); const real valamm = val_amm();
const real pnor = _ammpro.get(AMMCE_PNOR); const real pnor = _ammpro.get_real(AMMCE_PNOR);
real per_eff; real per_eff;
const real qnor = calc_quota(valamm, pnor, resamm, per_eff); const real qnor = calc_quota(valamm, pnor, resamm, per_eff);
_ammpro.put(AMMCE_QNOR, qnor); _ammpro.put(AMMCE_QNOR, qnor);
@ -1802,7 +1802,7 @@ void TCespite::agg_spe_man(bool is_valid)
ccb.put("CODTAB", key); ccb.put("CODTAB", key);
} }
real speman = ccb.get(field); real speman = ccb.get_real(field);
if (tpspeman == 3) if (tpspeman == 3)
speman += vspmanu * 0.25; // 25% speman += vspmanu * 0.25; // 25%
else else

8
ce/ce2200.cpp
View File

@ -300,7 +300,7 @@ void TOpenesc::test_alien(const TRectype& salce, const TDate& fines) const
cespiti.put(CESPI_IDCESPITE, idcespite); cespiti.put(CESPI_IDCESPITE, idcespite);
if (cespiti.read() == NOERR) if (cespiti.read() == NOERR)
{ {
const TDate dtcomp = cespiti.get(CESPI_DTCOMP); const TDate dtcomp = cespiti.get_date(CESPI_DTCOMP);
if (dtcomp <= fines) if (dtcomp <= fines)
{ {
cespiti.put(CESPI_DTALIEN, fines); cespiti.put(CESPI_DTALIEN, fines);
@ -356,7 +356,7 @@ void TOpenesc::crea_saldi(int oldes, int newes) const
void TOpenesc::incr_zero(TRectype& rec, const char* val, const char* valp) const void TOpenesc::incr_zero(TRectype& rec, const char* val, const char* valp) const
{ {
real num = rec.get(val); real num = rec.get_real(val);
num += rec.get_real(valp); num += rec.get_real(valp);
rec.put(val, num); rec.put(val, num);
rec.zero(valp); rec.zero(valp);
@ -406,8 +406,8 @@ void TOpenesc::main_loop()
{ {
const int oldes = m.get_int(F_OLDES); const int oldes = m.get_int(F_OLDES);
const int newes = m.get_int(F_NEWES); const int newes = m.get_int(F_NEWES);
const TDate ies = m.get(F_NEWINIZIO); const TDate ies(m.get(F_NEWINIZIO));
const TDate fes = m.get(F_NEWFINE); const TDate fes(m.get(F_NEWFINE));
crea_esercizio(oldes, newes, ies, fes); crea_esercizio(oldes, newes, ies, fes);
crea_attivita(oldes, newes); crea_attivita(oldes, newes);
crea_registro(oldes, newes); crea_registro(oldes, newes);

8
ce/ce2400.cpp
View File

@ -157,8 +157,8 @@ static bool MovHandler(TRelation& rel, void* jolly)
if (movce.get_bool(MOVCE_STAMPATO)) // Salta i movimenti già stampati su bollato if (movce.get_bool(MOVCE_STAMPATO)) // Salta i movimenti già stampati su bollato
return FALSE; return FALSE;
const TDate dtmov = movce.get(MOVCE_DTMOV); const TDate dtmov = movce.get_date(MOVCE_DTMOV);
const TDate dtacq = data._cespite->get(CESPI_DTCOMP); const TDate dtacq = data._cespite->get_date(CESPI_DTCOMP);
if (dtmov < dtacq) // Ignora movimenti precedenti l'acquisizione del cespite if (dtmov < dtacq) // Ignora movimenti precedenti l'acquisizione del cespite
return FALSE; return FALSE;
@ -172,11 +172,11 @@ static bool CespHandler(TRelation& rel, void* jolly)
TTras_data& data = *(TTras_data*)jolly; TTras_data& data = *(TTras_data*)jolly;
data._cespite = &cespite; // Inizializza cespite corrente data._cespite = &cespite; // Inizializza cespite corrente
const TDate dtalien = cespite.get(CESPI_DTALIEN); const TDate dtalien = cespite.get_date(CESPI_DTALIEN);
if (dtalien.ok() && dtalien < data._inizio) // Escludi cespiti alienati if (dtalien.ok() && dtalien < data._inizio) // Escludi cespiti alienati
return FALSE; return FALSE;
const TDate dtcomp = cespite.get(CESPI_DTCOMP); const TDate dtcomp = cespite.get_date(CESPI_DTCOMP);
if (!dtcomp.ok() || dtcomp > data._fine) // Escludi cespiti non in funzione if (!dtcomp.ok() || dtcomp > data._fine) // Escludi cespiti non in funzione
return FALSE; return FALSE;

2
ce/ce2500.cpp
View File

@ -64,7 +64,7 @@ void TRestore_boll::pulisci_movce()
{ {
int ese; int ese;
TString4 gru, specie; TString4 gru, specie;
const TRectype& curr = ditta_cespiti().get_attivita(ese, gru, specie); ditta_cespiti().get_attivita(ese, gru, specie);
TDate inies, fines; TDate inies, fines;
ditta_cespiti().esercizio_corrente(inies, fines); ditta_cespiti().esercizio_corrente(inies, fines);