From f325308da3f6c58d59c640ca33d4a7eabc700107 Mon Sep 17 00:00:00 2001 From: AlexBonazzi Date: Sat, 23 Jun 2018 22:14:36 +0200 Subject: [PATCH] Patch level : 12.0 594 Files correlati : cg3.exe cg3100a.msk cg3100b.msk np0.exe np0.exe np0300a.msk np0400a.msk np0500a.msk np0500b.msk np0600a.msk np0600b.msk MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Ricompilato cg3 e le maschere della lista movimenti per il problema Sicart. aggiuta scelta contabilità separata nei mastini della contabilità separata. Riferimento CRPA. --- src/cg/cg3200.cpp | 19 +++++++++++++++++-- 1 file changed, 17 insertions(+), 2 deletions(-) diff --git a/src/cg/cg3200.cpp b/src/cg/cg3200.cpp index 43154c2c3..b5d787810 100755 --- a/src/cg/cg3200.cpp +++ b/src/cg/cg3200.cpp @@ -97,7 +97,9 @@ class TMastrini_application : public TPrintapp TString _descrizione,_sezione,_numdoc,_descrizionemov,_numrivd,_descr; TString _dataregs, _datadocs; int _gruppocontr,_contocontr,_nummast,_pagina; +#ifdef _CONT_SEP TString _cont_sep; +#endif long _sottocontocontr; bool _stampaprogre,_stampatotiva,_stampatot,_stampa_mov_prov, _stampa_cont; @@ -2249,6 +2251,17 @@ bool TMastrini_application::set_print(int m) // Se lo sheet e' vuoto allora usa solo la maschera corrente per la stampa, // altrimenti estrae il primo elemento sovrascrivendo la maschera corrente. // Questa figata cerca di correggere gli errori MI6185 e MI3592 in una botta +#ifdef CONT_SEP + TString cont_sep = _msk->get(F_CONTSEP); + + if (cont_sep.full()) + { + TString filter("(FLSCA!=\" \")"); + + filter << "&&(CONTSEP==\"" << cont_sep << "\")"; + current_cursor()->setfilter(filter); + } +#endif TSheet_field& sht = _msk->sfield(F_SCELTE); if (sht.items() != 0) sheet2mask(); // Estrae la prima riga dalla coda di stampa @@ -3685,10 +3698,12 @@ bool TMastrini_application::user_create() _rel->add("CMS", "CODTAB==CODCMS", 1, LF_RMOV, 501); _rel->add("FSC", "CODTAB==FASCMS", 1, LF_RMOV, 502); - _cur1=add_cursor(new TCursor(_rel, "FLSCA<=\" \"",2)); + TString filter("FLSCA<=\" \""); + + _cur1=add_cursor(new TCursor(_rel, filter, 2)); open_files(LF_TAB, LF_TABCOM,LF_NDITTE, LF_UNLOC, LF_COMUNI, LF_MOV, LF_CLIFO, LF_CAUSALI, 0); - _cur2=add_cursor(new TSorted_cursor(_rel, "DESCR","FLSCA<=\" \"",2)); + _cur2=add_cursor(new TSorted_cursor(_rel, "DESCR", filter, 2)); _tabivd = new TTable (TAB_IVD); _tabtpd = new TTable (TAB_TPD);