root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 12.0 594

Browse Source 
Files correlati     : cg3.exe cg3100a.msk cg3100b.msk np0.exe  np0.exe np0300a.msk np0400a.msk np0500a.msk np0500b.msk np0600a.msk np0600b.msk

Ricompilato cg3 e le maschere della lista movimenti per il problema Sicart.
aggiuta scelta contabilità separata nei mastini della contabilità separata. Riferimento CRPA.
This commit is contained in:
AlexBonazzi 2018-06-23 22:14:36 +02:00
parent e7216be824
commit f325308da3
1 changed files with 17 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/cg/cg3200.cpp
View File

@ -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);