diff --git a/ps/pd6292100.cpp b/ps/pd6292100.cpp index c26f25aa5..526818a3e 100755 --- a/ps/pd6292100.cpp +++ b/ps/pd6292100.cpp @@ -97,7 +97,7 @@ class TProspettoScadenze : public TPrintapp _nsinfasce; TString _anno,_numdoc,_protiva,_datadoc,_codval, _codvalsel, _cod, _cod_pre, _des, _des_pre; - TDate _limop, _limscad, _datas, _limbf; // Data limite operazione, data limite scaduto e data di stampa + TDate _limop, _limscaduto, _datas, _limbf; // Data limite operazione, data limite scaduto e data di stampa int _gcr, // Giorni per Calcolo Rischio (valido solo per stampa clienti) _sfasce, _nsfasce; @@ -204,7 +204,7 @@ void TProspettoScadenze::compute_antic(TPartita& p, const TDate & datalim) const char * field = (_stvaluta && rp.in_valuta() ? PART_IMPORTOVAL : PART_IMPORTO); const TDate & d = rp.get_date(PART_DATAPAG); - if (d > _limscad) + if (d > _limscaduto) { if (_nsinfasce) { @@ -245,9 +245,9 @@ void TProspettoScadenze::compute_antic(TPartita& p, const TDate & datalim) update_totals(1, esposto, s, ns); // ...Generale } -void TProspettoScadenze::compute_unassigned(TPartita& p, const TDate & datalim) +void TProspettoScadenze::compute_unassigned(TPartita& p, const TDate& datalim) { - TRecord_array& ra = p.unassigned(); + const TRecord_array& ra = p.unassigned(); _uns = _unsnc = _unsesp = ZERO; _unsdscd = datalim; @@ -255,25 +255,26 @@ void TProspettoScadenze::compute_unassigned(TPartita& p, const TDate & datalim) { const TRectype& rec = ra.row(r); const TRiga_partite& sum = p.riga(rec.get_int(PAGSCA_NRIGP)); - const char * field = (_stvaluta && sum.in_valuta() ? PAGSCA_IMPORTOVAL : PAGSCA_IMPORTO); - const TDate & datascad = sum.get_date(PART_DATAPAG); - - if ((datascad <= datalim)) + const char* field = (_stvaluta && sum.in_valuta()) ? PAGSCA_IMPORTOVAL : PAGSCA_IMPORTO; + const TDate datascad = sum.get_date(PART_DATAPAG); + const int tm = sum.get_int(PART_TIPOMOV); + if (datascad <= datalim) { _unsdscd = datascad; - if (sum.get_int(PART_TIPOMOV) == 2) // Is it a credit note ? + if (tm == 2) // Is it a credit note ? _unsnc += rec.get_real(field); else _uns += rec.get_real(field); } + /* NON CONSIDERARE MOVIMENTI DOPO LA DATA LIMITE else { - if (sum.get_int(PART_TIPOMOV) == 2) // Is it a credit note ? + if (tm == 2) // Is it a credit note ? _unsesp -= rec.get_real(field); else _unsesp += rec.get_real(field); } - + */ } } @@ -353,7 +354,7 @@ void TProspettoScadenze::compute_all(TPartita& p, TBill& bill) if (prima_riga_pagamento > -1 && prima_riga_pagamento == pp) data_pag = d; // Se e' il primo pagamento(in ordine di data) di questa rata // prende la data di scadenza relativa. - if (data_pag > _limbf && data_pag <= _limscad) + if (data_pag > _limbf && data_pag <= _limscaduto) bf += TImporto(sez,pg.get_real(field)); } } @@ -389,7 +390,7 @@ void TProspettoScadenze::compute_all(TPartita& p, TBill& bill) if (rscd == ZERO) // Se le scadenze sono a zero, vuol dire che sono state stornate res = ZERO; // da qualche nota di credito o non assegnato percio' non si ha residuo - if (d > _limscad) + if (d > _limscaduto) { if (_nsinfasce) { @@ -543,7 +544,7 @@ bool TProspettoScadenze::preprocess_page(int file, int counter) real res = - _uns - _unsnc; - if (d > _limscad) + if (d > _limscaduto) { if (_nsinfasce) { @@ -616,8 +617,8 @@ bool TProspettoScadenze::open_print() _gcr = _m->get_int(F_GIORNI); _datas = _m->get_date(F_DATASTAMPA); _limop = _m->get_date(F_DATAOPERAZIONE); - _limscad = _m->get_date(F_DATASCADUTO); - _limbf = _limscad - (long)_gcr; // Limite inferiore per le scadenze a Buon Fine. + _limscaduto = _m->get_date(F_DATASCADUTO); + _limbf = _limscaduto - (long)_gcr; // Limite inferiore per le scadenze a Buon Fine. _sinfasce = _m->get_bool(F_SCADINFASCE); _nsinfasce = _m->get_bool(F_ASCADINFASCE); _s_date.destroy(); @@ -630,13 +631,13 @@ bool TProspettoScadenze::open_print() for (int j = 0; j < _sfasce; j++) { TDate & d = (TDate &)_s_date[j]; - d = _limscad; + d = _limscaduto; d.addmonth(-_slimiti[j]); } for (int k = 0; k < _nsfasce; k++) { TDate & d = (TDate &)_ns_date[k]; - d = _limscad; + d = _limscaduto; d.addmonth(_nslimiti[k]); } _anno.cut(0);_numdoc.cut(0);_protiva.cut(0);_datadoc.cut(0); @@ -956,8 +957,8 @@ void TProspettoScadenze::print_totali_rows(int nriga, bool what) } pos += 13; - const real diff = v._sl - (tot - v._es); - if (diff != ZERO) + real diff = v._sl - (tot - v._es); diff.round(3); + if (!diff.is_zero()) { print_real(value, diff); rw << format("@%dg%13s", pos, (const char*) value); @@ -1087,7 +1088,7 @@ void TProspettoScadenze::print_header() s = ditte.get(NDT_RAGSOC); TString datas = _datas.string(); TString limop = _limop.string(); - TString limscad = _limscad.string(); + TString limscad = _limscaduto.string(); TString s1; if (_stvaluta) @@ -1174,15 +1175,14 @@ int TProspettoScadenze::calc_last_column() // Setta le righe dell'intestazione { int pos = 112; - - if (_sinfasce) - pos += _sfasce * 13; - else - pos += 13; - if (_nsinfasce) - pos = pos + _nsfasce * 13; - else - pos += 13; + if (_sinfasce) + pos += _sfasce * 13; + else + pos += 13; + if (_nsinfasce) + pos = pos + _nsfasce * 13; + else + pos += 13; return pos; }