From c1eb760f5ccd0e484f65e2726d7985fc44004103 Mon Sep 17 00:00:00 2001 From: nik Date: Tue, 7 Nov 1995 13:49:52 +0000 Subject: [PATCH] Correzione errori sulla chiusura apertura conti. 7.11.95 git-svn-id: svn://10.65.10.50/trunk@2105 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- cg/cg4600.cpp | 41 +++++++++++++++++++++++++++-------------- 1 file changed, 27 insertions(+), 14 deletions(-) diff --git a/cg/cg4600.cpp b/cg/cg4600.cpp index 753b15701..9c0ee6e46 100755 --- a/cg/cg4600.cpp +++ b/cg/cg4600.cpp @@ -33,7 +33,7 @@ class CG4600_application : public TApplication friend bool mask_dataap (TMask_field&, KEY); friend bool mask_distinti (TMask_field&, KEY); - TTable* _esc, * _reg; + TTable* _reg; TRelation* _rel; TMovimentoPN* _pn; TLocalisamfile* _saldi; @@ -51,7 +51,9 @@ class CG4600_application : public TApplication TDate _dataregap, _dataregch; TString _codcausap, _codcausch; -public: +public: + TTable* _esc; + virtual bool create(); virtual bool destroy(); virtual bool menu(MENU_TAG m); @@ -74,6 +76,8 @@ public: CG4600_application() {} }; + +CG4600_application& app() { return (CG4600_application&) main_app(); } HIDDEN bool abilita_anni(TMask& m, KEY k) { @@ -105,7 +109,8 @@ HIDDEN bool anni_contigui (int annoch, int annoap) HIDDEN TRectype& cerca_esercizio(int anno) { - TTable TabEs ("ESC"); +// TTable TabEs ("ESC"); + TTable& TabEs = *(app()._esc); TString16 dep (format("%04d", anno)); TabEs.zero(); @@ -127,21 +132,25 @@ bool mask_datac (TMask_field& f, KEY k) TString annos (4); int anno = 0;; bool ok = TRUE; - + TRectype TabEsch(LF_TAB); + TRectype TabEsap(LF_TAB); + int annoch = 0; + int annoap = 0; + if ( (k == K_ENTER) && f.to_check(k) ) { - int annoch = f.mask().get_int(F_ANNOCH); - int annoap = f.mask().get_int(F_ANNO); + annoch = f.mask().get_int(F_ANNOCH); + annoap = f.mask().get_int(F_ANNO); if (!anni_contigui(annoch,annoap)) return FALSE; - TRectype TabEsch = cerca_esercizio(annoap); + TabEsch = cerca_esercizio(annoap); TDate inizio = TabEsch.get_date("D0"); TDate fine = TabEsch.get_date("D1"); TDate scarico = TabEsch.get_date("D2"); - TRectype TabEsap = cerca_esercizio(annoch); + TabEsap = cerca_esercizio(annoch); TDate iniziop = TabEsap.get_date("D0"); TDate finep = TabEsap.get_date("D1"); TDate data = f.get(); @@ -221,21 +230,25 @@ bool mask_dataap (TMask_field& f, KEY k) int anno = 0; TString annos (4); bool ok = TRUE; + TRectype TabEsch(LF_TAB); + TRectype TabEsap(LF_TAB); + int annoch = 0; + int annoap = 0; if ( (k == K_ENTER) && f.to_check(k) ) { - int annoch = f.mask().get_int(F_ANNOCH); - int annoap = f.mask().get_int(F_ANNO); + annoch = f.mask().get_int(F_ANNOCH); + annoap = f.mask().get_int(F_ANNO); if (!anni_contigui(annoch,annoap)) return FALSE; - TRectype TabEsch = cerca_esercizio(annoap); + TabEsch = cerca_esercizio(annoap); TDate inizio = TabEsch.get_date("D0"); TDate fine = TabEsch.get_date("D1"); TDate scarico = TabEsch.get_date("D2"); - TRectype TabEsap = cerca_esercizio(annoch); + TabEsap = cerca_esercizio(annoch); TDate iniziop = TabEsap.get_date("D0"); TDate finep = TabEsap.get_date("D1"); TDate data = f.get(); @@ -433,7 +446,7 @@ bool CG4600_application::create() _reg = new TTable ("REG"); _sld = new TSaldo_agg(); _sale = new TSaldo(); - + _capitale_netto = ZERO; dispatch_e_menu (BAR_ITEM(1)); @@ -453,7 +466,7 @@ bool CG4600_application::destroy() delete _cur; delete _sld; delete _rec; - + return TApplication::destroy(); }