1994-12-09 16:29:50 +00:00
|
|
|
#include "cg5500.h"
|
|
|
|
#include <utility.h>
|
|
|
|
|
|
|
|
bool Visliq_app::look_lim(int m)
|
|
|
|
{
|
|
|
|
bool ok = FALSE;
|
|
|
|
|
|
|
|
_lim_r->zero();
|
|
|
|
(*_lim_mese) = format("%d",m);
|
1995-01-09 12:14:11 +00:00
|
|
|
(*_lim_anno) = format("%d",_year);
|
1994-12-09 16:29:50 +00:00
|
|
|
|
|
|
|
_lim->read();
|
|
|
|
return _lim->good();
|
|
|
|
}
|
|
|
|
|
1995-02-03 11:51:44 +00:00
|
|
|
bool Visliq_app::look_del(int month, int type, bool create)
|
1994-12-09 16:29:50 +00:00
|
|
|
{
|
|
|
|
_del->zero();
|
1995-02-03 11:51:44 +00:00
|
|
|
(*_del_ditta) = format("%05ld", get_firm());
|
|
|
|
(*_del_anno) = _year;
|
|
|
|
(*_del_mese) = format("%02d", month);
|
|
|
|
(*_del_tipo) = format("%1d", type);
|
|
|
|
|
|
|
|
TString16 ctab = _del->get("CODTAB");
|
1994-12-09 16:29:50 +00:00
|
|
|
_del->read();
|
|
|
|
|
1995-02-03 11:51:44 +00:00
|
|
|
bool ok = _del->good();
|
|
|
|
|
|
|
|
if (!ok && create)
|
|
|
|
{
|
|
|
|
_del->zero();
|
|
|
|
_del->put("CODTAB",ctab);
|
|
|
|
_del->write();
|
|
|
|
}
|
|
|
|
return ok;
|
1994-12-09 16:29:50 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
bool Visliq_app::look_lia(int year)
|
|
|
|
{
|
|
|
|
if (year == 0) year = _year;
|
|
|
|
TString16 y; y << year;
|
|
|
|
|
|
|
|
_lia->zero();
|
|
|
|
_lia->put("CODTAB", y);
|
|
|
|
_lia->read();
|
|
|
|
|
|
|
|
return _lia->good();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
bool Visliq_app::is_trim(int x)
|
|
|
|
// TRUE se il mese passato e' un trimestre
|
|
|
|
{ return x == 3 || x == 6 || x == 9 || x == 12; }
|
|
|
|
|
|
|
|
bool Visliq_app::is_month_ok(int x, int month)
|
|
|
|
// TRUE se il mese passato e' compatibile con il regime
|
|
|
|
// di liquidazione e (opz) non e' maggiore di quello scelto
|
|
|
|
{
|
|
|
|
if (month == -1) month = x;
|
|
|
|
return _freqviva == "M" ?
|
|
|
|
( x > 0 && x <= month) :
|
|
|
|
( x <= month && is_trim(x));
|
|
|
|
}
|