Patch level : at

Files correlati     : at0.exe
Ricompilazione Demo : [ ]
Commento            : corretto annullamento convocazioni (non mette -1)


git-svn-id: svn://10.65.10.50/trunk@10095 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2002-02-28 09:11:05 +00:00
parent 3a17a5a00e
commit 8926d8dff3

@ -853,7 +853,8 @@ int TGestioneConvocazioni::scrivi(const TMask& m, bool ri)
const TDate dataprossi = soggetti.get_date(SOG_DATAPROSSI);
int numconv = soggetti.get_int(SOG_NUMCONV);
numconv--;
soggetti.put(SOG_NUMCONV,numconv);
if (numconv > 0)
soggetti.put(SOG_NUMCONV,numconv);
TRectype da(LF_RCONVOC);
da.put(RCV_CODICE,codice);
TRectype a(LF_RCONVOC);
@ -903,7 +904,8 @@ int TGestioneConvocazioni::scrivi(const TMask& m, bool ri)
const TDate dataprossi = soggetti.get_date(SOG_DATAPROSSI);
int numconv = soggetti.get_int(SOG_NUMCONV);
numconv--;
soggetti.put(SOG_NUMCONV,numconv);
if (numconv > 0)
soggetti.put(SOG_NUMCONV,numconv);
TLocalisamfile rconvoc(LF_RCONVOC);
rconvoc.setkey(3);
rconvoc.put(RCV_CODICE,codice);