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

11
src/cg/cg0500.cpp
View File

@ -873,18 +873,7 @@ void TCaus_app::on_config_change()
_saldaconto = conf.get_bool("GesSal");
_valuta = conf.get_bool("GesVal");
_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_2, saldaconto());

9
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)
{
const bool corri = causale().corrispettivi();
const TString4 tipo = corri ? " " : app().clifo();
TString4 tipo = corri ? " " : app().clifo();
int gruppo = 0, conto = 0;
long codice = corri ? 0L : m.get_long(F_CODCLIFOR);
TSheet_field& ss = cgs();
@ -3084,7 +3084,14 @@ void TPrimanota_application::add_cgs_tot(TMask& m)
const long oldcode = rowt.get_long();
if (corri)
{
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