Modifiche effettuate come da accordi con Patrizia.
git-svn-id: svn://10.65.10.50/trunk@1498 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
3ecd157214
commit
6264d262be
494
cg/cg1500.cpp
494
cg/cg1500.cpp
@ -1270,14 +1270,44 @@ bool CG1500_application::bil_verifica()
|
|||||||
_indbil = indbil_conto;
|
_indbil = indbil_conto;
|
||||||
if (_tipo_stampa1 == 1) //bil. di verifica per data limite
|
if (_tipo_stampa1 == 1) //bil. di verifica per data limite
|
||||||
{
|
{
|
||||||
//if ( !calcola(g,c,s) )//il conto non e' movimentato
|
//modifica del 19/06/95
|
||||||
// if (_stampav == 1)
|
|
||||||
// continue;
|
|
||||||
movimentato = calcola(g,c,s);
|
movimentato = calcola(g,c,s);
|
||||||
|
if (_stampa_mov_prov != 3)
|
||||||
|
{
|
||||||
|
if (movimentato)
|
||||||
|
{
|
||||||
|
saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
||||||
|
TLocalisamfile saldi(LF_SALDI);
|
||||||
|
saldi.zero();
|
||||||
|
saldi.put(SLD_ANNOES,_annoes);
|
||||||
|
saldi.put(SLD_GRUPPO,g);
|
||||||
|
saldi.put(SLD_CONTO,c);
|
||||||
|
saldi.put(SLD_SOTTOCONTO,s);
|
||||||
|
if (saldi.read() == NOERR)
|
||||||
|
{
|
||||||
|
real ss = saldi.get_real(SLD_SALDO);
|
||||||
|
if (indbil_conto == 1 || indbil_conto == 2 || indbil_conto == 5)
|
||||||
|
if (ss == ZERO && _annoes != 0)
|
||||||
|
saldo_iniziale += sld.saldofin_esprec(_annoes,g,c,s);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (!movimentato)
|
||||||
|
if (indbil_conto == 1 || indbil_conto == 2 || indbil_conto == 5)
|
||||||
|
if (_annoes != 0)
|
||||||
|
{
|
||||||
|
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,s);
|
||||||
|
if (_stampav == 1 && sld.significativo())
|
||||||
|
movimentato = TRUE;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
//if (movimentato)
|
||||||
|
// saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
||||||
|
//movimentato = calcola(g,c,s);
|
||||||
|
|
||||||
if (movimentato || _stampav != 1)
|
if (movimentato || _stampav != 1)
|
||||||
{
|
{
|
||||||
saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
//saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
||||||
|
|
||||||
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
||||||
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
||||||
@ -1292,140 +1322,144 @@ bool CG1500_application::bil_verifica()
|
|||||||
if (_datada == _dataini)
|
if (_datada == _dataini)
|
||||||
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
||||||
else if (_datada > _dataini)
|
else if (_datada > _dataini)
|
||||||
|
{
|
||||||
|
if (saldo_iniziale > 0)
|
||||||
|
_prg_prec_dare += saldo_iniziale;
|
||||||
|
else _prg_prec_avere -= saldo_iniziale;
|
||||||
saldo_finale = _prg_prec_dare-_prg_prec_avere+_mov_periodo_dare-
|
saldo_finale = _prg_prec_dare-_prg_prec_avere+_mov_periodo_dare-
|
||||||
_mov_periodo_avere;
|
_mov_periodo_avere;
|
||||||
|
|
||||||
|
}
|
||||||
//if (saldo_finale == ZERO)
|
//if (saldo_finale == ZERO)
|
||||||
// if (_stampav == 2)
|
// if (_stampav == 2)
|
||||||
// continue;
|
// continue;
|
||||||
}
|
}
|
||||||
//se saldo_finale < 0 verra' stampato con una A, se no con una D
|
//se saldo_finale < 0 verra' stampato con una A, se no con una D
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
//if (!sld.ultima_immissione_bilancio(_annoes,g,c,s,indbil_conto))
|
movimentato = sld.ultima_immissione_verifica(_annoes,g,c,s,indbil_conto,_stampa_mov_prov);
|
||||||
// if (_stampav == 1)
|
|
||||||
// continue;
|
//modifica del 31/03/95
|
||||||
movimentato = sld.ultima_immissione_verifica(_annoes,g,c,s,indbil_conto,_stampa_mov_prov);
|
if (_stampa_mov_prov != 3)
|
||||||
|
{
|
||||||
//modifica del 31/03/95
|
if (movimentato)
|
||||||
if (_stampa_mov_prov != 3)
|
saldo_iniziale = sld.saldoini();
|
||||||
if (!movimentato && _stampav!=1)
|
if (!movimentato)
|
||||||
if (indbil_conto == 1 || indbil_conto == 2 || indbil_conto == 5)
|
|
||||||
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,s);
|
|
||||||
|
|
||||||
if (movimentato)
|
|
||||||
saldo_iniziale = sld.saldoini();
|
|
||||||
//fine modifica
|
|
||||||
|
|
||||||
if (movimentato || _stampav != 1)
|
|
||||||
{
|
|
||||||
//saldo_iniziale = sld.saldoini();
|
|
||||||
|
|
||||||
_mov_periodo_dare = sld.prgdare();
|
|
||||||
_mov_periodo_avere = sld.prgavere();
|
|
||||||
_prg_prec_dare = ZERO;
|
|
||||||
_prg_prec_avere = ZERO;
|
|
||||||
|
|
||||||
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
|
||||||
|
|
||||||
//if (saldo_finale == ZERO)
|
|
||||||
// if (_stampav == 2)
|
|
||||||
// continue;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (movimentato || _stampav != 1)
|
|
||||||
if (!(saldo_finale == ZERO && _stampav == 2))
|
|
||||||
{
|
|
||||||
esiste_sc = TRUE;
|
|
||||||
esiste_conto = TRUE;
|
|
||||||
|
|
||||||
if (_tipo_stampa1 == 2)
|
|
||||||
{
|
|
||||||
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
|
||||||
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
|
||||||
real nuovo = sld.saldoinisusaldi();
|
|
||||||
if (nuovo > ZERO)
|
|
||||||
_nuovo_tot_saldo_d += nuovo;
|
|
||||||
else
|
|
||||||
{
|
|
||||||
nuovo = -nuovo;
|
|
||||||
_nuovo_tot_saldo_a += nuovo;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (saldo_iniziale < ZERO)
|
|
||||||
_saldo_ini_conto_avere += saldo_iniziale;
|
|
||||||
else
|
|
||||||
_saldo_ini_conto_dare += saldo_iniziale;
|
|
||||||
mov_conto_dare += _mov_periodo_dare;
|
|
||||||
mov_conto_avere += _mov_periodo_avere;
|
|
||||||
prg_conto_dare += _prg_prec_dare;
|
|
||||||
prg_conto_avere += _prg_prec_avere;
|
|
||||||
saldo_conto += saldo_finale; // somma algebrica!!!
|
|
||||||
|
|
||||||
//scrivo il record relat. al sottoconto se non e' richiesto saldi di mastro
|
|
||||||
if (_verifica != 2)
|
|
||||||
{
|
|
||||||
_tmp_saldi_att->zero();
|
|
||||||
_tmp_saldi_att->put(SLD_GRUPPO,g);
|
|
||||||
_tmp_saldi_att->put(SLD_CONTO,c);
|
|
||||||
_tmp_saldi_att->put(SLD_SOTTOCONTO,s);
|
|
||||||
_tmp_saldi_att->put(SLD_FLAGSALINI,tipo_conto);
|
|
||||||
if ( (_datada == _dataini) || (_tipo_stampa1 != 1) )
|
|
||||||
{
|
|
||||||
if (saldo_iniziale > ZERO) //va stampato in Dare
|
|
||||||
_tmp_saldi_att->put(SLD_PDARESCA,saldo_iniziale);
|
|
||||||
else if (saldo_iniziale < ZERO)
|
|
||||||
{
|
|
||||||
saldo_iniziale = -saldo_iniziale;
|
|
||||||
_tmp_saldi_att->put(SLD_PAVERESCA,saldo_iniziale);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
else if (_datada > _dataini)
|
|
||||||
{
|
|
||||||
_tmp_saldi_att->put(SLD_PDARESCA,_prg_prec_dare);
|
|
||||||
_tmp_saldi_att->put(SLD_PAVERESCA,_prg_prec_avere);
|
|
||||||
}
|
|
||||||
_tmp_saldi_att->put(SLD_PDARE,_mov_periodo_dare);
|
|
||||||
_tmp_saldi_att->put(SLD_PAVERE,_mov_periodo_avere);
|
|
||||||
_tmp_saldi_att->put(SLD_SALDO,saldo_finale);
|
|
||||||
_tmp_saldi_att->put(SLD_DATAULMOV,_u_max);
|
|
||||||
_tmp_saldi_att->write();
|
|
||||||
}
|
|
||||||
_gp = g;
|
|
||||||
_cp = c;
|
|
||||||
}
|
|
||||||
|
|
||||||
TRecnotype recnum = _pcn->recno();
|
|
||||||
_pcn->next();
|
|
||||||
if (_pcn->eof())
|
|
||||||
{
|
{
|
||||||
if ( (_verifica == 2) && esiste_conto )
|
if (indbil_conto == 1 || indbil_conto == 2 || indbil_conto == 5)
|
||||||
{
|
{
|
||||||
real app = _saldo_ini_conto_dare + _saldo_ini_conto_avere;
|
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,s);
|
||||||
if (app < ZERO)
|
if (_stampav == 1 && sld.significativo())
|
||||||
_saldo_ini_gruppo_avere += app;
|
movimentato = TRUE;
|
||||||
else
|
}
|
||||||
_saldo_ini_gruppo_dare += app;
|
}
|
||||||
mov_gruppo_dare += mov_conto_dare;
|
|
||||||
mov_gruppo_avere += mov_conto_avere;
|
|
||||||
prg_gruppo_dare += prg_conto_dare;
|
|
||||||
prg_gruppo_avere += prg_conto_avere;
|
|
||||||
saldo_gruppo += saldo_conto;
|
|
||||||
|
|
||||||
scrivi_record_gruppo(prg_gruppo_dare,prg_gruppo_avere,
|
|
||||||
mov_gruppo_dare,mov_gruppo_avere,saldo_gruppo);
|
|
||||||
}
|
|
||||||
if (esiste_sc)
|
|
||||||
if ( (_verifica == 1)||( (_verifica == 2)&&
|
|
||||||
(!((_stampav == 2)&&(saldo_conto == 0))) ) )
|
|
||||||
scrivi_record_conto(prg_conto_dare,prg_conto_avere,mov_conto_dare,
|
|
||||||
mov_conto_avere,saldo_conto);
|
|
||||||
}
|
|
||||||
_pcn->readat(recnum);
|
|
||||||
}
|
}
|
||||||
return TRUE;
|
//fine modifica
|
||||||
|
|
||||||
|
if (movimentato || _stampav != 1)
|
||||||
|
{
|
||||||
|
_mov_periodo_dare = sld.prgdare();
|
||||||
|
_mov_periodo_avere = sld.prgavere();
|
||||||
|
_prg_prec_dare = ZERO;
|
||||||
|
_prg_prec_avere = ZERO;
|
||||||
|
|
||||||
|
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (movimentato || _stampav != 1)
|
||||||
|
if (!(saldo_finale == ZERO && _stampav == 2))
|
||||||
|
{
|
||||||
|
esiste_sc = TRUE;
|
||||||
|
esiste_conto = TRUE;
|
||||||
|
|
||||||
|
if (_tipo_stampa1 == 2)
|
||||||
|
{
|
||||||
|
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
||||||
|
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
||||||
|
real nuovo = sld.saldoinisusaldi();
|
||||||
|
if (nuovo > ZERO)
|
||||||
|
_nuovo_tot_saldo_d += nuovo;
|
||||||
|
else
|
||||||
|
{
|
||||||
|
nuovo = -nuovo;
|
||||||
|
_nuovo_tot_saldo_a += nuovo;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (saldo_iniziale < ZERO)
|
||||||
|
_saldo_ini_conto_avere += saldo_iniziale;
|
||||||
|
else
|
||||||
|
_saldo_ini_conto_dare += saldo_iniziale;
|
||||||
|
mov_conto_dare += _mov_periodo_dare;
|
||||||
|
mov_conto_avere += _mov_periodo_avere;
|
||||||
|
prg_conto_dare += _prg_prec_dare;
|
||||||
|
prg_conto_avere += _prg_prec_avere;
|
||||||
|
saldo_conto += saldo_finale; // somma algebrica!!!
|
||||||
|
|
||||||
|
//scrivo il record relat. al sottoconto se non e' richiesto saldi di mastro
|
||||||
|
if (_verifica != 2)
|
||||||
|
{
|
||||||
|
_tmp_saldi_att->zero();
|
||||||
|
_tmp_saldi_att->put(SLD_GRUPPO,g);
|
||||||
|
_tmp_saldi_att->put(SLD_CONTO,c);
|
||||||
|
_tmp_saldi_att->put(SLD_SOTTOCONTO,s);
|
||||||
|
_tmp_saldi_att->put(SLD_FLAGSALINI,tipo_conto);
|
||||||
|
if ( (_datada == _dataini) || (_tipo_stampa1 != 1) )
|
||||||
|
{
|
||||||
|
if (saldo_iniziale > ZERO) //va stampato in Dare
|
||||||
|
_tmp_saldi_att->put(SLD_PDARESCA,saldo_iniziale);
|
||||||
|
else if (saldo_iniziale < ZERO)
|
||||||
|
{
|
||||||
|
saldo_iniziale = -saldo_iniziale;
|
||||||
|
_tmp_saldi_att->put(SLD_PAVERESCA,saldo_iniziale);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else if (_datada > _dataini)
|
||||||
|
{
|
||||||
|
_tmp_saldi_att->put(SLD_PDARESCA,_prg_prec_dare);
|
||||||
|
_tmp_saldi_att->put(SLD_PAVERESCA,_prg_prec_avere);
|
||||||
|
}
|
||||||
|
_tmp_saldi_att->put(SLD_PDARE,_mov_periodo_dare);
|
||||||
|
_tmp_saldi_att->put(SLD_PAVERE,_mov_periodo_avere);
|
||||||
|
_tmp_saldi_att->put(SLD_SALDO,saldo_finale);
|
||||||
|
_tmp_saldi_att->put(SLD_DATAULMOV,_u_max);
|
||||||
|
_tmp_saldi_att->write();
|
||||||
|
}
|
||||||
|
_gp = g;
|
||||||
|
_cp = c;
|
||||||
|
}
|
||||||
|
|
||||||
|
TRecnotype recnum = _pcn->recno();
|
||||||
|
_pcn->next();
|
||||||
|
if (_pcn->eof())
|
||||||
|
{
|
||||||
|
if ( (_verifica == 2) && esiste_conto )
|
||||||
|
{
|
||||||
|
real app = _saldo_ini_conto_dare + _saldo_ini_conto_avere;
|
||||||
|
if (app < ZERO)
|
||||||
|
_saldo_ini_gruppo_avere += app;
|
||||||
|
else
|
||||||
|
_saldo_ini_gruppo_dare += app;
|
||||||
|
mov_gruppo_dare += mov_conto_dare;
|
||||||
|
mov_gruppo_avere += mov_conto_avere;
|
||||||
|
prg_gruppo_dare += prg_conto_dare;
|
||||||
|
prg_gruppo_avere += prg_conto_avere;
|
||||||
|
saldo_gruppo += saldo_conto;
|
||||||
|
|
||||||
|
scrivi_record_gruppo(prg_gruppo_dare,prg_gruppo_avere,
|
||||||
|
mov_gruppo_dare,mov_gruppo_avere,saldo_gruppo);
|
||||||
|
}
|
||||||
|
if (esiste_sc)
|
||||||
|
if ( (_verifica == 1)||( (_verifica == 2)&&
|
||||||
|
(!((_stampav == 2)&&(saldo_conto == 0))) ) )
|
||||||
|
scrivi_record_conto(prg_conto_dare,prg_conto_avere,mov_conto_dare,
|
||||||
|
mov_conto_avere,saldo_conto);
|
||||||
|
}
|
||||||
|
_pcn->readat(recnum);
|
||||||
|
}
|
||||||
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
//bilancio di verifica per data limite
|
//bilancio di verifica per data limite
|
||||||
@ -1492,11 +1526,11 @@ bool CG1500_application::calcola(int g, int c, long s)
|
|||||||
TCaus cau (codcaus);
|
TCaus cau (codcaus);
|
||||||
|
|
||||||
if (codcaus.not_empty())
|
if (codcaus.not_empty())
|
||||||
if (cau.chiusura()) // Si tratta di causale di chiusura
|
if (cau.chiusura()) //Si tratta di causale di chiusura
|
||||||
continue;
|
continue;
|
||||||
|
|
||||||
//la causale e' uguale a quella di chiusura
|
//la causale e' uguale a quella di chiusura
|
||||||
// break;
|
//break;
|
||||||
|
|
||||||
sezione = rmov.get_char(RMV_SEZIONE);
|
sezione = rmov.get_char(RMV_SEZIONE);
|
||||||
importo = rmov.get_real(RMV_IMPORTO);
|
importo = rmov.get_real(RMV_IMPORTO);
|
||||||
@ -1522,7 +1556,7 @@ bool CG1500_application::calcola(int g, int c, long s)
|
|||||||
}
|
}
|
||||||
*/
|
*/
|
||||||
// Modifica del 03-03-95
|
// Modifica del 03-03-95
|
||||||
|
//calcolo i movimenti del periodo
|
||||||
if ( data_reg >= _datada && data_reg <= _dataa)
|
if ( data_reg >= _datada && data_reg <= _dataa)
|
||||||
if ((cau.apertura() && _dataini != _datada) ||
|
if ((cau.apertura() && _dataini != _datada) ||
|
||||||
(!cau.apertura()))
|
(!cau.apertura()))
|
||||||
@ -1586,11 +1620,48 @@ bool CG1500_application::ricerca_cf(int g,int c,char tipocf,int ib, real& saldo_
|
|||||||
|
|
||||||
if (_tipo_stampa1 == 1) //bil. di verifica per data limite
|
if (_tipo_stampa1 == 1) //bil. di verifica per data limite
|
||||||
{
|
{
|
||||||
if ( !calcola(g,c,s) )//il conto non e' movimentato
|
/*
|
||||||
if (_stampav == 1 || _stampav == 3) //per i C/F anche se seleziono -tutti i conti, voglio solo quelli movimentati
|
if ( !calcola(g,c,s) ) //il conto non e' movimentato
|
||||||
continue;
|
if (_stampav == 1 || _stampav == 3) //per i C/F anche se seleziono -tutti i conti, voglio solo quelli movimentati
|
||||||
|
continue;
|
||||||
|
*/
|
||||||
|
|
||||||
saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
//modifica del 19/06. Vedi appunti per capire
|
||||||
|
bool movimentato = calcola(g,c,s);
|
||||||
|
|
||||||
|
if (_stampa_mov_prov != 3)
|
||||||
|
{
|
||||||
|
if (movimentato)
|
||||||
|
{
|
||||||
|
saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
||||||
|
TLocalisamfile saldi(LF_SALDI);
|
||||||
|
saldi.zero();
|
||||||
|
saldi.put(SLD_ANNOES,_annoes);
|
||||||
|
saldi.put(SLD_GRUPPO,g);
|
||||||
|
saldi.put(SLD_CONTO,c);
|
||||||
|
saldi.put(SLD_SOTTOCONTO,s);
|
||||||
|
if (saldi.read() == NOERR)
|
||||||
|
{
|
||||||
|
//se il saldo iniziale e' diverso da zero non lo devo considerare
|
||||||
|
//perche' l'ho gia' considerato nella funzione calcola
|
||||||
|
real ss = saldi.get_real(SLD_SALDO);
|
||||||
|
if (ib == 1 || ib == 2 || ib == 5)
|
||||||
|
if (ss == ZERO && _annoes != 0) //competenza!!!
|
||||||
|
saldo_iniziale += sld.saldofin_esprec(_annoes,g,c,s);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (!movimentato)
|
||||||
|
if (ib == 1 || ib == 2 || ib == 5)
|
||||||
|
if (_annoes != 0) //cioe' se sto ragionando per competenza
|
||||||
|
{
|
||||||
|
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,s);
|
||||||
|
movimentato = sld.significativo();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!movimentato)
|
||||||
|
continue;
|
||||||
|
//fine modifica
|
||||||
|
|
||||||
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
||||||
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
||||||
@ -1605,67 +1676,71 @@ bool CG1500_application::ricerca_cf(int g,int c,char tipocf,int ib, real& saldo_
|
|||||||
if (_datada == _dataini)
|
if (_datada == _dataini)
|
||||||
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
||||||
else if (_datada > _dataini)
|
else if (_datada > _dataini)
|
||||||
|
{
|
||||||
|
if (saldo_iniziale > 0)
|
||||||
|
_prg_prec_dare += saldo_iniziale;
|
||||||
|
else _prg_prec_avere -= saldo_iniziale;
|
||||||
saldo_finale = _prg_prec_dare-_prg_prec_avere+_mov_periodo_dare-
|
saldo_finale = _prg_prec_dare-_prg_prec_avere+_mov_periodo_dare-
|
||||||
_mov_periodo_avere;
|
_mov_periodo_avere;
|
||||||
|
}
|
||||||
if (saldo_finale == ZERO)
|
if (saldo_finale == ZERO)
|
||||||
if (_stampav == 2)
|
if (_stampav == 2)
|
||||||
continue;
|
continue;
|
||||||
|
|
||||||
//se saldo_finale < 0 verra' stampato con una A, se no con una D
|
//se saldo_finale < 0 verra' stampato con una A, se no con una D
|
||||||
}
|
}
|
||||||
else
|
|
||||||
{
|
|
||||||
//Attenzione! Nel caso di "tutti i conti" devono scendere solo i cli/for movimentati!!!
|
|
||||||
//modifica del 31/03/1995
|
|
||||||
bool movimentato = sld.ultima_immissione_verifica(_annoes,g,c,s,_indbil,_stampa_mov_prov);
|
|
||||||
|
|
||||||
saldo_iniziale = sld.saldoini();
|
|
||||||
|
|
||||||
if (!movimentato)
|
|
||||||
{
|
|
||||||
if (_stampav == 1)
|
|
||||||
continue;
|
|
||||||
//vado sui saldi con l'anno precedente e calcolo saldo_iniziale
|
|
||||||
//se esiste tale record e almeno un valore e' significativo (indipendentemente dal valore
|
|
||||||
//del saldo iniziale calcolato, allora metto a TRUE il flag movimentato
|
|
||||||
//solo se e' un conto patrimoniale
|
|
||||||
if (_stampa_mov_prov != 3)
|
|
||||||
if (ib == 1 || ib == 2 || ib == 5)
|
|
||||||
{
|
|
||||||
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,s);
|
|
||||||
//movimentato = sld.esiste_saldo_ep();
|
|
||||||
movimentato = sld.significativo();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!movimentato)
|
|
||||||
continue;
|
|
||||||
//fine modifica 31/03/1995
|
|
||||||
|
|
||||||
//saldo_iniziale = sld.saldoini();
|
|
||||||
|
|
||||||
_mov_periodo_dare = sld.prgdare();
|
|
||||||
_mov_periodo_avere = sld.prgavere();
|
|
||||||
_prg_prec_dare = ZERO;
|
|
||||||
_prg_prec_avere = ZERO;
|
|
||||||
|
|
||||||
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
|
||||||
|
|
||||||
if (saldo_finale == ZERO)
|
|
||||||
if (_stampav == 2)
|
|
||||||
continue;
|
|
||||||
|
|
||||||
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
|
||||||
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
|
||||||
real nuovo = sld.saldoinisusaldi();
|
|
||||||
if (nuovo > ZERO)
|
|
||||||
_nuovo_tot_saldo_d += nuovo;
|
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
nuovo = -nuovo;
|
//Attenzione! Nel caso di "tutti i conti" devono scendere solo i cli/for movimentati!!!
|
||||||
_nuovo_tot_saldo_a += nuovo;
|
|
||||||
|
//modifica del 31/03/1995
|
||||||
|
bool movimentato = sld.ultima_immissione_verifica(_annoes,g,c,s,ib,_stampa_mov_prov);
|
||||||
|
|
||||||
|
if (_stampa_mov_prov != 3)
|
||||||
|
{
|
||||||
|
saldo_iniziale = sld.saldoini();
|
||||||
|
if (!movimentato)
|
||||||
|
{
|
||||||
|
//if (_stampav == 1)
|
||||||
|
// continue;
|
||||||
|
//vado sui saldi con l'anno precedente e calcolo saldo_finale es.prec
|
||||||
|
//se esiste tale record e almeno un valore e' significativo (indipendentemente dal valore
|
||||||
|
//del saldo iniziale calcolato, allora metto a TRUE il flag movimentato
|
||||||
|
//solo se e' un conto patrimoniale
|
||||||
|
if (ib == 1 || ib == 2 || ib == 5)
|
||||||
|
{
|
||||||
|
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,s);
|
||||||
|
movimentato = sld.significativo();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!movimentato)
|
||||||
|
continue;
|
||||||
|
//fine modifica 31/03/1995
|
||||||
|
|
||||||
|
_mov_periodo_dare = sld.prgdare();
|
||||||
|
_mov_periodo_avere = sld.prgavere();
|
||||||
|
_prg_prec_dare = ZERO;
|
||||||
|
_prg_prec_avere = ZERO;
|
||||||
|
|
||||||
|
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
||||||
|
|
||||||
|
if (saldo_finale == ZERO)
|
||||||
|
if (_stampav == 2)
|
||||||
|
continue;
|
||||||
|
|
||||||
|
_nuovo_tot_saldo_d += _mov_periodo_dare;
|
||||||
|
_nuovo_tot_saldo_a += _mov_periodo_avere;
|
||||||
|
real nuovo = sld.saldoinisusaldi();
|
||||||
|
if (nuovo > ZERO)
|
||||||
|
_nuovo_tot_saldo_d += nuovo;
|
||||||
|
else
|
||||||
|
{
|
||||||
|
nuovo = -nuovo;
|
||||||
|
_nuovo_tot_saldo_a += nuovo;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
|
||||||
|
|
||||||
esiste_sc = TRUE;
|
esiste_sc = TRUE;
|
||||||
|
|
||||||
@ -1954,21 +2029,51 @@ void CG1500_application::crea_sort_clifo()
|
|||||||
movdare = ZERO;
|
movdare = ZERO;
|
||||||
movavere = ZERO;
|
movavere = ZERO;
|
||||||
|
|
||||||
if (_tipo_stampa1 == 1) //bilancio per data limite
|
if (_tipo_stampa1 == 1) //bilancio di verifica per data limite
|
||||||
{
|
{
|
||||||
//if ( !calcola(g,c,codcf) )//il conto non e' mov.
|
//modifica del 19/06/95
|
||||||
// if (_stampac == 1)
|
_indbil = cerca_indbil(g,c);
|
||||||
// continue;
|
|
||||||
movimentato = calcola(g,c,codcf);
|
movimentato = calcola(g,c,codcf);
|
||||||
if (movimentato || _stampac != 1)
|
if (_stampa_mov_prov != 3)
|
||||||
|
if (!movimentato && _stampac!=1)
|
||||||
|
if (_indbil == 1 || _indbil == 2 || _indbil == 5)
|
||||||
|
if (_annoes != 0) //cioe' se sto ragionando per competenza
|
||||||
|
saldo_iniziale = sld.saldofin_esprec(_annoes,g,c,codcf);
|
||||||
|
|
||||||
|
if (movimentato)
|
||||||
{
|
{
|
||||||
saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
saldo_iniziale = _saldo_ini_dare - _saldo_ini_avere;
|
||||||
|
TLocalisamfile saldi(LF_SALDI);
|
||||||
|
saldi.zero();
|
||||||
|
saldi.put(SLD_ANNOES,_annoes);
|
||||||
|
saldi.put(SLD_GRUPPO,g);
|
||||||
|
saldi.put(SLD_CONTO,c);
|
||||||
|
saldi.put(SLD_SOTTOCONTO,codcf);
|
||||||
|
if (saldi.read() == NOERR)
|
||||||
|
{
|
||||||
|
real s = saldi.get_real(SLD_SALDO);
|
||||||
|
if (_stampa_mov_prov != 3)
|
||||||
|
if (_indbil == 1 || _indbil == 2 || _indbil == 5)
|
||||||
|
if (s == ZERO && _annoes != 0) //competenza!!!
|
||||||
|
saldo_iniziale += sld.saldofin_esprec(_annoes,g,c,codcf);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
//fine modifica
|
||||||
|
//movimentato = calcola(g,c,codcf);
|
||||||
|
if (movimentato || _stampac != 1)
|
||||||
|
{
|
||||||
if (_datada == _dataini)
|
if (_datada == _dataini)
|
||||||
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
saldo_finale = saldo_iniziale+_mov_periodo_dare-_mov_periodo_avere;
|
||||||
else if (_datada > _dataini)
|
else if (_datada > _dataini)
|
||||||
|
{
|
||||||
|
//modifica del 19/06
|
||||||
|
if (saldo_iniziale > 0)
|
||||||
|
_prg_prec_dare += saldo_iniziale;
|
||||||
|
else _prg_prec_avere -= saldo_iniziale;
|
||||||
|
//fine modifica
|
||||||
saldo_finale = _prg_prec_dare-_prg_prec_avere+_mov_periodo_dare
|
saldo_finale = _prg_prec_dare-_prg_prec_avere+_mov_periodo_dare
|
||||||
-_mov_periodo_avere;
|
-_mov_periodo_avere;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
//if (saldo_finale == ZERO)
|
//if (saldo_finale == ZERO)
|
||||||
// if (_stampac == 2)
|
// if (_stampac == 2)
|
||||||
@ -1976,12 +2081,9 @@ void CG1500_application::crea_sort_clifo()
|
|||||||
|
|
||||||
//se saldo_finale < 0 verra' stampato con una A, se no con una D
|
//se saldo_finale < 0 verra' stampato con una A, se no con una D
|
||||||
}
|
}
|
||||||
else //bilancio di verifica
|
else //bilancio di verifica all'ultima immissione
|
||||||
{
|
{
|
||||||
_indbil = cerca_indbil(g,c);
|
_indbil = cerca_indbil(g,c);
|
||||||
//if (!sld.ultima_immissione_bilancio(_annoes,g,c,codcf,_indbil))
|
|
||||||
// if (_stampac == 1)
|
|
||||||
// continue;
|
|
||||||
movimentato = sld.ultima_immissione_verifica(anno,g,c,codcf,_indbil,_stampa_mov_prov);
|
movimentato = sld.ultima_immissione_verifica(anno,g,c,codcf,_indbil,_stampa_mov_prov);
|
||||||
|
|
||||||
if (_stampa_mov_prov != 3)
|
if (_stampa_mov_prov != 3)
|
||||||
@ -1994,8 +2096,6 @@ void CG1500_application::crea_sort_clifo()
|
|||||||
|
|
||||||
if (movimentato || _stampac != 1)
|
if (movimentato || _stampac != 1)
|
||||||
{
|
{
|
||||||
//saldo_iniziale = sld.saldoini();
|
|
||||||
|
|
||||||
_mov_periodo_dare = sld.prgdare();
|
_mov_periodo_dare = sld.prgdare();
|
||||||
_mov_periodo_avere = sld.prgavere();
|
_mov_periodo_avere = sld.prgavere();
|
||||||
_prg_prec_dare = ZERO;
|
_prg_prec_dare = ZERO;
|
||||||
|
@ -170,8 +170,8 @@ real TSaldo::saldofin_esprec(int annoes, int g, int c, long s)
|
|||||||
const real saldo = app.get_real(SLD_SALDO);
|
const real saldo = app.get_real(SLD_SALDO);
|
||||||
const real pdare = app.get_real(SLD_PDARE);
|
const real pdare = app.get_real(SLD_PDARE);
|
||||||
const real pavere = app.get_real(SLD_PAVERE);
|
const real pavere = app.get_real(SLD_PAVERE);
|
||||||
const real pdaresca = app.get_real(SLD_PDARESCA);
|
//const real pdaresca = app.get_real(SLD_PDARESCA);
|
||||||
const real paveresca = app.get_real(SLD_PAVERESCA);
|
//const real paveresca = app.get_real(SLD_PAVERESCA);
|
||||||
|
|
||||||
/*
|
/*
|
||||||
_significativo = (saldo != ZERO || pdare != ZERO || pavere != ZERO
|
_significativo = (saldo != ZERO || pdare != ZERO || pavere != ZERO
|
||||||
@ -190,6 +190,8 @@ real TSaldo::saldofin_esprec(int annoes, int g, int c, long s)
|
|||||||
return tot;
|
return tot;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
//richiamata nel bilancio a sez.contr per data limite
|
||||||
|
//in realta' calcola il saldo finale es.prec
|
||||||
real TSaldo::calcola_saldo_iniziale(int g,int c,long s,int indbil)
|
real TSaldo::calcola_saldo_iniziale(int g,int c,long s,int indbil)
|
||||||
{
|
{
|
||||||
real saldoini, pdaresca, paveresca, pdare, pavere;
|
real saldoini, pdaresca, paveresca, pdare, pavere;
|
||||||
@ -215,10 +217,9 @@ real TSaldo::calcola_saldo_iniziale(int g,int c,long s,int indbil)
|
|||||||
flag = saldi.get_char(SLD_FLAGSALINI);
|
flag = saldi.get_char(SLD_FLAGSALINI);
|
||||||
saldoini = saldi.get_real(SLD_SALDO);
|
saldoini = saldi.get_real(SLD_SALDO);
|
||||||
|
|
||||||
//_significativo = (saldoini != ZERO || pdaresca != ZERO || paveresca != ZERO);
|
|
||||||
_significativo = (saldoini != ZERO);
|
_significativo = (saldoini != ZERO);
|
||||||
|
|
||||||
if (saldoini != ZERO)
|
if (saldoini != ZERO) //non va considerato!!! Vedi appunti
|
||||||
/*
|
/*
|
||||||
if (flag == 'A')
|
if (flag == 'A')
|
||||||
{
|
{
|
||||||
@ -337,7 +338,7 @@ bool TSaldo::data_limite_bilancio(int bilancio, int g, int c, long s, const TDat
|
|||||||
// o di apertura il movimento non va considerato"
|
// o di apertura il movimento non va considerato"
|
||||||
// if (_codcaus.not_empty())
|
// if (_codcaus.not_empty())
|
||||||
// if (_codcaus == causale_chiusura_es() ||
|
// if (_codcaus == causale_chiusura_es() ||
|
||||||
// _codcaus == causale_apertura_es())
|
// _codcaus == causale_apertura_es())
|
||||||
// continue;
|
// continue;
|
||||||
|
|
||||||
// Modifica del 03-03-1995
|
// Modifica del 03-03-1995
|
||||||
@ -385,7 +386,7 @@ bool TSaldo::data_limite_bilancio(int bilancio, int g, int c, long s, const TDat
|
|||||||
TString dep2(_saldo.string());
|
TString dep2(_saldo.string());
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
// Se non movimentato vado a vedere il saldo
|
// Anche se non movimentato vado a vedere il saldo
|
||||||
if (!_movimentato)
|
if (!_movimentato)
|
||||||
if (stp_prov != 3)
|
if (stp_prov != 3)
|
||||||
_saldo = calcola_saldo_iniziale(g,c,s,indbil);
|
_saldo = calcola_saldo_iniziale(g,c,s,indbil);
|
||||||
@ -470,7 +471,7 @@ bool TSaldo::ultima_immissione_verifica(int annoes,int g,int c,long s,int indbil
|
|||||||
return esito;
|
return esito;
|
||||||
}
|
}
|
||||||
|
|
||||||
//per bilancio scalare all'ultima immissione
|
//per bilancio a sezioni contrapposte all'ultima immissione
|
||||||
bool TSaldo::ultima_immissione_bilancio(int annoes,int g,int c,long s,int indbil,int stp_prov)
|
bool TSaldo::ultima_immissione_bilancio(int annoes,int g,int c,long s,int indbil,int stp_prov)
|
||||||
{
|
{
|
||||||
//Si considerano i saldi e non piu' i movimenti
|
//Si considerano i saldi e non piu' i movimenti
|
||||||
@ -506,8 +507,6 @@ bool TSaldo::ultima_immissione_bilancio(int annoes,int g,int c,long s,int indbil
|
|||||||
_saldo_iniziale = saldi.get_real(SLD_SALDO);
|
_saldo_iniziale = saldi.get_real(SLD_SALDO);
|
||||||
_prg_dare = saldi.get_real(SLD_PDARE);
|
_prg_dare = saldi.get_real(SLD_PDARE);
|
||||||
_prg_avere = saldi.get_real(SLD_PAVERE);
|
_prg_avere = saldi.get_real(SLD_PAVERE);
|
||||||
//_prg_daresca = saldi.get_real(SLD_PDARESCA);
|
|
||||||
//_prg_averesca = saldi.get_real(SLD_PAVERESCA);
|
|
||||||
pdarepro = saldi.get_real(SLD_PDAREPRO);
|
pdarepro = saldi.get_real(SLD_PDAREPRO);
|
||||||
paverepro = saldi.get_real(SLD_PAVEREPRO);
|
paverepro = saldi.get_real(SLD_PAVEREPRO);
|
||||||
sezione = saldi.get_char(SLD_FLAGSALINI);
|
sezione = saldi.get_char(SLD_FLAGSALINI);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user