root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Azzerati anche flag di stampato su LIM

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1028 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-02-23 12:51:12 +00:00
parent d322fce7a1
commit 7b9189fd6b
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
cg/cg5400.cpp
View File

@ -140,6 +140,19 @@ bool TRipristina_stampa::reg_restore(const TString& regist,
reg.put("I4", mese); // Ultimo mese di stampa liquidazione
if (reg.get_int("I8") >= mese)
reg.zero("I8"); // Mese di ultima stampa credito precedente
TTable lim("LIM"); // Azzera i flag di stampa liquidazione
lim.put("CODTAB", format("%04d%02d", year, mese+1));
for (int err = lim.read(_isgteq); err == NOERR; err = lim.next())
{
if (atoi(lim.get("CODTAB").left(4)) != year) break;
const bool stampato = lim.get_bool("B1");
if (stampato)
{
lim.zero("B1");
lim.rewrite();
}
}
}
}
else