Errori corretti in liquidazione

git-svn-id: svn://10.65.10.50/trunk@1580 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1995-07-10 07:37:47 +00:00
parent 39e9649462
commit e2dfb5581c
2 changed files with 3654 additions and 3646 deletions

View File

@ -147,7 +147,7 @@ bool TLiquidazione_app::update_firm(int month, bool recalc)
look_lim(liq_month(month), TRUE); look_lim(liq_month(month), TRUE);
if (_isregis && _lim->get_bool("B1") && _month != 13) if (_isfinal && _lim->get_bool("B1") && _month != 13)
return TRUE; return TRUE;
TConfig cnf(CONFIG_DITTA, "cg"); TConfig cnf(CONFIG_DITTA, "cg");
@ -255,10 +255,9 @@ bool TLiquidazione_app::update_firm(int month, bool recalc)
_pla->rewrite(); _pla->rewrite();
} }
for (_reg->first(); _reg->good(); _reg->next()) for (_reg->first(); _reg->good(); _reg->next())
{ {
if (codatt == _reg->get("S8")) if (codatt == _reg->get("S8") || quater)
{ {
if (!riepliq) riepliq = _reg->get_bool("B6"); if (!riepliq) riepliq = _reg->get_bool("B6");
if (!stliq) stliq = _reg->get_bool("B7"); if (!stliq) stliq = _reg->get_bool("B7");

View File

@ -855,19 +855,19 @@ void TLiquidazione_app::set_firm(_DescrItem& d)
} }
reset_header(); reset_header();
int soh = 1;
if (!_isregis) if (!_isregis)
{ {
set_header(1,"Ditta %s %s@109gData @<@125gPag. @#", set_header(soh++,"Ditta %s %s@109gData @<@125gPag. @#",
(const char*)(d._s0), (const char*)(d._s1)); (const char*)(d._s0), (const char*)(d._s1));
set_header(2,""); set_header(soh++,"");
} }
set_header(3,sep); set_header(soh++,sep);
set_header(4,"%s@102gFrequenza %s", set_header(soh++,"%s@102gFrequenza %s",
(const char*)tim_title, (const char*)tim_title,
d._s2 == "T" ? "Trimestrale" : "Mensile"); d._s2 == "T" ? "Trimestrale" : "Mensile");
set_header(5,sep); set_header(soh++,sep);
set_header(6,""); set_header(soh++,"");
// notify errors if any // notify errors if any
int j = 0; int j = 0;
@ -936,16 +936,17 @@ void TLiquidazione_app::set_att(_DescrItem& d)
(const char*)tipatt); (const char*)tipatt);
reset_header(); reset_header();
int soh = 1;
if (!_isregis) if (!_isregis)
{ {
set_header(1,"Ditta %s %s@109gData @<@125gPag. @#", set_header(soh++,"Ditta %s %s@109gData @<@125gPag. @#",
(const char*)(d._s0), (const char*)(d._s1)); (const char*)(d._s0), (const char*)(d._s1));
set_header(2,""); set_header(soh++,"");
} }
set_header(3,sep); set_header(soh++,sep);
set_header(4,"%s@55g%s", (const char*)tim_title, (const char*)att_title); set_header(soh++,"%s@55g%s", (const char*)tim_title, (const char*)att_title);
set_header(5,sep); set_header(soh++,sep);
set_header(6,""); set_header(soh++,"");
// notify errors if any // notify errors if any
int j = 0; int j = 0;
@ -1354,25 +1355,32 @@ void TLiquidazione_app::set_grand(_DescrItem& d)
// rapportini per rimborso infraannuale // rapportini per rimborso infraannuale
// non si stampano se la stampa serve per la visualizz. // non si stampano se la stampa serve per la visualizz.
if (d._arr.items() > 0 && !_is_visliq && !_isregis) //modifica del 07/07/1995
//*** solo in st.di prova in coda ai registri deve scendere
// il prospetto di rimborso
//*** sempre (cioe' in bollato e in prova) deve scendere
// il prospettino versamento (boh???????????????????)
//if (d._arr.items() > 0 && !_is_visliq && !_isregis)
if (d._arr.items() > 0 && !_is_visliq)
{ {
for (int i = 0; i < d._arr.items(); i++) for (int i = 0; i < d._arr.items(); i++)
{ {
_DescrItem& di = (_DescrItem&)d._arr[i]; _DescrItem& di = (_DescrItem&)d._arr[i];
if (di._flags == RIMBORSO) if (di._flags == RIMBORSO)
{ {
set_print_zero(TRUE); if (!_isregis || (_isregis && !_isfinal))
set_row(rw++,"");
set_row(rw++,"");
set_bookmark("Prospetto di rimborso", _firm_bookmark);
set_row(rw++, " PROSPETTO DI RIMBORSO");
if (di._f0)
{ {
set_print_zero(TRUE);
set_row(rw++,"");
set_row(rw++,"");
set_bookmark("Prospetto di rimborso", _firm_bookmark);
set_row(rw++, " PROSPETTO DI RIMBORSO");
if (di._f0)
{
// esenti e non imponibili // esenti e non imponibili
set_row(rw++,""); set_row(rw++,"");
set_row(rw++,"1) Soggetto con quota di operazioni esenti e non" set_row(rw++,"1) Soggetto con quota di operazioni esenti e non"
@ -1387,10 +1395,10 @@ void TLiquidazione_app::set_grand(_DescrItem& d)
set_row(rw++,"@66g%t x 100 = %3r%%", &sep, &perc); set_row(rw++,"@66g%t x 100 = %3r%%", &sep, &perc);
set_row(rw++,"@26gVolume di affari lordo@66g%r", &(di._r1)); set_row(rw++,"@26gVolume di affari lordo@66g%r", &(di._r1));
set_row(rw++,""); set_row(rw++,"");
} }
if (di._f1) if (di._f1)
{ {
set_row(rw++,""); set_row(rw++,"");
set_row(rw++,"2) Soggetto con acquisti ad aliquota media " set_row(rw++,"2) Soggetto con acquisti ad aliquota media "
"superiore a quella delle vendite"); "superiore a quella delle vendite");
@ -1404,9 +1412,10 @@ void TLiquidazione_app::set_grand(_DescrItem& d)
set_row(rw++,"@26gTotale imposte sulle vendite@66g%r", &(di._r4)); set_row(rw++,"@26gTotale imposte sulle vendite@66g%r", &(di._r4));
set_row(rw++,"@66g%t x 100 = %5.2r%%", &sep, &(di._r6)); set_row(rw++,"@66g%t x 100 = %5.2r%%", &sep, &(di._r6));
set_row(rw++,"@26gTotale imponibili sulle vendite@66g%r", &(di._r2)); set_row(rw++,"@26gTotale imponibili sulle vendite@66g%r", &(di._r2));
} }
set_print_zero(FALSE); set_print_zero(FALSE);
}
} }
// prospettino versamento // prospettino versamento
else if (di._flags == DELEGA) else if (di._flags == DELEGA)