corretto errori MI6121, MI6123, MI6124, MI6141, MI6145, MI6151, MI3455

git-svn-id: svn://10.65.10.50/trunk@4039 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1997-01-07 09:47:34 +00:00
parent 76407846bd
commit 3c9bd9c26f
4 changed files with 4547 additions and 4447 deletions

View File

@ -2934,6 +2934,8 @@ void CG1500_application::set_page(int file, int counter)
if (_stampa_width == 132) if (_stampa_width == 132)
{ {
set_row(r,"@1g%6ld",(const char*)_sottoconto); set_row(r,"@1g%6ld",(const char*)_sottoconto);
if ((_saldo_dare != ZERO) || (_saldo_avere != ZERO) || (_mov_dare != ZERO) ||
(_mov_avere != ZERO) || (_saldofinale != ZERO))
set_row(r," %s",(const char*)udata); set_row(r," %s",(const char*)udata);
set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@99g%r@114g!@115g%r",_d,&_saldo_dare, set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@99g%r@114g!@115g%r",_d,&_saldo_dare,
&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale); &_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale);
@ -2945,6 +2947,8 @@ void CG1500_application::set_page(int file, int counter)
else if (app == 'D') else if (app == 'D')
{ {
set_row(r,"@1g%6ld",(const char*)_sottoconto); set_row(r,"@1g%6ld",(const char*)_sottoconto);
if ((_saldo_dare != ZERO) || (_saldo_avere != ZERO) || (_mov_dare != ZERO) ||
(_mov_avere != ZERO) || (_saldofinale != ZERO))
set_row(r," %s",(const char*)udata); set_row(r," %s",(const char*)udata);
set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@116g%r@148g!",_d, set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@116g%r@148g!",_d,
&_saldo_dare,&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale); &_saldo_dare,&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale);
@ -2954,6 +2958,8 @@ void CG1500_application::set_page(int file, int counter)
else else
{ {
set_row(r,"@1g%6ld",(const char*)_sottoconto); set_row(r,"@1g%6ld",(const char*)_sottoconto);
if ((_saldo_dare != ZERO) || (_saldo_avere != ZERO) || (_mov_dare != ZERO) ||
(_mov_avere != ZERO) || (_saldofinale != ZERO))
set_row(r," %s",(const char*)udata); set_row(r," %s",(const char*)udata);
set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@132g%r@148g!", set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@132g%r@148g!",
_d,&_saldo_dare,&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale); _d,&_saldo_dare,&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale);
@ -3014,6 +3020,9 @@ void CG1500_application::set_page(int file, int counter)
if (_stampa_width == 132) if (_stampa_width == 132)
{ {
set_row(r,"@1g%6ld",(const char*)_sottoconto_succ); set_row(r,"@1g%6ld",(const char*)_sottoconto_succ);
if ((_saldoini_dare_succ != ZERO) || (_saldoini_avere_succ != ZERO) ||
(_mov_dare_succ != ZERO) || (_mov_avere_succ != ZERO) ||
(_saldofinale_succ != ZERO))
set_row(r," %s",(const char*)udata); set_row(r," %s",(const char*)udata);
set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@99g%r@114g!@115g%r", set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@99g%r@114g!@115g%r",
_d,&_saldoini_dare_succ,&_saldoini_avere_succ, _d,&_saldoini_dare_succ,&_saldoini_avere_succ,
@ -3026,6 +3035,9 @@ void CG1500_application::set_page(int file, int counter)
else if (app == 'D') else if (app == 'D')
{ {
set_row(r,"@1g%6ld",(const char*)_sottoconto_succ); set_row(r,"@1g%6ld",(const char*)_sottoconto_succ);
if ((_saldoini_dare_succ != ZERO) || (_saldoini_avere_succ != ZERO) ||
(_mov_dare_succ != ZERO) || (_mov_avere_succ != ZERO) ||
(_saldofinale_succ != ZERO))
set_row(r," %s",(const char*)udata); set_row(r," %s",(const char*)udata);
set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@116g%r@148g!", set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@116g%r@148g!",
_d,&_saldoini_dare_succ,&_saldoini_avere_succ, _d,&_saldoini_dare_succ,&_saldoini_avere_succ,
@ -3036,6 +3048,9 @@ void CG1500_application::set_page(int file, int counter)
else else
{ {
set_row(r,"@1g%6ld",(const char*)_sottoconto_succ); set_row(r,"@1g%6ld",(const char*)_sottoconto_succ);
if ((_saldoini_dare_succ != ZERO) || (_saldoini_avere_succ != ZERO) ||
(_mov_dare_succ != ZERO) || (_mov_avere_succ != ZERO) ||
(_saldofinale_succ != ZERO))
set_row(r," %s",(const char*)udata); set_row(r," %s",(const char*)udata);
set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@132g%r@148g!", set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@132g%r@148g!",
_d,&_saldoini_dare_succ,&_saldoini_avere_succ, _d,&_saldoini_dare_succ,&_saldoini_avere_succ,

View File

@ -79,7 +79,7 @@ class TMastrini_application : public TPrintapp
int _annomsk,_annoesmsk,_annoes,_annomsksucc,_tipo_mask,_anno_ghost; int _annomsk,_annoesmsk,_annoes,_annomsksucc,_tipo_mask,_anno_ghost;
int _anno_corrente,_anno_precedente,_indbil,_numero_pag; int _anno_corrente,_anno_precedente,_indbil,_numero_pag;
long _sottoc,_numreg,_numgio,_protiva; long _sottoc,_numreg,_numgio,_protiva;
bool _stampa_progressivi_si,_competenza,_inizio_stampa,_puoi_stampare,_stampa_footer_si; bool _stampa_progressivi_si,_competenza,/*_inizio_stampa,*/_puoi_stampare,_stampa_footer_si;
bool _cambia_mastrino,_gia_stampata_intestazione; bool _cambia_mastrino,_gia_stampata_intestazione;
char _tmcf,_tipo_contr; char _tmcf,_tipo_contr;
@ -638,6 +638,7 @@ bool TMastrini_application::almeno_un_record()
if (_mov->bad()) if (_mov->bad())
_mov->zero(); _mov->zero();
datacomp = (_mov->curr().get(MOV_DATACOMP)); datacomp = (_mov->curr().get(MOV_DATACOMP));
TString provvis (_mov->curr().get(MOV_PROVVIS));
if (_annomsk == 0) if (_annomsk == 0)
datareg = rmov.get_date(RMV_DATAREG); datareg = rmov.get_date(RMV_DATAREG);
@ -651,7 +652,7 @@ bool TMastrini_application::almeno_un_record()
if ((gruppo != _gruppo)||(conto != _conto)||(sottoc != _sottoc)) if ((gruppo != _gruppo)||(conto != _conto)||(sottoc != _sottoc))
break; break;
else else
if (((annoes==_annomsk)||(_annomsk==0))&&((datareg>=_data_ini)&&(datareg<=_data_fine))) if ( ((annoes==_annomsk) || (_annomsk==0)) && ((datareg>=_data_ini) && (datareg<=_data_fine)) && (_stampa_mov_prov || provvis.trim().empty()))
{ {
trovato = TRUE; trovato = TRUE;
break; break;
@ -777,20 +778,30 @@ void TMastrini_application::saldi_zero()
while (!rmov.eof()) while (!rmov.eof())
{ {
//rmov.read(); long numreg = rmov.get_long(RMV_NUMREG);
char sezione = rmov.curr().get(RMV_SEZIONE)[0]; _mov->setkey(1);
real importo = rmov.curr().get_real(RMV_IMPORTO); _mov->curr().zero();
_mov->curr().put(MOV_NUMREG,numreg);
_mov->read();
if (_mov->bad())
_mov->zero();
TString provvis (_mov->curr().get(MOV_PROVVIS));
int gruppo = atoi(rmov.get(RMV_GRUPPO)); int gruppo = atoi(rmov.get(RMV_GRUPPO));
int conto = atoi(rmov.get(RMV_CONTO)); int conto = atoi(rmov.get(RMV_CONTO));
long sottoc = atol(rmov.get(RMV_SOTTOCONTO)); long sottoc = atol(rmov.get(RMV_SOTTOCONTO));
if ((gruppo == _gruppo)&&(conto == _conto)&&(sottoc == _sottoc)) if ((gruppo == _gruppo)&&(conto == _conto)&&(sottoc == _sottoc))
{ {
if (_stampa_mov_prov || provvis.trim().empty())
{
char sezione = rmov.curr().get(RMV_SEZIONE)[0];
real importo = rmov.curr().get_real(RMV_IMPORTO);
if (sezione == 'D') if (sezione == 'D')
saldo_dare += importo; saldo_dare += importo;
else if (sezione == 'A') else if (sezione == 'A')
saldo_avere += importo; saldo_avere += importo;
} }
}
else break; else break;
rmov.next(); rmov.next();
} }
@ -1911,6 +1922,8 @@ bool TMastrini_application::preprocess_page(int file, int counter)
dep_avere = _riporto_footer_avere; dep_avere = _riporto_footer_avere;
} }
if (_nummast != 3 || dep_dare != ZERO || dep_avere != ZERO)
{
TString dare (dep_dare.string("###.###.###.###")); TString dare (dep_dare.string("###.###.###.###"));
TString avere (dep_avere.string("###.###.###.###")); TString avere (dep_avere.string("###.###.###.###"));
if (_numcarat == 1) if (_numcarat == 1)
@ -1924,6 +1937,7 @@ bool TMastrini_application::preprocess_page(int file, int counter)
set_row (_rw,"@32gA RIPORTO@101g%s", (const char*) dare); set_row (_rw,"@32gA RIPORTO@101g%s", (const char*) dare);
set_row (_rw,"@117g%s", (const char*) avere); set_row (_rw,"@117g%s", (const char*) avere);
} }
}
if (lim == 0) if (lim == 0)
{ {
rmov.prev(); rmov.prev();
@ -2433,8 +2447,11 @@ bool TMastrini_application::set_print(int)
if (_stampatotiva) if (_stampatotiva)
_b.destroy(); _b.destroy();
_inizio_stampa = TRUE; //_inizio_stampa = TRUE;
_numero_pag = 1; _numero_pag = 1;
if (_nummast == 3)
_pagina = 0;
else
_pagina = 1; _pagina = 1;
_cambia_mastrino = FALSE; _cambia_mastrino = FALSE;
_rw = 0; _rw = 0;
@ -2547,6 +2564,8 @@ void TMastrini_application::preprocess_footer()
dep_avere = _stampato ? _riporto_footer_avere : _riporto_footer_avere - imp_a; dep_avere = _stampato ? _riporto_footer_avere : _riporto_footer_avere - imp_a;
} }
if (_nummast != 3 || dep_dare != ZERO || dep_avere != ZERO)
{
TString dare (dep_dare.string("###.###.###.###")); TString dare (dep_dare.string("###.###.###.###"));
TString avere (dep_avere.string("###.###.###.###")); TString avere (dep_avere.string("###.###.###.###"));
if (_numcarat == 1) if (_numcarat == 1)
@ -2562,6 +2581,7 @@ void TMastrini_application::preprocess_footer()
} }
} }
} }
}
void TMastrini_application::conto(int gruppo, int conto, bool no_contropartita) void TMastrini_application::conto(int gruppo, int conto, bool no_contropartita)
{ {
@ -2639,17 +2659,26 @@ void TMastrini_application::ricerca_dati_ditta()
void TMastrini_application::crea_intestazione() void TMastrini_application::crea_intestazione()
{ {
TString sep(132),sep1(198); TString sep(132),sep1(198);
sep = "";
reset_header(); reset_header();
int np = get_page_number();
if (_cambia_mastrino) if (_cambia_mastrino)
{ {
if (_nummast != 3)
_pagina = 1; _pagina = 1;
_cambia_mastrino = FALSE; _cambia_mastrino = FALSE;
} }
if (_numcarat == 1) if (_numcarat == 1)
{ {
if (_nummast == 3)
{
if (_pagina != np)
sep << "Pag. @#";
}
else
sep << "Pag. " << _pagina; sep << "Pag. " << _pagina;
sep.right_just(132); sep.right_just(132);
set_header(1,(const char*) sep); set_header(1,(const char*) sep);
@ -2659,6 +2688,12 @@ void TMastrini_application::crea_intestazione()
} }
else if (_numcarat == 2) else if (_numcarat == 2)
{ {
if (_nummast == 3)
{
if (_pagina != np)
sep1 << "Pagina @#";
}
else
sep1 << "Pagina " << _pagina; sep1 << "Pagina " << _pagina;
sep1.right_just(198); sep1.right_just(198);
set_header(1,(const char*) sep1); set_header(1,(const char*) sep1);
@ -2666,9 +2701,11 @@ void TMastrini_application::crea_intestazione()
set_header(2,"@1g%s",(const char*) sep1); set_header(2,"@1g%s",(const char*) sep1);
//set_header(1,"@190gPagina %2d", _numero_pag++); //set_header(1,"@190gPagina %2d", _numero_pag++);
} }
if (_nummast != 3)
_pagina++; _pagina++;
if (_nummast != 3 || _pagina != np)
{
set_header (1, "@0gDITTA@6g%5ld", _codice_ditta); set_header (1, "@0gDITTA@6g%5ld", _codice_ditta);
set_header (1, "@12g%-.45s", (const char*) _ragsoc); set_header (1, "@12g%-.45s", (const char*) _ragsoc);
set_header (1, "@59g%s", (const char*) _indulc); set_header (1, "@59g%s", (const char*) _indulc);
@ -2676,7 +2713,7 @@ void TMastrini_application::crea_intestazione()
set_header (1, "@97g%-.5s", (const char*) _capulc); set_header (1, "@97g%-.5s", (const char*) _capulc);
set_header (1, "@103g%-.18s", (const char*) _com); set_header (1, "@103g%-.18s", (const char*) _com);
set_header (1, "@122g%-.3s", (const char*) _prov); set_header (1, "@122g%-.3s", (const char*) _prov);
}
if (_nummast == 3) if (_nummast == 3)
{ {
set_header (3, "@0gSottoconto@12g@b%d", _gruppo); set_header (3, "@0gSottoconto@12g@b%d", _gruppo);
@ -2778,6 +2815,8 @@ void TMastrini_application::crea_intestazione()
dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d; dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d;
dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a; dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a;
if (_nummast != 3 || dep_dare != ZERO || dep_avere != 0)
{
if (_numcarat == 1) if (_numcarat == 1)
{ {
TString string = dep_dare.string("###.###.###.###"); TString string = dep_dare.string("###.###.###.###");
@ -2792,6 +2831,7 @@ void TMastrini_application::crea_intestazione()
string = dep_avere.string("###.###.###.###"); string = dep_avere.string("###.###.###.###");
set_header (10,"@117g%15s",(const char*) string); set_header (10,"@117g%15s",(const char*) string);
} }
}
_riporto_parziale_dare = ZERO; _riporto_parziale_dare = ZERO;
_riporto_parziale_avere = ZERO; _riporto_parziale_avere = ZERO;
} }
@ -2805,15 +2845,20 @@ void TMastrini_application::crea_intestazione()
sep1 =""; sep1 ="";
set_header(11,"@1g%s",(const char*) sep1); set_header(11,"@1g%s",(const char*) sep1);
} }
if (_pagina != np)
_pagina = np;
} }
int TMastrini_application::crea_intestazione(int start_riga) int TMastrini_application::crea_intestazione(int start_riga)
{ {
TString sep(132),sep1(198); TString sep(132),sep1(198);
int r = start_riga + 2; int r = start_riga + 2;
sep = "";
reset_header(); reset_header();
int np = get_page_number();
_conta_mastrini++; _conta_mastrini++;
if (_nummast == 3) if (_nummast == 3)
@ -2825,12 +2870,31 @@ int TMastrini_application::crea_intestazione(int start_riga)
_numero_pag = 1; _numero_pag = 1;
_cambia_mastrino = FALSE; _cambia_mastrino = FALSE;
} }
if (_nummast == 3)
{
if (_pagina != np)
{
if (_numcarat == 1)
{
sep << "Pag. @#";
set_row(r,"@126g%s", (const char*) sep);
}
else if (_numcarat == 2)
{
sep << "Pagina @#";
set_row(r,"@190g%s", (const char*) sep);
}
}
}
else
{
if (_numcarat == 1) if (_numcarat == 1)
set_row(r,"@126gPag. %2d", _numero_pag++); set_row(r,"@126gPag. %2d", _numero_pag++);
else if (_numcarat == 2) else if (_numcarat == 2)
set_row(r,"@190gPagina %2d", _numero_pag++); set_row(r,"@190gPagina %2d", _numero_pag++);
}
if (_nummast != 3 || _pagina != np)
{
set_row (r, "@0gDITTA@6g%5ld", _codice_ditta); set_row (r, "@0gDITTA@6g%5ld", _codice_ditta);
set_row (r, "@12g%-45s", (const char*) _ragsoc); set_row (r, "@12g%-45s", (const char*) _ragsoc);
set_row (r, "@59g%s", (const char*) _indulc); set_row (r, "@59g%s", (const char*) _indulc);
@ -2839,6 +2903,7 @@ int TMastrini_application::crea_intestazione(int start_riga)
set_row (r, "@103g%-18s", (const char*) _com); set_row (r, "@103g%-18s", (const char*) _com);
set_row (r, "@122g%-3s", (const char*) _prov); set_row (r, "@122g%-3s", (const char*) _prov);
r += 2; r += 2;
}
if (_nummast == 3) if (_nummast == 3)
{ {
set_row (r, "@0gSottoconto@12g@b%d", _gruppo); set_row (r, "@0gSottoconto@12g@b%d", _gruppo);
@ -2904,7 +2969,8 @@ int TMastrini_application::crea_intestazione(int start_riga)
sep1.fill('-'); sep1.fill('-');
set_row (r++,"@0g%s", (const char *) sep1); set_row (r++,"@0g%s", (const char *) sep1);
} }
if (_pagina != np)
_pagina = np;
return r; return r;
} }
@ -2933,6 +2999,8 @@ void TMastrini_application::stampa_progre_riporto()
dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d; dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d;
dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a; dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a;
if (_nummast != 3 || dep_dare != ZERO || dep_avere != 0)
{
if (_numcarat == 1) if (_numcarat == 1)
{ {
TString string = dep_dare.string("###.###.###.###"); TString string = dep_dare.string("###.###.###.###");
@ -2947,6 +3015,7 @@ void TMastrini_application::stampa_progre_riporto()
string = dep_avere.string("###.###.###.###"); string = dep_avere.string("###.###.###.###");
set_row (_rw++,"@117g%15s",(const char*) string); set_row (_rw++,"@117g%15s",(const char*) string);
} }
}
_riporto_parziale_dare = ZERO; _riporto_parziale_dare = ZERO;
_riporto_parziale_avere = ZERO; _riporto_parziale_avere = ZERO;
} }
@ -2985,6 +3054,8 @@ int TMastrini_application::stampa_progre_riporto(int start_riga)
dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d; dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d;
dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a; dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a;
if (_nummast != 3 || dep_dare != ZERO || dep_avere != ZERO)
{
if (_numcarat == 1) if (_numcarat == 1)
{ {
TString string = dep_dare.string("###.###.###.###"); TString string = dep_dare.string("###.###.###.###");
@ -2999,6 +3070,7 @@ int TMastrini_application::stampa_progre_riporto(int start_riga)
string = dep_avere.string("###.###.###.###"); string = dep_avere.string("###.###.###.###");
set_row (r++,"@117g%15s",(const char*) string); set_row (r++,"@117g%15s",(const char*) string);
} }
}
_riporto_parziale_dare = ZERO; _riporto_parziale_dare = ZERO;
_riporto_parziale_avere = ZERO; _riporto_parziale_avere = ZERO;
} }
@ -3135,6 +3207,12 @@ void TMastrini_application::calcola_progressivi()
pdarep = saldi.get_real(SLD_PDARE); pdarep = saldi.get_real(SLD_PDARE);
paverep = saldi.get_real(SLD_PAVERE); paverep = saldi.get_real(SLD_PAVERE);
if (_stampa_mov_prov)
{
progredare_eseprec = pdarep + saldi.get_real(SLD_PDAREPRO);
progreavere_eseprec = paverep + saldi.get_real(SLD_PAVEREPRO);
}
// cerca eventuale record scaricati // cerca eventuale record scaricati
} }
@ -3175,7 +3253,7 @@ void TMastrini_application::calcola_progressivi()
const TRecnotype pos = saldi.recno(); const TRecnotype pos = saldi.recno();
// W96SALDI del 18-07-96 saldofin_esprec usa il flag TRUE xche' deve // W96SALDI del 18-07-96 saldofin_esprec usa il flag TRUE xche' deve
// considerare anche il saldo finale // considerare anche il saldo finale
saldo = _sld->saldofin_esprec(_anno_corrente,_gruppo,_conto,_sottoc,TRUE); saldo = _sld->saldofin_esprec(_anno_corrente,_gruppo,_conto,_sottoc,TRUE,FALSE);
saldi.readat(pos); saldi.readat(pos);
if (saldo> ZERO) if (saldo> ZERO)
@ -3338,7 +3416,8 @@ void TMastrini_application::ricerca_clifo()
} }
else else
{ {
dencom=""; //dencom="";
dencom = clifo.get(CLI_LOCCF);
provcom=""; provcom="";
} }
@ -3476,7 +3555,8 @@ int TMastrini_application::ricerca_clifo(int start)
} }
else else
{ {
dencom=""; //dencom="";
dencom=clifo.get(CLI_LOCCF);
provcom=""; provcom="";
} }

View File

@ -491,11 +491,11 @@ BEGIN
END END
BOOLEAN F_MEMORIZZA //BOOLEAN F_MEMORIZZA
BEGIN //BEGIN
PROMPT 4 17 "Memorizza scelte" // PROMPT 4 17 "Memorizza scelte"
HELP "Indicare se riproporre le scelte effettuate" // HELP "Indicare se riproporre le scelte effettuate"
END //END
ENDPAGE ENDPAGE

View File

@ -137,6 +137,8 @@ real TSaldo::saldofin_esprec(int annoes, int g, int c, long s, bool saldo_chiusu
const real saldo = _saldi.get_real(SLD_SALDO); const real saldo = _saldi.get_real(SLD_SALDO);
const real pdare = _saldi.get_real(SLD_PDARE); const real pdare = _saldi.get_real(SLD_PDARE);
const real pavere = _saldi.get_real(SLD_PAVERE); const real pavere = _saldi.get_real(SLD_PAVERE);
const real pdarepro = _saldi.get_real(SLD_PDAREPRO);
const real paverepro = _saldi.get_real(SLD_PAVEREPRO);
const char flagsf = _saldi.get_char(SLD_FLAGSALFIN); const char flagsf = _saldi.get_char(SLD_FLAGSALFIN);
const real saldosf = _saldi.get_real(SLD_SALDOFIN); const real saldosf = _saldi.get_real(SLD_SALDOFIN);
@ -375,7 +377,10 @@ bool TSaldo::ultima_immissione_verifica(int annoes,int g,int c,long s,int indbil
return esito; return esito;
// if (stp_prov == 0 && paverepro == ZERO) // if (stp_prov == 0 && paverepro == ZERO)
if (stp_prov == 3 && paverepro == ZERO && pdarepro == ZERO) // Modifica del 24-09-96 errore MI0890. if (stp_prov == 3 && paverepro == ZERO && pdarepro == ZERO) // Modifica del 24-09-96 errore MI0890.
{
_saldo = _prg_dare = _prg_avere = ZERO; // N.B. Non e' detto che funzioni sempre!!!!!!
return esito; return esito;
}
if (sezione == 'A') _saldo_iniziale = -_saldo_iniziale; if (sezione == 'A') _saldo_iniziale = -_saldo_iniziale;