From c8cbb69aa8899b5555488cc43c18659c52165535 Mon Sep 17 00:00:00 2001 From: luca Date: Thu, 18 Dec 2008 16:11:22 +0000 Subject: [PATCH] Patch level :10.0 198 Files correlati : Ricompilazione Demo : [ ] Commento : 0001074: Impostazione gruppo-specie Descrizione il gruppo specie viene richiesto ogni volta, la 3.2 proponeva quello dei parametri ditta idem per l'inserimento movimenti. CE1.exe -4. git-svn-id: svn://10.65.10.50/trunk@17951 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ce/ce0500.cpp | 15 ++++++++++++++- ce/ce0900.cpp | 12 +++++------- ce/ce1500.cpp | 13 +++++++++++++ 3 files changed, 32 insertions(+), 8 deletions(-) diff --git a/ce/ce0500.cpp b/ce/ce0500.cpp index 898a562bb..f058cbf98 100755 --- a/ce/ce0500.cpp +++ b/ce/ce0500.cpp @@ -262,10 +262,23 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) switch (o.dlg()) { case F_ESERCIZIO: + if (e == fe_init || e == fe_modify) + { + int esercizio = get_int(F_ESERCIZIO); + TString4 gruppo, specie; + TDitta_cespiti& dc = ditta_cespiti(); + dc.set_attivita(esercizio, atoi(gruppo), specie); + dc.get_attivita(esercizio, gruppo, specie); + if (gruppo.full()) + { + set(F_GRUPPO, gruppo); + set(F_SPECIE, specie); + } + } //niente break!!!!! è fatto apposta per far scattare i successivi controlli su gruppo e specie case F_GRUPPO: case F_SPECIE: if (e == fe_init || e == fe_modify) - { + { const bool can_create = calcola_stato_attivita() != 3; // Bollato non stampato enable(DLG_NEWREC, can_create && !field(F_SPECIE).empty() && !field(F_CATEGORIA).empty()); enable(DLG_DELREC, can_create); diff --git a/ce/ce0900.cpp b/ce/ce0900.cpp index 975aa91b6..5845937a7 100755 --- a/ce/ce0900.cpp +++ b/ce/ce0900.cpp @@ -282,12 +282,11 @@ void TConversione_cespiti::close_log() int TConversione_cespiti::conv_file(const TFilename& ofname, int nflogicnum) { long oldditta = -1; - TDir d; - d.get(nflogicnum); - d.eod() = 0L; + TDir d(nflogicnum); + d.set_eod(0); d.put(nflogicnum); - TExternisamfile oldfile(ofname,(bool) FALSE,(bool) FALSE); + TExternisamfile oldfile(ofname, false, false); TLocalisamfile* newfile = NULL; const TRectype& oldrec = oldfile.curr(); @@ -665,9 +664,8 @@ int TConversione_cespiti::conv_inifile(const TFilename& ofname, const char* ofpa { long oldditta = -1; long ditta; - TDir d; - d.get(nflogicnum); - d.eod() = 0L; + TDir d(nflogicnum); + d.set_eod(0); d.put(nflogicnum); TSystemisamfile f(nflogicnum); int err = f.pack(); diff --git a/ce/ce1500.cpp b/ce/ce1500.cpp index 6dca16991..6c711a9cf 100755 --- a/ce/ce1500.cpp +++ b/ce/ce1500.cpp @@ -158,6 +158,19 @@ bool TMov_qmask::on_field_event(TOperable_field& o, TField_event e, long jolly) case F_ESERCIZIO: if ((e == fe_close || e == fe_modify) && efield(F_INIZIO_ES).empty()) return error_box("Inserire un esercizio valido"); + if (e == fe_init || e == fe_modify) + { + int esercizio = get_int(F_ESERCIZIO); + TString4 gruppo, specie; + TDitta_cespiti& dc = ditta_cespiti(); + dc.set_attivita(esercizio, atoi(gruppo), specie); + dc.get_attivita(esercizio, gruppo, specie); + if (gruppo.full()) + { + set(F_GRUPPO, gruppo); + set(F_SPECIE, specie); + } + } //niente break!!!!! è fatto apposta per far scattare i successivi controlli su gruppo e specie case F_GRUPPO: case F_SPECIE: calcola_stato_attivita();