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

Patch level : 12.01 1302

Browse Source 
Files correlati     : cgg0.exe cg2.exe
Commento            :

Nelle causali se apro solo l'anno nuovo non riconosce i registri
Se do un dliente nella causale corrispettivi non viene caricato correttamente nella riga atotale documento in prima nota
This commit is contained in:
Alessandro Bonazzi 2023-11-10 01:00:17 +01:00
parent d592358581
commit c5a588bccd
2 changed files with 13 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/cg/cg0500.cpp
View File

@ -113,7 +113,7 @@ bool TCaus_app::filtra_reg(const TRelation * r)
const TRectype& rec = r->curr(); const TRectype& rec = r->curr();
const int anno = atoi(rec.get("CODTAB").left(4)); const int anno = atoi(rec.get("CODTAB").left(4));
bool ok = anno == app().anno_iva(); bool ok = anno == app().anno_iva();
if (ok) if (ok)
{ {
const TipoIVA tiporeg = (TipoIVA)rec.get_int("I0"); const TipoIVA tiporeg = (TipoIVA)rec.get_int("I0");
@ -873,18 +873,7 @@ void TCaus_app::on_config_change()
_saldaconto = conf.get_bool("GesSal"); _saldaconto = conf.get_bool("GesSal");
_valuta = conf.get_bool("GesVal"); _valuta = conf.get_bool("GesVal");
_anno_iva = TDate(TODAY).year();
_anno_iva = 0;
TTable reg("REG");
if (reg.last() == NOERR)
_anno_iva = atoi(reg.get("CODTAB").left(4));
if (_anno_iva <= 0)
{
_anno_iva = conf.get_int("AnLiIv");
if (_anno_iva <= 0)
_anno_iva = TDate(TODAY).year();
}
_msk->show(F_TIPO_MOV_1, saldaconto()); _msk->show(F_TIPO_MOV_1, saldaconto());
_msk->show(F_TIPO_MOV_2, saldaconto()); _msk->show(F_TIPO_MOV_2, saldaconto());

15
src/cg/cg2102.cpp
View File

@ -3068,7 +3068,7 @@ bool TPrimanota_application::occas_handler(TMask_field& f, KEY key)
void TPrimanota_application::add_cgs_tot(TMask& m) void TPrimanota_application::add_cgs_tot(TMask& m)
{ {
const bool corri = causale().corrispettivi(); const bool corri = causale().corrispettivi();
const TString4 tipo = corri ? " " : app().clifo(); TString4 tipo = corri ? " " : app().clifo();
int gruppo = 0, conto = 0; int gruppo = 0, conto = 0;
long codice = corri ? 0L : m.get_long(F_CODCLIFOR); long codice = corri ? 0L : m.get_long(F_CODCLIFOR);
TSheet_field& ss = cgs(); TSheet_field& ss = cgs();
@ -3083,9 +3083,16 @@ void TPrimanota_application::add_cgs_tot(TMask& m)
conto = rowt.get_int(); conto = rowt.get_int();
const long oldcode = rowt.get_long(); const long oldcode = rowt.get_long();
if (corri) if (corri)
codice = oldcode; // I corrispettivi non hanno un cliente in testata {
else codice = oldcode; // I corrispettivi non hanno un cliente in testata
TString4 tipocorr = rowt.get(2);
if (tipocorr.full())
tipo = tipocorr;
}
else
{ {
if (m.insert_mode()) // Errore MI3567: se cambio cliente ripesca conto if (m.insert_mode()) // Errore MI3567: se cambio cliente ripesca conto
{ {