From 63afac8ee7c331d83ed3e992d082725754815023 Mon Sep 17 00:00:00 2001 From: angelo Date: Fri, 31 Jan 1997 09:29:15 +0000 Subject: [PATCH] Correzione MI3535 relativo alla scelta ditta non funzionante. git-svn-id: svn://10.65.10.50/trunk@4107 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/cg0400.cpp | 13 +++++-------- 1 file changed, 5 insertions(+), 8 deletions(-) diff --git a/cg/cg0400.cpp b/cg/cg0400.cpp index f2151456a..3c7e66abe 100755 --- a/cg/cg0400.cpp +++ b/cg/cg0400.cpp @@ -5,6 +5,7 @@ #include #include #include +#include #include "cg0.h" #include "cg0400.h" @@ -114,7 +115,7 @@ bool TIva_array::add_riga(const tiporec& tipo, const real& imponibile, class TProgressivi_iva : public TPrintapp { - TTable* _tabpim, * _tabreg, * _tabais, * _tablia; + TTable* _tablia; TLocalisamfile* _nditte, * _anag, * _com, * _attiv; TMask* _msk; TDate _data; @@ -218,9 +219,6 @@ char TProgressivi_iva::look_lia(long ditta) bool TProgressivi_iva::user_create() { - _tabpim = new TTable(TAB_PIM); - _tabreg = new TTable(TAB_REG); - _tabais = new TTable("%AIS"); _tablia = new TTable("%LIA"); _anag = new TLocalisamfile(LF_ANAG); _nditte = new TLocalisamfile(LF_NDITTE); @@ -236,9 +234,6 @@ bool TProgressivi_iva::user_create() bool TProgressivi_iva::user_destroy() { - delete _tabpim; - delete _tabreg; - delete _tabais; delete _tablia; delete _anag; delete _nditte; @@ -607,6 +602,7 @@ bool TProgressivi_iva::set_print(int m) { _sospmsk = _tipo_aliq = _tipo_attiv = 0; _codditta = msk.get_long(F_CODDITTA); + prefix().set_codditta(_codditta); _annoiva = msk.get_int(F_ANNO); _tipoprog = msk.get_int(F_TIPO); // 1 <=> vendite; 2 <=> acquisti _livelloprog = msk.get_int(F_LIVELLO); // 1 <=> aliquota; 2 <=> attivita' @@ -631,7 +627,8 @@ bool TProgressivi_iva::set_print(int m) _datast = msk.get(F_DATASTAMPA); _mese = msk.get_int(F_MESE); _st_inizio_anno = msk.get_bool(F_STAMPA); - + prefix().set_codditta(_codditta); + TLocalisamfile attiv(LF_ATTIV); attiv.zero(); attiv.put(ATT_CODDITTA, _codditta);