Modificato programma di apertura es. IVA: riportato nuovo flag di

agricoltore minimo, presente sui parametri liquidazione.


git-svn-id: svn://10.65.10.50/trunk@5516 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-11-03 11:38:54 +00:00
parent 30bf0f7ec9
commit cead731ced
2 changed files with 39 additions and 30 deletions

View File

@ -73,6 +73,7 @@ bool TAp_iva::apertura_iva()
newrec = TabLia.curr(); newrec = TabLia.curr();
newrec.put("CODTAB", format("%05ld%04d", get_firm(), _annoiva)); newrec.put("CODTAB", format("%05ld%04d", get_firm(), _annoiva));
newrec.put("S7", _frequenza); newrec.put("S7", _frequenza);
newrec.put("B2", _is_minagr);
newrec.zero("R0"); newrec.zero("R0");
TabLia.write(newrec); TabLia.write(newrec);
} }
@ -225,12 +226,16 @@ bool TAp_iva::menu(MENU_TAG m)
_annop = conf.get("AnLiIv"); _annop = conf.get("AnLiIv");
int aivap = atoi(_annop); int aivap = atoi(_annop);
int anno = aivap+1; int anno = aivap+1;
_is_minagr = FALSE;
TabLia.zero(); TabLia.zero();
TString16 chiave; chiave.format("%05ld%04d", get_firm(), anno); TString16 chiave; chiave.format("%05ld%04d", get_firm(), anno);
TabLia.put("CODTAB",chiave); TabLia.put("CODTAB",chiave);
if (TabLia.read() == NOERR) if (TabLia.read() == NOERR)
{
msk.set(F_FREQUENZA, TabLia.get("S7")); msk.set(F_FREQUENZA, TabLia.get("S7"));
_is_minagr = TabLia.get_bool("B2");
}
else else
{ {
TabLia.zero(); TabLia.zero();
@ -238,7 +243,10 @@ bool TAp_iva::menu(MENU_TAG m)
chiave.format("%05ld%04d", get_firm(), aivap); chiave.format("%05ld%04d", get_firm(), aivap);
TabLia.put("CODTAB", chiave); TabLia.put("CODTAB", chiave);
if (TabLia.read() == NOERR) if (TabLia.read() == NOERR)
{
msk.set(F_FREQUENZA, TabLia.get("S7")); msk.set(F_FREQUENZA, TabLia.get("S7"));
_is_minagr = TabLia.get_bool("B2");
}
else else
{ {
nditte.zero(); nditte.zero();

View File

@ -14,6 +14,7 @@ class TAp_iva : public TApplication
TString _annop; TString _annop;
long _ditta; long _ditta;
char _frequenza; char _frequenza;
bool _is_minagr;
protected: protected:
static bool mask_annoiva(TMask_field&, KEY); static bool mask_annoiva(TMask_field&, KEY);