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

Modifica sul apertura nuovo esercizio: ora metto l'anno solare e non il codice esercizio MI2136 MI4293

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3533 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
ale 1996-09-06 14:00:50 +00:00
parent 80a08fde99
commit cae60c9d7c
2 changed files with 20 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
cg/cg3400.cpp
View File

@ -121,7 +121,8 @@ private:
TRelation* _rel;
TCursor* _cur;
TRectype* _RecPartoDa, *_RecArrivoA;
int _ae; // anno esercizio di ALLA_DATA
int _ae; // anno esercizio di ALLA_DATA
int _ae_solare; // anno esercizio solare usato per la tabella registri
int _tipo; // tipo del registro
int _annoEsMov; // anno esercizio letto da mov
TString16 _reg;
@ -205,7 +206,7 @@ public:
bool competenza_ep() const { return _ae != _annoEsMov; }
bool competenza_ec() const { return !competenza_ep(); } // tertium non datur ?
void aggiorna_tabreg(int, int);
void aggiorna_tabreg(int, int);
void aggiorna_mov();
int set_totali_giorno(const TDate& giorno, const int righeivasettate);
int set_totali_pagina(int r);
@ -358,6 +359,7 @@ void CG3400_application::get_dati_ditta ()
bool CG3400_application::user_create()
{
_ae = 0;
_ae_solare = 0;
_tabreg = new TTable ("REG");
_tabval = new TTable ("%VAL");
_tabes = new TTable ("ESC");
@ -1476,7 +1478,7 @@ void CG3400_application::aggiorna_tabreg(int partito_da, int stampate)
{
TString16 codtab;
codtab.format ("%04d%-3s", _ae, (const char*) _reg_cod);
codtab.format ("%04d%-3s", _ae_solare, (const char*) _reg_cod);
_tabreg->zero();
_tabreg->put("CODTAB", codtab);
@ -1564,7 +1566,7 @@ bool CG3400_application::leggi_tabreg(const char * reg_cod, int reg_anno)
{
TString16 codtab;
_ae = reg_anno;
// _ae = reg_anno;
codtab.format ("%04d%-3s", reg_anno, reg_cod);
@ -1617,13 +1619,14 @@ bool CG3400_application::data_a_hndl (TMask_field& f, KEY k)
if (dep.empty()) return TRUE;
const int ae = date2esc(data_a); // Anno esercizio
app()._ae_solare = data_a.year();
app()._ae = ae;
if (ae == 0)
return f.error_box("La data specificata non appartiene a nessun esercizio");
else
{
m.set(ANNO_ESER, ae);
m.set(ANNO_ESER, app()._ae_solare);
m.send_key(K_TAB, CODREG);
}
}
@ -1710,8 +1713,11 @@ bool CG3400_application::mask_a_cod_reg (TMask_field& f, KEY k)
// 25/11 controlli sul registro solo DOPO aver messo la DATA_A
if (data_astr.empty())
return TRUE;
else
a._ae = date2esc(data_a); // Anno esercizio
else
{
a._ae_solare = data_a.year(); // Anno solare usato per la tabella dei registri
a._ae = date2esc(data_a); // Anno esercizio
}
const TString16 reg_cod(f.get());
@ -1723,11 +1729,11 @@ bool CG3400_application::mask_a_cod_reg (TMask_field& f, KEY k)
return f.error_box("Manca il codice registro");
}
bool reg_ok = a.leggi_tabreg(reg_cod, a._ae);
bool reg_ok = a.leggi_tabreg(reg_cod, a._ae_solare);
// Output da qui della descrizione del registro e dell'anno
m.set(REG_DESC, a._reg_descr);
m.set(ANNO_ESER, a._ae);
m.set(ANNO_ESER, a._ae_solare);
/*
// CHECKTYPE NORMAL abolito! (nella maschera non ho l'anno...
if (!reg_ok)

7
cg/cg4500.cpp
View File

@ -175,7 +175,7 @@ bool TAp_eser::apertura_es()
//viene aggiornata la tabella dei registri. Se esisteva gia' un record relativo al nuovo esercizio, viene cancellato.
//In ogni caso ne viene creato uno nuovo relativo al nuovo esercizio.
TabReg.zero();
annonew = format ("%04d", _newanno);
annonew = format ("%04d", _datafin.year());
TabReg.put ("CODTAB", annonew);
TRectype r (TabReg.curr());
@ -193,7 +193,7 @@ bool TAp_eser::apertura_es()
TabReg.zero();
TRectype nuovo (TabReg.curr());
anno = format ("%04d", _anno);
anno = format ("%04d", _datafip.year());
TabReg.put ("CODTAB", anno);
TRectype rec (TabReg.curr());
@ -212,7 +212,7 @@ bool TAp_eser::apertura_es()
ok = TRUE;
nuovo = TabReg.curr();
TString16 cod;
annonew = format ("%04d", _newanno);
annonew = format ("%04d", _datafin.year());
cod << annonew << cod_reg;
nuovo.put("CODTAB", cod);
nuovo.put("D2", data);
@ -225,6 +225,7 @@ bool TAp_eser::apertura_es()
}
}
// se tutto ok viene aggiornata la tabella degli esercizi
annonew.format("%04d", _newanno);
if (check_esercizio(annonew, _dataini, _datafin))
{
TabEs.zero();