From 68f9bdbfcf44831a31a47ed8b181022c46fd5a86 Mon Sep 17 00:00:00 2001 From: guy Date: Tue, 19 Dec 1995 15:56:21 +0000 Subject: [PATCH] Modificata gestione descrizioni fisse git-svn-id: svn://10.65.10.50/trunk@2322 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- sc/sc2100.cpp | 195 ++++++++++++++++++++++++++++++++++++-------------- sc/sc21pec.h | 1 + 2 files changed, 143 insertions(+), 53 deletions(-) diff --git a/sc/sc2100.cpp b/sc/sc2100.cpp index 9e1de2c46..23fc48dba 100755 --- a/sc/sc2100.cpp +++ b/sc/sc2100.cpp @@ -15,6 +15,7 @@ #include #include +#include #include #include @@ -25,6 +26,8 @@ class TEC_form : public TForm { + friend class TEC_row; + static TEC_form* _form; enum { MAXTOT = 16 }; @@ -33,6 +36,7 @@ class TEC_form : public TForm TTotalizer _totali; TDecoder _causali; // Decodificatore dei codici causale TDecoder _valute; // Decodificatore dei codici valuta + TDecoder _movimenti; // Decodificatore delle descrizioni dei movimenti TString _lingua; // Codice lingua del form TDate _dlo, _dls, _dir; // Data limite operazione, scaduto e inizio rischio @@ -45,7 +49,10 @@ class TEC_form : public TForm protected: void init_header(const TMask& m); word ordina_totali_per_valuta(THash_object* tot[MAXTOT]); - void change_magic_names(const THash_object& o, TString& s); + + int find_magic(TString& s, TString& magic1, TString& magic2) const; + void change_magic_body(const TEC_row& o, TString& s); + void change_magic_footer(const THash_object& o, TString& s); void print_total(int riga, const THash_object& o); void stampa_testata(TPrinter& p); @@ -56,18 +63,19 @@ protected: static void ec_footer_handler(TPrinter& p); public: - TTotalizer& totali() { return _totali; } - TDecoder& causali() { return _causali; } - TDecoder& valute() { return _valute; } + TTotalizer& totali() { return _totali; } + TDecoder& causali() { return _causali; } + TDecoder& valute() { return _valute; } + TDecoder& movimenti() { return _movimenti; } const TDate& data_limite_operazione() const { return _dlo; } - const TDate& data_limite_scaduto() const { return _dls; } - int giorni_rischio() const { return _giorni_rischio; } - const TDate& data_inizio_rischio() const { return _dir; } + const TDate& data_limite_scaduto() const { return _dls; } + int giorni_rischio() const { return _giorni_rischio; } + const TDate& data_inizio_rischio() const { return _dir; } const TString& lingua() const { return _lingua; } bool in_valuta() const { return _in_valuta; } - const TString& describe(short id, char sez = 'B', pagetype pt = odd_page) const; + const TString& describe(short id, char sez = 'H', pagetype pt = last_page) const; void azzera_totali(); void ultima_pagina(); @@ -97,6 +105,7 @@ class TEC_row : public TSortable TDate _data_doc; // Data del documento TString _num_doc; // Numero documento long _num_prot; // Protocollo IVA + long _num_reg; // Numero registrazione TImporto _importo; // Importo in valuta real _importo_lire; // Importo in lire real _scaduto; // Importo scaduto @@ -108,7 +117,9 @@ class TEC_row : public TSortable protected: // TSortable virtual int compare(const TSortable& s) const; void set_imp(TForm_item& fi, const real& imp, bool valuta) const; - + + TEC_form& form() const; + public: int riga() const { return _riga; } int rata() const { return _rata; } @@ -121,6 +132,9 @@ public: void esposto(const real& e) { _esposto = e; } void salvo_buon_fine(bool sbf) { _salvo_buon_fine = sbf; } + const TString& causale() const { return _causale; } + const TString& descrizione() const { return _descrizione; } + long num_reg() const { return _num_reg; } const TDate& data() const { return _data; } const TImporto& importo() const { return _importo; } const real& importo_lire() const { return _importo_lire; } @@ -137,23 +151,24 @@ public: }; TEC_row::TEC_row(const TRiga_partite& row, const TDate& data, const TImporto& imp, int rata) - : _num_prot(0), _salvo_buon_fine(FALSE) + : _num_prot(0), _num_reg(0), _salvo_buon_fine(FALSE) { - _riga = row.get_int(PART_NRIGA); - _rata = rata; - - _data = data; - _causale = row.get(PART_CODCAUS); - _data_doc = row.get(PART_DATADOC); - _num_prot = row.get_long(PART_PROTIVA); - _importo = imp; _importo.normalize(); - _totale = row.get_real(PART_IMPTOTDOC); + _riga = row.get_int(PART_NRIGA); + _rata = rata; + _data = data; + _causale = row.get(PART_CODCAUS); + _data_doc = row.get(PART_DATADOC); + _num_prot = row.get_long(PART_PROTIVA); + _num_reg = row.get_long(PART_NREG); + _importo = imp; _importo.normalize(); + _totale = row.get_real(PART_IMPTOTDOC); + _descrizione = row.get(PART_DESCR); _valuta.get(row); } TEC_row::TEC_row(const char* desc, const TImporto& imp) - : _riga(9999), _rata(9999), _num_prot(0), _salvo_buon_fine(FALSE) + : _riga(9999), _rata(9999), _num_prot(0), _num_reg(0), _salvo_buon_fine(FALSE) { _descrizione = desc; _importo = imp; _importo.normalize(); @@ -216,6 +231,13 @@ void TEC_row::set_imp(TForm_item& fi, const real& imp, bool valuta) const } } +TEC_form& TEC_row::form() const +{ + TEC_form* f = TEC_form::_form; + CHECK(f, "NULL form"); + return *f; +} + void TEC_row::print_on(TPrint_section& body) { TEC_form& form = (TEC_form&)body.form(); @@ -223,14 +245,17 @@ void TEC_row::print_on(TPrint_section& body) TForm_item& causale = body.find_field(PEC_CODCAUS); causale.set(_causale); - if (_causale.not_empty() && _descrizione.empty()) - { - TDecoder& causali = form.causali(); - _descrizione = causali.decode(_causale); - } TForm_item& descr = body.find_field(PEC_DESCR1); - descr.set(_descrizione); + + if (num_reg() > 0) // Riga di partita vera e propria (non totale parziale) + { + TString s(80); s = descr.prompt(); + TEC_form::_form->change_magic_body(*this, s); + descr.set(s); + } + else + descr.set(_descrizione); TForm_item& datadoc = body.find_field(PEC_DATADOC); datadoc.set(_data_doc.string()); @@ -245,7 +270,7 @@ void TEC_row::print_on(TPrint_section& body) TForm_item& datapag = body.find_field(PEC_DATAPAG); datapag.set(_data.string()); - const real& imp = _importo.valore(); + const real& imp = _importo.valore(); TForm_item& dare = body.find_field(PEC_DARE); TForm_item& avere = body.find_field(PEC_AVERE); @@ -278,7 +303,12 @@ void TEC_row::print_on(TPrint_section& body) TForm_item& datacambio = body.find_field(PEC_DATACAM); datacambio.set(_valuta.data().string()); + const TString old_prompt(descr.prompt()); + descr.set_prompt(""); // Nasconde temporaneamente il prompt per non stampare i + body.update(); + + descr.set_prompt(old_prompt); // Ripristina il vecchio prompt } /////////////////////////////////////////////////////////// @@ -629,7 +659,7 @@ void TEC_form::stampa_riporti(TPrinter& pr) if (_num_rip > maxtot) _num_rip = maxtot; - const TString& riporto = describe(PEC_RIPORTO, 'F'); + const TString& riporto = describe(PEC_RIPORTO); TString desc(80); TPrint_section& body = section('B'); for (word j = 0; j < _num_rip; j++) @@ -649,40 +679,72 @@ void TEC_form::stampa_riporti(TPrinter& pr) } } -void TEC_form::change_magic_names(const THash_object& o, TString& s) -{ - TString magic1(4), magic2(4), val(50), park(80); - - for (int pos = s.find('<', 0); pos >= 0; pos = s.find('<', pos)) +int TEC_form::find_magic(TString& s, TString& magic1, TString& magic2) const +{ + const int pos = s.find('<', 0); + int end; + if (pos >= 0) { - const int end = s.find('>', pos); + end = s.find('>', pos); if (end > pos) { int p1 = pos+1; magic1 = s.mid(p1, 2); - magic2.cut(0); while (isalnum(s[p1])) p1++; while (p1 < end && !isalnum(s[p1])) p1++; if (p1 < end) magic2 = s.mid(p1, 2); - - val.cut(0); - if (magic1 == "DA") - { - const TDate& d = magic2 == "SC" ? _dls : _dlo; - val = d.string(); - } - if (magic1 == "VA") - val = o.key(); - if (magic1 == "DE") - val = valute().decode(o.key()); + else + magic2.cut(0); } - else - break; + else + end = s.len()-1; - park = s.left(pos); - park << val << s.mid(end+1); - s = park; + const TString right(s.right(end+1)); + s.cut(pos); s << right; + } + return pos; +} + +void TEC_form::change_magic_body(const TEC_row& row, TString& s) +{ + TString magic1(4), magic2(4), val(50); + int pos; + while ((pos = find_magic(s, magic1, magic2)) >= 0) + { + val.cut(0); + if (magic1 == "PA" || magic2 == "PA") + { + val = row.descrizione(); + if (val.empty()) + val = causali().decode(row.causale()); + } + if (magic1 == "MO" || magic2 == "MO") + { + val = movimenti().decode(row.num_reg()); + } + s.insert(val, pos); + } +} + +void TEC_form::change_magic_footer(const THash_object& o, TString& s) +{ + TString magic1(4), magic2(4), val(50); + int pos; + while ((pos = find_magic(s, magic1, magic2)) >= 0) + { + val.cut(0); + if (magic1 == "DA") + { + const TDate& d = magic2 == "SC" ? _dls : _dlo; + val = d.string(); + } + if (magic1 == "VA") + val = o.key(); + if (magic1 == "DE") + val = valute().decode(o.key()); + + s.insert(val, pos); } } @@ -703,7 +765,7 @@ void TEC_form::print_total(int riga, const THash_object& o) { s = desc_field.prompt(); prompt.add(s, i); - change_magic_names(o, s); + change_magic_footer(o, s); desc_field.set_prompt(s); } } @@ -712,6 +774,17 @@ void TEC_form::print_total(int riga, const THash_object& o) const TImporto& imp = t.importo(); TForm_item& dare = foot.find_field(PEC_DARE); TForm_item& avere = foot.find_field(PEC_AVERE); + + TPrint_section& body = section('B'); + if (dare.x() <= 0 || avere.x() <= 0) + { + const TForm_item& bdare = body.find_field(PEC_DARE); + dare.x() = bdare.x(); + + const TForm_item& bavere = body.find_field(PEC_AVERE); + avere.x() = bavere.x(); + } + if (imp.sezione() == 'D') { dare.set(imp.valore().string()); @@ -724,12 +797,27 @@ void TEC_form::print_total(int riga, const THash_object& o) } TForm_item& scaduto = foot.find_field(PEC_SCADUTO); + if (scaduto.x() <= 0) + { + const TForm_item& bscaduto = body.find_field(PEC_SCADUTO); + scaduto.x() = bscaduto.x(); + } scaduto.set(t.scaduto().string()); TForm_item& esposto = foot.find_field(PEC_ESPOSTO); - scaduto.set(t.esposto().string()); + if (esposto.x() <= 0) + { + const TForm_item& besposto = body.find_field(PEC_ESPOSTO); + esposto.x() = besposto.x(); + } + esposto.set(t.esposto().string()); TForm_item& implire = foot.find_field(PEC_IMPLIRE); + if (implire.x() <= 0) + { + const TForm_item& bimplire = body.find_field(PEC_IMPLIRE); + implire.x() = bimplire.x(); + } implire.set(t.importo_lire().string()); foot.update(); @@ -907,6 +995,7 @@ TEC_form::TEC_form(const TEC_mask& m, bool gesval) : TForm(BASE_EC_PROFILE, m.get_prof_code()), _in_valuta(FALSE), _num_rip(0), _total_rows(0), _causali(LF_CAUSALI, CAU_CODCAUS, CAU_DESCR), + _movimenti(LF_MOV, MOV_NUMREG, MOV_DESCR), _valute("%VAL") { _form = this; diff --git a/sc/sc21pec.h b/sc/sc21pec.h index e3be24e57..5d2f4ac00 100755 --- a/sc/sc21pec.h +++ b/sc/sc21pec.h @@ -31,6 +31,7 @@ #define PEC_RITENUTE 304 #define PEC_RIPORTO 400 + #define PEC_TSALDO 401 #define PEC_TSCADUTO 402 #define PEC_TESPOSTO 403