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

Correzioni per funzionare la 97_03

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@4781 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-06-28 08:52:33 +00:00
parent 01c9c0f2b4
commit 15c5556fdb
2 changed files with 13 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ve/ve6100.cpp
View File

@ -487,6 +487,7 @@ class TContabilizzazione_app : public TApplication
*_part, // file delle partite (per far funzionare TPartita)
*_scad, // file delle scadenze (per far funzionare TPartita)
*_pags, // file dei pagamenti (per far funzionare TPartita)
*_occas, // file dei clifo occasionali (per far funzionare TDocumento)
*_anamag; // file delle anagrafiche di magazzino
TTable *_cpg, // tabella condizioni di pagamento
*_gmc, // tabella gruppi/sottogruppi merceologici
@ -747,9 +748,6 @@ bool TContabilizzazione_app::create()
_msk->set_handler(DLG_USER,handle_select);
_num_sheet = new TArray_sheet(-1,-1,-4,-4,"Codici numerazione",
"@1|Cod. numerazione|Descrizione@50");
_docfile = new TLocalisamfile(LF_DOC);
_rdocfile = new TLocalisamfile(LF_RIGHEDOC);
_doc = new TDocumento;
_cpg = new TTable("%CPG");
_tri = new TTable("%TRI");
_val = new TTable("%VAL");
@ -769,7 +767,11 @@ bool TContabilizzazione_app::create()
_scad = new TLocalisamfile(LF_SCADENZE);
_pags = new TLocalisamfile(LF_PAGSCA);
_attiv = new TLocalisamfile(LF_ATTIV); // Altrimenti TRegistro non va!
_occas = new TLocalisamfile(LF_OCCAS);
_anamag = new TLocalisamfile(LF_ANAMAG);
_docfile = new TLocalisamfile(LF_DOC);
_rdocfile = new TLocalisamfile(LF_RIGHEDOC);
_doc = new TDocumento;
_esc.update();
TConfig conf(CONFIG_DITTA);
@ -853,6 +855,7 @@ bool TContabilizzazione_app::destroy()
if (_pags) delete _pags;
if (_clifo) delete _clifo;
if (_attiv) delete _attiv;
if (_occas) delete _occas;
if (_anamag) delete _anamag;
return TApplication::destroy();
}

11
ve/ve6300.cpp
View File

@ -70,6 +70,7 @@ class TGenerazioneEffetti_app : public TApplication
*_efffile, // file effetti
*_refffile, // file righe di effetti
*_cessfile, // file righe di cessionari
*_occas, // file degli occasionali
*_tab; // tabella di ditta
TTable *_cpg; // tabella condizioni di pagamento
TDocumento *_doc; // documento corrente
@ -280,16 +281,17 @@ bool TGenerazioneEffetti_app::create()
_efffile = new TLocalisamfile(LF_EFFETTI);
_refffile = new TLocalisamfile(LF_REFFETTI);
_cessfile = new TLocalisamfile(LF_CESS);
_occas = new TLocalisamfile(LF_OCCAS);
// _clifor = new TCliFor();
// _condv = new TCond_vendita(_clifor);
_condv = new TCond_vendita(NULL);
_doc = new TDocumento();
_condv->set_clifo(&_doc->clifor());
_doc->set_condv(_condv);
_cpg = new TTable("%CPG");
_tab = new TLocalisamfile(LF_TAB);
_clifo = new TRelation(LF_CLIFO);
_clifo->add(LF_CFVEN,"TIPOCF=TIPOCF|CODCF=CODCF");
_condv = new TCond_vendita(NULL);
_doc = new TDocumento();
_condv->set_clifo(&_doc->clifor());
_doc->set_condv(_condv);
// Settaggio dell'array dei tipi documento che possono generare effetti
_valid_array.set(2); // tratta
_valid_array.set(3); // riba
@ -310,6 +312,7 @@ bool TGenerazioneEffetti_app::destroy()
if (_efffile) delete _efffile;
if (_refffile) delete _refffile;
if (_cessfile) delete _cessfile;
if (_occas) delete _occas;
if (_doc) delete _doc;
if (_cpg) delete _cpg;
if (_tab) delete _tab;