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

Patch level : 12.0 494

Browse Source 
Files correlati     : cg4.exe

Aggiunta creazione registri dichiarazioni d'intenti all'apertura esercizio

git-svn-id: svn://10.65.10.50/branches/R_10_00@24250 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
bonazzi 2018-01-07 21:33:30 +00:00
parent 862b0795fc
commit a761af19ec
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/cg/cg4500.cpp
View File

@ -143,7 +143,8 @@ bool TAp_eser::apertura_es()
cur.freeze();
for (cur = 0L; cur.pos() < items; ++cur)
{
if (tabreg.get_int("I0") == 5)
const int tipo = tabreg.get_int("I0");
if (tipo == 5 || tipo == 10)
{
TString16 cod(tabreg.get("CODTAB"));
@ -159,7 +160,11 @@ bool TAp_eser::apertura_es()
tabreg.put("D3", data);
tabreg.zero("R1");
tabreg.zero("R2");
if (tipo == 10)
{
tabreg.zero("I3");
tabreg.zero("I4");
}
reg.write();
}
}